diff --git a/Notes.pdf b/Notes.pdf
new file mode 100644
index 0000000000000000000000000000000000000000..59d6ae414e6bce54efba80a18eb70742912b956e
Binary files /dev/null and b/Notes.pdf differ
diff --git a/python/output0.m b/python/output0.m
new file mode 100644
index 0000000000000000000000000000000000000000..86d444f247cd35fd72a9b84f48e50db646b38917
--- /dev/null
+++ b/python/output0.m
@@ -0,0 +1,45 @@
+PVB[0,0,2*MH^2-S34-T-U,Sqrt[MT^2],Sqrt[MT^2]]
+PVB[0,0,MH^2-S-T24-U,Sqrt[MT^2],Sqrt[MT^2]]
+PVB[0,0,MH^2-S34-T14-T24,Sqrt[MT^2],Sqrt[MT^2]]
+PVB[0,0,S34,Sqrt[MT^2],Sqrt[MT^2]]
+PVB[0,0,T,Sqrt[MT^2],Sqrt[MT^2]]
+PVB[0,0,T24,Sqrt[MT^2],Sqrt[MT^2]]
+PVB[0,0,U,Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,0,0,U,MH^2,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,0,MH^2,2*MH^2-S34-T-U,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,0,MH^2,MH^2-S-T24-U,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,0,MH^2,MH^2-S34-T14-T24,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,0,MH^2,S34,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,0,MH^2,T,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,0,MH^2,T24,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,1,0,U,MH^2,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,1,MH^2,MH^2-S-T24-U,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,1,MH^2,MH^2-S34-T14-T24,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,1,MH^2,T24,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,2,0,U,MH^2,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,MH^2,2*MH^2-S34-T-U,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,MH^2,MH^2-S-T24-U,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,MH^2,MH^2-S34-T14-T24,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,MH^2,S34,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,MH^2,T,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,MH^2,T24,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,1,0,U,MH^2,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,1,MH^2,2*MH^2-S34-T-U,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,1,MH^2,MH^2-S-T24-U,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,1,MH^2,MH^2-S34-T14-T24,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,1,MH^2,S34,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,1,MH^2,T,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,1,MH^2,T24,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,2,0,MH^2,2*MH^2-S34-T-U,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,2,0,MH^2,MH^2-S-T24-U,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,2,0,MH^2,MH^2-S34-T14-T24,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,2,0,MH^2,S34,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,2,0,MH^2,T,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,2,0,MH^2,T24,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[1,0,0,0,U,MH^2,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[1,0,0,MH^2,2*MH^2-S34-T-U,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[1,0,0,MH^2,MH^2-S-T24-U,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[1,0,0,MH^2,MH^2-S34-T14-T24,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[1,0,0,MH^2,S34,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[1,0,0,MH^2,T,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[1,0,0,MH^2,T24,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
diff --git a/python/output1.m b/python/output1.m
new file mode 100644
index 0000000000000000000000000000000000000000..73bf1c4279de8e7e0e95b25c7d792a36ba58f00f
--- /dev/null
+++ b/python/output1.m
@@ -0,0 +1,125 @@
+PVC[0,0,0,2*MH^2-S34-T-U,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,0,S34,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,0,S34,S,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,0,U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,0,U,T14,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,1,2*MH^2-S34-T-U,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,1,S34,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,1,S34,S,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,1,U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,1,U,T14,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,2*MH^2-S34-T-U,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,S34,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,S34,S,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,U,T14,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,0,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,0,0,U,T14,MH^2-S-T24-U,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,0,MH^2,2*MH^2-S34-T-U,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,0,MH^2,S34,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,0,MH^2,S34,S,2*MH^2-S34-T-U,0,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,1,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,1,0,U,T14,MH^2-S-T24-U,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,1,MH^2,2*MH^2-S34-T-U,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,1,MH^2,S34,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,1,MH^2,S34,S,2*MH^2-S34-T-U,0,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,2,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,2,0,U,T14,MH^2-S-T24-U,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,2,MH^2,2*MH^2-S34-T-U,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,2,MH^2,S34,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,2,MH^2,S34,S,2*MH^2-S34-T-U,0,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,3,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,3,0,U,T14,MH^2-S-T24-U,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,3,MH^2,2*MH^2-S34-T-U,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,3,MH^2,S34,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,3,MH^2,S34,S,2*MH^2-S34-T-U,0,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,0,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,0,0,U,T14,MH^2-S-T24-U,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,0,MH^2,2*MH^2-S34-T-U,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,0,MH^2,S34,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,0,MH^2,S34,S,2*MH^2-S34-T-U,0,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,1,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,1,0,U,T14,MH^2-S-T24-U,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,1,MH^2,2*MH^2-S34-T-U,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,1,MH^2,S34,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,1,MH^2,S34,S,2*MH^2-S34-T-U,0,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,2,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,2,0,U,T14,MH^2-S-T24-U,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,2,MH^2,2*MH^2-S34-T-U,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,2,MH^2,S34,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,2,MH^2,S34,S,2*MH^2-S34-T-U,0,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,0,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,0,0,U,T14,MH^2-S-T24-U,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,1,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,1,0,U,T14,MH^2-S-T24-U,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,1,MH^2,2*MH^2-S34-T-U,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,1,MH^2,S34,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,1,MH^2,S34,S,2*MH^2-S34-T-U,0,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,3,0,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,3,0,0,U,T14,MH^2-S-T24-U,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,0,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,0,0,U,T14,MH^2-S-T24-U,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,0,MH^2,2*MH^2-S34-T-U,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,0,MH^2,S34,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,0,MH^2,S34,S,2*MH^2-S34-T-U,0,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,1,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,1,0,U,T14,MH^2-S-T24-U,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,1,MH^2,2*MH^2-S34-T-U,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,1,MH^2,S34,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,1,MH^2,S34,S,2*MH^2-S34-T-U,0,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,2,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,2,0,U,T14,MH^2-S-T24-U,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,2,MH^2,2*MH^2-S34-T-U,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,2,MH^2,S34,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,2,MH^2,S34,S,2*MH^2-S34-T-U,0,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,0,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,0,0,U,T14,MH^2-S-T24-U,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,0,MH^2,2*MH^2-S34-T-U,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,0,MH^2,S34,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,0,MH^2,S34,S,2*MH^2-S34-T-U,0,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,1,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,1,0,U,T14,MH^2-S-T24-U,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,1,MH^2,2*MH^2-S34-T-U,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,1,MH^2,S34,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,1,MH^2,S34,S,2*MH^2-S34-T-U,0,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,2,0,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,2,0,0,U,T14,MH^2-S-T24-U,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,2,0,MH^2,2*MH^2-S34-T-U,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,2,0,MH^2,S34,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,2,0,MH^2,S34,S,2*MH^2-S34-T-U,0,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,0,MH^2,2*MH^2-S34-T-U,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,0,MH^2,S34,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,0,MH^2,S34,S,2*MH^2-S34-T-U,0,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,1,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,1,0,U,T14,MH^2-S-T24-U,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,1,MH^2,2*MH^2-S34-T-U,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,1,MH^2,S34,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,1,MH^2,S34,S,2*MH^2-S34-T-U,0,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,1,0,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,1,0,0,U,T14,MH^2-S-T24-U,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,1,0,MH^2,2*MH^2-S34-T-U,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,1,0,MH^2,S34,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,1,0,MH^2,S34,S,2*MH^2-S34-T-U,0,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,3,0,0,MH^2,2*MH^2-S34-T-U,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,3,0,0,MH^2,S34,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,3,0,0,MH^2,S34,S,2*MH^2-S34-T-U,0,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,0,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,0,0,U,T14,MH^2-S-T24-U,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,0,MH^2,2*MH^2-S34-T-U,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,0,MH^2,S34,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,0,MH^2,S34,S,2*MH^2-S34-T-U,0,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,1,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,1,0,U,T14,MH^2-S-T24-U,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,1,MH^2,2*MH^2-S34-T-U,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,1,MH^2,S34,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,1,MH^2,S34,S,2*MH^2-S34-T-U,0,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,1,0,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,1,0,0,U,T14,MH^2-S-T24-U,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,1,0,MH^2,2*MH^2-S34-T-U,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,1,0,MH^2,S34,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,1,0,MH^2,S34,S,2*MH^2-S34-T-U,0,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,1,0,0,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,1,0,0,0,U,T14,MH^2-S-T24-U,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,1,0,0,MH^2,2*MH^2-S34-T-U,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,1,0,0,MH^2,S34,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,1,0,0,MH^2,S34,S,2*MH^2-S34-T-U,0,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
diff --git a/python/output2.m b/python/output2.m
new file mode 100644
index 0000000000000000000000000000000000000000..efa9b97d25f150421454eefa1eb2f94da90c4024
--- /dev/null
+++ b/python/output2.m
@@ -0,0 +1,121 @@
+PVC[0,0,0,0,T24,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,0,MH^2,T24,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,0,MH^2-S-T24-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,0,T24,0,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,0,U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,1,0,T24,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,1,MH^2,T24,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,1,MH^2-S-T24-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,1,T24,0,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,1,U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,0,T24,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,MH^2,T24,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,MH^2-S-T24-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,T24,0,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,0,0,MH^2,T24,0,2*MH^2-S34-T-U,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,0,0,MH^2-S-T24-U,MH^2,2*MH^2-S34-T-U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,0,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,0,MH^2,0,T24,0,2*MH^2-S34-T-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,0,MH^2,T24,0,0,MH^2-S-T-T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,1,0,MH^2,T24,0,2*MH^2-S34-T-U,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,1,0,MH^2-S-T24-U,MH^2,2*MH^2-S34-T-U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,1,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,1,MH^2,0,T24,0,2*MH^2-S34-T-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,1,MH^2,T24,0,0,MH^2-S-T-T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,2,0,MH^2-S-T24-U,MH^2,2*MH^2-S34-T-U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,2,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,3,0,MH^2-S-T24-U,MH^2,2*MH^2-S34-T-U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,3,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,0,0,MH^2,T24,0,2*MH^2-S34-T-U,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,0,0,MH^2-S-T24-U,MH^2,2*MH^2-S34-T-U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,0,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,0,MH^2,0,T24,0,2*MH^2-S34-T-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,0,MH^2,T24,0,0,MH^2-S-T-T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,1,0,MH^2,T24,0,2*MH^2-S34-T-U,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,1,0,MH^2-S-T24-U,MH^2,2*MH^2-S34-T-U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,1,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,1,MH^2,0,T24,0,2*MH^2-S34-T-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,1,MH^2,T24,0,0,MH^2-S-T-T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,2,0,MH^2,T24,0,2*MH^2-S34-T-U,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,2,0,MH^2-S-T24-U,MH^2,2*MH^2-S34-T-U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,2,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,2,MH^2,0,T24,0,2*MH^2-S34-T-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,2,MH^2,T24,0,0,MH^2-S-T-T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,0,0,MH^2,T24,0,2*MH^2-S34-T-U,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,0,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,0,MH^2,0,T24,0,2*MH^2-S34-T-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,0,MH^2,T24,0,0,MH^2-S-T-T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,1,0,MH^2,T24,0,2*MH^2-S34-T-U,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,1,0,MH^2-S-T24-U,MH^2,2*MH^2-S34-T-U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,1,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,1,MH^2,0,T24,0,2*MH^2-S34-T-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,1,MH^2,T24,0,0,MH^2-S-T-T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,3,0,0,MH^2,T24,0,2*MH^2-S34-T-U,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,3,0,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,3,0,MH^2,0,T24,0,2*MH^2-S34-T-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,3,0,MH^2,T24,0,0,MH^2-S-T-T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,0,0,MH^2,T24,0,2*MH^2-S34-T-U,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,0,0,MH^2-S-T24-U,MH^2,2*MH^2-S34-T-U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,0,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,0,MH^2,0,T24,0,2*MH^2-S34-T-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,0,MH^2,T24,0,0,MH^2-S-T-T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,1,0,MH^2,T24,0,2*MH^2-S34-T-U,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,1,0,MH^2-S-T24-U,MH^2,2*MH^2-S34-T-U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,1,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,1,MH^2,0,T24,0,2*MH^2-S34-T-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,1,MH^2,T24,0,0,MH^2-S-T-T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,2,0,MH^2,T24,0,2*MH^2-S34-T-U,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,2,0,MH^2-S-T24-U,MH^2,2*MH^2-S34-T-U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,2,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,2,MH^2,0,T24,0,2*MH^2-S34-T-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,2,MH^2,T24,0,0,MH^2-S-T-T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,0,0,MH^2,T24,0,2*MH^2-S34-T-U,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,0,0,MH^2-S-T24-U,MH^2,2*MH^2-S34-T-U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,0,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,0,MH^2,0,T24,0,2*MH^2-S34-T-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,0,MH^2,T24,0,0,MH^2-S-T-T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,1,0,MH^2,T24,0,2*MH^2-S34-T-U,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,1,0,MH^2-S-T24-U,MH^2,2*MH^2-S34-T-U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,1,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,1,MH^2,0,T24,0,2*MH^2-S34-T-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,1,MH^2,T24,0,0,MH^2-S-T-T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,2,0,0,MH^2,T24,0,2*MH^2-S34-T-U,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,2,0,0,MH^2-S-T24-U,MH^2,2*MH^2-S34-T-U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,2,0,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,2,0,MH^2,0,T24,0,2*MH^2-S34-T-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,2,0,MH^2,T24,0,0,MH^2-S-T-T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,0,MH^2,0,T24,0,2*MH^2-S34-T-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,0,MH^2,T24,0,0,MH^2-S-T-T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,1,0,MH^2,T24,0,2*MH^2-S34-T-U,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,1,0,MH^2-S-T24-U,MH^2,2*MH^2-S34-T-U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,1,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,1,MH^2,0,T24,0,2*MH^2-S34-T-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,1,MH^2,T24,0,0,MH^2-S-T-T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,1,0,0,MH^2,T24,0,2*MH^2-S34-T-U,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,1,0,0,MH^2-S-T24-U,MH^2,2*MH^2-S34-T-U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,1,0,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,1,0,MH^2,0,T24,0,2*MH^2-S34-T-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,1,0,MH^2,T24,0,0,MH^2-S-T-T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,3,0,0,MH^2,0,T24,0,2*MH^2-S34-T-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,3,0,0,MH^2,T24,0,0,MH^2-S-T-T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,0,0,MH^2,T24,0,2*MH^2-S34-T-U,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,0,0,MH^2-S-T24-U,MH^2,2*MH^2-S34-T-U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,0,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,0,MH^2,0,T24,0,2*MH^2-S34-T-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,0,MH^2,T24,0,0,MH^2-S-T-T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,1,0,MH^2,T24,0,2*MH^2-S34-T-U,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,1,0,MH^2-S-T24-U,MH^2,2*MH^2-S34-T-U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,1,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,1,MH^2,0,T24,0,2*MH^2-S34-T-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,1,MH^2,T24,0,0,MH^2-S-T-T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,1,0,0,MH^2,T24,0,2*MH^2-S34-T-U,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,1,0,0,MH^2-S-T24-U,MH^2,2*MH^2-S34-T-U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,1,0,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,1,0,MH^2,0,T24,0,2*MH^2-S34-T-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,1,0,MH^2,T24,0,0,MH^2-S-T-T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,1,0,0,0,MH^2,T24,0,2*MH^2-S34-T-U,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,1,0,0,0,MH^2-S-T24-U,MH^2,2*MH^2-S34-T-U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,1,0,0,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,1,0,0,MH^2,0,T24,0,2*MH^2-S34-T-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,1,0,0,MH^2,T24,0,0,MH^2-S-T-T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
diff --git a/python/output3.m b/python/output3.m
new file mode 100644
index 0000000000000000000000000000000000000000..27f41cb95e9797dcd04ae9d1a116b5b3fdcf6ebc
--- /dev/null
+++ b/python/output3.m
@@ -0,0 +1,123 @@
+PVC[0,0,0,0,MH^2-S-T24-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,0,MH^2-S-T24-U,0,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,0,T24,MH^2,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,0,U,0,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,0,U,MH^2-S-T-T14,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,1,0,MH^2-S-T24-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,1,MH^2-S-T24-U,0,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,1,T24,MH^2,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,1,U,0,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,1,U,MH^2-S-T-T14,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,0,MH^2-S-T24-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,MH^2-S-T24-U,0,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,T24,MH^2,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,U,0,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,U,MH^2-S-T-T14,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,0,0,T24,MH^2,S34,0,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,0,0,U,0,S34,MH^2,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,0,0,U,MH^2-S-T-T14,T24,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,0,MH^2,MH^2-S-T24-U,0,0,T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,1,0,T24,MH^2,S34,0,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,1,0,U,0,S34,MH^2,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,1,0,U,MH^2-S-T-T14,T24,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,1,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,1,MH^2,MH^2-S-T24-U,0,0,T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,2,0,T24,MH^2,S34,0,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,2,0,U,0,S34,MH^2,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,2,0,U,MH^2-S-T-T14,T24,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,3,0,T24,MH^2,S34,0,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,3,0,U,0,S34,MH^2,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,3,0,U,MH^2-S-T-T14,T24,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,0,0,T24,MH^2,S34,0,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,0,0,U,0,S34,MH^2,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,0,0,U,MH^2-S-T-T14,T24,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,0,MH^2,MH^2-S-T24-U,0,0,T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,1,0,T24,MH^2,S34,0,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,1,0,U,0,S34,MH^2,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,1,0,U,MH^2-S-T-T14,T24,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,1,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,1,MH^2,MH^2-S-T24-U,0,0,T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,2,0,T24,MH^2,S34,0,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,2,0,U,0,S34,MH^2,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,2,0,U,MH^2-S-T-T14,T24,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,2,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,2,MH^2,MH^2-S-T24-U,0,0,T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,0,0,U,0,S34,MH^2,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,0,0,U,MH^2-S-T-T14,T24,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,0,MH^2,MH^2-S-T24-U,0,0,T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,1,0,T24,MH^2,S34,0,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,1,0,U,0,S34,MH^2,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,1,0,U,MH^2-S-T-T14,T24,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,1,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,1,MH^2,MH^2-S-T24-U,0,0,T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,3,0,0,U,0,S34,MH^2,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,3,0,0,U,MH^2-S-T-T14,T24,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,3,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,3,0,MH^2,MH^2-S-T24-U,0,0,T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,0,0,T24,MH^2,S34,0,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,0,0,U,0,S34,MH^2,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,0,0,U,MH^2-S-T-T14,T24,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,0,MH^2,MH^2-S-T24-U,0,0,T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,1,0,T24,MH^2,S34,0,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,1,0,U,0,S34,MH^2,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,1,0,U,MH^2-S-T-T14,T24,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,1,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,1,MH^2,MH^2-S-T24-U,0,0,T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,2,0,T24,MH^2,S34,0,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,2,0,U,0,S34,MH^2,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,2,0,U,MH^2-S-T-T14,T24,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,2,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,2,MH^2,MH^2-S-T24-U,0,0,T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,0,0,T24,MH^2,S34,0,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,0,0,U,0,S34,MH^2,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,0,0,U,MH^2-S-T-T14,T24,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,0,MH^2,MH^2-S-T24-U,0,0,T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,1,0,T24,MH^2,S34,0,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,1,0,U,0,S34,MH^2,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,1,0,U,MH^2-S-T-T14,T24,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,1,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,1,MH^2,MH^2-S-T24-U,0,0,T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,2,0,0,T24,MH^2,S34,0,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,2,0,0,U,0,S34,MH^2,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,2,0,0,U,MH^2-S-T-T14,T24,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,2,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,2,0,MH^2,MH^2-S-T24-U,0,0,T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,0,MH^2,MH^2-S-T24-U,0,0,T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,1,0,T24,MH^2,S34,0,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,1,0,U,0,S34,MH^2,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,1,0,U,MH^2-S-T-T14,T24,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,1,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,1,MH^2,MH^2-S-T24-U,0,0,T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,1,0,0,T24,MH^2,S34,0,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,1,0,0,U,0,S34,MH^2,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,1,0,0,U,MH^2-S-T-T14,T24,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,1,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,1,0,MH^2,MH^2-S-T24-U,0,0,T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,3,0,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,3,0,0,MH^2,MH^2-S-T24-U,0,0,T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,0,0,T24,MH^2,S34,0,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,0,0,U,0,S34,MH^2,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,0,0,U,MH^2-S-T-T14,T24,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,0,MH^2,MH^2-S-T24-U,0,0,T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,1,0,T24,MH^2,S34,0,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,1,0,U,0,S34,MH^2,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,1,0,U,MH^2-S-T-T14,T24,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,1,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,1,MH^2,MH^2-S-T24-U,0,0,T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,1,0,0,T24,MH^2,S34,0,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,1,0,0,U,0,S34,MH^2,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,1,0,0,U,MH^2-S-T-T14,T24,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,1,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,1,0,MH^2,MH^2-S-T24-U,0,0,T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,1,0,0,0,T24,MH^2,S34,0,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,1,0,0,0,U,0,S34,MH^2,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,1,0,0,0,U,MH^2-S-T-T14,T24,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,1,0,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,1,0,0,MH^2,MH^2-S-T24-U,0,0,T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
diff --git a/python/output4.m b/python/output4.m
new file mode 100644
index 0000000000000000000000000000000000000000..071530ffe9e8cbb98cc948e8cee17f44a0ff55d1
--- /dev/null
+++ b/python/output4.m
@@ -0,0 +1,119 @@
+PVC[0,0,0,0,MH^2-S-T24-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,0,0,MH^2-S34-T14-T24,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,0,MH^2,MH^2-S-T24-U,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,0,MH^2,MH^2-S34-T14-T24,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,0,MH^2-S34-T14-T24,MH^2,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,1,0,MH^2-S-T24-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,1,0,MH^2-S34-T14-T24,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,1,MH^2,MH^2-S-T24-U,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,1,MH^2,MH^2-S34-T14-T24,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,1,MH^2-S34-T14-T24,MH^2,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,0,MH^2-S-T24-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,0,MH^2-S34-T14-T24,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,MH^2,MH^2-S-T24-U,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,MH^2,MH^2-S34-T14-T24,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,MH^2-S34-T14-T24,MH^2,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,0,0,MH^2,MH^2-S-T24-U,0,S34,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,0,0,MH^2,MH^2-S34-T14-T24,0,U,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,0,0,MH^2-S34-T14-T24,MH^2,0,T,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,0,MH^2,0,MH^2-S34-T14-T24,0,U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,1,0,MH^2,MH^2-S-T24-U,0,S34,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,1,0,MH^2,MH^2-S34-T14-T24,0,U,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,1,0,MH^2-S34-T14-T24,MH^2,0,T,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,1,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,1,MH^2,0,MH^2-S34-T14-T24,0,U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,0,0,MH^2,MH^2-S-T24-U,0,S34,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,0,0,MH^2,MH^2-S34-T14-T24,0,U,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,0,0,MH^2-S34-T14-T24,MH^2,0,T,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,0,MH^2,0,MH^2-S34-T14-T24,0,U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,1,0,MH^2,MH^2-S-T24-U,0,S34,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,1,0,MH^2,MH^2-S34-T14-T24,0,U,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,1,0,MH^2-S34-T14-T24,MH^2,0,T,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,1,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,1,MH^2,0,MH^2-S34-T14-T24,0,U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,2,0,MH^2,MH^2-S-T24-U,0,S34,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,2,0,MH^2,MH^2-S34-T14-T24,0,U,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,2,0,MH^2-S34-T14-T24,MH^2,0,T,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,2,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,2,MH^2,0,MH^2-S34-T14-T24,0,U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,0,0,MH^2,MH^2-S-T24-U,0,S34,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,0,0,MH^2,MH^2-S34-T14-T24,0,U,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,0,0,MH^2-S34-T14-T24,MH^2,0,T,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,0,MH^2,0,MH^2-S34-T14-T24,0,U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,1,0,MH^2,MH^2-S-T24-U,0,S34,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,1,0,MH^2,MH^2-S34-T14-T24,0,U,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,1,0,MH^2-S34-T14-T24,MH^2,0,T,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,1,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,1,MH^2,0,MH^2-S34-T14-T24,0,U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,3,0,0,MH^2,MH^2-S-T24-U,0,S34,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,3,0,0,MH^2,MH^2-S34-T14-T24,0,U,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,3,0,0,MH^2-S34-T14-T24,MH^2,0,T,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,3,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,3,0,MH^2,0,MH^2-S34-T14-T24,0,U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,0,0,MH^2,MH^2-S-T24-U,0,S34,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,0,0,MH^2,MH^2-S34-T14-T24,0,U,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,0,0,MH^2-S34-T14-T24,MH^2,0,T,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,0,MH^2,0,MH^2-S34-T14-T24,0,U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,1,0,MH^2,MH^2-S-T24-U,0,S34,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,1,0,MH^2,MH^2-S34-T14-T24,0,U,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,1,0,MH^2-S34-T14-T24,MH^2,0,T,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,1,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,1,MH^2,0,MH^2-S34-T14-T24,0,U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,2,0,MH^2,MH^2-S-T24-U,0,S34,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,2,0,MH^2,MH^2-S34-T14-T24,0,U,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,2,0,MH^2-S34-T14-T24,MH^2,0,T,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,2,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,2,MH^2,0,MH^2-S34-T14-T24,0,U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,0,0,MH^2,MH^2-S-T24-U,0,S34,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,0,0,MH^2,MH^2-S34-T14-T24,0,U,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,0,0,MH^2-S34-T14-T24,MH^2,0,T,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,0,MH^2,0,MH^2-S34-T14-T24,0,U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,1,0,MH^2,MH^2-S-T24-U,0,S34,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,1,0,MH^2,MH^2-S34-T14-T24,0,U,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,1,0,MH^2-S34-T14-T24,MH^2,0,T,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,1,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,1,MH^2,0,MH^2-S34-T14-T24,0,U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,2,0,0,MH^2,MH^2-S-T24-U,0,S34,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,2,0,0,MH^2,MH^2-S34-T14-T24,0,U,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,2,0,0,MH^2-S34-T14-T24,MH^2,0,T,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,2,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,2,0,MH^2,0,MH^2-S34-T14-T24,0,U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,0,MH^2,0,MH^2-S34-T14-T24,0,U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,1,0,MH^2,MH^2-S-T24-U,0,S34,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,1,0,MH^2,MH^2-S34-T14-T24,0,U,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,1,0,MH^2-S34-T14-T24,MH^2,0,T,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,1,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,1,MH^2,0,MH^2-S34-T14-T24,0,U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,1,0,0,MH^2,MH^2-S-T24-U,0,S34,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,1,0,0,MH^2,MH^2-S34-T14-T24,0,U,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,1,0,0,MH^2-S34-T14-T24,MH^2,0,T,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,1,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,1,0,MH^2,0,MH^2-S34-T14-T24,0,U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,3,0,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,3,0,0,MH^2,0,MH^2-S34-T14-T24,0,U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,0,0,MH^2,MH^2-S-T24-U,0,S34,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,0,0,MH^2,MH^2-S34-T14-T24,0,U,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,0,0,MH^2-S34-T14-T24,MH^2,0,T,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,0,MH^2,0,MH^2-S34-T14-T24,0,U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,1,0,MH^2,MH^2-S-T24-U,0,S34,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,1,0,MH^2,MH^2-S34-T14-T24,0,U,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,1,0,MH^2-S34-T14-T24,MH^2,0,T,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,1,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,1,MH^2,0,MH^2-S34-T14-T24,0,U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,1,0,0,MH^2,MH^2-S-T24-U,0,S34,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,1,0,0,MH^2,MH^2-S34-T14-T24,0,U,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,1,0,0,MH^2-S34-T14-T24,MH^2,0,T,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,1,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,1,0,MH^2,0,MH^2-S34-T14-T24,0,U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,1,0,0,0,MH^2,MH^2-S-T24-U,0,S34,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,1,0,0,0,MH^2,MH^2-S34-T14-T24,0,U,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,1,0,0,0,MH^2-S34-T14-T24,MH^2,0,T,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,1,0,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,1,0,0,MH^2,0,MH^2-S34-T14-T24,0,U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
diff --git a/python/pv.py b/python/pv.py
new file mode 100644
index 0000000000000000000000000000000000000000..252697ef5a03d2a785ec0af092b677ae61b372f3
--- /dev/null
+++ b/python/pv.py
@@ -0,0 +1,33 @@
+#!/usr/bin/env python
+import sys
+pvs = [ ]
+
+state = 0
+brackets = 0
+
+filename = sys.argv[1]
+
+with open(filename) as f:
+    for line in f:
+        n = len(line)
+        i = 0
+        while i<n:
+            if state==0:
+                if n-i>4 and line.startswith(('PVB[','PVC[','PVD['),i):
+                    state = 1
+                    brackets = 1
+                    pvs.append(line[i:i+4])
+                    i += 3
+            elif state==1:
+                c = line[i]
+                if c not in ' \n': pvs[-1] += line[i]
+                if c=='[': brackets += 1
+                elif c==']': brackets -= 1
+                if brackets==0:
+                    state = 0
+            i += 1
+
+for pv in pvs:
+    print(pv)
+
+
diff --git a/scripts/FA_FC_B_T_amps.nb b/scripts/FA_FC_B_T_amps.nb
new file mode 100644
index 0000000000000000000000000000000000000000..b08f6c4314f921d695119b14e45499f44fb2fb6f
--- /dev/null
+++ b/scripts/FA_FC_B_T_amps.nb
@@ -0,0 +1,62767 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 11.3' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[       158,          7]
+NotebookDataLength[   3163881,      62759]
+NotebookOptionsPosition[   3072186,      61787]
+NotebookOutlinePosition[   3072540,      61803]
+CellTagsIndexPosition[   3072497,      61800]
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell["\<\
+(* ggHgg.m
+Process: g + g \[Rule] H + g + g
+Model: SM, Last Modified June 2019
+Created by: J.G.Reyes Rivera *)\
+\>", "Input",
+ CellChangeTimes->{{3.7475001495063057`*^9, 3.747500188326548*^9}, 
+   3.747500222198135*^9, {3.749992173192234*^9, 3.749992175553384*^9}, {
+   3.750161038046422*^9, 3.75016104023641*^9}, {3.750695442757999*^9, 
+   3.75069544293856*^9}, {3.759670690846567*^9, 3.759670702233974*^9}, {
+   3.7694115610493517`*^9, 3.769411562407401*^9}},
+ CellLabel->"In[1]:=",ExpressionUUID->"5ed94a23-f6b7-4858-b120-72e0fcc40a50"],
+
+Cell[BoxData[{
+ RowBox[{"Needs", "[", "\"\<FeynArts`\>\"", "]"}], "\[IndentingNewLine]", 
+ RowBox[{"Needs", "[", "\"\<FormCalc`\>\"", "]"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"SetDirectory", "[", 
+   RowBox[{"NotebookDirectory", "[", "]"}], "]"}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{"NotebookSave", "[", "]"}]}], "Input",
+ CellChangeTimes->{{3.747500229738134*^9, 3.74750034701593*^9}, {
+   3.748007453439774*^9, 3.7480074777837*^9}, {3.748345619897317*^9, 
+   3.748345630982637*^9}, 3.7483457593416777`*^9, {3.748345821770327*^9, 
+   3.748345822068489*^9}, {3.7499921801836987`*^9, 3.749992181270163*^9}, {
+   3.769407892261169*^9, 3.769407910721567*^9}, {3.769411544693427*^9, 
+   3.7694115449136333`*^9}},
+ CellLabel->"In[5]:=",ExpressionUUID->"62f164f9-a9f7-4648-a8a9-d72d44fdf7a9"],
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"process", " ", "=", " ", 
+   RowBox[{
+    RowBox[{"{", 
+     RowBox[{
+      RowBox[{"V", "[", "5", "]"}], ",", 
+      RowBox[{"V", "[", "5", "]"}]}], "}"}], "\[Rule]", 
+    RowBox[{"{", 
+     RowBox[{
+      RowBox[{"S", "[", "1", "]"}], ",", 
+      RowBox[{"V", "[", "5", "]"}], ",", 
+      RowBox[{"V", "[", "5", "]"}]}], "}"}]}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"name", " ", "=", " ", "\"\<ggHgg-SM\>\""}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"SetOptions", "[", 
+   RowBox[{"InsertFields", ",", 
+    RowBox[{"Model", "\[Rule]", "\"\<SMQCD\>\""}]}], "]"}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"$PaintSE", " ", "=", " ", 
+   RowBox[{"MkDir", "[", 
+    RowBox[{"name", " ", "<>", " ", "\"\<.diagrams\>\""}], "]"}]}], 
+  ";"}], "\n", 
+ RowBox[{
+  RowBox[{"DoPaint", "[", 
+   RowBox[{"diags_", ",", " ", "file_", ",", " ", "opt___"}], "]"}], " ", ":=",
+   " ", 
+  RowBox[{"Paint", "[", 
+   RowBox[{"diags", ",", " ", "opt", ",", "\n", "  ", 
+    RowBox[{"DisplayFunction", " ", "->", " ", 
+     RowBox[{"(", 
+      RowBox[{
+       RowBox[{"Export", "[", 
+        RowBox[{
+         RowBox[{"ToFileName", "[", 
+          RowBox[{"$PaintSE", ",", " ", 
+           RowBox[{"file", " ", "<>", " ", "\"\<.png\>\""}]}], "]"}], ",", 
+         " ", "#"}], "]"}], "&"}], ")"}]}]}], 
+   "]"}]}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"ClearProcess", "[", "]"}], ";"}], "\[IndentingNewLine]"}], "Input",\
+
+ CellChangeTimes->{{3.747500353923358*^9, 3.7475003987048273`*^9}, {
+  3.747501202527136*^9, 3.747501274219995*^9}, {3.747501456168948*^9, 
+  3.747501498501958*^9}, {3.7475016411192837`*^9, 3.7475016416147757`*^9}, {
+  3.747668840862981*^9, 3.747668851467557*^9}, {3.7495750507409267`*^9, 
+  3.749575054371243*^9}, {3.7499923429753036`*^9, 3.74999236369555*^9}, {
+  3.750171453707425*^9, 3.750171462665347*^9}, {3.766143695796837*^9, 
+  3.766143701796813*^9}, {3.766143820264229*^9, 3.766143850794642*^9}},
+ CellLabel->"In[9]:=",ExpressionUUID->"6c1a13cd-8d6a-4aec-be74-43041223224c"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"Clear", "[", "triangle", "]"}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{"Print", "[", "\"\<Triangles\>\"", "]"}], "\n", 
+ RowBox[{
+  RowBox[{"topsT", " ", "=", " ", 
+   RowBox[{"CreateTopologies", "[", 
+    RowBox[{"1", ",", 
+     RowBox[{"2", "\[Rule]", "3"}], ",", "TrianglesOnly"}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"insT", " ", "=", " ", 
+   RowBox[{"InsertFields", "[", 
+    RowBox[{"topsT", ",", "process", ",", 
+     RowBox[{"InsertionLevel", "\[Rule]", 
+      RowBox[{"{", "Particles", "}"}]}], ",", 
+     RowBox[{"Restrictions", "\[Rule]", 
+      RowBox[{"{", "NoLightFHCoupling", "}"}]}]}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"Paint", "[", "insT", "]"}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"DoPaint", "[", 
+   RowBox[{"insT", ",", "\"\<triangle\>\""}], "]"}], ";", 
+  "\.1c"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{
+   RowBox[{"triangle", " ", "=", " ", 
+    RowBox[{"CalcFeynAmp", "[", 
+     RowBox[{
+      RowBox[{"CreateFeynAmp", "[", "insT", "]"}], ",", 
+      RowBox[{"SortDen", "\[Rule]", "True"}]}], "]"}]}], ";"}], 
+  "\[IndentingNewLine]", 
+  RowBox[{"(*", 
+   RowBox[{
+    RowBox[{"Keep", "[", "triangle", "]"}], ";", "\[IndentingNewLine]", 
+    RowBox[{"Export", "[", 
+     RowBox[{"\"\<Abbr_ggHgg_triangle_FeynAmp_38diags.m\>\"", ",", 
+      RowBox[{"triangle", "[", 
+       RowBox[{"[", "1", "]"}], "]"}]}], "]"}], ";"}], 
+   "*)"}]}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"triangle", " ", "=", " ", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"triangle", " ", "//.", " ", 
+      RowBox[{"Abbr", "[", "]"}]}], " ", "//.", 
+     RowBox[{"Subexpr", "[", "]"}]}], "//.", 
+    RowBox[{"Abbr", "[", "]"}]}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{
+   RowBox[{"Export", "[", 
+    RowBox[{"\"\<ggHgg_triangle_FeynAmp_38diags.m\>\"", ",", 
+     RowBox[{"triangle", "[", 
+      RowBox[{"[", "1", "]"}], "]"}]}], "]"}], ";"}], 
+  "\[IndentingNewLine]"}], "\[IndentingNewLine]"}], "Input",
+ CellChangeTimes->{{3.7694087865438004`*^9, 3.7694088245751333`*^9}, {
+  3.7694094570452623`*^9, 3.7694095184068336`*^9}, {3.769409791549564*^9, 
+  3.769409804100452*^9}, {3.769419316635501*^9, 3.769419325376972*^9}, {
+  3.769419619172256*^9, 3.769419664695341*^9}, {3.774370726518683*^9, 
+  3.7743707511228867`*^9}, {3.774370817690271*^9, 3.774370821533065*^9}},
+ CellLabel->"In[15]:=",ExpressionUUID->"a2cef43b-ff41-41b9-b41f-7c91f647357c"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["\<\"Triangles\"\>"], "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},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"95be2bdc-98fb-4c01-924c-ea01198ee41b"],
+
+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.7758215205772142`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"17cab7fc-b6ba-408e-aecb-ebaf93897053"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"\"\>", "\[InvisibleSpace]", "\<\"loading \"\>", 
+   "\[InvisibleSpace]", "\<\"generic\"\>", 
+   "\[InvisibleSpace]", "\<\" model file \"\>", 
+   "\[InvisibleSpace]", \
+"\<\"/Users/josegabrielreyes/Documents/Higgs/FeynArts-3.10/Models/Lorentz.gen\
+\"\>"}],
+  SequenceForm[
+  "", "loading ", "generic", " model file ", 
+   "/Users/josegabrielreyes/Documents/Higgs/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.7758215205942783`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"eb19a6d8-7700-4e54-96ee-7332537315f8"],
+
+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.7758215206054163`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"08716a53-d1a2-4287-a12b-7c2cc8366651"],
+
+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.775821520619944*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"79041dd7-30e3-460c-b096-101d2fe6c2a1"],
+
+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.7758215206347017`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"a5fc149b-1939-45dd-9a92-6e6df4b4c4e0"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"\"\>", "\[InvisibleSpace]", "\<\"loading \"\>", 
+   "\[InvisibleSpace]", "\<\"classes\"\>", 
+   "\[InvisibleSpace]", "\<\" model file \"\>", 
+   "\[InvisibleSpace]", \
+"\<\"/Users/josegabrielreyes/Documents/Higgs/FeynArts-3.10/Models/SMQCD.mod\"\
+\>"}],
+  SequenceForm[
+  "", "loading ", "classes", " model file ", 
+   "/Users/josegabrielreyes/Documents/Higgs/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.7758215206496887`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"d360cb81-67dd-4acd-b071-c1f757c38c1f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"  \"\>", "\[InvisibleSpace]", "\<\"loading \"\>", 
+   "\[InvisibleSpace]", "\<\"classes\"\>", 
+   "\[InvisibleSpace]", "\<\" model file \"\>", 
+   "\[InvisibleSpace]", \
+"\<\"/Users/josegabrielreyes/Documents/Higgs/FeynArts-3.10/Models/SM.mod\"\>"}\
+],
+  SequenceForm[
+  "  ", "loading ", "classes", " model file ", 
+   "/Users/josegabrielreyes/Documents/Higgs/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.775821520661491*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"9e58d0f9-7d30-4c82-903d-a612d33fd86f"],
+
+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.775821520673935*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"72db1fe2-2d37-4a0c-872b-3cc441237082"],
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+    {GridBox[{
+       {
+        RowBox[{"$CKM", "=", "False"}]}
+      },
+      BaselinePosition->{Baseline, {1, 1}},
+      GridBoxAlignment->{
+       "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
+        "RowsIndexed" -> {}},
+      GridBoxItemSize->{"Columns" -> {{
+           Scaled[0.999]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, 
+        "RowsIndexed" -> {}}]}
+   },
+   BaselinePosition->{Baseline, {1, 1}},
+   GridBoxAlignment->{
+    "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
+     "RowsIndexed" -> {}}],
+  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.775821520687132*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"5a609188-42ff-4b27-be41-fd6ff76b1515"],
+
+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.7758215207003202`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"a0ef6b9a-d2b7-479e-8137-1c407834661a"],
+
+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.775821520714211*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"395f68bb-da38-45e3-8e4c-7524d4a51f64"],
+
+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.775821520811702*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"104e0f63-359b-4f00-9f36-f293c8583cf6"],
+
+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.7758215208260517`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"d13e738b-3631-426d-8bd1-24a66c457cbb"],
+
+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.775821520835772*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"439c6887-602a-4183-b232-e3a67fb8e791"],
+
+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.7758215208924847`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"48ada3e2-6b47-48a0-892b-cc88328d16cf"],
+
+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.775821520899065*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"927779f6-d08f-4d39-a6d0-830a34216070"],
+
+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.775821520984041*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"6583a4e9-8f50-4e53-8dc5-040d440c732a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Excluding \"\>", "\[InvisibleSpace]", "18", 
+   "\[InvisibleSpace]", "\<\" field point(s) (incl. charge-conjugate \
+ones)\"\>"}],
+  SequenceForm[
+  "Excluding ", 18, " field point(s) (incl. charge-conjugate ones)"],
+  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.7758215209908133`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"c4684f77-a5af-498d-831a-f0ff3c4e1201"],
+
+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.775821520998866*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"6a429f81-07ca-4ccf-80bb-9a75f25f1846"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"inserting at level(s) \"\>", "\[InvisibleSpace]", 
+   RowBox[{"{", "Particles", "}"}]}],
+  SequenceForm["inserting at level(s) ", {FeynArts`Particles}],
+  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.775821521005288*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"389ba7bd-4cc4-43db-b5f2-79bd9caadb5d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 1, ": ", "0 Particles insertions"],
+  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.775821521011943*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"61464dd7-6a02-413d-a317-aad1778ec51f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 2, ": ", "2 Particles insertions"],
+  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.77582152107311*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"fb0f2e26-5c6b-4dd8-b109-5041729eaa3a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "3", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 3, ": ", "0 Particles insertions"],
+  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.775821521127699*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"196a4738-ac75-4913-809d-c38dc4f95dc2"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "4", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 4, ": ", "0 Particles insertions"],
+  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.7758215211387033`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"cdd6ea88-0d66-457d-9308-f6a096862ed3"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "5", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 5, ": ", "2 Particles insertions"],
+  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.775821521198863*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"80fff600-a977-44ed-859e-766002e860a1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "6", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 6, ": ", "0 Particles insertions"],
+  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.7758215212586393`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"a3fef4f5-5b1d-46f5-a0c2-b5ab178429e9"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "7", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 7, ": ", "0 Particles insertions"],
+  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.775821521265595*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"e0abfbbf-d83e-443b-b002-febe2931f7f6"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "8", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 8, ": ", "2 Particles insertions"],
+  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.77582152131539*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"9409c4df-2bdc-4cd1-aea0-e86608e6c22c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "9", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 9, ": ", "2 Particles insertions"],
+  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.775821521375615*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"37f8b566-f4a5-427d-a780-b172e0e9ed0d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "10", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 10, ": ", "0 Particles insertions"],
+  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.775821521426969*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"95cef3b7-252b-473d-8be6-83ab00891d73"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "11", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 11, ": ", "0 Particles insertions"],
+  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.775821521489283*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"2c83028a-01a8-491c-913d-ebe3b9b372b9"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "12", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 12, ": ", "0 Particles insertions"],
+  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.775821521554887*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"017df86f-f278-4438-abc4-8b8c6678129c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "13", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 13, ": ", "2 Particles insertions"],
+  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.775821521644156*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"41c0f1a2-034d-447f-ad92-6d0cae8393d0"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "14", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 14, ": ", "0 Particles insertions"],
+  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.775821521709709*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"8f567853-5358-4ce8-b9d9-add48f5cfe7c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "15", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 15, ": ", "2 Particles insertions"],
+  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.7758215217981977`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"d94aefd7-5ad6-41e8-94bf-82f1a5da8e87"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "16", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 16, ": ", "2 Particles insertions"],
+  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.775821521928403*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"a1667e62-53f2-4568-b952-d91a76d0b6fb"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "17", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 17, ": ", "0 Particles insertions"],
+  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.775821521989687*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"fd2d9ffa-0c9f-4edc-9ad4-3963eea69b87"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "18", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 18, ": ", "0 Particles insertions"],
+  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.775821522046685*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"0cda6289-833d-401f-9877-358fff7212cd"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "19", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 19, ": ", "0 Particles insertions"],
+  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.775821522112061*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"1957d743-de80-48f5-a636-21f1f1aa7501"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "20", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 20, ": ", "0 Particles insertions"],
+  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.7758215221830053`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"44b3f181-2e51-482e-affe-db86b44602ac"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "21", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 21, ": ", "0 Particles insertions"],
+  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.775821522247364*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"ff3d11c0-d301-4777-a1f2-a610d7d9a675"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "22", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 22, ": ", "0 Particles insertions"],
+  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.7758215223095818`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"ba2acc4a-b13c-40bf-b0b9-bd894d26274e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "23", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 23, ": ", "0 Particles insertions"],
+  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.775821522376569*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"3b804754-f313-430b-8cb0-31b5aaa5f215"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "24", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 24, ": ", "0 Particles insertions"],
+  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.775821522443722*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"f1228fa4-8234-472f-bad1-73814621aeaf"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "25", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 25, ": ", "0 Particles insertions"],
+  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.775821522506212*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"74498276-21e0-4a9b-a0aa-ad268e15c133"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "26", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 26, ": ", "0 Particles insertions"],
+  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.775821522574318*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"a439ca59-412f-45c9-ae09-c5ef0adc59fa"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "27", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 27, ": ", "0 Particles insertions"],
+  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.7758215226363287`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"2b52cb8a-5a2f-4c20-8a6b-559e2885c512"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "28", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 28, ": ", "0 Particles insertions"],
+  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.775821522700251*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"0caad15d-e43a-49c7-acf4-a07620c1df9d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "29", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 29, ": ", "2 Particles insertions"],
+  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.775821522791025*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"0dde48d4-1c15-4904-b19e-6d02a168b3c3"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "30", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 30, ": ", "0 Particles insertions"],
+  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.775821522857422*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"f7321913-10b3-4f6f-869a-662bf0274289"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "31", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 31, ": ", "2 Particles insertions"],
+  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.775821522952284*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"88821906-7f24-4e37-aed6-ef83b5c08ec5"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "32", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 32, ": ", "0 Particles insertions"],
+  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.775821523014319*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"db365a78-952e-424d-a8c5-1c60cbbac3b6"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "33", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 33, ": ", "2 Particles insertions"],
+  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.7758215231071043`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"95aa9915-8995-46bd-b083-d8e235103da7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "34", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 34, ": ", "2 Particles insertions"],
+  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.7758215231984377`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"8ce667a7-d620-46c8-9048-19164c2fe9fb"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "35", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 35, ": ", "0 Particles insertions"],
+  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.7758215232623*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"047f977e-13ab-4375-b19b-fc301e804f04"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "36", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 36, ": ", "2 Particles insertions"],
+  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.775821523352088*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"1be3ed47-0bb8-43d6-94fe-f97fe2bb5ba7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "37", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 37, ": ", "0 Particles insertions"],
+  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.775821523415745*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"94eb4d28-ed47-4ba2-a1cf-599a36a6cafc"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "38", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 38, ": ", "2 Particles insertions"],
+  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.775821523510915*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"a3db7988-d6b5-4f5d-972d-952a01edbb0f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "39", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 39, ": ", "0 Particles insertions"],
+  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.775821523581208*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"e7aca9d7-b34e-470f-a88f-b624d7e0e958"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "40", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 40, ": ", "0 Particles insertions"],
+  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.775821523644973*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"291a47af-4dc7-4de6-b36f-8d881b917536"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "41", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 41, ": ", "0 Particles insertions"],
+  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.775821523711895*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"9872fa25-a27c-41a0-b138-6214eff0560b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "42", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 42, ": ", "0 Particles insertions"],
+  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.775821523770302*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"0ed85b66-aeb2-4a23-860e-f055e412c19f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "43", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 43, ": ", "0 Particles insertions"],
+  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.775821523829897*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"4c61a78a-0e05-41f7-a835-002d535416d4"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "44", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 44, ": ", "2 Particles insertions"],
+  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.77582152392986*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"3c180812-a089-4b46-be4b-38556662b73b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "45", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 45, ": ", "0 Particles insertions"],
+  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.775821523996532*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"22ea50da-a3f1-4d7b-aa85-0b749fbc73bd"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "46", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 46, ": ", "2 Particles insertions"],
+  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.7758215240936747`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"3fd81227-d5ba-480a-886c-3882ce6b38a6"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "47", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 47, ": ", "2 Particles insertions"],
+  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.775821524187068*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"956e5828-589f-40db-83b8-f309955de8d0"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "48", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 48, ": ", "0 Particles insertions"],
+  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.7758215242545137`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"33dfe8b5-d0e8-4b38-b3b1-27debdbc6e62"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "49", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 49, ": ", "2 Particles insertions"],
+  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.775821524353867*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"c8d217fa-58f9-4618-8910-f102c2b8e99d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "50", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 50, ": ", "0 Particles insertions"],
+  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.775821524418827*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"08b7c85f-5b2b-4689-bedf-181e4692099f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "51", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 51, ": ", "0 Particles insertions"],
+  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.77582152448173*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"ef12fc61-9bce-41da-a8e3-c99e218aaeff"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "52", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 52, ": ", "0 Particles insertions"],
+  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.775821524545789*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"ee7502bf-f9d9-4ead-8a35-caf262094785"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "53", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 53, ": ", "2 Particles insertions"],
+  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.7758215246378193`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"2ff486b6-da1d-46c6-bace-b35ed8fb0a0a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "54", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 54, ": ", "2 Particles insertions"],
+  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.7758215247289333`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"20b0e1f7-d69f-4196-a238-5db1d7b3d5ef"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "55", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 55, ": ", "0 Particles insertions"],
+  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.775821524778552*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"807a10f5-c9a7-43ce-9e16-d429e391910d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "56", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 56, ": ", "0 Particles insertions"],
+  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.775821524785575*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"69cb4ac9-1b1a-4d6a-bf1f-f9b7fa878a12"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "57", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 57, ": ", "0 Particles insertions"],
+  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.7758215247935658`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"f8f509e1-588b-4ed1-a98a-8ee71cd1cf2c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "58", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 58, ": ", "0 Particles insertions"],
+  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.7758215248037777`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"69a96cae-392e-492c-bd26-075f6c5a193a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "59", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 59, ": ", "0 Particles insertions"],
+  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.7758215248109283`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"77fee6db-15a5-4a26-9672-1e7d9aadbcd0"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "60", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 60, ": ", "0 Particles insertions"],
+  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.775821524819066*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"64834d2c-1e4d-4442-8bec-675be74e7dda"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "61", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 61, ": ", "0 Particles insertions"],
+  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.7758215248280497`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"59971e47-1616-4a22-a721-c533bdd96860"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "62", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 62, ": ", "0 Particles insertions"],
+  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.7758215248355093`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"daa6c0b9-88af-4140-84da-b05c30c5c32b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "63", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 63, ": ", "0 Particles insertions"],
+  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.7758215248432837`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"66621e56-80bf-4370-a9f5-b1e47c485242"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "64", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 64, ": ", "0 Particles insertions"],
+  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.77582152485423*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"5a491c83-6c7a-4929-82a4-1a5a5645762e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "65", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 65, ": ", "0 Particles insertions"],
+  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.775821524862764*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"2b0c227a-7d7c-42ee-a180-4c2a2a146ac2"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "66", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 66, ": ", "0 Particles insertions"],
+  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.775821524869915*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"ccd6cff8-1b8a-4d01-b010-ead3e010e3fc"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "67", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 67, ": ", "0 Particles insertions"],
+  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.7758215248774757`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"a7a10e1f-072f-4c41-8ee4-241f3ad842b5"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "68", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 68, ": ", "0 Particles insertions"],
+  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.775821524883623*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"7fafeb15-f4e7-4947-b398-febc44282cd1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "69", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 69, ": ", "0 Particles insertions"],
+  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.775821524890019*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"1332cbbf-fb62-4dd6-a3cb-cef8d1e70dc5"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "70", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 70, ": ", "0 Particles insertions"],
+  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.775821524899111*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"310bd995-8600-4e80-97b1-81840494d0f7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "71", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 71, ": ", "0 Particles insertions"],
+  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.7758215249079933`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"f6b1e272-4cf4-4247-a1de-432525a6e121"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "72", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 72, ": ", "0 Particles insertions"],
+  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.775821524916655*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"79c37aac-8c86-4c0e-abdb-183d9fb1748b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "73", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 73, ": ", "0 Particles insertions"],
+  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.775821524927713*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"7507a970-75c5-44e9-ab07-38d61c1ccb9e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "74", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 74, ": ", "0 Particles insertions"],
+  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.775821524939447*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"e09d7b62-45f9-497b-a6e1-806796c1ffa8"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "75", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 75, ": ", "0 Particles insertions"],
+  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.775821524950326*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"29257eb8-2ebe-42f4-bd66-df00a57bb73d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "76", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 76, ": ", "0 Particles insertions"],
+  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.7758215249611683`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"b6a82730-c91c-4d73-b34c-8c6ce612fdde"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "77", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 77, ": ", "0 Particles insertions"],
+  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.77582152497258*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"c524cf2f-3e9a-46b4-be86-f9444ba98e88"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "78", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 78, ": ", "0 Particles insertions"],
+  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.775821524983777*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"c10b4522-2c7b-4642-82d5-c6e8a6d01dba"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "79", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 79, ": ", "0 Particles insertions"],
+  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.7758215249958363`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"68081a7b-576f-4936-a3c8-1c9c4d7d25c3"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "80", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 80, ": ", "0 Particles insertions"],
+  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.7758215250116262`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"b6894ac0-5f23-4353-abbf-a94d55e615f7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "81", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 81, ": ", "0 Particles insertions"],
+  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.775821525028082*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"9488c342-c8ed-449f-950b-ed0982efef33"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "82", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 82, ": ", "0 Particles insertions"],
+  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.775821525044083*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"32ea0167-2716-4f66-a451-150d2ceda811"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "83", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 83, ": ", "0 Particles insertions"],
+  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.775821525054821*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"08d33716-31b1-4e5f-85b6-bc539ceaa0cf"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "84", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 84, ": ", "0 Particles insertions"],
+  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.7758215250655823`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"ddcc7769-8e24-4e3f-b2af-2af53a5bdc11"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "85", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 85, ": ", "0 Particles insertions"],
+  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.775821525076709*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"f994c345-6b06-4ec0-9d0b-63703d71adb1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "86", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 86, ": ", "0 Particles insertions"],
+  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.7758215250868483`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"64721b11-69e7-42a8-9ed4-2fb8488cdff6"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "87", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 87, ": ", "0 Particles insertions"],
+  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.7758215250965767`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"03689c0b-6996-4dbd-81a8-1cad70f362c1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "88", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 88, ": ", "0 Particles insertions"],
+  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.775821525103999*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"808878f6-7af9-4107-8aa9-978f16ef4b35"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "89", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 89, ": ", "0 Particles insertions"],
+  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.775821525110635*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"aefbf6f4-2a0f-4015-8c5e-607e24212b32"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "90", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 90, ": ", "0 Particles insertions"],
+  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.775821525119246*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"c486abb2-c049-400e-bdbb-9ecfaede817d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "91", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 91, ": ", "0 Particles insertions"],
+  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.775821525126441*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"da0741dd-0830-4119-9805-31582a2367b0"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "92", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 92, ": ", "0 Particles insertions"],
+  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.775821525137515*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"1cb27c93-7715-4dc7-a6d6-cfae5c74839c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "93", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 93, ": ", "0 Particles insertions"],
+  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.77582152514504*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"ddc5cee1-b4e7-458f-b4ba-89d60a849bc4"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "94", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 94, ": ", "0 Particles insertions"],
+  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.775821525151367*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"be030525-a4fc-4e6b-be42-d477d055de13"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "95", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 95, ": ", "0 Particles insertions"],
+  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.775821525158676*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"339456c2-a58e-4741-b4dc-96df6abdc7c1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "96", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 96, ": ", "0 Particles insertions"],
+  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.7758215251668787`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"89cc81e1-b55e-449a-a3d5-f07c46b2c5cc"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "97", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 97, ": ", "0 Particles insertions"],
+  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.7758215252290287`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"6de19c82-34c9-4ba7-9b48-226b86e19b1e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "98", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 98, ": ", "0 Particles insertions"],
+  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.775821525239696*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"899465f8-5f47-405a-9c5c-e10dc8e90f10"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "99", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 99, ": ", "0 Particles insertions"],
+  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.775821525250952*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"9e4f3248-4f2e-4577-8a3f-d5b2860efa80"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "100", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 100, ": ", "0 Particles insertions"],
+  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.775821525259357*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"2a9ba662-3fea-4229-abd4-39f05b296228"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "101", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 101, ": ", "0 Particles insertions"],
+  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.775821525267342*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"0531799e-f502-45d8-9e0b-c29dc4b1ce02"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "102", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 102, ": ", "0 Particles insertions"],
+  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.775821525275188*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"91b0a278-0a06-4500-808d-22396119acfa"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "103", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 103, ": ", "0 Particles insertions"],
+  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.7758215252836742`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"605fefa7-a214-4a78-b7d0-790e17d495d9"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "104", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 104, ": ", "0 Particles insertions"],
+  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.775821525345201*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"2443812c-7ab0-41ea-b494-512b76e3e44b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "105", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 105, ": ", "0 Particles insertions"],
+  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.775821525352449*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"aee94a92-c972-4419-9c21-64f87a8cff0e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "106", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 106, ": ", "0 Particles insertions"],
+  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.775821525359831*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"4c579a5b-81b4-4170-b71b-5c94acdfbcf7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "107", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 107, ": ", "0 Particles insertions"],
+  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.7758215253662567`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"1e982064-f679-41a3-866e-cef41c13f58a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "108", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 108, ": ", "0 Particles insertions"],
+  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.7758215253733263`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"89af9e07-74d9-4f4d-afec-8066c5f45c01"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "109", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 109, ": ", "0 Particles insertions"],
+  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.775821525379627*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"36993d8d-616d-4d86-9f6c-858eb5133544"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "110", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 110, ": ", "0 Particles insertions"],
+  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.775821525428071*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"0ed4f5d7-298f-4112-a687-d7ae34364518"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "111", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 111, ": ", "0 Particles insertions"],
+  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.7758215254383287`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"3c56fdcb-54a0-42f0-8fdd-22993d28b1c4"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "112", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 112, ": ", "0 Particles insertions"],
+  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.775821525446269*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"af574732-863b-4bf1-ba16-cc81168c3f4b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "113", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 113, ": ", "0 Particles insertions"],
+  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.7758215254527187`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"e2000529-e736-4802-98c9-b5248025406b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "114", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 114, ": ", "0 Particles insertions"],
+  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.7758215254592047`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"9bf2fd19-4359-42ab-a02f-08ef0f78ed75"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "115", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 115, ": ", "0 Particles insertions"],
+  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.775821525512397*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"a76e94e5-2295-4f2a-9002-293e7cbd3393"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "116", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 116, ": ", "0 Particles insertions"],
+  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.775821525518751*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"95d2486d-e076-4d22-bfb7-9b81ed7bcd17"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "117", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 117, ": ", "0 Particles insertions"],
+  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.7758215255299377`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"32a278bb-960a-461d-848d-3ff674c51c0d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "118", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 118, ": ", "0 Particles insertions"],
+  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.775821525541224*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"2cce181e-b2fd-442b-b6fb-6788c5d3f819"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "119", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 119, ": ", "0 Particles insertions"],
+  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.7758215255951633`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"9f19765b-5e37-4a08-a19d-0f77a87ea7ad"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "120", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 120, ": ", "0 Particles insertions"],
+  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.7758215256058683`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"021a5bc9-a07f-41b0-978c-00b32d99d8d2"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "121", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 121, ": ", "0 Particles insertions"],
+  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.775821525615521*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"1b5b7e7d-0ca2-4f6f-9b7e-4e0ff4c00ffc"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "122", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 122, ": ", "0 Particles insertions"],
+  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.775821525625033*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"9fbc67c5-9eab-4cc8-a3db-d13e16b9f9ae"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "123", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 123, ": ", "0 Particles insertions"],
+  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.7758215256787443`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"b8d15074-3bd2-4255-a41e-00fb85ec4123"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "124", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 124, ": ", "0 Particles insertions"],
+  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.775821525690011*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"a47967bf-9a66-429b-b544-46557b2de0a2"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "125", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 125, ": ", "0 Particles insertions"],
+  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.775821525699597*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"090ebba9-cc4a-4511-9768-a733b7a777c5"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "126", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 126, ": ", "0 Particles insertions"],
+  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.775821525710155*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"84ae8ec3-7115-488d-b483-04729cee5d6d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "127", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 127, ": ", "0 Particles insertions"],
+  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.7758215257191668`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"24ab1ede-3197-4bc8-862a-0b94e96991e7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "128", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 128, ": ", "0 Particles insertions"],
+  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.775821525730124*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"ced0c2c9-1571-4682-9592-559792ab4bf4"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "129", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 129, ": ", "0 Particles insertions"],
+  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.775821525794838*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"be07c732-6e96-4da3-a616-3ad93d10fd62"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "130", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 130, ": ", "0 Particles insertions"],
+  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.775821525805936*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"6831d176-931b-46c0-b567-e713e97875b0"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "131", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 131, ": ", "0 Particles insertions"],
+  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.7758215258170147`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"7fb81ab2-416d-4c75-a415-964b1d7d0163"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "132", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 132, ": ", "0 Particles insertions"],
+  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.775821525828352*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"8a93f0dd-659f-4fd3-87dc-dd119ea79669"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "133", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 133, ": ", "0 Particles insertions"],
+  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.775821525838872*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"abde7d00-2771-4d96-a125-f3d7c67acbed"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "134", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 134, ": ", "0 Particles insertions"],
+  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.7758215258493137`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"6984bedf-553b-49cf-9011-d5ef08ecf363"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "135", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 135, ": ", "0 Particles insertions"],
+  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.7758215258556757`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"3f432ed5-3b6a-481a-996c-82534394b528"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "136", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 136, ": ", "0 Particles insertions"],
+  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.775821525910555*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"ffafb3bd-9f6e-4112-99a5-c126e2f337d6"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "137", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 137, ": ", "0 Particles insertions"],
+  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.775821525920577*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"954f9671-78c7-424d-9918-3ebdd3c28d18"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "138", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 138, ": ", "0 Particles insertions"],
+  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.7758215259298897`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"e3822845-ba7d-4cf9-980c-f50dbe4cb81a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "139", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 139, ": ", "0 Particles insertions"],
+  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.77582152594055*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"6bb844ed-20f0-4ebc-bc72-72b5bea41a46"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "140", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 140, ": ", "0 Particles insertions"],
+  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.775821525995332*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"bb38afd2-c413-458f-9160-aefbd0d27927"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "141", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 141, ": ", "0 Particles insertions"],
+  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.77582152600434*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"6cb9f6d4-6d01-4a77-accb-65e87470338d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "142", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 142, ": ", "0 Particles insertions"],
+  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.7758215260155354`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"f3fa80e3-6cc5-45fe-a17d-46970ef94b0c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "143", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 143, ": ", "0 Particles insertions"],
+  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.775821526024919*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"09d65ed1-715d-41df-8c94-a39bbb3280a3"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "144", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 144, ": ", "0 Particles insertions"],
+  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.775821526032736*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"a0d3ab8e-de70-494e-9f5a-07eda236d43d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "145", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 145, ": ", "0 Particles insertions"],
+  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.775821526094782*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"155ec573-fa0f-4f08-aef8-e6cc269556b1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "146", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 146, ": ", "0 Particles insertions"],
+  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.7758215261048517`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"95024ab4-7fb7-4ea3-a213-40a63fd51d4c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "147", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 147, ": ", "0 Particles insertions"],
+  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.775821526113327*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"90a53c5b-8c35-4055-998c-5ba3df1e4595"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "148", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 148, ": ", "0 Particles insertions"],
+  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.7758215261241217`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"f8e33bf4-1816-41d8-99d7-edbf10cd5b8c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "149", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 149, ": ", "0 Particles insertions"],
+  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.7758215261327467`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"62d77045-93f2-456c-afbb-f57e51e00cda"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "150", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 150, ": ", "0 Particles insertions"],
+  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.7758215261435013`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"33fb272c-39d5-4195-a5f0-03ee79c2d273"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "151", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 151, ": ", "0 Particles insertions"],
+  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.775821526153228*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"cea3e22b-616d-4e17-94cb-73db0a940ddb"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "152", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 152, ": ", "0 Particles insertions"],
+  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.775821526163458*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"d1d62de9-2394-48d9-9cd1-1c560ab9737d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "153", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 153, ": ", "0 Particles insertions"],
+  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.775821526230135*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"30a06b84-dbda-4151-9e85-77ae4f184488"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "154", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 154, ": ", "0 Particles insertions"],
+  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.7758215262402287`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"2c6607bb-6df2-4411-ac6b-aba394a7fac2"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "155", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 155, ": ", "0 Particles insertions"],
+  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.7758215262511463`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"e9935d4c-9424-473a-bdf3-c0d3396da9c8"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "156", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 156, ": ", "0 Particles insertions"],
+  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.775821526262554*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"d7e337b8-b3da-4537-8114-35051760aa0e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "157", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 157, ": ", "0 Particles insertions"],
+  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.775821526273388*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"44245045-7776-4e4c-bc3c-9fbe9a8c8638"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "158", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 158, ": ", "0 Particles insertions"],
+  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.775821526282921*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"8329a41f-5e59-42d6-b164-4077b17d3c7d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "159", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 159, ": ", "0 Particles insertions"],
+  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.7758215262937927`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"c835d743-48ec-4a7e-a931-ed53a089baf1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "160", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 160, ": ", "0 Particles insertions"],
+  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.775821526303382*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"e0c5b3db-7b63-4519-9049-33e98a77bf63"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "161", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 161, ": ", "0 Particles insertions"],
+  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.775821526361039*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"f4064934-b056-4b88-8ce6-ea4a63fd1832"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "162", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 162, ": ", "0 Particles insertions"],
+  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.775821526371428*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"c60ae536-341c-4231-9d7f-28ed6fc010d0"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "163", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 163, ": ", "0 Particles insertions"],
+  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.775821526378848*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"e1e5312b-95d7-4fea-9a9b-f750ec126cb3"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "164", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 164, ": ", "0 Particles insertions"],
+  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.775821526386921*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"4d16f65d-d7c1-4206-bb12-ff0837d15035"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "165", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 165, ": ", "0 Particles insertions"],
+  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.7758215264460707`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"b1399836-b8d5-4db2-b11b-46c5231dfb9b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "166", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 166, ": ", "0 Particles insertions"],
+  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.7758215264570923`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"4cbd66d0-9cb8-49ef-a05e-7b1fba13693d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "167", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 167, ": ", "0 Particles insertions"],
+  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.775821526466371*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"4664d10a-2aaf-41a3-b1d7-406a84cb92da"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "168", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 168, ": ", "0 Particles insertions"],
+  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.775821526475224*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"dd2827c1-ec77-4ed3-ab85-e1f6d405724a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "169", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 169, ": ", "0 Particles insertions"],
+  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.775821526482832*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"493bad0e-e393-43d4-89d2-aa227afa1bc9"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "170", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 170, ": ", "0 Particles insertions"],
+  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.775821526493754*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"975eef16-8958-44ef-8f6d-309b76e6fcb6"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "171", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 171, ": ", "0 Particles insertions"],
+  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.7758215265027933`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"c71191a4-2459-420c-a874-0dac3fe7d4de"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "172", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 172, ": ", "0 Particles insertions"],
+  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.7758215265124817`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"a6f5e445-32f2-4aea-83e9-93ca8df8d6db"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "173", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 173, ": ", "0 Particles insertions"],
+  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.775821526579625*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"b4a75642-2447-4ced-82d1-86db37d81517"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "174", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 174, ": ", "0 Particles insertions"],
+  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.7758215265862226`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"4c0ca0ea-884a-4e8d-bef1-f9a7e1e00b01"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "175", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 175, ": ", "0 Particles insertions"],
+  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.7758215265948267`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"c6ac1b97-da77-41a9-9a18-d87e11a03c9c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "176", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 176, ": ", "0 Particles insertions"],
+  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.7758215266037273`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"cf11aea8-37d2-4e13-ab17-38ac36631409"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "177", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 177, ": ", "0 Particles insertions"],
+  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.775821526614345*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"1d1f0596-37d2-4424-bae3-f9d8723fbb21"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "178", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 178, ": ", "0 Particles insertions"],
+  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.775821526660656*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"d41e0ca3-ae48-4ca1-b913-aadf4832f1a1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "179", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 179, ": ", "0 Particles insertions"],
+  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.77582152666984*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"ebb75367-3c3b-4676-ab05-d1d33225bee4"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "180", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 180, ": ", "0 Particles insertions"],
+  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.775821526729123*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"d3a6e521-3690-45a5-be34-d4231aa5eb9a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "181", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 181, ": ", "0 Particles insertions"],
+  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.77582152673628*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"8aef0c43-d5e4-4cc9-9ff3-cd86cafbf836"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "182", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 182, ": ", "0 Particles insertions"],
+  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.7758215267466173`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"a9649bc8-ba1f-436c-96d7-4716a68f04ed"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "183", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 183, ": ", "0 Particles insertions"],
+  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.7758215267562923`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"647d230d-aa92-4fc6-819c-15a1a8f7ff74"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "184", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 184, ": ", "0 Particles insertions"],
+  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.77582152676569*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"f0751fee-ff53-4e18-b36d-7f75c709e7a8"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "185", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 185, ": ", "0 Particles insertions"],
+  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.775821526812277*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"ddcc4f61-0f11-4432-8853-080322aa71cd"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "186", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 186, ": ", "0 Particles insertions"],
+  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.77582152686161*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"1bd8f96f-76e9-4bd0-8d64-71e88ca761cf"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "187", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 187, ": ", "0 Particles insertions"],
+  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.7758215268710213`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"a5769f72-16ca-4d1b-9e68-10da2ee9401a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "188", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 188, ": ", "0 Particles insertions"],
+  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.7758215269286947`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"23e19ad8-482f-4e50-ac7d-39b8232d54d1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "189", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 189, ": ", "0 Particles insertions"],
+  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.775821526939129*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"b396acfc-b6dd-4e10-84d3-91e0b4c17af2"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "190", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 190, ": ", "0 Particles insertions"],
+  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.775821526945877*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"d1c39757-fcd3-4738-9147-a54c82f2dc93"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "191", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 191, ": ", "0 Particles insertions"],
+  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.775821526953973*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"2cc5187b-ef54-4224-8ec7-2cc447464207"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "192", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 192, ": ", "0 Particles insertions"],
+  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.7758215269642*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"aeb24872-3606-402d-bbda-f6c728b9bb4e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "193", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 193, ": ", "0 Particles insertions"],
+  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.775821527014145*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"4bd78b51-7c87-404a-b69b-7459e440f961"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "194", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 194, ": ", "0 Particles insertions"],
+  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.775821527023696*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"8ccee7c5-67af-4cda-8aa6-c2d372a73e4b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "195", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 195, ": ", "0 Particles insertions"],
+  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.7758215270331383`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"769dea9d-4765-4d2c-a9d6-c4a7cece7d7e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "196", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 196, ": ", "0 Particles insertions"],
+  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.775821527078951*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"58dfd25c-872b-4c1b-bf35-7f0696ec3833"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "197", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 197, ": ", "0 Particles insertions"],
+  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.775821527089336*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"7364e8b2-3b44-4871-bf2e-1dfb4fac6b94"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "198", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 198, ": ", "0 Particles insertions"],
+  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.775821527097932*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"0fa19433-e542-4831-b249-2050001498d7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "199", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 199, ": ", "0 Particles insertions"],
+  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.775821527105485*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"401c4d7f-9f77-4706-b2fc-cf7dc6e60182"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "200", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 200, ": ", "0 Particles insertions"],
+  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.775821527161327*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"2dd4dd1d-2832-49ce-b177-772408048ce2"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "201", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 201, ": ", "0 Particles insertions"],
+  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.775821527167902*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"9c299cbb-1953-4763-a4d8-1a1ddf1b74c7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "202", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 202, ": ", "0 Particles insertions"],
+  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.775821527174798*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"92ebb414-1db2-41fe-9fb3-b8051b930d5a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "203", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 203, ": ", "0 Particles insertions"],
+  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.77582152718146*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"3968ce77-2300-4fc9-96da-7bef7eb6671f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "204", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 204, ": ", "0 Particles insertions"],
+  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.775821527188382*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"7a4465fd-45c5-4d98-a323-6049149a8e54"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "205", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 205, ": ", "0 Particles insertions"],
+  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.775821527198029*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"69b9eb90-1ea7-4481-a9ef-9e8c36143262"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "206", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 206, ": ", "0 Particles insertions"],
+  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.775821527262559*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"b0ce2cdf-180d-4fdf-9972-9ce1b75a530c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "207", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 207, ": ", "0 Particles insertions"],
+  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.7758215272719803`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"07166acb-20fe-4ede-8c32-81341c882703"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "208", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 208, ": ", "0 Particles insertions"],
+  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.775821527281766*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"05a04342-318c-4657-98d8-6aca8a9570f7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "209", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 209, ": ", "0 Particles insertions"],
+  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.775821527293262*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"39f94024-72cc-4937-a438-898c257f9156"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "210", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 210, ": ", "0 Particles insertions"],
+  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.775821527302471*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"bb0adb22-a3cf-4d8a-910a-8f56400743ff"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "211", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 211, ": ", "0 Particles insertions"],
+  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.7758215273118467`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"7173c062-f1e7-436d-8179-73401ea1ad4f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "212", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 212, ": ", "0 Particles insertions"],
+  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.775821527318412*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"44f71b4e-a2e0-4cc3-8299-a02bbfa171c5"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "213", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 213, ": ", "0 Particles insertions"],
+  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.775821527363357*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"1d350dc6-1c0c-4c30-8619-e7d194714733"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "214", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 214, ": ", "0 Particles insertions"],
+  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.7758215274286413`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"176b288c-d940-4433-a10e-451843ae7b98"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "215", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 215, ": ", "0 Particles insertions"],
+  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.775821527436612*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"675db820-1b9d-46ed-b802-1795d97d1f0b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "216", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 216, ": ", "0 Particles insertions"],
+  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.775821527444222*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"e3a16c03-09c4-42fa-acf2-fea690c9104f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "217", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 217, ": ", "0 Particles insertions"],
+  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.775821527453343*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"f61ba134-5255-4ab9-978d-dc2089383c82"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "218", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 218, ": ", "0 Particles insertions"],
+  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.775821527512639*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"ee96329c-ac9c-47bd-af53-6fc826925d8f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "219", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 219, ": ", "0 Particles insertions"],
+  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.775821527522331*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"95c79809-e754-4130-ab17-dceb7573247b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "220", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 220, ": ", "0 Particles insertions"],
+  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.7758215275325737`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"1d355b9d-2eae-4454-8082-4376c420bb52"],
+
+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.775821527542314*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"b39ca931-375d-4b2d-aa49-91576fa9bb33"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Restoring \"\>", "\[InvisibleSpace]", "18", 
+   "\[InvisibleSpace]", "\<\" field point(s)\"\>"}],
+  SequenceForm["Restoring ", 18, " field point(s)"],
+  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.775821527551634*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"6eb627fc-fa88-452c-9d88-c3f31c1c84f5"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"in total: \"\>", 
+   "\[InvisibleSpace]", "\<\"38 Particles insertions\"\>"}],
+  SequenceForm["in total: ", "38 Particles insertions"],
+  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.7758215275602283`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"718a1971-cda3-4d74-ba2a-27db0d2f64c6"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgeg/igfhfihi.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 1, " ", "afbg/chdgeg/igfhfihi.m", ", ", "2 diagrams"],
+  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.775821527569398*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"bcc765e6-b684-41d4-b9f8-923331f59a3d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdfef/ifghgihi.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 2, " ", "afbg/chdfef/ifghgihi.m", ", ", "2 diagrams"],
+  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.775821527578225*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"f0cbd9cd-a4a0-4e56-a52b-2eb7516c790f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "3", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbf/cgdhef/ifghgihi.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 3, " ", "afbf/cgdhef/ifghgihi.m", ", ", "2 diagrams"],
+  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.775821527588231*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"e4d778a7-9906-40b2-b654-bce0089e11ec"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "4", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbf/cgdfeh/ifghgihi.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 4, " ", "afbf/cgdfeh/ifghgihi.m", ", ", "2 diagrams"],
+  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.775821527595903*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"39b2a992-ddd6-4ea7-9374-1b16f1397123"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "5", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbf/cgdheh/fihjgigjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 5, " ", "afbf/cgdheh/fihjgigjij.m", ", ", "2 diagrams"],
+  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.775821527605875*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"52384a5c-f1c8-42d0-bcd6-8e8cd626659f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "6", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbf/cgdhei/fhhjgigjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 6, " ", "afbf/cgdhei/fhhjgigjij.m", ", ", "2 diagrams"],
+  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.775821527615673*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"178cfaf5-bf53-4494-92a1-a5bdab70dbf0"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "7", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbf/cgdhei/fiijghgjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 7, " ", "afbf/cgdhei/fiijghgjhj.m", ", ", "2 diagrams"],
+  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.775821527624481*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"97b5cfe9-e4b2-4e92-b61c-106983bfe7bc"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "8", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdfeg/figjhihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 8, " ", "afbg/chdfeg/figjhihjij.m", ", ", "2 diagrams"],
+  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.775821527635745*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"d3789ac3-2228-457f-8442-9773a5a43aa9"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "9", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdfei/fggjhihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 9, " ", "afbg/chdfei/fggjhihjij.m", ", ", "2 diagrams"],
+  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.775821527644804*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"ed577c22-5047-4a2d-8548-4bf0212ca75c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "10", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdfei/fiijghgjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 10, " ", "afbg/chdfei/fiijghgjhj.m", ", ", "2 diagrams"],
+  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.7758215276548653`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"fda0b7e8-d98a-4d92-8a41-bbc92a48a775"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "11", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgef/figjhihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 11, " ", "afbg/chdgef/figjhihjij.m", ", ", "2 diagrams"],
+  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.7758215276653557`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"07023e78-bec9-412e-adff-24ae67e50a70"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "12", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgei/fgfjhihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 12, " ", "afbg/chdgei/fgfjhihjij.m", ", ", "2 diagrams"],
+  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.775821527676903*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"eae624ab-9dd9-46a4-bcdc-976378a6e5e9"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "13", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgei/giijfhfjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 13, " ", "afbg/chdgei/giijfhfjhj.m", ", ", "2 diagrams"],
+  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.775821527686001*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"a85ef80c-90c0-4f4e-aadd-1aa9f433e969"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "14", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdief/fggjhihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 14, " ", "afbg/chdief/fggjhihjij.m", ", ", "2 diagrams"],
+  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.77582152769508*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"cbf1a0e4-3403-49af-825e-450c3f6f8381"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "15", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdief/fiijghgjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 15, " ", "afbg/chdief/fiijghgjhj.m", ", ", "2 diagrams"],
+  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.775821527702964*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"138bdf87-1a59-4b02-9eaf-70b0ff56842d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "16", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdieg/fgfjhihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 16, " ", "afbg/chdieg/fgfjhihjij.m", ", ", "2 diagrams"],
+  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.7758215277126837`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"3261f4eb-fa53-4023-9f9d-bbca25c6af57"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "17", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdieg/giijfhfjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 17, " ", "afbg/chdieg/giijfhfjhj.m", ", ", "2 diagrams"],
+  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.775821527722855*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"da794422-3495-4a87-a565-cae13288169e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "18", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdiei/fifjghgjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 18, " ", "afbg/chdiei/fifjghgjhj.m", ", ", "2 diagrams"],
+  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.775821527733171*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"25b9f2f3-ee95-4804-99b9-9bab630b9780"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "19", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdiei/gigjfhfjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 19, " ", "afbg/chdiei/gigjfhfjhj.m", ", ", "2 diagrams"],
+  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.77582152774305*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"97cb7568-d31f-47ea-a799-30bf15fa2357"],
+
+Cell[BoxData[
+ GraphicsBox[{InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt1gtQU1caB/AjtjwEIshDtlAQzAKuRUOX54rJpUKxksGAvCqMIiOIGiVF
+aYMiG4Uqsm4LiDa6FHkEDUIhIkKwyvAqRJYuEW1BsBApICLViFgDIuz/dDcz
+mczv5jz+35d77sQxPjksQY8QkoU3/STqRbz+xJA/XhyGjPyrNboQLu755pBq
+PUOazpZyXOBV9iuCLsDpaYrCMhuGmI2djjgMbw8uDbGCxS3EOAa2bKkVSlYy
+xMfqt/AQuIj11e4n1livwFlK/TDQ6/twWNpVVEXHd6RPDnZYMSTa1nKYrld7
+0XliE2x4t0onhVPO/pDTY8mQzdku/A446aqbWghry8xVc3C7p/e79rDqaZH+
+e8ivb+FZNGrBEGXUpnZvOH2fm0sLPH8hPigCtkv4beN1uPvFmN9nMCfV+3wj
+LCs5F58DW68aMuiFp+62FVyCB+Tul2dhxXeVAzUwd65l+AO6n2hBdBMeXWZX
+vgfWPF7b2wRLkoYKyuGCEya3bsE7/vPx2hHYJKvmwzo4x9rzpQ3q8xtbJymn
+eWe/rg+EZaoc9zy4UL5QuRtmX6w2E8MaG4PiFNqP2xrbGJh/rHflAZhzY/bI
+Bjjfz14YBgvu96XQ+rd87DHoCGt81tdMoz9TBi55g9hf/At/vha+qP69XAL7
+REljxLDcqc7cAm6W57ED4bkAh2/OoV7pgu8OW7j+TVW5MazOZVXMr0OOpV4e
+aSsY4toZ6zYJ9/ePnxsxx/2gqPlqFO41Dgjmw4rDw6NPYTud/92bZrh/uKzv
+F+H0rkzRh7Dg628tHbC+X8OV9w8uZ4jOffyLzTTvxiIjKQv7eXEX0mDxC/uX
+j02Rb6Qo6Roc+0vTP3bBYvYynylYZLqzWR9WcLeNWqD+OBlf1meC60LPBg5s
+Kf1C1AvLDpl/EgyrvDvPv4TnD6oS4+HmhMYJT8y/df62Xiqce1Lekw9rqgOZ
+E/CUJrxAD3lUU3rHTsMzaypq0+H2js4oer+0p7l56WAP3Y26LNjPiWsrRD18
+/QNN9Pdjm00oemB26obRRPiZvPSoKepvDk78aStdn7gdXQ1rHG6mecCiyEfv
+uMAmofWPrWCB9SLLGpYEHLk2iXpNGpQPh7CeujPPW077Me7ZkQA3PxOy9sCu
+se1ercgTPZRxfw2sjl6Ieo164pZkvp1G/038P18wok4bbGiHmRWbUgn6IRVq
+7hfDfJfLviPLcF4vOt7IhsXziooGI9wvXSLfY7BrxM6K04aYdzWqMQPWueh9
+tMuAIRMDcYtnYJsyKyZIH+OzYoOv0PkV393b9C7q6ju1vZuObz/lveMd9PMB
+N3UO5gxnxxcuxfWSsuPrkTdr65sOPVixVfTeXjj3QbBTgR7ytryRy+D+a4Kd
+obDP9sjjw/R5pIk54wt337z8d2P0K2Bf5tgnsMbrn6Fsen6Cq6ePwcrhj6x9
+YSHLQdkDF/ZXPtgMk0zha2/s90Gh/lAYnR/oklENy/6qK4uEmc6fM/6CvLGP
+pp9vg5PasrWlMP/Kre4tdH7NuJaF+nQBczn0PBZnVbATYYms7bYzrD4RsaIE
+5txL9DClz4eQhEONsKvwb7/S/HLDQ+KrsKKN7V8MC1qPvBXBZlF7zHbAhg1v
+K41hw09lc/Q8svn5Rkexv/hkjPwh+qfm+ae0IK/GykRWCscNPl0YQX1aq0Ku
+CBZtVEePLUG+Rc7nQXBSKCu9h2D8nRzNGjpfnN8XtsgjysruCzawoGFD/et5
+HlnVcNDHElYI/L+9NMcjuSGDHXaw9ssfD8fqeEQ+8bbVna7Xd9Kf9zuPKKY7
+V4fBqtr6/VEzPCL6OXl3Orzq15mVtdM8YvbkeUE1rIz+TPrpCx6JmzVPHocl
+4ifz4VqM73JKdkR9zVXLz2x9ziMaS//nsbDGoD+j7BmPiOMdAs5TlzxeWgRn
+7yUDXbBkIdyPg/Hq1dcFOtqvn1gHnLBedkLNFhb9/dtaMjVwVkzmPH0+KoI8
+f2jF/u2apBJH+vzPrTZWIp/4wJUhakY1FV/9kkcMD1pcsoWzS8z/fRb1qJbP
+WCyHlVqj+chXPMLZ358wi/3IvXWOE/DmU3O7aB7lubVf+qIfTOf1V/mw2d4h
+ZwYW2CkjIqgvj3BmMF6ZZz1nQfPPKkJCYfGf92Xepf3Krx+MxH7Ni6FFubSf
+jrsmDZBH2ZU4vo2ev21qp/3ILzk9ced9en7MXV9Zon5BTnSy1g3rSUzzxiZ5
+RMq1L/oR1rrXpSSO84i2xaOyHubcOR7R+Aj9Yl3fV+VG+z2gXjqA71d3O9dQ
+L6krUKmxnlZe2AQzxvf0Wc3oZyB38YHb//8nFN/+3+c65r9ilhyv
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.907871335428632, 17.11903631971389}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1wk81HkfB/B/jpUjR+4RjeOpRO1UK6LMn4gtaqhcZc0KW4ihrKdc07Ll
+KhN2i20zZTt0aFRscjRSrQhDJKuiErrWIDnj+fye5/F6ef1fb7/f/3v9/jP/
+Mg6M9AyWoSjqIX7JlRqbxY8pTf33R4empvxz02phzsFFpce1afELE2leAsz9
+IbTcVpum86PFBSyYdmqMm9WiqXEr893dJjQl+st67BXsocmayISZ25LS+7Ro
++o7QYs9amLNNtk9Rm6bWnPEulRrTFMu7U20T4tcIbuddgTmDWxLPYz1SITY8
+Gqb3Bbno6tD8p+tjZtbDPceKA0/AvvaKySYw/7Xb5EJdmm5K7UpShQXVuQ+K
+dGn+AbsP9xVg9aqyyGV6NNU6oLJ/HizJtJUW6tHi9+evyRjB4jnmI1/p0/ye
+leE+1jDz7egSD32aaj63uM8Llrr+eSwRTjMOfniAxMsYLMzUp8WcrJHhU+T+
+2/qZB7E+3214SxWp13M141t9mo7ZoTDSQerrrLo/qUfz25gFdu9I/uijaTmo
+Z2vN4okhWJidWqyHeiw/RqZ+JPdrVqQIUP9mjYK3XTAvoURVRpem1N4UNFaS
+eW3/sXC/Dk1PVLjmC4gHmJmDmFcsQzHYh+R7ZHj2AFxntatXm8Rv3jKih/le
+ujri08DEfmknr1WLFj/2souMg0XL264UwWERYgNzWDIVdEmI8/sQ39JXvBB2
+vnv3TziQ7SinCXOyUoQf4fTtU+tTjFDv83QPtjbN1xr8p0gB5nsmRVyEXY1y
+NpwxRL4577ab4rxGb3CpbTBfqTy2CM+XXdNQuDEs5bpeXYV+F2XWVSiS/ZOb
+8m7DsdadN5RhXukvStaYn5fPWK0ZzLRM33kWHtBw/ZcHLJhdLfmMeX736t28
+TJjjwu38Gufhs2DFUDOJ5xG/YyPOV4+tUK+D+kS7wx87wcZrLof5kXpza8MW
+wvkHf2zLJeu/Z0x2If78sZBEMUxtPD+QAGusZRU9hXnXteSUkO/85EheJ3F4
+Gvswzsc4Y1Mj2S+WPRc4gX67b8noH4Ulw4rXQtGvDLe6wp5YUznpJc6nMKrC
+twP1iTLmvQ7CvJ5mSvp8YcmbOscpLZpv8U9HYv0CzCdhp8Il+LI0Z/lymK9Z
+4RmD+TNshq6lG2A9z7YuAO6qXGXYx0C8MNaeUOx/4ahTsAHmje8/kot1l77F
+jOuYi3QmuakLfnqoqnsZLGqrDlyL/CuDT4VUoy+m0TLtEtQXc8tA7QdY5CZf
+tAr1/x7WPWoOcy94L66C200yOhRgyvjA2g04Lzq8/ysKFpxzzf8L83AemYpR
+h1llS/xsMb9eZmGLFcwLzfA9CV+kzYrDSD7KJvMZruKwhLtXcBUaTbFlcR6v
+HBy/HiF/z1+9WQl1bij1bbTBVXj8ls0Q7q9hxfNjYU6EN6sc+7rNjNOKYIn7
+pFwwvPJEdstDWFDxenYc9Q18NlzZBvdo2lw6CCePN1+8T+I11/wkxXm5VzUf
+OgXzbj45/z36mzfXLsIHpk5/jG7HfK78siV1ktTr2LtwK8y1uej0MyyZYQa+
+xLzP+nt6TKNvickfaocxX3bK/qAgmLv1Tosz1pMdDL7cRdyegqN9prBbW7y+
+ESzI2jdqjP2fXI73xWHufMbgOBvrfu9W7yXfoxTvpX08rqajdg7euApKNic9
+xlX7aObqbk2cp0PgXAfcpxMTxUyE+U27v1TD9UudTq+GhY+iz21Af0rdLuOK
+MMeMf1+CvEF3ElTH56Mei7g5XpgHx8/XbxbmTH20b4ajJGtlDbGftt8gtxp9
+SmsuyrmTeEaXmlMwf13GwqB0WGTdyv0Tdnv+Zl8zLLmuNFyP/ZXfWCzUQZ28
+ggB/8lxt+/2YnQ+pf4+MZTb2+y9t6MqCWeaMLFf45ImvC8j3DKUX4PgG+UPT
+KybqYaGast9ezPF8uEHUAxLvfdVMH+qfHuU0XCDxCvsYvuhPufcXywiYbys3
+U4/+v3vSZ8KAJeN5k+txXtly+aevknk1TMg2kHmW7npqAYs1lTxC4EcvTRfl
+oX/W2bdzDTB/xr074kkN7D8k+fIB+8pCNBO9YI5d44EXmjR/PPfCT9fVEf+q
+KlMKv4h3GdQirvfqZSLeiprjhgpqmJ+Coj6p67h8sbqCKp6HNt0ccn5XdC58
+s3Ie8nf88xLvP2rsbefdYyroxz/spATWN2jwZ8IikVqhH/o9c3JfT78y8l/+
+cP4V+fztfeL5Gu4xdw36HvMxr42RU8X+Hla7rgTe/m+HBi6xakj7Esz/mXPJ
+rlbiZJ+OELi4l/rojfw8Tk71YbgtXiXuDSzMqrhDnKNjURaBeoXqThVkf829
+In4/LHLXYpN4AlN2nhP64/eKopqQL4UaWxEPizun+/3hjCfX9h2Ghfce/vAM
+9VqPbej3J+sOEfkc2H92sHoW8WgO70YN+vW9/3wqDKbsh9SsyfvsFR1xjtS3
+7N1j8lyIWk5mlaB+Tmtw+kb43bHNa06if5FNZeMnnM/TmEi7XUqYr03o9G34
+9IRyp6EivC5mpgDe1shc0aaAePoRRufgH9XGfsv+CvU5G40/hGdPJMsHy+O8
+l9QlqCB+ZG2Mu5cc5vXuhuYeeFOUb2mkLPLN/Cr+mzyHvVFBt2SwftGNtwP1
+HmluUrCC1WW4zr1wSbYwp38Onqd1xqN70e+9aQ3zZuLKaPMheP9aWZMBWCC/
+/HUI5vXsgbyjJe7nKk501MGNT+SVcmCh4MwDDcxb3sl+6Xzkl1C5VevguqhE
+ldPE8lVbNsLmDj9HLkW9dKxGKfm8Cvu2KF+GRSfmtsvCi57VWmmhP5Z7vO1N
+xLcK1UnaAfc0HR/aBH8xu7vu3zA/f58H+X445VMmEwRTKjdvusCZfxQNMmBe
+tJ5ZOfpTOTj3/W+Iz3nmOG4Bt7DvFQ+gHk6cRSz5XLKOrimRh8WD2dEr4Roe
+9+0E+qXU0j+0Yt6nRkOimijsD/j7wVHyvRS8Sn/BLJvi1aUeCoFtRqnladNs
+ShLzUjmAnKdZ8qPpCTYlskq+FAsLVri6Zo1hvf7BSDF8sUzs5T3KprhJ11/N
+QT6/x/kvdo+w8b6Imw2DPQtaPjweYlP82pjf+uEI+4jnhVLEy3IzjED90i38
+w1WD2K99xHccpi/JL1OCOXNvDCeif0tzf39Tsp5iWTkJP9r5k9onWPxxOyMY
+82Mp+TQXI57whNWOW/Bk+arrp5CPa9MuI4VVRgMCrg6zKeneXQqK5N+jz/be
+qEN9nMShiTmwklh3uv0Tm2Ltuqzfhf0RDgHrq9BPz5lUzq+w7UirYPdn5Nt0
+Vt8afpJroX4f5qod9iTvldaQtnn3YOHTsYl1sIhlVrkDFoVmdovQz4J1g2VH
+EI8u8HQ1gWfc0+y/RT7151uP5mEeS5UZiy+gPtY3CuWGsMlNw4Sr6Ec63LOk
+FPNlVYv+6vyAeV8esg6G/6gICB/phz1Ux1bAqftt37e/ggucP5P3Bt/EwCuo
+i00xBxJNlsK8eY2PoltQT5ta+Xa458B3O0PFiP9w0OO05v//35Gx7n9XLfo/
+Yw2y2w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.077403306263033, 4.30673387473934}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000002274`, 17.}, {13.500000000002274`, 16.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.552325660469876, 17.180083206945802}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1ws4lPkeB/C3miJsOwkhakS55DIJsYVXsbkU4xanJJWkVpnSZrZSUxGl
+llp3ZSeVW9g52Fw3kyJTsxqlci1Jsi41KnFQzvd/jufB83n+l/f7+83/fXl1
+doZ77Z5JUVQnvslvikl+6NHU/77UaCosaOflpTCXPhgQBzv+4qPDgWUt81sY
+C2lqSiB/LZbMb819zIU/m4ekPIBZi05wG+FGjyz9ectoStRQUS2vTlM1UW/Z
+/4JZXqXVZvDGtr0BOTCnZyR5Ldxq+8vaT8TqwiQyrs4pCbFdTlNBrGxdBTJe
+/X3CaThxi5KoCftLK7OuiWBhx5tOPlwzLWobhbt12DV6cEDP6DOWPk3RtwPt
+a0k9Bzbl0jD/eZbQFx7qbu3wgQWW+bHDqvCsG2e2wYlfzxtfgNM0KPZWmPLS
+qbaC4/gGw+4wM3dAPKJCU/2b46x+gGV1RVZ3Yf8ten2LYc4ji8lcOCmqZ8k0
+8nA3UEp5sOxFik0XLPspZF0dmZ/zWlANU+sWeH+Br8TNFF2BpY+9m9fhesGv
+pD2k3qA9cvY3YediOW0uqa8l2kAT+fNKGatCYNbpNW5X4bVLp2OIu5OD6g1R
+f3fVb4xDMEd6eWMVHJfuzToHC/rn73VBP49PPGy8RdY3fyxphnsnVoe1wfy2
+6/PcNfD5pvzzlYl6RCaL+irhbuH0DE9iL7OA+ZrIFS+flQpLee2RnvDa83eL
+ekj9b8848WCldOUOMwPUG9o+FA03Bq+uOA4LBlyrImG9lSPtDTBzIG+RF8y6
+lDimaIj1waaJanCoYd6ECywMPnuhEdcvEzuzTsLcS4t8wuDPvXVyBbD0xwDx
+HFgWzbwnhoPmKK6+inqCYte87oIp8bSKJayktTGiD5bdGHn4FP2Q5cYp9pL5
+ql8iTsDM0u/LX8CCeVtv2sAXshZ8rCP7c7aumQtbP16TmkvmNwyYyNBvkf7b
+h7Ekn+qJcOLP9w3f7Cb5n9IvFEi/31dvciTj74oW2sNl5yoOL4NZ9p/uxsPG
+E4LrpF7pswnf9zCrvmB4nPRLujtwF/LKn4hW+wCL7tOpfaQe/aQTxAI/kXYE
+6m09eGHBJJnvJ8uZhX5Z18/+UZnkix2pukzcl8CwJPWvNfuouQg56iJqdsL8
+v16tTIUZRtpBGSSfnNHbmVrIfb/3UDtZ/4nL3gJrOd3W0DHCessYrQw41LnV
+LAwWmbeXi2D5waHASlh40cX4b1gyf7HNnBXIF3qwsRYWMDg+HJgT6DiVDl+4
+arg7GaZujDgHwq3r7/k/JfOL2/SYMG3U9ZO8McZ/F7eUIl+ZZrrdKljWYbbW
+HW516HjjBYs8d+T0kvrMcgZDjMn+PvHHYd7hb3vCYfayvV6LYBX+kqEwmJ8z
+pNqAfjk+VzgbBAvTJveegis6KkvcYFrV0dCTnO9NRzax4USPNy7WpL83Fhxj
+woIqhxriIMHIpffISy8P8vUm+5m0TEtgbnBcfSwsZf5pWkzq5YszW4g9a/cm
+wawY9c2rkUckyL53itQbtSOqEJZqBU5HwonP3SVmqK9w+9njPLL/CdXtNbD0
+zRv9aJhpZDawEf0RuqkdzFxBPt+s0Q7ifqHTHVhqulwzWBvPm8tyykNk/ap6
+225YReP6A13SL+0Widti3N+Gqv/sgqXV64azYYZ1bkYBGb9bkd8Dqx8yLB8l
+9cvfVp67BM+3uPF360wwf7m9jypsMG1cmwALubq1crDK2aYnbbBg5+H611jf
+mNX+YrEp8s3ePHAT9hd/qA6ABQVdN/3gG71RNZdgyv4Hu0nks3blHa2BWWFt
+qcmwf3jR3E4y/49r31bA0Tnqkx9g7mDOwD1yXl5W7RiHhQdH6nbCjMj7zaMw
+5zPj2nfEdRpb/oH5ppKFYvQvqf8orwWWftxDpcN6JU/lK4kdFnvw4cTm/ex0
+sn6u20di/w3vnSLJuNn9mkxY3d6o3Jfsdyw7QAob/2ds2Irk8XgeqI3rpdWu
+sNQm9awIsufD0oUfshTgxPjImFFy3nddGqZIP4J3D/BQj1Lms5MzYHbZ9nOz
+0Q+DrnSH72CRzF0tBa4Zjb6mB8t+U9dYhv6qPzC5sIHk8XthVAQHGX8K+5ns
+/8UwXYWFenSPWRTB479dcHeFjbMSg4dh2tJL/DPcubiDZWGG59ChqoRkmH23
+bP1J4gzFW3kw19jyiASmY7aVFMMpn1beVGKjD1z241w4w9rq1krY4MCV6iSy
+Pr9Z3wemqkyqjsDUX2rKEXCanjjWA1YKVD13ER4vsXLWIfm0hV3ZMPu9f2fn
+EvJ3b31GCRy0UGIfAQu3iWNrYEHImLkivC+FFoqIo85rFaAfT4RrAmth6bCd
+qi88Uz9LoxLmVEqKmXC2x61rxSSPpEFEznvfYH6vAGbyMm0b4dD6X0YTYVFL
++nwxfPhRwvRJMr867Lte2I56ZRNO5ssmO9Wx39CvdNt2mA7VUAyBXed9mulN
+5kc1zxfDW6jGWhdYVpB7xA55nygnyBzhbs3okbtwawvt6ETq9/Rw10f9pqp+
+bDfigtzkcFi+IW9wM6xe+IdyOUzrzgoLhbnmOsqTcL9BZgjJJ2yql7PRoanz
+Z7y8M0n/wqcKDsD9B24dqib5XrkyM2CvdoPnL+G8ks47lXD3WM0+xkrcV/e+
+iSSwcEMzYwWcF/uy+AmstG7Hfk+Y+0il9BFcI0oKP0Lc2hhXAX+pcuhLgxuH
++RFkfwXFO43lsOCvSXYEGa88aPWE7B/977eOcJN/Hv8dzDN+wVCG+7JXmY/B
+BrTMogv1vNQ+rzLDHLl6lprnw1OpBuazYfXFGX/wyPlT0Ho+C5bSm2zcYTXD
+yrivK8n/AScWGsPjYTlzP5HrO7AtyXkP3XRsw1tYGFKkIA+XbfbyfQaPj6ld
+JJ55uy7wPswRF+qqwbKcBxmlMH+d63U2PMfEwO4GGV/vwvEj51dnbH8q7Kx+
+uy+OfD7pdea/wuoNvLx7sPuimfvPwf7ez7izSb9MnB4RM6dCJW6wxC2xLgHu
+n5GmkgQLBm3PZZL+2dtc7IAptasqRaQfp1edWbIU535nqAbJ5z/5575tsMyB
++X03nHi8cvIynPek1JJCP5zXxLvdgbW2xGTpwnzG+p4u+OHWtVYucNxui0cy
+uMCS1RwOi2Kyf/9C5jvrWacQV9jFf4BdK09bVcONO+1dO2H+LtvcLphK0tMh
++/cUD5+agmVpZ5tS4DvvvPvUVuF+vngxMhQ+XK233BjmNw8lWMINDrmSNXAj
+N/wOBfcdbbruBHOnnWvJeaO2Jd92gWlOpNMVuNf8DMcZDn0c33kQNnq6bcKB
+jOebSjzgkErTw6thXlTGt9Xw0cGuQkPYeZ7p4AqYGS8q14BbU2adNYZfNieI
+5GER7WT5A9w5w+PbGPILv/0p8YGP3C+52Q9blwoSjsE8RnZHB5z2daFNEWzh
+sCfvCak33Eihn5zXMp2hv2F6S1iXIeoxF435NJH5RVN2XLiQx/NrMSfvK+Ox
+FfC3x6cMu0n/2w2mpuGArN7aEZh5KLt/vS7y675uIvkqfCfunoJZhUf+1oPZ
+affocjjbf8ekIyw1WHCsB7YeOr03lPTDbfg/M/DetHGvP+NXWBhaKFaBFWzl
+BGVk/r78aE3y3tVzdHYH6bd+sd8CMk7e0yxwbv//3vZfCgDy3g==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.318520523989797, 6.302976613356011}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwt1gk01WkfB/A/UrbJbSbLyHIlspMtpqG/JYQpW1PWsYWxhDaUqRtmDJP1
+teRa0qByUZYiMrqiV6GUUXJL7lCqmZabrqik9/vMeZ3Tuedznuc+z/f3/etf
+6iFxnrtFKYoaxh/ySS19xo8GTQnIpxxNLQ4JdzmvoylK6aaPgzxNObcrMIth
+fmxp4R7Yodf25AwctGFAMgUeuPr4k4UmTeV9cfJINKxdI7U7HXYXdptaw3tN
+bTWGYPqt+NQszmcfrr8lrYXzM7tqcuGh4MxQW/i2u9uIAvxM0BIQDefFhl7L
+W01TMXf7Bn+FqySsSylYkCvtVwrTXREPY7/CPTPFfhVk/R7PevJLmlI8atdV
+BDNU91n6weWhM0tpMLNZrOfpKnzfb4tmFMy6vPxjJtzZwylxgeNHaue3wAcZ
+ycu1Yf7MtlRVuMVY11kcNk764dNqeMEozvwJ5mFF1LjrwI4VZj8PwMbZv/3t
+A9u89+C0wwzGwp/VsGpu0YVzZP+qK3dFkSemutWiGY7XetuYQPI5h5hwYe6W
+AM+/4aVdFdIPyX7NB9+GY77Cu61py3C/e+fEH4/gR+cCuizJ/A+F7t+hj+Jf
+Wu0SYcHUN6/rYTevI+rdpA9Ott8czOHNv5dajzynb4dpot8c9151P5g6/kbJ
+CmbqV/fVk/VahtAQbmm1lfgA58W9m1wOl3s6Gdtr01TTTr7zVZznPDzHTYep
+A2yRMPi6bkFlF8ycv64uIHmjZLWfE/tojkTD7J6zrpI62H/YRnoC84WxwguV
+4SbXua0ucJfktJEGLPBIsO5EX4p2K16okPV+9l5TeG3jA/2VcJCMk0gXg6ZS
+Sl7z5kieVMPNPrDnTnPXMTj+eHKKLLx608/qF0m+9wnsXlma8mZ+a1QABwnn
++qphi1Nl2xNgLuP28yuww9+N9jtI3qh3PVL4vsPWA7k0bOwxVrYdlldU8zWH
+b3d6/8aBu6oGPYkpE+ExefL8R+3KbMm67JPSbPiEaHWHL8zyLwiSxHy+N7rz
+WSTfTR3tNDgl/Uh4C7lfZ5W/EL6+02z6FcyQVR39Hn1RSbH6ZpjX+Oi+tbUw
+Lz9m/igcr6x/nwdnXVt3Zpj0aR7zhxBOn3CMZerCK+Q/kP6p6u7YOJi/UsVg
+GOZoTU51kHVDj4Q8+JbIfvoTLJDZvX0jvJj+0WujHu67yK/oRx7e1YSgcJix
+vtjdEW763c0sE84LXLLqwHxKvALLk7AgvKRHC/5ebXvSWZjPeFpQhH76uCJV
+tXBQ89qtMqQ/C8W5Erhqzm3jWvQ9oje25RjMkuxQ9VpJU+c+p46EwtxHz4Mv
+fEFTMjNPje1gaq6nzQ1u4NXpqZH9Z4aVmHBM8ftKkp9W4FUZwcKDMd58mHV9
+W2gy7CLOnbwBV2VsKl+AJeQcj3TB3Ie1f9XiPs/pwg+kD3pmS1oi8kiM8Yt6
+YYZ1qugG5E3SUF0Yh4OCFHc1wC9Wt64n97mLqiutx7xdoesy9Uk/l9hn2PAh
+S+4M6YsbXNZJoa+c9KdHOcQdte1eMP3GTG2O9Lu/UJgD36v/0cJBH30Vlb49
+R/avubJUCBuHROQ2w4/blpU/hpkfveSL4bzcm7SxAWzB9AqA2QXTHgfg21Wz
+qeT3a1np5oxmWFAmblWJPPJ3HktMw5Ri3AYmed/pm/wiYYjnuMNGjjyfVzdS
+HdWJU56YiME2Wq4mBjCr+I3/FPrRtaJH9Yl3RvoNor9LPxzyJPvpEN6KWzLw
+sX9+kIEpf+O+OWm8P8f5WgKS7/JpFTdYtLjKYJhYIOV9XwrnD/1k0QBzPeSW
+KmF9v3fKWcQtu4dPwQWp/2mOhoPKPqdOwv9N3lHsRSzz/T9eOG9mR7SKA8y3
+UV6/ALtnPtDbTNa96YWryLN4Ilfdkcyrc82yDnm7O970+5D999oiKjGPw6YF
+p0Mw65iDUxGed8ussvYZ2D1S0Y7G/AcnfD0n4fhPOufr4JbRGfV/55V/tU4E
+/e0JfpcYRfrayOHawnRkzr1LZH6LCm4EHPVsOUvSCOuZaa3xsO/mi6U+ML/t
+cIkfeZ+5LHc/DQsGeme0yb8vgZs/vIDzus7l83CfWwujUs4Y/kZ1Zh95fzGm
+8o1g/tiewVnkPTiqcMoeprz6v/4L86iFdAd6wCzZCaUrmFc6cbBxF7FeIMVG
+H4+0j1/1IS6w0DiKvupFVzJ3wFzXG76H0e+TbTX5rsR6Bb5sSZpK7n/AtCH3
+hZipzkjQVNE7PwlDsn7SPjocvr7dv0aZrJ8UjWPC27ISgqVhZqkgRR4u1vx6
+xzzmqfIPeuME5yxXOTcBs0aPWzXDni/PmA4Zkb8HfZQb7nNsXPO4D6Z+3c+S
+RR4X6W3WN+AgpsJrARxo36DDg5l8tsRj5G+yqxWS81lLiXUPMN9U/UGNVeR+
+99H9A5hfJWO3nD5c5XHkp2r0o922RsaNuCb8uS/6O/+j8rJ40p9yesYMPK5q
+119M/NpfWw19R6UxFrthgXVTuCG87Ok1i6dwULJFI1m/4uAtvXID9ocMuJDv
+XwsNVDMhjqSnveEMlx2bPOEqc6UN+bh/3mXCJxZm8Uv/qEa+F13tF1LJ/kVq
+bQnyV89n38qHuc/SjyViPvsm9WQ2sdjwaw/MP3SicKwcZmZVDpqiL4sajn8p
+Oa++XU4Xfb63UbmWR/b/kjxEr8Dv229OK9PJ+YlW3qnLkWPk1I/74SBH/tt3
+4jRVVsExCIXptC0xNfBL58U+D3I+c9/5bHjpr7ByW3Kee+TlFrg2bYphBvP1
+TdgMnOd4MSJQl8wn7pNxCuZE2eZpEvffsAzA/VmN0/u0yPejfneyQr68tt4c
+A3Jf2MVWHeQv6rmisInk13U8rI75MtdECreR7/NZm7/C/K5zrp2RJP/N7Jdv
+4Nd/Wl3IIPfvnwltRl/1qRv+4ZDzv+qRdkKfA5xikzvEoZ8COXDCouTG92Qe
+SaHXXbJuaJCrboL5zUfr+mDjrp9uOsPcT9dXJcH8gLCCWJjfMGEyi/MPlRdW
+5JD1l3G/WsL3DvInOGS9874yef80drQf6YGZ4x0abshfa3h29g5MSc0nGWE+
+p1s+Hx7AVY2XpaQw/7H2c2cmybr5O/Pn6GuifNJ/AmaxA1R46DfAoKr/LnGR
+j9jzZTT10DTz/g2S10XkPBNWtjVv74TpkrHpTDGaGg4+3VpHzhMuzerCKkWN
+5idI3lH/6BVwyqBmfQbJl1XxQg2mX00dSCZ5RDzU9sLVKla8PeQ8vfSRBZjX
+v/Aqktg+2LoB990Zr8v911+yg1PJ819o9SD7qQFuZhzy99xZTDlELPCcCMfz
+tn7pI5FNbLhezA/zhuiKsWtJX/mWAzbkfZJOHe8leXqTboujr+hYP+ETkkc7
+Wq0WrolsaJI2Jf9/H2wjzz9sae9+U5ipErHkApu2pY77mZL3QdrXTvBWj4sJ
+acSbLimsgK9/Jzp+FmZl3aGycd7hWvn+AfJ9Z5XLE7j/o2iO2jOY+rj3JgX/
++2P2/08J+n/oho2Z
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.45429484366825, 2.671979374673003}, \
+{0, 1}], LineBox[CompressedData["
+1:eJxFlHtMU2cYxg8QkFERSFG59dDTc06lMCVOqsAQXic3I8xKQoqT65RRhImM
+gVoYFxGcCgPSIPwxucwLpKNctYMRZIyrDLlGbmFQjJAKbOpkOrPR7Gs0H01O
+vvzypt/lfZ/noT5PCok1JAjiJPr067sfA2quft0BRNXpgbbfaPhzTvt34UXE
+5RbPm27R8LS8t8HIeCcQlm2FJtdoSKwM4rrfRCw5eoibTUPniHVMqJcNEDYJ
+vZH5NJjFN3k7zSGuTZtQfE/D1wakOiXNFojom3fyumh4VPPVT37GdkD8sqzx
+eUVDdt2LHwJy9ZyyjXJloEWTWmayhpjYfVCXzEBkRnKTq5c9EIFGz4JbGVgi
+5WYdyYhb055IdQw0W0/aWBUgNj2vigMW4jtzNnTXEfO/VOnkLNTz+o93piAe
+2H7e6EdUHy00H/dHnF3av/qIhZkFV8eRDxBrBrTziyxIDn9xwOlXdH65rGl4
+iYWejiLuQiri1rbhvBkWivOaXdxcEJ/LuKHsYEErE1mGaNH7il94qhUsmJ+6
+/vxtM+LR9SlNBAvO1oMqcTFiS1GckSMLJ/NzldzLiC/c3Zs8ywBb8c9YUom+
+P/YPBxUMNMhmNENtiBv7nw19ykDbZLjWZwPxdNg8z4KBb6+dFSV9pj+f4DpM
+05DUbBR2exgx/+PUxjoaaoUNkpeh+v7IzHYV0eATf1wSu4o42nvCIoeGyZbv
+fj921QEIUFeLcmkYr8ieKRTx0P2lRFgpDSfKDG/N9SLmt7TcVtNA+/ot7Qkj
+kT6UXUFLNFzYUq3QzSI2XQmeJhmIX9/aXnbEEe3/oalXNAOtBU77wqoQa7zj
+DO8yMJhOjmrmEJvaXZKvMaDsakgX6xBrz2xdcWUhf3rtUKwhH3HeWGciC2t+
+UYmZf6E6382wp5KF8lR5efagfj9Z/+E+Fv7YRrLCEsTTO4bE8yyozGa9Go4i
+HlCOhC6zULBdr+fN+hm+sFtyj8T/d3Z4MjtzlsT7Z93Pi8sSk/h8l6UqRY45
+ie/HkQszxP/y8P0jPpFcHjQg8fuCGxZdHWkSvz+6YmqoJmqzP/X7X/nK1Jv9
+q6SjEg1YR9zf9eWf7cZqHHH/Fx5m1lvx+Hg+dJ8P1yOBj+dX3e5uFdbOx/Nd
+i56SBptReP7ul2qlW0IprI8hJ92EqpzC+gkcDUwYGKewvlyVY5xoAwHWn1uM
+osiWFmB9Xuwz2hl4QID1GxnywPn1QQHWdxrHXrSkr7/Xv/FpT9NcoQD7wyZm
+9c0kR4D90zMuXIldobC/lPvd0yx7Key/cE3Q09UKCvuzkpWds0mnsH+luz3e
+3ginsL/v5ztI+f4U9v+U2CeH8KRwPuzjlKa88aBwftiadMupAArnS7g0YJc2
+hsL58xHrd++/qxTOp6DOK3vCH1A4v+50+TMRGxTOt3Hrl0yfrwDnX1ZwjWa1
+RIDzsU6VeuzxogDn5+PeE69P7aVxvtod4TllfkPj/LWu4Rh7dCN+n8+NnHfr
+//aCKUQ=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.0548, 7.75}, {1, 0}], 
+        LineBox[{{6.4999999999976925`, 16.}, {13.49999999999251, 16.}}], 
+        PolygonBox[{{9.4, 16.}, {10.6, 15.6}, {10.6, 16.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 16.9452}, {0, -1}], 
+        LineBox[{{6.499999999996362, 16.000000000005457`}, {10., 
+         10.000000000003638`}}], 
+        PolygonBox[{{8.552322615314452, 12.48173265946094}, {
+         7.602165824326175, 13.316718930329426`}, {8.293188945044921, 
+         13.719815750748694`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 12.823799910437668}, \
+{1, 1}], LineBox[{{13.500000000007276`, 16.000000000005457`}, {
+         10.000000000003638`, 10.000000000001819`}}], 
+        PolygonBox[{{12.052322615314452`, 13.51826734053906}, {
+         11.102165824326175`, 12.683281069670574`}, {11.793188945044921`, 
+         12.280184249251306`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.484057296392571, 12.823799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 16.}], PointBox[{13.5, 16.}], 
+         PointBox[{10., 10.}], PointBox[{10., 5.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/chdgeg/igfhfihi.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdgeg/igfhfihi.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:eJwt1gtQU1caB/AjtjwEIshDtlAQzAKuRUOX54rJpUKxksGAvCqMIiOIGiVF
+aYMiG4Uqsm4LiDa6FHkEDUIhIkKwyvAqRJYuEW1BsBApICLViFgDIuz/dDcz
+mczv5jz+35d77sQxPjksQY8QkoU3/STqRbz+xJA/XhyGjPyrNboQLu755pBq
+PUOazpZyXOBV9iuCLsDpaYrCMhuGmI2djjgMbw8uDbGCxS3EOAa2bKkVSlYy
+xMfqt/AQuIj11e4n1livwFlK/TDQ6/twWNpVVEXHd6RPDnZYMSTa1nKYrld7
+0XliE2x4t0onhVPO/pDTY8mQzdku/A446aqbWghry8xVc3C7p/e79rDqaZH+
+e8ivb+FZNGrBEGXUpnZvOH2fm0sLPH8hPigCtkv4beN1uPvFmN9nMCfV+3wj
+LCs5F58DW68aMuiFp+62FVyCB+Tul2dhxXeVAzUwd65l+AO6n2hBdBMeXWZX
+vgfWPF7b2wRLkoYKyuGCEya3bsE7/vPx2hHYJKvmwzo4x9rzpQ3q8xtbJymn
+eWe/rg+EZaoc9zy4UL5QuRtmX6w2E8MaG4PiFNqP2xrbGJh/rHflAZhzY/bI
+Bjjfz14YBgvu96XQ+rd87DHoCGt81tdMoz9TBi55g9hf/At/vha+qP69XAL7
+REljxLDcqc7cAm6W57ED4bkAh2/OoV7pgu8OW7j+TVW5MazOZVXMr0OOpV4e
+aSsY4toZ6zYJ9/ePnxsxx/2gqPlqFO41Dgjmw4rDw6NPYTud/92bZrh/uKzv
+F+H0rkzRh7Dg628tHbC+X8OV9w8uZ4jOffyLzTTvxiIjKQv7eXEX0mDxC/uX
+j02Rb6Qo6Roc+0vTP3bBYvYynylYZLqzWR9WcLeNWqD+OBlf1meC60LPBg5s
+Kf1C1AvLDpl/EgyrvDvPv4TnD6oS4+HmhMYJT8y/df62Xiqce1Lekw9rqgOZ
+E/CUJrxAD3lUU3rHTsMzaypq0+H2js4oer+0p7l56WAP3Y26LNjPiWsrRD18
+/QNN9Pdjm00oemB26obRRPiZvPSoKepvDk78aStdn7gdXQ1rHG6mecCiyEfv
+uMAmofWPrWCB9SLLGpYEHLk2iXpNGpQPh7CeujPPW077Me7ZkQA3PxOy9sCu
+se1ercgTPZRxfw2sjl6Ieo164pZkvp1G/038P18wok4bbGiHmRWbUgn6IRVq
+7hfDfJfLviPLcF4vOt7IhsXziooGI9wvXSLfY7BrxM6K04aYdzWqMQPWueh9
+tMuAIRMDcYtnYJsyKyZIH+OzYoOv0PkV393b9C7q6ju1vZuObz/lveMd9PMB
+N3UO5gxnxxcuxfWSsuPrkTdr65sOPVixVfTeXjj3QbBTgR7ytryRy+D+a4Kd
+obDP9sjjw/R5pIk54wt337z8d2P0K2Bf5tgnsMbrn6Fsen6Cq6ePwcrhj6x9
+YSHLQdkDF/ZXPtgMk0zha2/s90Gh/lAYnR/oklENy/6qK4uEmc6fM/6CvLGP
+pp9vg5PasrWlMP/Kre4tdH7NuJaF+nQBczn0PBZnVbATYYms7bYzrD4RsaIE
+5txL9DClz4eQhEONsKvwb7/S/HLDQ+KrsKKN7V8MC1qPvBXBZlF7zHbAhg1v
+K41hw09lc/Q8svn5Rkexv/hkjPwh+qfm+ae0IK/GykRWCscNPl0YQX1aq0Ku
+CBZtVEePLUG+Rc7nQXBSKCu9h2D8nRzNGjpfnN8XtsgjysruCzawoGFD/et5
+HlnVcNDHElYI/L+9NMcjuSGDHXaw9ssfD8fqeEQ+8bbVna7Xd9Kf9zuPKKY7
+V4fBqtr6/VEzPCL6OXl3Orzq15mVtdM8YvbkeUE1rIz+TPrpCx6JmzVPHocl
+4ifz4VqM73JKdkR9zVXLz2x9ziMaS//nsbDGoD+j7BmPiOMdAs5TlzxeWgRn
+7yUDXbBkIdyPg/Hq1dcFOtqvn1gHnLBedkLNFhb9/dtaMjVwVkzmPH0+KoI8
+f2jF/u2apBJH+vzPrTZWIp/4wJUhakY1FV/9kkcMD1pcsoWzS8z/fRb1qJbP
+WCyHlVqj+chXPMLZ358wi/3IvXWOE/DmU3O7aB7lubVf+qIfTOf1V/mw2d4h
+ZwYW2CkjIqgvj3BmMF6ZZz1nQfPPKkJCYfGf92Xepf3Krx+MxH7Ni6FFubSf
+jrsmDZBH2ZU4vo2ev21qp/3ILzk9ced9en7MXV9Zon5BTnSy1g3rSUzzxiZ5
+RMq1L/oR1rrXpSSO84i2xaOyHubcOR7R+Aj9Yl3fV+VG+z2gXjqA71d3O9dQ
+L6krUKmxnlZe2AQzxvf0Wc3oZyB38YHb//8nFN/+3+c65r9ilhyv
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.907871335428632, 17.11903631971389}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1wk81HkfB/B/jpUjR+4RjeOpRO1UK6LMn4gtaqhcZc0KW4ihrKdc07Ll
+KhN2i20zZTt0aFRscjRSrQhDJKuiErrWIDnj+fye5/F6ef1fb7/f/3v9/jP/
+Mg6M9AyWoSjqIX7JlRqbxY8pTf33R4empvxz02phzsFFpce1afELE2leAsz9
+IbTcVpum86PFBSyYdmqMm9WiqXEr893dJjQl+st67BXsocmayISZ25LS+7Ro
++o7QYs9amLNNtk9Rm6bWnPEulRrTFMu7U20T4tcIbuddgTmDWxLPYz1SITY8
+Gqb3Bbno6tD8p+tjZtbDPceKA0/AvvaKySYw/7Xb5EJdmm5K7UpShQXVuQ+K
+dGn+AbsP9xVg9aqyyGV6NNU6oLJ/HizJtJUW6tHi9+evyRjB4jnmI1/p0/ye
+leE+1jDz7egSD32aaj63uM8Llrr+eSwRTjMOfniAxMsYLMzUp8WcrJHhU+T+
+2/qZB7E+3214SxWp13M141t9mo7ZoTDSQerrrLo/qUfz25gFdu9I/uijaTmo
+Z2vN4okhWJidWqyHeiw/RqZ+JPdrVqQIUP9mjYK3XTAvoURVRpem1N4UNFaS
+eW3/sXC/Dk1PVLjmC4gHmJmDmFcsQzHYh+R7ZHj2AFxntatXm8Rv3jKih/le
+ujri08DEfmknr1WLFj/2souMg0XL264UwWERYgNzWDIVdEmI8/sQ39JXvBB2
+vnv3TziQ7SinCXOyUoQf4fTtU+tTjFDv83QPtjbN1xr8p0gB5nsmRVyEXY1y
+NpwxRL4577ab4rxGb3CpbTBfqTy2CM+XXdNQuDEs5bpeXYV+F2XWVSiS/ZOb
+8m7DsdadN5RhXukvStaYn5fPWK0ZzLRM33kWHtBw/ZcHLJhdLfmMeX736t28
+TJjjwu38Gufhs2DFUDOJ5xG/YyPOV4+tUK+D+kS7wx87wcZrLof5kXpza8MW
+wvkHf2zLJeu/Z0x2If78sZBEMUxtPD+QAGusZRU9hXnXteSUkO/85EheJ3F4
+Gvswzsc4Y1Mj2S+WPRc4gX67b8noH4Ulw4rXQtGvDLe6wp5YUznpJc6nMKrC
+twP1iTLmvQ7CvJ5mSvp8YcmbOscpLZpv8U9HYv0CzCdhp8Il+LI0Z/lymK9Z
+4RmD+TNshq6lG2A9z7YuAO6qXGXYx0C8MNaeUOx/4ahTsAHmje8/kot1l77F
+jOuYi3QmuakLfnqoqnsZLGqrDlyL/CuDT4VUoy+m0TLtEtQXc8tA7QdY5CZf
+tAr1/x7WPWoOcy94L66C200yOhRgyvjA2g04Lzq8/ysKFpxzzf8L83AemYpR
+h1llS/xsMb9eZmGLFcwLzfA9CV+kzYrDSD7KJvMZruKwhLtXcBUaTbFlcR6v
+HBy/HiF/z1+9WQl1bij1bbTBVXj8ls0Q7q9hxfNjYU6EN6sc+7rNjNOKYIn7
+pFwwvPJEdstDWFDxenYc9Q18NlzZBvdo2lw6CCePN1+8T+I11/wkxXm5VzUf
+OgXzbj45/z36mzfXLsIHpk5/jG7HfK78siV1ktTr2LtwK8y1uej0MyyZYQa+
+xLzP+nt6TKNvickfaocxX3bK/qAgmLv1Tosz1pMdDL7cRdyegqN9prBbW7y+
+ESzI2jdqjP2fXI73xWHufMbgOBvrfu9W7yXfoxTvpX08rqajdg7euApKNic9
+xlX7aObqbk2cp0PgXAfcpxMTxUyE+U27v1TD9UudTq+GhY+iz21Af0rdLuOK
+MMeMf1+CvEF3ElTH56Mei7g5XpgHx8/XbxbmTH20b4ajJGtlDbGftt8gtxp9
+SmsuyrmTeEaXmlMwf13GwqB0WGTdyv0Tdnv+Zl8zLLmuNFyP/ZXfWCzUQZ28
+ggB/8lxt+/2YnQ+pf4+MZTb2+y9t6MqCWeaMLFf45ImvC8j3DKUX4PgG+UPT
+KybqYaGast9ezPF8uEHUAxLvfdVMH+qfHuU0XCDxCvsYvuhPufcXywiYbys3
+U4/+v3vSZ8KAJeN5k+txXtly+aevknk1TMg2kHmW7npqAYs1lTxC4EcvTRfl
+oX/W2bdzDTB/xr074kkN7D8k+fIB+8pCNBO9YI5d44EXmjR/PPfCT9fVEf+q
+KlMKv4h3GdQirvfqZSLeiprjhgpqmJ+Coj6p67h8sbqCKp6HNt0ccn5XdC58
+s3Ie8nf88xLvP2rsbefdYyroxz/spATWN2jwZ8IikVqhH/o9c3JfT78y8l/+
+cP4V+fztfeL5Gu4xdw36HvMxr42RU8X+Hla7rgTe/m+HBi6xakj7Esz/mXPJ
+rlbiZJ+OELi4l/rojfw8Tk71YbgtXiXuDSzMqrhDnKNjURaBeoXqThVkf829
+In4/LHLXYpN4AlN2nhP64/eKopqQL4UaWxEPizun+/3hjCfX9h2Ghfce/vAM
+9VqPbej3J+sOEfkc2H92sHoW8WgO70YN+vW9/3wqDKbsh9SsyfvsFR1xjtS3
+7N1j8lyIWk5mlaB+Tmtw+kb43bHNa06if5FNZeMnnM/TmEi7XUqYr03o9G34
+9IRyp6EivC5mpgDe1shc0aaAePoRRufgH9XGfsv+CvU5G40/hGdPJMsHy+O8
+l9QlqCB+ZG2Mu5cc5vXuhuYeeFOUb2mkLPLN/Cr+mzyHvVFBt2SwftGNtwP1
+HmluUrCC1WW4zr1wSbYwp38Onqd1xqN70e+9aQ3zZuLKaPMheP9aWZMBWCC/
+/HUI5vXsgbyjJe7nKk501MGNT+SVcmCh4MwDDcxb3sl+6Xzkl1C5VevguqhE
+ldPE8lVbNsLmDj9HLkW9dKxGKfm8Cvu2KF+GRSfmtsvCi57VWmmhP5Z7vO1N
+xLcK1UnaAfc0HR/aBH8xu7vu3zA/f58H+X445VMmEwRTKjdvusCZfxQNMmBe
+tJ5ZOfpTOTj3/W+Iz3nmOG4Bt7DvFQ+gHk6cRSz5XLKOrimRh8WD2dEr4Roe
+9+0E+qXU0j+0Yt6nRkOimijsD/j7wVHyvRS8Sn/BLJvi1aUeCoFtRqnladNs
+ShLzUjmAnKdZ8qPpCTYlskq+FAsLVri6Zo1hvf7BSDF8sUzs5T3KprhJ11/N
+QT6/x/kvdo+w8b6Imw2DPQtaPjweYlP82pjf+uEI+4jnhVLEy3IzjED90i38
+w1WD2K99xHccpi/JL1OCOXNvDCeif0tzf39Tsp5iWTkJP9r5k9onWPxxOyMY
+82Mp+TQXI57whNWOW/Bk+arrp5CPa9MuI4VVRgMCrg6zKeneXQqK5N+jz/be
+qEN9nMShiTmwklh3uv0Tm2Ltuqzfhf0RDgHrq9BPz5lUzq+w7UirYPdn5Nt0
+Vt8afpJroX4f5qod9iTvldaQtnn3YOHTsYl1sIhlVrkDFoVmdovQz4J1g2VH
+EI8u8HQ1gWfc0+y/RT7151uP5mEeS5UZiy+gPtY3CuWGsMlNw4Sr6Ec63LOk
+FPNlVYv+6vyAeV8esg6G/6gICB/phz1Ux1bAqftt37e/ggucP5P3Bt/EwCuo
+i00xBxJNlsK8eY2PoltQT5ta+Xa458B3O0PFiP9w0OO05v//35Gx7n9XLfo/
+Yw2y2w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.077403306263033, 4.30673387473934}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000002274`, 17.}, {13.500000000002274`, 16.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.552325660469876, 17.180083206945802}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1ws4lPkeB/C3miJsOwkhakS55DIJsYVXsbkU4xanJJWkVpnSZrZSUxGl
+llp3ZSeVW9g52Fw3kyJTsxqlci1Jsi41KnFQzvd/jufB83n+l/f7+83/fXl1
+doZ77Z5JUVQnvslvikl+6NHU/77UaCosaOflpTCXPhgQBzv+4qPDgWUt81sY
+C2lqSiB/LZbMb819zIU/m4ekPIBZi05wG+FGjyz9ectoStRQUS2vTlM1UW/Z
+/4JZXqXVZvDGtr0BOTCnZyR5Ldxq+8vaT8TqwiQyrs4pCbFdTlNBrGxdBTJe
+/X3CaThxi5KoCftLK7OuiWBhx5tOPlwzLWobhbt12DV6cEDP6DOWPk3RtwPt
+a0k9Bzbl0jD/eZbQFx7qbu3wgQWW+bHDqvCsG2e2wYlfzxtfgNM0KPZWmPLS
+qbaC4/gGw+4wM3dAPKJCU/2b46x+gGV1RVZ3Yf8ten2LYc4ji8lcOCmqZ8k0
+8nA3UEp5sOxFik0XLPspZF0dmZ/zWlANU+sWeH+Br8TNFF2BpY+9m9fhesGv
+pD2k3qA9cvY3YediOW0uqa8l2kAT+fNKGatCYNbpNW5X4bVLp2OIu5OD6g1R
+f3fVb4xDMEd6eWMVHJfuzToHC/rn73VBP49PPGy8RdY3fyxphnsnVoe1wfy2
+6/PcNfD5pvzzlYl6RCaL+irhbuH0DE9iL7OA+ZrIFS+flQpLee2RnvDa83eL
+ekj9b8848WCldOUOMwPUG9o+FA03Bq+uOA4LBlyrImG9lSPtDTBzIG+RF8y6
+lDimaIj1waaJanCoYd6ECywMPnuhEdcvEzuzTsLcS4t8wuDPvXVyBbD0xwDx
+HFgWzbwnhoPmKK6+inqCYte87oIp8bSKJayktTGiD5bdGHn4FP2Q5cYp9pL5
+ql8iTsDM0u/LX8CCeVtv2sAXshZ8rCP7c7aumQtbP16TmkvmNwyYyNBvkf7b
+h7Ekn+qJcOLP9w3f7Cb5n9IvFEi/31dvciTj74oW2sNl5yoOL4NZ9p/uxsPG
+E4LrpF7pswnf9zCrvmB4nPRLujtwF/LKn4hW+wCL7tOpfaQe/aQTxAI/kXYE
+6m09eGHBJJnvJ8uZhX5Z18/+UZnkix2pukzcl8CwJPWvNfuouQg56iJqdsL8
+v16tTIUZRtpBGSSfnNHbmVrIfb/3UDtZ/4nL3gJrOd3W0DHCessYrQw41LnV
+LAwWmbeXi2D5waHASlh40cX4b1gyf7HNnBXIF3qwsRYWMDg+HJgT6DiVDl+4
+arg7GaZujDgHwq3r7/k/JfOL2/SYMG3U9ZO8McZ/F7eUIl+ZZrrdKljWYbbW
+HW516HjjBYs8d+T0kvrMcgZDjMn+PvHHYd7hb3vCYfayvV6LYBX+kqEwmJ8z
+pNqAfjk+VzgbBAvTJveegis6KkvcYFrV0dCTnO9NRzax4USPNy7WpL83Fhxj
+woIqhxriIMHIpffISy8P8vUm+5m0TEtgbnBcfSwsZf5pWkzq5YszW4g9a/cm
+wawY9c2rkUckyL53itQbtSOqEJZqBU5HwonP3SVmqK9w+9njPLL/CdXtNbD0
+zRv9aJhpZDawEf0RuqkdzFxBPt+s0Q7ifqHTHVhqulwzWBvPm8tyykNk/ap6
+225YReP6A13SL+0Widti3N+Gqv/sgqXV64azYYZ1bkYBGb9bkd8Dqx8yLB8l
+9cvfVp67BM+3uPF360wwf7m9jypsMG1cmwALubq1crDK2aYnbbBg5+H611jf
+mNX+YrEp8s3ePHAT9hd/qA6ABQVdN/3gG71RNZdgyv4Hu0nks3blHa2BWWFt
+qcmwf3jR3E4y/49r31bA0Tnqkx9g7mDOwD1yXl5W7RiHhQdH6nbCjMj7zaMw
+5zPj2nfEdRpb/oH5ppKFYvQvqf8orwWWftxDpcN6JU/lK4kdFnvw4cTm/ex0
+sn6u20di/w3vnSLJuNn9mkxY3d6o3Jfsdyw7QAob/2ds2Irk8XgeqI3rpdWu
+sNQm9awIsufD0oUfshTgxPjImFFy3nddGqZIP4J3D/BQj1Lms5MzYHbZ9nOz
+0Q+DrnSH72CRzF0tBa4Zjb6mB8t+U9dYhv6qPzC5sIHk8XthVAQHGX8K+5ns
+/8UwXYWFenSPWRTB479dcHeFjbMSg4dh2tJL/DPcubiDZWGG59ChqoRkmH23
+bP1J4gzFW3kw19jyiASmY7aVFMMpn1beVGKjD1z241w4w9rq1krY4MCV6iSy
+Pr9Z3wemqkyqjsDUX2rKEXCanjjWA1YKVD13ER4vsXLWIfm0hV3ZMPu9f2fn
+EvJ3b31GCRy0UGIfAQu3iWNrYEHImLkivC+FFoqIo85rFaAfT4RrAmth6bCd
+qi88Uz9LoxLmVEqKmXC2x61rxSSPpEFEznvfYH6vAGbyMm0b4dD6X0YTYVFL
++nwxfPhRwvRJMr867Lte2I56ZRNO5ssmO9Wx39CvdNt2mA7VUAyBXed9mulN
+5kc1zxfDW6jGWhdYVpB7xA55nygnyBzhbs3okbtwawvt6ETq9/Rw10f9pqp+
+bDfigtzkcFi+IW9wM6xe+IdyOUzrzgoLhbnmOsqTcL9BZgjJJ2yql7PRoanz
+Z7y8M0n/wqcKDsD9B24dqib5XrkyM2CvdoPnL+G8ks47lXD3WM0+xkrcV/e+
+iSSwcEMzYwWcF/uy+AmstG7Hfk+Y+0il9BFcI0oKP0Lc2hhXAX+pcuhLgxuH
++RFkfwXFO43lsOCvSXYEGa88aPWE7B/977eOcJN/Hv8dzDN+wVCG+7JXmY/B
+BrTMogv1vNQ+rzLDHLl6lprnw1OpBuazYfXFGX/wyPlT0Ho+C5bSm2zcYTXD
+yrivK8n/AScWGsPjYTlzP5HrO7AtyXkP3XRsw1tYGFKkIA+XbfbyfQaPj6ld
+JJ55uy7wPswRF+qqwbKcBxmlMH+d63U2PMfEwO4GGV/vwvEj51dnbH8q7Kx+
+uy+OfD7pdea/wuoNvLx7sPuimfvPwf7ez7izSb9MnB4RM6dCJW6wxC2xLgHu
+n5GmkgQLBm3PZZL+2dtc7IAptasqRaQfp1edWbIU535nqAbJ5z/5575tsMyB
++X03nHi8cvIynPek1JJCP5zXxLvdgbW2xGTpwnzG+p4u+OHWtVYucNxui0cy
+uMCS1RwOi2Kyf/9C5jvrWacQV9jFf4BdK09bVcONO+1dO2H+LtvcLphK0tMh
++/cUD5+agmVpZ5tS4DvvvPvUVuF+vngxMhQ+XK233BjmNw8lWMINDrmSNXAj
+N/wOBfcdbbruBHOnnWvJeaO2Jd92gWlOpNMVuNf8DMcZDn0c33kQNnq6bcKB
+jOebSjzgkErTw6thXlTGt9Xw0cGuQkPYeZ7p4AqYGS8q14BbU2adNYZfNieI
+5GER7WT5A9w5w+PbGPILv/0p8YGP3C+52Q9blwoSjsE8RnZHB5z2daFNEWzh
+sCfvCak33Eihn5zXMp2hv2F6S1iXIeoxF435NJH5RVN2XLiQx/NrMSfvK+Ox
+FfC3x6cMu0n/2w2mpuGArN7aEZh5KLt/vS7y675uIvkqfCfunoJZhUf+1oPZ
+affocjjbf8ekIyw1WHCsB7YeOr03lPTDbfg/M/DetHGvP+NXWBhaKFaBFWzl
+BGVk/r78aE3y3tVzdHYH6bd+sd8CMk7e0yxwbv//3vZfCgDy3g==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.318520523989797, 6.302976613356011}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwt1gk01WkfB/A/UrbJbSbLyHIlspMtpqG/JYQpW1PWsYWxhDaUqRtmDJP1
+teRa0qByUZYiMrqiV6GUUXJL7lCqmZabrqik9/vMeZ3Tuedznuc+z/f3/etf
+6iFxnrtFKYoaxh/ySS19xo8GTQnIpxxNLQ4JdzmvoylK6aaPgzxNObcrMIth
+fmxp4R7Yodf25AwctGFAMgUeuPr4k4UmTeV9cfJINKxdI7U7HXYXdptaw3tN
+bTWGYPqt+NQszmcfrr8lrYXzM7tqcuGh4MxQW/i2u9uIAvxM0BIQDefFhl7L
+W01TMXf7Bn+FqySsSylYkCvtVwrTXREPY7/CPTPFfhVk/R7PevJLmlI8atdV
+BDNU91n6weWhM0tpMLNZrOfpKnzfb4tmFMy6vPxjJtzZwylxgeNHaue3wAcZ
+ycu1Yf7MtlRVuMVY11kcNk764dNqeMEozvwJ5mFF1LjrwI4VZj8PwMbZv/3t
+A9u89+C0wwzGwp/VsGpu0YVzZP+qK3dFkSemutWiGY7XetuYQPI5h5hwYe6W
+AM+/4aVdFdIPyX7NB9+GY77Cu61py3C/e+fEH4/gR+cCuizJ/A+F7t+hj+Jf
+Wu0SYcHUN6/rYTevI+rdpA9Ott8czOHNv5dajzynb4dpot8c9151P5g6/kbJ
+CmbqV/fVk/VahtAQbmm1lfgA58W9m1wOl3s6Gdtr01TTTr7zVZznPDzHTYep
+A2yRMPi6bkFlF8ycv64uIHmjZLWfE/tojkTD7J6zrpI62H/YRnoC84WxwguV
+4SbXua0ucJfktJEGLPBIsO5EX4p2K16okPV+9l5TeG3jA/2VcJCMk0gXg6ZS
+Sl7z5kieVMPNPrDnTnPXMTj+eHKKLLx608/qF0m+9wnsXlma8mZ+a1QABwnn
++qphi1Nl2xNgLuP28yuww9+N9jtI3qh3PVL4vsPWA7k0bOwxVrYdlldU8zWH
+b3d6/8aBu6oGPYkpE+ExefL8R+3KbMm67JPSbPiEaHWHL8zyLwiSxHy+N7rz
+WSTfTR3tNDgl/Uh4C7lfZ5W/EL6+02z6FcyQVR39Hn1RSbH6ZpjX+Oi+tbUw
+Lz9m/igcr6x/nwdnXVt3Zpj0aR7zhxBOn3CMZerCK+Q/kP6p6u7YOJi/UsVg
+GOZoTU51kHVDj4Q8+JbIfvoTLJDZvX0jvJj+0WujHu67yK/oRx7e1YSgcJix
+vtjdEW763c0sE84LXLLqwHxKvALLk7AgvKRHC/5ebXvSWZjPeFpQhH76uCJV
+tXBQ89qtMqQ/C8W5Erhqzm3jWvQ9oje25RjMkuxQ9VpJU+c+p46EwtxHz4Mv
+fEFTMjNPje1gaq6nzQ1u4NXpqZH9Z4aVmHBM8ftKkp9W4FUZwcKDMd58mHV9
+W2gy7CLOnbwBV2VsKl+AJeQcj3TB3Ie1f9XiPs/pwg+kD3pmS1oi8kiM8Yt6
+YYZ1qugG5E3SUF0Yh4OCFHc1wC9Wt64n97mLqiutx7xdoesy9Uk/l9hn2PAh
+S+4M6YsbXNZJoa+c9KdHOcQdte1eMP3GTG2O9Lu/UJgD36v/0cJBH30Vlb49
+R/avubJUCBuHROQ2w4/blpU/hpkfveSL4bzcm7SxAWzB9AqA2QXTHgfg21Wz
+qeT3a1np5oxmWFAmblWJPPJ3HktMw5Ri3AYmed/pm/wiYYjnuMNGjjyfVzdS
+HdWJU56YiME2Wq4mBjCr+I3/FPrRtaJH9Yl3RvoNor9LPxzyJPvpEN6KWzLw
+sX9+kIEpf+O+OWm8P8f5WgKS7/JpFTdYtLjKYJhYIOV9XwrnD/1k0QBzPeSW
+KmF9v3fKWcQtu4dPwQWp/2mOhoPKPqdOwv9N3lHsRSzz/T9eOG9mR7SKA8y3
+UV6/ALtnPtDbTNa96YWryLN4Ilfdkcyrc82yDnm7O970+5D999oiKjGPw6YF
+p0Mw65iDUxGed8ussvYZ2D1S0Y7G/AcnfD0n4fhPOufr4JbRGfV/55V/tU4E
+/e0JfpcYRfrayOHawnRkzr1LZH6LCm4EHPVsOUvSCOuZaa3xsO/mi6U+ML/t
+cIkfeZ+5LHc/DQsGeme0yb8vgZs/vIDzus7l83CfWwujUs4Y/kZ1Zh95fzGm
+8o1g/tiewVnkPTiqcMoeprz6v/4L86iFdAd6wCzZCaUrmFc6cbBxF7FeIMVG
+H4+0j1/1IS6w0DiKvupFVzJ3wFzXG76H0e+TbTX5rsR6Bb5sSZpK7n/AtCH3
+hZipzkjQVNE7PwlDsn7SPjocvr7dv0aZrJ8UjWPC27ISgqVhZqkgRR4u1vx6
+xzzmqfIPeuME5yxXOTcBs0aPWzXDni/PmA4Zkb8HfZQb7nNsXPO4D6Z+3c+S
+RR4X6W3WN+AgpsJrARxo36DDg5l8tsRj5G+yqxWS81lLiXUPMN9U/UGNVeR+
+99H9A5hfJWO3nD5c5XHkp2r0o922RsaNuCb8uS/6O/+j8rJ40p9yesYMPK5q
+119M/NpfWw19R6UxFrthgXVTuCG87Ok1i6dwULJFI1m/4uAtvXID9ocMuJDv
+XwsNVDMhjqSnveEMlx2bPOEqc6UN+bh/3mXCJxZm8Uv/qEa+F13tF1LJ/kVq
+bQnyV89n38qHuc/SjyViPvsm9WQ2sdjwaw/MP3SicKwcZmZVDpqiL4sajn8p
+Oa++XU4Xfb63UbmWR/b/kjxEr8Dv229OK9PJ+YlW3qnLkWPk1I/74SBH/tt3
+4jRVVsExCIXptC0xNfBL58U+D3I+c9/5bHjpr7ByW3Kee+TlFrg2bYphBvP1
+TdgMnOd4MSJQl8wn7pNxCuZE2eZpEvffsAzA/VmN0/u0yPejfneyQr68tt4c
+A3Jf2MVWHeQv6rmisInk13U8rI75MtdECreR7/NZm7/C/K5zrp2RJP/N7Jdv
+4Nd/Wl3IIPfvnwltRl/1qRv+4ZDzv+qRdkKfA5xikzvEoZ8COXDCouTG92Qe
+SaHXXbJuaJCrboL5zUfr+mDjrp9uOsPcT9dXJcH8gLCCWJjfMGEyi/MPlRdW
+5JD1l3G/WsL3DvInOGS9874yef80drQf6YGZ4x0abshfa3h29g5MSc0nGWE+
+p1s+Hx7AVY2XpaQw/7H2c2cmybr5O/Pn6GuifNJ/AmaxA1R46DfAoKr/LnGR
+j9jzZTT10DTz/g2S10XkPBNWtjVv74TpkrHpTDGaGg4+3VpHzhMuzerCKkWN
+5idI3lH/6BVwyqBmfQbJl1XxQg2mX00dSCZ5RDzU9sLVKla8PeQ8vfSRBZjX
+v/Aqktg+2LoB990Zr8v911+yg1PJ819o9SD7qQFuZhzy99xZTDlELPCcCMfz
+tn7pI5FNbLhezA/zhuiKsWtJX/mWAzbkfZJOHe8leXqTboujr+hYP+ETkkc7
+Wq0WrolsaJI2Jf9/H2wjzz9sae9+U5ipErHkApu2pY77mZL3QdrXTvBWj4sJ
+acSbLimsgK9/Jzp+FmZl3aGycd7hWvn+AfJ9Z5XLE7j/o2iO2jOY+rj3JgX/
++2P2/08J+n/oho2Z
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.45429484366825, 2.671979374673003}, \
+{0, 1}], LineBox[CompressedData["
+1:eJxFlHtMU2cYxg8QkFERSFG59dDTc06lMCVOqsAQXic3I8xKQoqT65RRhImM
+gVoYFxGcCgPSIPwxucwLpKNctYMRZIyrDLlGbmFQjJAKbOpkOrPR7Gs0H01O
+vvzypt/lfZ/noT5PCok1JAjiJPr067sfA2quft0BRNXpgbbfaPhzTvt34UXE
+5RbPm27R8LS8t8HIeCcQlm2FJtdoSKwM4rrfRCw5eoibTUPniHVMqJcNEDYJ
+vZH5NJjFN3k7zSGuTZtQfE/D1wakOiXNFojom3fyumh4VPPVT37GdkD8sqzx
+eUVDdt2LHwJy9ZyyjXJloEWTWmayhpjYfVCXzEBkRnKTq5c9EIFGz4JbGVgi
+5WYdyYhb055IdQw0W0/aWBUgNj2vigMW4jtzNnTXEfO/VOnkLNTz+o93piAe
+2H7e6EdUHy00H/dHnF3av/qIhZkFV8eRDxBrBrTziyxIDn9xwOlXdH65rGl4
+iYWejiLuQiri1rbhvBkWivOaXdxcEJ/LuKHsYEErE1mGaNH7il94qhUsmJ+6
+/vxtM+LR9SlNBAvO1oMqcTFiS1GckSMLJ/NzldzLiC/c3Zs8ywBb8c9YUom+
+P/YPBxUMNMhmNENtiBv7nw19ykDbZLjWZwPxdNg8z4KBb6+dFSV9pj+f4DpM
+05DUbBR2exgx/+PUxjoaaoUNkpeh+v7IzHYV0eATf1wSu4o42nvCIoeGyZbv
+fj921QEIUFeLcmkYr8ieKRTx0P2lRFgpDSfKDG/N9SLmt7TcVtNA+/ot7Qkj
+kT6UXUFLNFzYUq3QzSI2XQmeJhmIX9/aXnbEEe3/oalXNAOtBU77wqoQa7zj
+DO8yMJhOjmrmEJvaXZKvMaDsakgX6xBrz2xdcWUhf3rtUKwhH3HeWGciC2t+
+UYmZf6E6382wp5KF8lR5efagfj9Z/+E+Fv7YRrLCEsTTO4bE8yyozGa9Go4i
+HlCOhC6zULBdr+fN+hm+sFtyj8T/d3Z4MjtzlsT7Z93Pi8sSk/h8l6UqRY45
+ie/HkQszxP/y8P0jPpFcHjQg8fuCGxZdHWkSvz+6YmqoJmqzP/X7X/nK1Jv9
+q6SjEg1YR9zf9eWf7cZqHHH/Fx5m1lvx+Hg+dJ8P1yOBj+dX3e5uFdbOx/Nd
+i56SBptReP7ul2qlW0IprI8hJ92EqpzC+gkcDUwYGKewvlyVY5xoAwHWn1uM
+osiWFmB9Xuwz2hl4QID1GxnywPn1QQHWdxrHXrSkr7/Xv/FpT9NcoQD7wyZm
+9c0kR4D90zMuXIldobC/lPvd0yx7Key/cE3Q09UKCvuzkpWds0mnsH+luz3e
+3ginsL/v5ztI+f4U9v+U2CeH8KRwPuzjlKa88aBwftiadMupAArnS7g0YJc2
+hsL58xHrd++/qxTOp6DOK3vCH1A4v+50+TMRGxTOt3Hrl0yfrwDnX1ZwjWa1
+RIDzsU6VeuzxogDn5+PeE69P7aVxvtod4TllfkPj/LWu4Rh7dCN+n8+NnHfr
+//aCKUQ=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.0548, 7.75}, {1, 0}], 
+        LineBox[{{6.4999999999976925`, 16.}, {13.49999999999251, 16.}}], 
+        PolygonBox[{{10.6, 16.}, {9.4, 15.6}, {9.4, 16.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 16.9452}, {0, -1}], 
+        LineBox[{{6.499999999996362, 16.000000000005457`}, {10., 
+         10.000000000003638`}}], 
+        PolygonBox[{{7.947677384685548, 13.51826734053906}, {
+         8.206811054955079, 12.280184249251306`}, {8.897834175673825, 
+         12.683281069670574`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 12.823799910437668}, \
+{1, 1}], LineBox[{{13.500000000007276`, 16.000000000005457`}, {
+         10.000000000003638`, 10.000000000001819`}}], 
+        PolygonBox[{{11.447677384685548`, 12.48173265946094}, {
+         11.706811054955079`, 13.719815750748694`}, {12.397834175673825`, 
+         13.316718930329426`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.484057296392571, 12.823799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 16.}], PointBox[{13.5, 16.}], 
+         PointBox[{10., 10.}], PointBox[{10., 5.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/chdgeg/igfhfihi.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdgeg/igfhfihi.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:eJwl1ns8lNkfB/BHQ27TppIIRcktNGFF0UxRaQmlorLMMlsTilAuYUdXxbYq
+onaTXDKVJLeQy4gy5DJJ0ZaioiG5hBq6+H3O/vzzvN7Oec75fr/nzDmPtnfA
+lt+nURS1WIqiyJMam8LfYhalSjCbRVkap+sWwy6O0/OVYWFBoux+WDxVuJJF
+HH2i2wDmGXquOQJLL/1R/2ER/r/f8thz2HG0KrkI7ji1u8d2DouSa6loiYVF
+PDGvEn533C1pN8x/eK5hnTL6G5xJdYYFXm35T2EdnywjOzg2tFm0dy6LalT+
+Q55Yv0ou4TtMZTeecoIZl8Ve8Sosirt66rw3aZ8/9WbWPBY1dj/3ZjQs52ar
+cRreuktK6iqxwu8pI3BhVPDROhKfbtzZdarIQ2DzZQgOLKPTj8FjRyLoqshP
+qX2y/yYsjFIPtYFZ+tlfy2HuWPF0T5ivkvflLtz2/eeKUFjkGxWVCnNkw9/G
+wl3rDk8FwZFvNdQTSP2+Cm5YwlQ43z+evL/IcP0o4knzSNgcBadsslDMhiPz
++aXesH2wXYQ7nPm1UZHMz1AfWkqH3b8Wa8+AO3b6X32I/HmFy5htiN9S5vVc
+Ug/q/Lh0IlzSG7mFDds7vvYi9VLKdzm5HnaZ7AuRIfnnmRiugeMHqbh72ohP
+zaxzMyzt8ftoEFzyb+uv4eR95xsjxrBlsUnUXbj2tU3moBaLSjgu0VYk8bwL
+GiyG+QrtrkEk/rFBTizMYLQ698M5lRtsOKR/w2hmAPK3Kwtf40D614y6/YAZ
+TmV1NrBqfBT9nBrW65fJ3FWkf463qe587I9ea7YdXFLUY14Mi12K2rbDkrVm
+N2zUWZSWg1/aAThthmZMCczaJKHOk3Z3m6WLNbAvWLVDJbDIvbk6ArZPlF7R
+DbuzShZXwKwvGbHyyI8/larYB5eYLrmwDA5MVdT8AQtundLfDMsZGIi/wYmT
+tiv8YSX+4NteuLzF/ns0PHzxk2cl3LiNoxhL6id1fM8JmKOo4nYC5m2VzVlL
+HLFjXTjM6qrf+gXxCvQG8tik/68THXy4o6nlgzUZL2mnaBfsbjNx7ycyn2VB
+jTKcssTJtR3xd4kbv7ejHsILdrYpJP/wCc/rsKpdpr8raY/uMY+HG9NnDSjA
+4okdqkdh+zR3uSMLkZ+fS+tfsKRgPX14AdoFgRsLYMZ8TjAH1nIrDfsIu2/+
+dvqtJuI3zg/4r95jKcsPwPxtBh5XYZ55b64SLHdtzmUVUu/c/LO1eKY0N3Ve
+xJPr6Zd0Bk++JN1SD/0k/boJAXBXvqlXGcz+c3LvHjhQYU6dE+alTn/SPAh3
+vH/d8RqOVcisvQDzqloW7kXc/Lj+7HqyjiFdob2wsI/mpYBxRDQvDUOy7za+
+H9kKC7hPbrnBgabcaVlwTox3UwRsaXl4Ypzkc9qj9hwc1v7QwhbziFrynK+Q
+fXLpPCsWLhnKSE+DWT2GnwRw4v5yTjLZt4a11/pghuHXG8fIPjOx85qC5Z5l
+DeyFtVI2dBM3xswbsyfvX1rRTPpvdTRvXAxz34bfKYc7wnjbJxA/67O+TDgs
+SBbfvQkzZHSMteDhwSgHH2KX69xCxJuW7uirQ/L/d+Y9S1LHbJ7CKPpZWp9t
+zCN1Vtx+oRVOiNldq0XqU5wvfACznQSaf2KdJJMdCc2kvcMtfBLryst1//GR
+xP0gfN8+so/UZlqQ8YU9h7f343eopcwPDITT7p42OAhzxbenPYaHt2c4zIKp
+ZSPF2shHn+ezv5qco5kxNt6wXKFGyEn4mMUlYz4s+MXRgwNLc+7uGYEpHVsr
+d1j0cu2NVeR3YMdd5g2n1Y7zj8GML5rRPLjW6LpOA/ndKX48mwebD1+epoBz
+SxxhtXCInMtlv3ivhd1d/ewsEU+ib3PeAXIPeBvkn4TDQm1KL8AuXOmODlj1
+jvadPJh7u2aOHvItl73JqoLDHnC7Sf5aRdYn7sP2IxJ58juKVzGdew/WatRr
+aYONZMRD1+GugQWzB2EO1z4qgZy7qx4Hf4KHzewiAsk9yInb1wXz1VvfO8CU
+bQ37Lqy0zeizDrnXzh+5HAqzN+gMfifnTpyh1yKYGjmk9pycOzfuVJUiXobJ
+vJslpD3n9VUWLH3Wh58KJzzkni8j9ZY1b4sn9dqnyV8Ku8Sl/EPql1d10zkF
+567/6un0k3DKZLaeDDwsiq9MhMO0Sh4dwjn+0vrYi1tk/IjWrBHcq8PHx+a0
+knuAFi0IhwXzhVkUuTf1h/6ZDfOKsn0sSX47C36qwj09ttykOpTcm6GcBTGw
++O74m3JS//HzYzvgHH77HRlyjxYKmzbCicnJw86w/qSixBnmxKm6XoQpyYJ/
+fWFu99ILr8m92DtDOgVuk6Ula+ng/fQQ+zaYobN5707YPmh/pzriKfRb4RcH
+S6xfHPWFO/qNt+fDlNC74B4sLLdybIYFN/fVKyBfO3lx1ys4Qc3YyhUO/Jin
++Y70F1WVJZB7TyophrRrjcWFVpF7lTfx9b/3L00zfQknbpe8KYZVucv3vIPN
+7WJ7kmHLzofcZ7CYS58MJtaI3H8HFmZMbdykQ/bLstSDMH/NGXVdks88LwUd
+WNItU0bB/Ab57ErEq5o+05Pkn9Id9rM9nNN5Q6UWdjcp1KtF/h067QV5pH3B
+40gLmJ7VUHCNfIepxSVn4LtKdSjULJvUz7VVSQlWukt7m0++4+7rxfLId5tP
++o96Uu/OguCJWdjPJ/UcB8h3xiO5T9Ew4xpbUw3xpBwPuKIMd/UtcnOGSxoi
+AiuUMP5f9yP//K/enPOHYUflqKrHpH5xB3a4wOLlFrPmL4GZjgbWcK3JAysO
+zHjzPGI1nHNp/OMtWBxb9XIbHNnt+H4M5u53o/HIeA6pXy10kY99VFcpLFIO
+NwuCXVgra6bIeA6xrzJhbp9s9CbE5xgxK6sJjrXXPJcK68/uTPoAq36Q9hyE
+dYoky37AosUXN1kif//gwT0yeshv1UH5MDhHdRVfCtY3Gs64Dte2/mgcRf9A
+w5bqelinVVm9E84rVKh4CsfOGzStgsM2rxY8gjOD7k79DbN/yn5+A36nFp5x
+EBZbDEgHw/GJ39lOMGvUcekSMn8N55g+6f+OMb8G8QVmbHOYTmwTFegMcwMe
+NPWhHvy9AUebkG+eyE7cBofNVbFeAxtpFurXw0pdf3f+OpOsm25lHSwwfORh
+8RP2g8tl/8fEJ4Ks5s7AOI+Vj/fCLtXeB2l08v3KfEPm0+oyDJZXxD61l+lf
+Dis9MbliogBH1Z7fDXf5Fi4Kl8f5UCoTnAGn9UpnfpRjUd8amA97yfq8slL5
+Cx6wUzxlgvoxiq9f8oQtNymeCoPZPYyDu2Cj7fmR92HB4cdzjsL+uZ/nK+hj
+/L93GDyG6dpSZpvgPJVvz5lkvlVd908RG9IldbDH3G30StJfa7fTb4jPcfmb
+a2KY3cQbn4b4xZd/OyNngLweFd3OgD0844w1YVEDbeNK5OvvOOWjCyvl+H6u
+gN/JJp7UIf2TZe7ooj70yE62KnGJ2al9cO3ET4tpcFpF0GA83CaO9+rFfFQI
+rY83g3yX547XwEqTNNsNpP8396nLsMvK7VdeY3z+hOW9QyT+y79HOcCUwZGD
+LrBWXabBGcRn57sw0JiMd87n7xzkUzLd6dFMkk+655pbyDdQLylgAvXSSteo
+Sib1Wvpj4gPxo4bLIbI4n6fvuimGh6cejTpOx/mzyn7XMCzyPzPdUAb70+5A
+AI2Mtz60X1maRYWYBbVrw4E8oY4KjUUps2JmOMACbRfXn6ehf+xz9WiYsfJg
+Z5gUzjdh7rVSeDjq6Z0eCuspXDv5lcS/R2fOHzDd7bSGLerTtcfz0HpYVH2j
+Ox52Gc8NXgWLjQ9Payf1+5bVsAv+J0TLfKEh3h9MCM+ArYubmT5wYJP0ezrm
+EwSVqV2FlWT61c/CGocdPj+D2UdvK+ojPukVxR60pZhvbsl7IcwqXWmxBFaq
+SYvwRT4db/2er4JZ3bdO0pDvyy/yszbAadJHDONgQanBAmL2SqbZBJw4drbI
+mvT/w/3wetRrIMdXog+7eGct2weXl53iziDzqZbS98Ia3U87PpB4r9DjVsCW
+o7/tfAiLXphOtGM8dhJN7wrsck72qAMsZNqeDoPz+GeWJCG+ErfE+q1wgpxU
+Qini5xc/oluQfFU3jFYi34F44YYFcFrVs+ocisS5QncmTJmqPVCZYlLDcqxJ
+edL+yaag7huTKjn0NJe08y6xn0VPMqnIFYxKLdK+5+whJwmTYlW+MLIh7TTz
+Vxs+Myn9BydOcWBBvfBaxBiTamy6OJJExn9tNW/sE5MKk+PMF8GsK1aXKkeY
+FN3vD89ZyJ/yXb+le5hJ2dG6m91gQXhhixcsd+Dd+qukfhYVH6zg2AtHjnwg
+/ZlzGvzgnLlNP5sbYb3Z/dQgbK9zTyecOONJTxHGH5bZvLIEplydvxVhfrqj
+aeoQsc/FmFejGD+kqk7TGM6SUVowzqQY0hN/roG7Tmxy9UY+8dVHzXbCacMx
+D1O+MKnEos379xBXDwffRv6cJ2m+e2FWu9XtpAkmZe3KqGfD7AT6fWvUS7ij
+KsWJjOd59lgKvNVO1cGctL/d9uIKXC5RuzYH5gVlzt0Ei2bvvDOI+LpqD+mn
+YjwxbcHVOjit/GpNIuazFx2rSoNZQ54sC8Tj8qZpayRpNxbvjUP8rPz8vzxI
+e/1vi9KQX8oW4X5b4lvV74+gHgyvJzdNYZ7RzsOxgxg/7931paS9uUJ6oI9J
+aQRIdi8j7pX229bDpFTLcw6shgVrpA70dTEpqjnirTt5f50c68JzxB+R6xX9
+n0NKzVuxPyi9ebmkvt+3BDXUMal/tMtEvcQhFhud7jGpwDNvxnVJvWOftozz
+Mf80iwx/Yq3ohuHT2G8bJPeKiMkfr+L/TxPW/wCX74+H
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {6.573901114580226, 6.782664290660753}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt13s81Gn7B/B7FDmVUWJINcphpAOySgczu6UorSmJpKcpKomlZFHsM0mF
+ECHVpiZhC63DI6kcxqEQamxOUQyhlKSoCPl97n395h+v9+u6vvd9Xdd9D746
++7y37Zch+DAI+ffn4CQ+mjzSTX8u4xHmkdAJNS0eWaPC9rkL8/1SnWfCtjGJ
+HodgCev50m/IF+8xtZwHD271SCyH+1VyjZuW8ojw1xP5AbCnc8SBOOr2rDQW
+HFNOah1hnuNztzQW9hu4SfTgQZ3+LD04fsFXq/ElPCLqXN15RYNH2OumHm2H
+2TfqixRh8ZWA3hqYP5K07rg6j3CKwyIrqGUMjw3M5pGCob7GSliotHC+J5xX
+UFrWAEs2KWZ9U+ORqUXb+vtgEqnwPR5mTh+Ok8X+gnA5zY3wpX25d2k9vIvx
+G5iwZ0jDXGuYPWlU+WkW6mt0EXrQeu/cbHsP8/hRsRGwyDK4eAI+puY+L40+
+78DO1MPzAf4Gug9p/yfufBHAPsv+11MJM7uuz82E+W+X/HgC8yuVJ2RQr3ZQ
+o3c5HOMw9FEA2y5P/DsbFrtUyJXCi1e9Sb0AS/1VV89D/2avr94/BGe7maT6
+0nm4PSk1p/W+vZpdCEsWFzLG0K+xVqPtF9gp9b9aBbC0qoqlhXleahOOesNM
+m74zHNjTc6RcF/bR8xqZB4dpyIpbFqM/m6Sn43g+c8/+NdEwu9j3SBlc4NXg
+v5HGl1ltPgIXClTD5WCScfO+EpxiHmtdZ4S4tvZwPOrnZ1WvSYKlSS/7mLC0
+9U24P8xMztUIxTwq9ol6XGB+u47TEObpU/vn+S0wLyMuyxVOSXj2qw318ir1
+1pk8sn6f1NcOjjF4ZLULTonylf6Hxh0DTr5XxXkV6cz6HSbHDX6LhtdcjlgR
+R/dbEvd2A3z10SuLPLpf2OE36nCLm/yrJlgyuuvAJBPnaXPlnxHYuCRqF0F8
+sMb1uQb6EzQzC1hwZNqjeyawWNnAl64XGpkVvR4WFo9cPwNXODjl/krnI1cb
+2QhLXv3zgtrY+8i7pai31qhC/9/8up+/R8E+ubeWLqXxrDLxB1hUbDWpDEtl
+G1fZoP/hixrzOlEP28887k9Y27QsJIP2q6i1QwpnXi6J9KJx5xzRLMxTIrk/
+zIEH16RvMoXJ9sUPOhbhvtT3TFsFGyuozoiHBX+Qk4awmU7Qamsaz03ZS+j9
+jWOf/2GIebmouJRg/e2ZZZb3YZ/DIh13WPnLta3HYfLlMX8C9YbdLo1YBws5
+ijtDYE8L8x3qMF/JeccY+h8Zar4/xEE/Y8t6PGH5xQc2vYT59+w/tWHevBC+
+ngQW5m07uQXOPhX88SnND7/LiFLBfT3HetEM81YeYiXO4BHd6ZZpfbDYY+4f
+pdOx3kHDQhnsJ2BuVp0FK69zNNWB2ZstZsQqox/nnt5fYJHm/GZL2PizQ8J+
+Wu9seclc+KVsxcAZmKczYbcErqo7nZtC4xtVbnnAbq3mjwupC0e59fCIu6Ft
+HV3vmWGlM/YbzrC710D3X7ogYBLm11S11cPSXo/D+ai3Sn/vWDldv/TyVz/0
+k3dBWJcOG0cVK2ih3/EekxC6v4gbvd8XFnkvFDvS/EPK/DJY2eNu0ny6nv6P
+QBnMj20rSOig81sgMjGGid+A32VYUs+KsIa7HUzs7ODsqLzjNnBB7eSuKbAo
+N2nYBDY74/7ungHyRZwBBl3vhPo6b5h0rHJ9QPcXDMQYwT6q1Zt2w27n+6oH
+9JFnXTClDfWvLNe78gCW1o7tfIX+pgYrbIuBBS/+WvAE/Rd+Xt3iA5Mk5tN0
+zEscLCdyofHUp1vClXCem86k2MPCNZfSvRWRd7bT3YHmL9G/fFABfd0JnhDA
+4ll/zjwuj/lOmVTwo/vdKh7+exqes01rO099UfFvZVgyftQ/i+bryI8myuH7
+aWydVU/X8229bQ/HnDC1GP7XKjE8OFOvqVIN/QlGR7x2w0IdxkITWHjunexf
+cMFtZ+5GWBz/dA0L67d8Xb7dgfpoMj8dbgiMHdgJS8Pi2Q6oj5N3g2ynccfy
+Uyqo/2rNeP8vdJ6BJOMZ/PaNWZQ+3e9EaPg59KvGO7J8EvXw9przLJTo7zeZ
+v+qoT00/+0yJ/n2drR1H553MYW7A/AZlWvW30n4f+EsTYFZbRroCjbtbXbkP
+r89596hYD+tzT+XfgbP/u/vhUVhcfyzdB27pUGk1gEma/ogMPFyb4SbVxTn/
+xDA8iP0KFBwDr8G8gZzcG6jPU0F9zBUW95yrLED9DWppwaY0f+1utTz0m8dI
+M1OCBR5Bv13FPKrOlvYOLMTzQwF+JzC/FFv3nlewWGvP4l2yeH7+IYUW6nPN
+0VZT0X9EQt5LWKR0SX/9FHhiV8s7WOp9MXWPDH7vdKsyGLSesdXh1xn4vpUe
+2z+X7jf5+xMFODKxcHQtjbMmk5IJ+ivxPS2g8WjfjZ7wyMSihyG0/s2mjIMw
+J195azLN//Z2NAa+yrbRLIKlut8P9sKS7zs062H2wJucvVjfrI55/SWNa8xO
+H4PdM+u2tVNX7WnLQH2DsXlWjdTtbq/dUX9hRM6YmO7/0+0mDvrbHpbscwMW
+GgWld8LrT4ey/GHiZSgKxzx0h6+1/kLzExh3NDCvlnLpNDmaX97VegqWj260
+LaPzem+RVAk7hVZdD6TzKhhUb4fJhedGS2H2NZdfK+CRGQ8suhYgzpy6JZDe
+f9UzGpdgqVWv4Q/sF1naP7kVZqc0TzjA7FihzEyYZ+tddhr1ZednfXihg3yn
+N9rx6KdC5/jqDFiUZqARTs9D+w7jLEyOfKr2wjwC5mzp9aL5teKxzZhffMJt
+lgAW5nf57PrBJTH33Ox2w2IVRq3FOJe49J2qcaNeWXvX6juXVBi5C/yotzYO
+nx/hkuxhJ2EUXX/UKl//G5dYO87ZQvcX9l78qvaVSwo0uzNqadzdXnnfFy7h
+iZ7t+kidVLNTFXYv+ThdFf2ITUY4C+CWwoHgZTCJYP7vPJyZwYuwhoXhIfZb
+sV7hws5NzjS/enG3M/arkqbrudK4wlRuEurp9/Lp2Evnk1/UIYd6C5Ln33ag
+67mUXwsd45KV/7hyLGn+cEqwzASXeCZ4nJhD80NCgzzRv+6L5BUDqI+3KME7
+axLef8r1HixY/LrHBfOqmvLn4QA630R5k2LYp/g/s5bTeaTXCL/ArNlO+/rY
+iB95E/QDHm49EZ0EC3TSHjbBooaY7q2wdHZqWzBMxm9kybPp/wPVKu+x39vt
+sj+HzUd9HQM1IainxaPBUxnm5eq21+E8quR+sb8xD/Fppodb0Z+AsSHXhrpj
+xfL76D8s4Zv/NFj8raU9CPMSqny+0zYX+xC5lRbDXCL6/vNvj2HhuqIdMp+5
+RPqe30VNerQSmj9iPgvbNtN8YfblOJV+zK85WoNB15c52l77lkt8WqJGzKjd
+jbUX9XKJ0+oMJV/qAiXr1d2oL7Cf3IPJYMZL5ddcwoq6YDNO44nE7mYX1rtc
+Ym1J++vOaf8OrxzJCQ2AyXOD4mn0+dNnm9JoPDQoJr+HSyTScxcf0fjVOSs/
+vOES5nqL8nrqZ74fzr3D/TOz1amm+WvnX/jtA/qdFW+fTueVZay5YpBLOPEh
+fceoOX7bcj5xCbug3dWQ2vXRnJlDqOel+7JqWu/uoIwNmM9g2q2EHTBvckzF
+EveP430mpYHOQyOhuw82lsmbvpHayvy9Jb3f6rzJHG3M+7Z/6E+wddfIV02Y
+7CCMJ8gP6A28cGoO8j06qsaxPutZ9+4hvJeJd5g5/oP9nYrtb3pp0e/fdkV7
+nAepUVr7lb6nuXs/iUD9YRY7PWM06XlJ1FRpf8Z1+ZYwKTnGf4jzIAH8Ghka
+d9c6uArzWznFyOcV3svIwudhnh34flmIjz+lbj/ef6cJ/Ss41TdQR++dqlyH
++7On8/cBauYKzkAhl1zqWyai731k8EiIOAb91dfX21EHhO7J/7sE7zWWsrQe
+Ytt6QLeohHDUJc8bqKV+tZ5lJUQQWJKqqUX7d3hlVl5C+CLO653UaTEZMqUl
+RPiKqRdLbZ0frl1QQphee90eUg9KbuYll5DBzV26jdS3Xms9SuYSeYXDV9qo
+Mw81M0swv3lFj2upzVs+ratBfWHV0X9RS8wnk59jXpV/PD5MLXe+6/cXmI/2
+DVMt6inm85614/u08LIwj9ZrFLEop5NLRrLOm62l8zscnO2P+2q9KSH6HuYh
+rJ8rK8I82Y5DBw3ofIpsUmfjPlrHshRj8Z4ltL96sgZx3mgTGcV7E/ncFV6I
+592vtPW5Uj9c8vo91r+07cC6Jrw3ET3fyGrsL1Llr9lOPWmmcqwF98NYcLaT
+/p/fYJekWI/zdXi6/CR1k+WMS6V4niRG/kT9/x8pfd+fxfs/aePoPA==
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {0.4875589769853401, 8.878318388907438}, \
+{1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000002274`, 17.}, {13.500000000002274`, 16.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.552325660469876, 17.180083206945802}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1ws0lOkfB/A3USpqcp0Q41YaYhKbrNa4i1wrUZRKKalmc881bOWSJImi
+HZJLWaTkkrYhogs7CSG1UymWpYmKJP7fZ89/znGcz3luv9/3eWfOeVX3HHXd
+J0JR1Hv8kf/U5Cw+6mzqv48Um5KJzjmppMGmhOpWM6dhz5bjVyxg/phKj7g0
+m/KOlU0KhAUfa7eEw+wr25ilsPP8Pff74NTBTdRHMj+1VJ4pw6aKksKsDTXZ
+FE0yQ3s3zO3Wn4mC+XsVymJg6oyJ2GPYe7x842m4fGuntswKzG/ozAqFqxMd
+7XfAfP413c3w7XNWnjmwoKYhRAHuN85K6oY5G1aUPMP5jFxzh0UrUY/KUFEE
+zPvm6G8Al7/e8UiF1PfbVvnNMCXzreY++uvX/mdwPxl/qGm7G059Wjp8FPZu
+OMtaANPtR7OOwOwo09G7S9HP57zuvXDMrFNyJKzl+MuoM/El7QgXWKkkImgd
+TCuZ/tUYZoQ/37QMFtjW2xJ7r9CIm0S97GnVj2S+aN1x8xdwufkzrxNwI/dW
+TRXpR+LFxWY4W+SjWDbsbdh0Ww31mLyqVToJO18/9PksHEHvrAqBGR/ZLxeh
+v8bPbhbHSD79Hm5p5L7URP4KJvOvRL5XRl6ZOTZzyXr+YN6jEpgzFqbAJU6c
+MFwni/GAX183knq6gk/UwM4TtdfHST2blmzTk2NT7iXGAdroh1+77206zAqf
+afODU/V8Jz7APov588rJ+FnaWnV5NpX8+OOKbySPXrqMLcy2M5O21MK64aiF
+W2HhH/ScFJjR5xFpBwdaNmd1EbeWPVwFd+ybmVy2Cn2oR2l+wf4dmqq9bjCr
+Mq6gDA7MLfo9CeZ8rRP1IvVUtM/eIeNS3bFzYI33o0u7YeFpvfu56EfmHG/b
+KOy8VyreHC73udDwDU5l2mQMIg//ZX23puCYLy1xmXDLfsNvn2Da3ruBbrDO
+0MpGAcx3CqdWwO6VT3NayHj8KfGFMK1y3O0GOU+Ld0mU5Juw90siGZ/D6pMj
++Zt9vXKQ9GNh/INNnu9wv7iNxFThulhYtLe1SYfMN8jr6ibPt/DgflkyPrPd
+ltRbUiKvK0b6XXvG6K4s+V60Xf6BvJwD31WYol+uAatzFo6ZbLN/At++ef2S
+BKk3VM/RA3kqxVaaasDlPePD/bDM75xCa5KH772jB+k4X7/NKgBmv4o//BY+
+YLxes5jked5OaL+MTaVLRQs/kPGz3/Ly4Gq3C5Q2E+c96Bp7B3vW/XE4AOZ7
+0pmLFXBf2gNqf8Ic6bQTDLj6IH9cXBvnFd/XUoT7nr+qcIFpu3otZrE+/ss/
+NhmwQEdS0Aa3eHU3dcCMB2avk+FkvfCoRTqYn7m70wSmvo1Ir4d5Rb+MkHr7
+qipOesKc4Ku34mDWiVnTIDJf23pEHS7ntsvHkfm6v/m0oH9BQYrbSZgyGqoK
+gjkTkhXRMFsigMmC3TU3WXPIfuXJId+Rp9KwMMEDZkWeKumFtWb0TTfA3E9L
+F/DhzBulu5eT+XGzA33kPi4PL51G/bx59jfnYD/+rE/0S1g43d+5gXwfBF+f
+3YP54mGdZ2HbhCzpa8RTow5fYEraRfE8ccx8mUOovyWXeTwBZsfJbRmhk3oW
+HSJ2DkuoCUEeEsemm8h8bl3uZTHka6ngP1FEzlO8sDqN5B3y7HsLnFqmXk5X
+xO/Z9tZd4//Nz8tLhwUu7ZYrSV6jJz7NUcJ9qDD89pJ+lvgxvGC61Z31BbBz
+t9mRq3AMr6p7BPZ2yv/UTsb9M4yNVqO+XXklQ7BRpelPcTBtw9yLxN25R7Of
+wsKkrCvP4UBHC0cpXdxLc3FOITkvWXWzKxzDbrI5CPdZyY8kwsKyvyWVyHyv
+zuu1cKoKb+oB6q32zAgWkPXdJgn74NtWrrnfYb7eWJAYTMm1/rNID+MXXVOK
+0H+m+7ropXqk/wXRm+HsF1azEjD1vOLqQpKXVcfRWaynXnX2PEOegpwtBkMw
+o2fKvQTmuYTOtpH6qjjnsmEZZmF9GSwQLJfOhzXaJtNTYG7kzsgHcERcdOFh
+Un9fRugUXLeyUcMJppnX1djgPEbbDhVDmJ1XtqQYFgZGhavCrJOCMEXUny8W
+8VKW7B/raHMZ7sjrSZEm9XkUm2ggD//+pnhFmLN+Hu8mrGPEMdcl+8/sFzdd
+zqY+Hyt8ZU/yOKPl1AzfPjjxPYDU1+cxx1oZfbxx7LpG+uH9GL0DG20QNyN5
+0n5yCpZTwe/NuznVqiSvVtvi3bCz9cYjB2CW7vChDFgYfMe7AhakLEi8BRc9
+rvL7Qcbzax9Uw5uMfi5VZyF/m5G/Csh4VJW4DcxVm7c1Gu5aZffAF2bVtL+w
+hNtlkyfi4RiD2Nwp1FNgfeJdDixk3MzJh3V0/D/dhCmrgTU28NvyF/d4MM2H
+SRtAf9c7shQfw+z48HkJMHXqmmwbOU/UoHUNnC+VNfqUzHez6HqPvA40SCo3
+w4x/LVWK4bSkRvt7MOe4rXg0/PbsG9tyMn/iC8uPPI92EfNzYT4jyMsf3h/4
+MjWVrFdg+ZyE0z3qp6LJfIvVmtWwu/w6Tw7pJ84jicL5JrvtGvbAzpWVF73g
+jqX6mu4knxfjQU/h9JKNO13I+bvKsjaiv2B3exUnOFVZ+h0f/rBYffi/8eRj
+j7yQV+yGa7TtZP9y5cRhOPHyrkKS54G0RyXGDHwfja+lHIer86PtwmGF+38f
+SSN5jMmGVcIxv9DvlcJGywe2DsCXdM7zSF6huqZblqiyKTs/q0ufSN6TOx10
+4DTrTge5Nfjdm78neQM87fz4yc9wkWJypzlsnh077Q2zzlUcMIEvKUU8iYeF
+D4tmmHDDr5H6BbDRqsf1ZH+5FqZlI8xf8NHsX5zfEpdl+Bo+3W3r0wCXdkXv
+H4e7C546pcOJT274ztXH+qCvbj5wgUr0rCTM037ytwHsftdMRxqm6y+1F4cH
+h/U1iJ23RVfVIx+DevfNi2GOhqXpCZi5XmObGCx8bn7bFbZeLz85ifOoZUr9
+RvCRt3+oDsG8H/YPDWH9m6+7e2DvXb2+duT59ju/5hHMvh8jCIYzAk5Z1MDc
+HZUutXBU2IzyDTimoj1kAerZP9hc/zvJo0ewwBQevUlJZpLxTUt0IuBQox93
+02F3pvWrP2GtLTWeGTBt7uxbUeQ1Vqpkl0PW924U2MPJnY5FxfCg1E9HzpF8
+Jcz23oVbFK4aPIczGJF67XB5eqjIEjU2pfaedWYE5uTZ95vDrhNurRLoP9Tu
+lNFhWMa3ma4HcxNseMnwL4YDoZthrftGJVxYpDX7TSjJ0+FrfhHMjFAzuULW
+d55ry4ftflgfa4Anzyg3XyD73y0M6yfj95y4EbDWA87OuWtxP57+HdthXbe1
+DspwqNrCdfpw7anDlw3gFuHqt6Jw5hu/NiuYX5XO6EQ/GurruC4we7eY2zXY
+WZUj4g6zQrkfQmDvph5lDzimSEfZCWbZlW7dCmuZ7qKvhm1ZdesdYEGa7A1p
+kqfI8UQzMl/TezPJl7nEQWctqUddfQUFZ9e6qqjDjHdDjfNhiYRFQVKweK7v
+NkWSt6+rlQicWv48wZh8H5ZLXR1Hv6dzt6T6wPRjq88NwLRIA71M2PK8xORr
+8vyZXmkm96Nb93N2L3n+Vmw/IIt+g+dHyL2Eu1VfvSH5uCdltgpgyqmvL5fc
+zwXTsWHYNiJ8bABOWbgocprkPaTUxMR7nO2ep7qkPmfJdvoB+PPaZed14MEK
+zlAOzJSeEbUn+dJ2xj+GJxmFlf6k3+tGqf/C6SE1t1NhXsB1jbl4j/u6eP5U
+JcnbsKNNEk6uM+K8JPnVCzMk4Bny/rj2/++PGuz/AQ7UGzs=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.479517186987348, 5.883314205477544}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwt1wlUjfkbB/C3tN+0oGPmKm5TUkKFQQpvJYQUZUmr20iNVEyRGrwto6SS
+GoU56hYVow1ZC7fFMkq0GEupG2lPm5RC/+8z53/Pwfmc531/v+f5/t73Fm2h
+/6ad0gzDVOAP/ctI0V+6LPPfZxLLfDc2ybOGC2qd9znAJdFjZomwsfBVQyy8
+eI1mzzuq7yzouwi//7m5auFM+EK7JBOO/OdjYyTMnvp+MAIuHaub/xwWRMXp
+WsGGKT7Tp+jh+sRHNW3qLDOo3LtlA8wtvvE6CI5SMlU/BLMX2VsDaizjomf5
+YxrV4z5U/QIHRn9tvgYLnO9NzVJlGUl7XGwR2VBacEyFZXQcTrfeIGeOpXMT
+WSajJ8s9m+6f+yT0jDLLDHFrP8eTffgvGnks05nZqBUAizceiXWC5z22T7Wl
+euCrUlXYPjvBfzbZsyRGBq65G5OoCHuUzBEvhudPye3owXyizGVKWbDp4NdJ
+b2Buzmp5G+yX5JBvTfMzjgWiqehnW6f8zzWweJZfuBz6/TXp2xcJ5RU8kK+A
+eeJ1nsh8gxO+B05VwLzsS52petjPuDbcPQr2aPVd7Uzel792DNbkFSj/RXbu
+inZFfuq8p5vew31f4q9ehFccrjxlMgv9rfE/8Qq+WjQoHQGLC5w3dMKrWz+c
+q4PVumf/3QC3hXXs0tHH/g7+o/mw3inbKF9YXPF5nhcclN7mmwtzZzfekIb3
+VRUPvYclwfn2Mehnv8m0KBUD9Pnxl2ppODviis4cWGSWeuED5p2jmBBsTn7D
+u1OKPHga3s0rYObcBc3LyGtfZ43nYpjVddibgzxLnzSm68KC05+n1CqxzMyc
+pHJFqqe8PmgA9/4R495B/Ti6pN5UZJkv3cp2D2EmqPF8ONxtF5J4HmY32x6P
+hXUaJLqR5CeV/Dp46OizF7/S/QfrehyxnuCap+52qi/9mCeP/W+nHZjuSFae
+EfwO9rglsqY6x1fY/Br9Nt3xCN1D9TF1SSPmCbWPH4qDPbITBlow75fhOLMi
+qtfUub3F+a734eZ8onynbdjsinw0mjVUaF4mUs/jFjx5wsrzYXDC2b6HozAj
+KLSphiWel8sFyLtRZpemzmyWCbDvUtSHd2Q//DEQZn3M61VhfrbxuhK4L6CM
+/xr3r1Dr75I3hG3SzI/SeQhy4qzhANF5vWkwL3vrkmCYXW44aor+JuvPiEw1
+pPeHf08H/Q8ua7x8E5Z87jSUwnw1ActTymBx1plgCfKQ+T5YXwpzMw6JnyG/
+pn7FGzfIecW2DchX78T5YRHZN7lDHX60SLE/gtbP2W0RooDnl2++SUj1udG7
+NOF/akTyK2DRFcP9X+XxvCw/OVmL9rf6y2ka6gd8q7zGMZ+o4nvZfnimxpvb
+7bDA++91ilhfXmOBTz0sfmN99Qk8nLF2y2u63tlwYwH6y534pOo95cX3y8xF
+/718v9AxmNm37VMhztPlutNWAe3f2jt+E/Ouj9pUsJHyaTItvYg85Cd/MIqn
+fosyZoYgr1WPR7pr4QTpqG1qyLMzoidSMAee5XLCBm47ObJ0L9xXMWX3Tjjm
+ua5mGdXFB7WFcLStpt7kuXj/ut6FrYAbKov93GCuek/vN6zvyfdbmwFLQg/3
+roLlXC38G2DR/birQvQzwuNN5s1DPUd2qQv6Tfbukp5LPuFtw2KeGapq1yxg
+0U/B9zQxb9X9Jmsb8qOmN+PIZ9mF+TErYY9H96OHkaf67Py+hTBjf+e8Gqw6
+/jJYk+r6bXZbcB61deXJ32j/eudd1XIs41XcNKmePOGpbDSsbmX34SYsyLZY
+cgiuUvyokgIzGcN1BXBbxPO9oVRXjj40g9azcL+8i+pnjSpKYVff4X5Xmt95
+KOMk9tdrqRt2h8V73HI59FuyqLzOj/ZrPdYVjvMsE5cMx1A+kROFMZiv3sdK
+u5DWc3n6PBrz83OCvTrInKtfAPJZ8nbLMgPKJ9P23ELk9/dIbcJeWGygkvgE
+Dti9quE+za/cLjFA3sUG4evVjbBfV1H3eng0YbxFaETv97/GJvALY53sK2RZ
+NeFL3B+xI/32KMykHNlpRetHjD3UMsb61pZav09kuSPqslKmsODDwMTj6E/+
+wbTlG4zp+T7UHIr+FzrNY1xhj/Y7T50xn+cfv0zfCYtCi1qXKLKcVeyiR14w
+J8ncqY18ZEMUDgth1q2w5yd5lktt8Z7iRPult76ykWO5xQ7r09bRegdST4lk
+WSZEq9bbjOp2h7SM4HPdjk0GVOdiY0dlWG793YTwH8jX1BtlUNePGXmmQP19
+C6tZD9+tWOQ2QvN2d4w/hbW83O61weLpg7wwOXo+tj1thjmnOGUXnGfL4Sxe
+O+W3xFrJAf1yqclOY7CkP+XcNpxnTEXT0ETKI944zU2J5fz1dS/okgel3m3h
+sdyl/Ul6FjDTnNezAHlVFYal0bxcaE5+hzLLVcZ8642ifl1l+X4436yvsQ/z
+KY9Df2bfRt6fXCIKXlF+o133HqE+N0h5rpQJrl9b8zEZ9R0rBsSzYKbUVMoA
+/u3dD0rryJ9uvQ/H+v3CgmofWHLlthd+HnEDh+doRlC98dq/+ej3bIzxomQT
++v2kOPAMzkfL6cHdDKqL3F/g+4kLNPHIvgiL/uHNw/vDbRoMXk7mKpadtcb5
+HFO8qE3XS5ImCDchT6OkI0tTyCWu66Jl8L2x/PiVaFhwdf943wSWy6yb0nSA
+1tdMP54EC8RBpl5k2fMygXDAt7cWm2FWTnUj6kx2e2zAKlpP7KvVi7pqzhFt
+M7reuHI0DOsfG0kMX0h12/lZVrIsZ3RFOnIB3d+wMMgA/XUbT65cQtf7z3+n
+h/5nCo/mraR+Fn8ynofzdJxuq7+V5qu01jHB/L13cpv8ab1W80JtPL8ZMxr1
+48khic8HkFeW2QuVK7C48E/pM8jzrZHE/SW5s16Bh/Nteb/57jjlUzDB3hLu
+STqbqz+fzkvPxgznsdvxaL49LPG9eHoI70vJXKMN+8n7eviBWO+jxaSFp2HG
++sa9YuwffTXN/DrM2vIXv8LzZrXGMqKS1jusdawa/SdN0fJ/S/erPAi5juc1
+LqflThssvqTVdRLP89IB3+AuWi+vbloQzmfXSLFqB3lr2ZAv3pc9IddNm+n+
+WOVNR5G3dnLC5zpYFGCysVKa5RpHb3IPqH7z8ePV0vg+eJhqXkh1dedn36VY
+xn/nb1kZ1E/Ydt9PUiwXNHJmeSJdr28foI/r8/N6gyLnUx7rDqRgPcWlb86G
+wIK9gRpm2M9LQ/NxEPWr8JuhEs7zksDuX8pD9Lub2xfYU1huf5jWY2Vzx9D/
+Pktnv1i637WdPwHn+T4+TyWd9nfQ9pZCHsLbxUVFNN+kksp2uLx+KL/+v/UV
+8nKQn6W5h2Scrq+etdIS+aos2KA0awFcpaifjvP9cXV/mR0s2FBdUob69qN9
+8cGweOzXxGz4OTexO42uP7HD0RZ+tfaFXzksKl49cAvPj5zF9uctsOTSzw79
+2H+cPgv+//8TBfZ/11uc6w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.666233980906949, 2.1296932060463307}, \
+{0, 1}], LineBox[CompressedData["
+1:eJw9lQlQE2cUx7dQaURsyx0NJNnsrhU0ioBAKcWneJRDRUYq5VA8oBjEFMMl
+Rm4BE1shWEQUwVbKIai1pANoS7QEUTEYFC2HDqZaREektCgFRvptdb6dyez8
+Zr+8753/R26TBkUZEQQhRT/2/eahIWRqGj3mQNxK/Lm+nQKJq1mRONMC8Yaf
+4sspOPT90qxgG0sgAuu4bbkUELVp4cImxF/t9J2XQYHsafLQjm1WQHDD7MeV
+FHQ9Dw8qNrVG5yuvHKihILbfx9ejFjG3pJZzj4KVD+qWBHnaAJGv72k1pyF6
+CTeitwFxxbJXzp/TcPyZ9omFtS26/4LKrYIGvbS9qmsT4oLOLRHPaFg7cKRR
+vY9lVQnlwoDDjYx+50zEKYrYj2UM3E939T8iQRxp6aetYoDe1bPnzieIhQt4
+5TcZkCVaaiMn2PuftmYYGGjbbr6srQ5xRoPI4TEDpIPv+YBQxPBwnbSbgX12
+6hu5pux5he2qBgbiZz1pvt+K4rl1KaU6m4FXx95fLChA7LF4Mmc1A5N5nVqr
+PYiFDrpcggGXD/xnLpCy8RetM6hpCNcqtosViDXOWyxjaWipOWvHY+0JZyWU
+0DQsumYyaWuH7pu/NLH+T5SvuwbZ3sOIY5wrTNUUkDVlp1/MQfGM5G04o6LA
+8+Kx8qtqlsfnVWRS8PJxtIVPOBf5v9zrRRYFJRM6gjCZg+y5xuYUU7DW2CpE
+cgZx5NlM54sUZPUePOC0ai7ixlDtMAXuUdzZDR2ICZ9WahENJQNmoVIvHorv
+8kfpiTT88Jo+41eA+ImY+42GhvPi6uleLWJuDuhMGfjizm3vvH7E+TGXrq1H
++WpxjCzsZs8nnQ9TMiC/4G5q3IA4JMF4pImBEzG8O2lyxJr2Hc2/M5C9d/fE
+uCtiTnbQQ1SPmA75rbBHyJ/5moOlAwwc3RkaZ69iOXWh+zUGlJyQlx2s/4Fz
+DfxTDCR8WRtz0gTxQN2nzRIGrGZY9032onhHStVrHRh4vuaXflE74ozxqKsD
+qN98h/tv6xFzlaeyvqUhVxEm404gdkobfTeAhqY87Tv0cmRP01PQyKFhf1VG
+UWAl4g958upOCsZit4o9KORv5NaAFacpaCqYNh1Ss/womTxIwbRZRNWSTXao
+P+09BtMpkA+z82aHv493fheiq7bH//cOIMZs/PjYvnH8ya6r/Xx8vyI8fde5
+UAH2b73c83XfrwLsv8YrqO1vIyGOz+1+vrmNrRDHP3vzqcJhnhDnJzU90SLL
+Qojzd+RE8NGt/wpwfvdPVs10aRbg/MeXVqoMcQJcnwr37MWneQJcvwOKwhnv
+3eDj+sYef7QgM5uP639oQ/vYlD8f90fxyu7y3Y583D/lnIWXUyg+7q815zYR
+jCcf91/Qg96Naikf9+eWqdHKgt/4uH81yYOj/i4C3N9JRkmpnf/7/6b/I4iX
+t/0chXg+GnNKpqflQjw/Mw93JD3QC/F8RdMuTnYMiedPJv5RzJGReD4Nxe+v
+9mkk8fzGlcmN/vmLxPNN11fHj9qL8PwHl3uuG/IUYX2QpIbuk3wmwvph4s0t
+G1stwvrCUafEjLiLsP74TylFhay9t/rUJmNKL02QWL9kcX1VPV0k1rdjXskD
+J2pIrH9XXJLKOrNIrI8Sj6I2620k1s+vz0b1qv1IrK+D+S2F0ctIrL/BaWqK
+WUFifeZd59XZbCSxfruZlSmTEkms74FDMr2qksT6/1DlMHjXQOL9oLPc3PeH
+owjvj7lK/d2GVBHeL9fNVipv6kR4/xjXa/RSisL7ydvpsXd3AoX3l25wr9vO
+FsRv99s94zfv/wC2rKt2
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.844981764589882, 8.25073156171056}, \
+{-1, 0}], LineBox[{{6.4999999999976925`, 16.}, {13.49999999999251, 16.}}], 
+        PolygonBox[{{9.4, 16.}, {10.6, 15.6}, {10.6, 16.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 16.9452}, {0, -1}], 
+        LineBox[{{6.499999999996362, 16.000000000005457`}, {10., 
+         10.000000000003638`}}], 
+        PolygonBox[{{8.552322615314452, 12.48173265946094}, {
+         7.602165824326175, 13.316718930329426`}, {8.293188945044921, 
+         13.719815750748694`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 12.823799910437668}, \
+{1, 1}], LineBox[{{13.500000000007276`, 16.000000000005457`}, {
+         10.000000000003638`, 10.000000000001819`}}], 
+        PolygonBox[{{12.052322615314452`, 13.51826734053906}, {
+         11.102165824326175`, 12.683281069670574`}, {11.793188945044921`, 
+         12.280184249251306`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.484057296392571, 12.823799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 16.}], PointBox[{13.5, 16.}], 
+         PointBox[{10., 10.}], PointBox[{10., 4.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/chdfef/ifghgihi.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdfef/ifghgihi.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:eJwl1ns8lNkfB/BHQ27TppIIRcktNGFF0UxRaQmlorLMMlsTilAuYUdXxbYq
+onaTXDKVJLeQy4gy5DJJ0ZaioiG5hBq6+H3O/vzzvN7Oec75fr/nzDmPtnfA
+lt+nURS1WIqiyJMam8LfYhalSjCbRVkap+sWwy6O0/OVYWFBoux+WDxVuJJF
+HH2i2wDmGXquOQJLL/1R/2ER/r/f8thz2HG0KrkI7ji1u8d2DouSa6loiYVF
+PDGvEn533C1pN8x/eK5hnTL6G5xJdYYFXm35T2EdnywjOzg2tFm0dy6LalT+
+Q55Yv0ou4TtMZTeecoIZl8Ve8Sosirt66rw3aZ8/9WbWPBY1dj/3ZjQs52ar
+cRreuktK6iqxwu8pI3BhVPDROhKfbtzZdarIQ2DzZQgOLKPTj8FjRyLoqshP
+qX2y/yYsjFIPtYFZ+tlfy2HuWPF0T5ivkvflLtz2/eeKUFjkGxWVCnNkw9/G
+wl3rDk8FwZFvNdQTSP2+Cm5YwlQ43z+evL/IcP0o4knzSNgcBadsslDMhiPz
++aXesH2wXYQ7nPm1UZHMz1AfWkqH3b8Wa8+AO3b6X32I/HmFy5htiN9S5vVc
+Ug/q/Lh0IlzSG7mFDds7vvYi9VLKdzm5HnaZ7AuRIfnnmRiugeMHqbh72ohP
+zaxzMyzt8ftoEFzyb+uv4eR95xsjxrBlsUnUXbj2tU3moBaLSjgu0VYk8bwL
+GiyG+QrtrkEk/rFBTizMYLQ698M5lRtsOKR/w2hmAPK3Kwtf40D614y6/YAZ
+TmV1NrBqfBT9nBrW65fJ3FWkf463qe587I9ea7YdXFLUY14Mi12K2rbDkrVm
+N2zUWZSWg1/aAThthmZMCczaJKHOk3Z3m6WLNbAvWLVDJbDIvbk6ArZPlF7R
+DbuzShZXwKwvGbHyyI8/larYB5eYLrmwDA5MVdT8AQtundLfDMsZGIi/wYmT
+tiv8YSX+4NteuLzF/ns0PHzxk2cl3LiNoxhL6id1fM8JmKOo4nYC5m2VzVlL
+HLFjXTjM6qrf+gXxCvQG8tik/68THXy4o6nlgzUZL2mnaBfsbjNx7ycyn2VB
+jTKcssTJtR3xd4kbv7ejHsILdrYpJP/wCc/rsKpdpr8raY/uMY+HG9NnDSjA
+4okdqkdh+zR3uSMLkZ+fS+tfsKRgPX14AdoFgRsLYMZ8TjAH1nIrDfsIu2/+
+dvqtJuI3zg/4r95jKcsPwPxtBh5XYZ55b64SLHdtzmUVUu/c/LO1eKY0N3Ve
+xJPr6Zd0Bk++JN1SD/0k/boJAXBXvqlXGcz+c3LvHjhQYU6dE+alTn/SPAh3
+vH/d8RqOVcisvQDzqloW7kXc/Lj+7HqyjiFdob2wsI/mpYBxRDQvDUOy7za+
+H9kKC7hPbrnBgabcaVlwTox3UwRsaXl4Ypzkc9qj9hwc1v7QwhbziFrynK+Q
+fXLpPCsWLhnKSE+DWT2GnwRw4v5yTjLZt4a11/pghuHXG8fIPjOx85qC5Z5l
+DeyFtVI2dBM3xswbsyfvX1rRTPpvdTRvXAxz34bfKYc7wnjbJxA/67O+TDgs
+SBbfvQkzZHSMteDhwSgHH2KX69xCxJuW7uirQ/L/d+Y9S1LHbJ7CKPpZWp9t
+zCN1Vtx+oRVOiNldq0XqU5wvfACznQSaf2KdJJMdCc2kvcMtfBLryst1//GR
+xP0gfN8+so/UZlqQ8YU9h7f343eopcwPDITT7p42OAhzxbenPYaHt2c4zIKp
+ZSPF2shHn+ezv5qco5kxNt6wXKFGyEn4mMUlYz4s+MXRgwNLc+7uGYEpHVsr
+d1j0cu2NVeR3YMdd5g2n1Y7zj8GML5rRPLjW6LpOA/ndKX48mwebD1+epoBz
+SxxhtXCInMtlv3ivhd1d/ewsEU+ib3PeAXIPeBvkn4TDQm1KL8AuXOmODlj1
+jvadPJh7u2aOHvItl73JqoLDHnC7Sf5aRdYn7sP2IxJ58juKVzGdew/WatRr
+aYONZMRD1+GugQWzB2EO1z4qgZy7qx4Hf4KHzewiAsk9yInb1wXz1VvfO8CU
+bQ37Lqy0zeizDrnXzh+5HAqzN+gMfifnTpyh1yKYGjmk9pycOzfuVJUiXobJ
+vJslpD3n9VUWLH3Wh58KJzzkni8j9ZY1b4sn9dqnyV8Ku8Sl/EPql1d10zkF
+567/6un0k3DKZLaeDDwsiq9MhMO0Sh4dwjn+0vrYi1tk/IjWrBHcq8PHx+a0
+knuAFi0IhwXzhVkUuTf1h/6ZDfOKsn0sSX47C36qwj09ttykOpTcm6GcBTGw
++O74m3JS//HzYzvgHH77HRlyjxYKmzbCicnJw86w/qSixBnmxKm6XoQpyYJ/
+fWFu99ILr8m92DtDOgVuk6Ula+ng/fQQ+zaYobN5707YPmh/pzriKfRb4RcH
+S6xfHPWFO/qNt+fDlNC74B4sLLdybIYFN/fVKyBfO3lx1ys4Qc3YyhUO/Jin
++Y70F1WVJZB7TyophrRrjcWFVpF7lTfx9b/3L00zfQknbpe8KYZVucv3vIPN
+7WJ7kmHLzofcZ7CYS58MJtaI3H8HFmZMbdykQ/bLstSDMH/NGXVdks88LwUd
+WNItU0bB/Ab57ErEq5o+05Pkn9Id9rM9nNN5Q6UWdjcp1KtF/h067QV5pH3B
+40gLmJ7VUHCNfIepxSVn4LtKdSjULJvUz7VVSQlWukt7m0++4+7rxfLId5tP
++o96Uu/OguCJWdjPJ/UcB8h3xiO5T9Ew4xpbUw3xpBwPuKIMd/UtcnOGSxoi
+AiuUMP5f9yP//K/enPOHYUflqKrHpH5xB3a4wOLlFrPmL4GZjgbWcK3JAysO
+zHjzPGI1nHNp/OMtWBxb9XIbHNnt+H4M5u53o/HIeA6pXy10kY99VFcpLFIO
+NwuCXVgra6bIeA6xrzJhbp9s9CbE5xgxK6sJjrXXPJcK68/uTPoAq36Q9hyE
+dYoky37AosUXN1kif//gwT0yeshv1UH5MDhHdRVfCtY3Gs64Dte2/mgcRf9A
+w5bqelinVVm9E84rVKh4CsfOGzStgsM2rxY8gjOD7k79DbN/yn5+A36nFp5x
+EBZbDEgHw/GJ39lOMGvUcekSMn8N55g+6f+OMb8G8QVmbHOYTmwTFegMcwMe
+NPWhHvy9AUebkG+eyE7cBofNVbFeAxtpFurXw0pdf3f+OpOsm25lHSwwfORh
+8RP2g8tl/8fEJ4Ks5s7AOI+Vj/fCLtXeB2l08v3KfEPm0+oyDJZXxD61l+lf
+Dis9MbliogBH1Z7fDXf5Fi4Kl8f5UCoTnAGn9UpnfpRjUd8amA97yfq8slL5
+Cx6wUzxlgvoxiq9f8oQtNymeCoPZPYyDu2Cj7fmR92HB4cdzjsL+uZ/nK+hj
+/L93GDyG6dpSZpvgPJVvz5lkvlVd908RG9IldbDH3G30StJfa7fTb4jPcfmb
+a2KY3cQbn4b4xZd/OyNngLweFd3OgD0844w1YVEDbeNK5OvvOOWjCyvl+H6u
+gN/JJp7UIf2TZe7ooj70yE62KnGJ2al9cO3ET4tpcFpF0GA83CaO9+rFfFQI
+rY83g3yX547XwEqTNNsNpP8396nLsMvK7VdeY3z+hOW9QyT+y79HOcCUwZGD
+LrBWXabBGcRn57sw0JiMd87n7xzkUzLd6dFMkk+655pbyDdQLylgAvXSSteo
+Sib1Wvpj4gPxo4bLIbI4n6fvuimGh6cejTpOx/mzyn7XMCzyPzPdUAb70+5A
+AI2Mtz60X1maRYWYBbVrw4E8oY4KjUUps2JmOMACbRfXn6ehf+xz9WiYsfJg
+Z5gUzjdh7rVSeDjq6Z0eCuspXDv5lcS/R2fOHzDd7bSGLerTtcfz0HpYVH2j
+Ox52Gc8NXgWLjQ9Payf1+5bVsAv+J0TLfKEh3h9MCM+ArYubmT5wYJP0ezrm
+EwSVqV2FlWT61c/CGocdPj+D2UdvK+ojPukVxR60pZhvbsl7IcwqXWmxBFaq
+SYvwRT4db/2er4JZ3bdO0pDvyy/yszbAadJHDONgQanBAmL2SqbZBJw4drbI
+mvT/w/3wetRrIMdXog+7eGct2weXl53iziDzqZbS98Ia3U87PpB4r9DjVsCW
+o7/tfAiLXphOtGM8dhJN7wrsck72qAMsZNqeDoPz+GeWJCG+ErfE+q1wgpxU
+Qini5xc/oluQfFU3jFYi34F44YYFcFrVs+ocisS5QncmTJmqPVCZYlLDcqxJ
+edL+yaag7huTKjn0NJe08y6xn0VPMqnIFYxKLdK+5+whJwmTYlW+MLIh7TTz
+Vxs+Myn9BydOcWBBvfBaxBiTamy6OJJExn9tNW/sE5MKk+PMF8GsK1aXKkeY
+FN3vD89ZyJ/yXb+le5hJ2dG6m91gQXhhixcsd+Dd+qukfhYVH6zg2AtHjnwg
+/ZlzGvzgnLlNP5sbYb3Z/dQgbK9zTyecOONJTxHGH5bZvLIEplydvxVhfrqj
+aeoQsc/FmFejGD+kqk7TGM6SUVowzqQY0hN/roG7Tmxy9UY+8dVHzXbCacMx
+D1O+MKnEos379xBXDwffRv6cJ2m+e2FWu9XtpAkmZe3KqGfD7AT6fWvUS7ij
+KsWJjOd59lgKvNVO1cGctL/d9uIKXC5RuzYH5gVlzt0Ei2bvvDOI+LpqD+mn
+YjwxbcHVOjit/GpNIuazFx2rSoNZQ54sC8Tj8qZpayRpNxbvjUP8rPz8vzxI
+e/1vi9KQX8oW4X5b4lvV74+gHgyvJzdNYZ7RzsOxgxg/7931paS9uUJ6oI9J
+aQRIdi8j7pX229bDpFTLcw6shgVrpA70dTEpqjnirTt5f50c68JzxB+R6xX9
+n0NKzVuxPyi9ebmkvt+3BDXUMal/tMtEvcQhFhud7jGpwDNvxnVJvWOftozz
+Mf80iwx/Yq3ohuHT2G8bJPeKiMkfr+L/TxPW/wCX74+H
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {6.573901114580226, 6.782664290660753}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt13s81Gn7B/B7FDmVUWJINcphpAOySgczu6UorSmJpKcpKomlZFHsM0mF
+ECHVpiZhC63DI6kcxqEQamxOUQyhlKSoCPl97n395h+v9+u6vvd9Xdd9D746
++7y37Zch+DAI+ffn4CQ+mjzSTX8u4xHmkdAJNS0eWaPC9rkL8/1SnWfCtjGJ
+HodgCev50m/IF+8xtZwHD271SCyH+1VyjZuW8ojw1xP5AbCnc8SBOOr2rDQW
+HFNOah1hnuNztzQW9hu4SfTgQZ3+LD04fsFXq/ElPCLqXN15RYNH2OumHm2H
+2TfqixRh8ZWA3hqYP5K07rg6j3CKwyIrqGUMjw3M5pGCob7GSliotHC+J5xX
+UFrWAEs2KWZ9U+ORqUXb+vtgEqnwPR5mTh+Ok8X+gnA5zY3wpX25d2k9vIvx
+G5iwZ0jDXGuYPWlU+WkW6mt0EXrQeu/cbHsP8/hRsRGwyDK4eAI+puY+L40+
+78DO1MPzAf4Gug9p/yfufBHAPsv+11MJM7uuz82E+W+X/HgC8yuVJ2RQr3ZQ
+o3c5HOMw9FEA2y5P/DsbFrtUyJXCi1e9Sb0AS/1VV89D/2avr94/BGe7maT6
+0nm4PSk1p/W+vZpdCEsWFzLG0K+xVqPtF9gp9b9aBbC0qoqlhXleahOOesNM
+m74zHNjTc6RcF/bR8xqZB4dpyIpbFqM/m6Sn43g+c8/+NdEwu9j3SBlc4NXg
+v5HGl1ltPgIXClTD5WCScfO+EpxiHmtdZ4S4tvZwPOrnZ1WvSYKlSS/7mLC0
+9U24P8xMztUIxTwq9ol6XGB+u47TEObpU/vn+S0wLyMuyxVOSXj2qw318ir1
+1pk8sn6f1NcOjjF4ZLULTonylf6Hxh0DTr5XxXkV6cz6HSbHDX6LhtdcjlgR
+R/dbEvd2A3z10SuLPLpf2OE36nCLm/yrJlgyuuvAJBPnaXPlnxHYuCRqF0F8
+sMb1uQb6EzQzC1hwZNqjeyawWNnAl64XGpkVvR4WFo9cPwNXODjl/krnI1cb
+2QhLXv3zgtrY+8i7pai31qhC/9/8up+/R8E+ubeWLqXxrDLxB1hUbDWpDEtl
+G1fZoP/hixrzOlEP28887k9Y27QsJIP2q6i1QwpnXi6J9KJx5xzRLMxTIrk/
+zIEH16RvMoXJ9sUPOhbhvtT3TFsFGyuozoiHBX+Qk4awmU7Qamsaz03ZS+j9
+jWOf/2GIebmouJRg/e2ZZZb3YZ/DIh13WPnLta3HYfLlMX8C9YbdLo1YBws5
+ijtDYE8L8x3qMF/JeccY+h8Zar4/xEE/Y8t6PGH5xQc2vYT59+w/tWHevBC+
+ngQW5m07uQXOPhX88SnND7/LiFLBfT3HetEM81YeYiXO4BHd6ZZpfbDYY+4f
+pdOx3kHDQhnsJ2BuVp0FK69zNNWB2ZstZsQqox/nnt5fYJHm/GZL2PizQ8J+
+Wu9seclc+KVsxcAZmKczYbcErqo7nZtC4xtVbnnAbq3mjwupC0e59fCIu6Ft
+HV3vmWGlM/YbzrC710D3X7ogYBLm11S11cPSXo/D+ai3Sn/vWDldv/TyVz/0
+k3dBWJcOG0cVK2ih3/EekxC6v4gbvd8XFnkvFDvS/EPK/DJY2eNu0ny6nv6P
+QBnMj20rSOig81sgMjGGid+A32VYUs+KsIa7HUzs7ODsqLzjNnBB7eSuKbAo
+N2nYBDY74/7ungHyRZwBBl3vhPo6b5h0rHJ9QPcXDMQYwT6q1Zt2w27n+6oH
+9JFnXTClDfWvLNe78gCW1o7tfIX+pgYrbIuBBS/+WvAE/Rd+Xt3iA5Mk5tN0
+zEscLCdyofHUp1vClXCem86k2MPCNZfSvRWRd7bT3YHmL9G/fFABfd0JnhDA
+4ll/zjwuj/lOmVTwo/vdKh7+exqes01rO099UfFvZVgyftQ/i+bryI8myuH7
+aWydVU/X8229bQ/HnDC1GP7XKjE8OFOvqVIN/QlGR7x2w0IdxkITWHjunexf
+cMFtZ+5GWBz/dA0L67d8Xb7dgfpoMj8dbgiMHdgJS8Pi2Q6oj5N3g2ynccfy
+Uyqo/2rNeP8vdJ6BJOMZ/PaNWZQ+3e9EaPg59KvGO7J8EvXw9przLJTo7zeZ
+v+qoT00/+0yJ/n2drR1H553MYW7A/AZlWvW30n4f+EsTYFZbRroCjbtbXbkP
+r89596hYD+tzT+XfgbP/u/vhUVhcfyzdB27pUGk1gEma/ogMPFyb4SbVxTn/
+xDA8iP0KFBwDr8G8gZzcG6jPU0F9zBUW95yrLED9DWppwaY0f+1utTz0m8dI
+M1OCBR5Bv13FPKrOlvYOLMTzQwF+JzC/FFv3nlewWGvP4l2yeH7+IYUW6nPN
+0VZT0X9EQt5LWKR0SX/9FHhiV8s7WOp9MXWPDH7vdKsyGLSesdXh1xn4vpUe
+2z+X7jf5+xMFODKxcHQtjbMmk5IJ+ivxPS2g8WjfjZ7wyMSihyG0/s2mjIMw
+J195azLN//Z2NAa+yrbRLIKlut8P9sKS7zs062H2wJucvVjfrI55/SWNa8xO
+H4PdM+u2tVNX7WnLQH2DsXlWjdTtbq/dUX9hRM6YmO7/0+0mDvrbHpbscwMW
+GgWld8LrT4ey/GHiZSgKxzx0h6+1/kLzExh3NDCvlnLpNDmaX97VegqWj260
+LaPzem+RVAk7hVZdD6TzKhhUb4fJhedGS2H2NZdfK+CRGQ8suhYgzpy6JZDe
+f9UzGpdgqVWv4Q/sF1naP7kVZqc0TzjA7FihzEyYZ+tddhr1ZednfXihg3yn
+N9rx6KdC5/jqDFiUZqARTs9D+w7jLEyOfKr2wjwC5mzp9aL5teKxzZhffMJt
+lgAW5nf57PrBJTH33Ox2w2IVRq3FOJe49J2qcaNeWXvX6juXVBi5C/yotzYO
+nx/hkuxhJ2EUXX/UKl//G5dYO87ZQvcX9l78qvaVSwo0uzNqadzdXnnfFy7h
+iZ7t+kidVLNTFXYv+ThdFf2ITUY4C+CWwoHgZTCJYP7vPJyZwYuwhoXhIfZb
+sV7hws5NzjS/enG3M/arkqbrudK4wlRuEurp9/Lp2Evnk1/UIYd6C5Ln33ag
+67mUXwsd45KV/7hyLGn+cEqwzASXeCZ4nJhD80NCgzzRv+6L5BUDqI+3KME7
+axLef8r1HixY/LrHBfOqmvLn4QA630R5k2LYp/g/s5bTeaTXCL/ArNlO+/rY
+iB95E/QDHm49EZ0EC3TSHjbBooaY7q2wdHZqWzBMxm9kybPp/wPVKu+x39vt
+sj+HzUd9HQM1IainxaPBUxnm5eq21+E8quR+sb8xD/Fppodb0Z+AsSHXhrpj
+xfL76D8s4Zv/NFj8raU9CPMSqny+0zYX+xC5lRbDXCL6/vNvj2HhuqIdMp+5
+RPqe30VNerQSmj9iPgvbNtN8YfblOJV+zK85WoNB15c52l77lkt8WqJGzKjd
+jbUX9XKJ0+oMJV/qAiXr1d2oL7Cf3IPJYMZL5ddcwoq6YDNO44nE7mYX1rtc
+Ym1J++vOaf8OrxzJCQ2AyXOD4mn0+dNnm9JoPDQoJr+HSyTScxcf0fjVOSs/
+vOES5nqL8nrqZ74fzr3D/TOz1amm+WvnX/jtA/qdFW+fTueVZay5YpBLOPEh
+fceoOX7bcj5xCbug3dWQ2vXRnJlDqOel+7JqWu/uoIwNmM9g2q2EHTBvckzF
+EveP430mpYHOQyOhuw82lsmbvpHayvy9Jb3f6rzJHG3M+7Z/6E+wddfIV02Y
+7CCMJ8gP6A28cGoO8j06qsaxPutZ9+4hvJeJd5g5/oP9nYrtb3pp0e/fdkV7
+nAepUVr7lb6nuXs/iUD9YRY7PWM06XlJ1FRpf8Z1+ZYwKTnGf4jzIAH8Ghka
+d9c6uArzWznFyOcV3svIwudhnh34flmIjz+lbj/ef6cJ/Ss41TdQR++dqlyH
++7On8/cBauYKzkAhl1zqWyai731k8EiIOAb91dfX21EHhO7J/7sE7zWWsrQe
+Ytt6QLeohHDUJc8bqKV+tZ5lJUQQWJKqqUX7d3hlVl5C+CLO653UaTEZMqUl
+RPiKqRdLbZ0frl1QQphee90eUg9KbuYll5DBzV26jdS3Xms9SuYSeYXDV9qo
+Mw81M0swv3lFj2upzVs+ratBfWHV0X9RS8wnk59jXpV/PD5MLXe+6/cXmI/2
+DVMt6inm85614/u08LIwj9ZrFLEop5NLRrLOm62l8zscnO2P+2q9KSH6HuYh
+rJ8rK8I82Y5DBw3ofIpsUmfjPlrHshRj8Z4ltL96sgZx3mgTGcV7E/ncFV6I
+592vtPW5Uj9c8vo91r+07cC6Jrw3ET3fyGrsL1Llr9lOPWmmcqwF98NYcLaT
+/p/fYJekWI/zdXi6/CR1k+WMS6V4niRG/kT9/x8pfd+fxfs/aePoPA==
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {0.4875589769853401, 8.878318388907438}, \
+{1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000002274`, 17.}, {13.500000000002274`, 16.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.552325660469876, 17.180083206945802}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1ws0lOkfB/A3USpqcp0Q41YaYhKbrNa4i1wrUZRKKalmc881bOWSJImi
+HZJLWaTkkrYhogs7CSG1UymWpYmKJP7fZ89/znGcz3luv9/3eWfOeVX3HHXd
+J0JR1Hv8kf/U5Cw+6mzqv48Um5KJzjmppMGmhOpWM6dhz5bjVyxg/phKj7g0
+m/KOlU0KhAUfa7eEw+wr25ilsPP8Pff74NTBTdRHMj+1VJ4pw6aKksKsDTXZ
+FE0yQ3s3zO3Wn4mC+XsVymJg6oyJ2GPYe7x842m4fGuntswKzG/ozAqFqxMd
+7XfAfP413c3w7XNWnjmwoKYhRAHuN85K6oY5G1aUPMP5jFxzh0UrUY/KUFEE
+zPvm6G8Al7/e8UiF1PfbVvnNMCXzreY++uvX/mdwPxl/qGm7G059Wjp8FPZu
+OMtaANPtR7OOwOwo09G7S9HP57zuvXDMrFNyJKzl+MuoM/El7QgXWKkkImgd
+TCuZ/tUYZoQ/37QMFtjW2xJ7r9CIm0S97GnVj2S+aN1x8xdwufkzrxNwI/dW
+TRXpR+LFxWY4W+SjWDbsbdh0Ww31mLyqVToJO18/9PksHEHvrAqBGR/ZLxeh
+v8bPbhbHSD79Hm5p5L7URP4KJvOvRL5XRl6ZOTZzyXr+YN6jEpgzFqbAJU6c
+MFwni/GAX183knq6gk/UwM4TtdfHST2blmzTk2NT7iXGAdroh1+77206zAqf
+afODU/V8Jz7APov588rJ+FnaWnV5NpX8+OOKbySPXrqMLcy2M5O21MK64aiF
+W2HhH/ScFJjR5xFpBwdaNmd1EbeWPVwFd+ybmVy2Cn2oR2l+wf4dmqq9bjCr
+Mq6gDA7MLfo9CeZ8rRP1IvVUtM/eIeNS3bFzYI33o0u7YeFpvfu56EfmHG/b
+KOy8VyreHC73udDwDU5l2mQMIg//ZX23puCYLy1xmXDLfsNvn2Da3ruBbrDO
+0MpGAcx3CqdWwO6VT3NayHj8KfGFMK1y3O0GOU+Ld0mU5Juw90siGZ/D6pMj
++Zt9vXKQ9GNh/INNnu9wv7iNxFThulhYtLe1SYfMN8jr6ibPt/DgflkyPrPd
+ltRbUiKvK0b6XXvG6K4s+V60Xf6BvJwD31WYol+uAatzFo6ZbLN/At++ef2S
+BKk3VM/RA3kqxVaaasDlPePD/bDM75xCa5KH772jB+k4X7/NKgBmv4o//BY+
+YLxes5jked5OaL+MTaVLRQs/kPGz3/Ly4Gq3C5Q2E+c96Bp7B3vW/XE4AOZ7
+0pmLFXBf2gNqf8Ic6bQTDLj6IH9cXBvnFd/XUoT7nr+qcIFpu3otZrE+/ss/
+NhmwQEdS0Aa3eHU3dcCMB2avk+FkvfCoRTqYn7m70wSmvo1Ir4d5Rb+MkHr7
+qipOesKc4Ku34mDWiVnTIDJf23pEHS7ntsvHkfm6v/m0oH9BQYrbSZgyGqoK
+gjkTkhXRMFsigMmC3TU3WXPIfuXJId+Rp9KwMMEDZkWeKumFtWb0TTfA3E9L
+F/DhzBulu5eT+XGzA33kPi4PL51G/bx59jfnYD/+rE/0S1g43d+5gXwfBF+f
+3YP54mGdZ2HbhCzpa8RTow5fYEraRfE8ccx8mUOovyWXeTwBZsfJbRmhk3oW
+HSJ2DkuoCUEeEsemm8h8bl3uZTHka6ngP1FEzlO8sDqN5B3y7HsLnFqmXk5X
+xO/Z9tZd4//Nz8tLhwUu7ZYrSV6jJz7NUcJ9qDD89pJ+lvgxvGC61Z31BbBz
+t9mRq3AMr6p7BPZ2yv/UTsb9M4yNVqO+XXklQ7BRpelPcTBtw9yLxN25R7Of
+wsKkrCvP4UBHC0cpXdxLc3FOITkvWXWzKxzDbrI5CPdZyY8kwsKyvyWVyHyv
+zuu1cKoKb+oB6q32zAgWkPXdJgn74NtWrrnfYb7eWJAYTMm1/rNID+MXXVOK
+0H+m+7ropXqk/wXRm+HsF1azEjD1vOLqQpKXVcfRWaynXnX2PEOegpwtBkMw
+o2fKvQTmuYTOtpH6qjjnsmEZZmF9GSwQLJfOhzXaJtNTYG7kzsgHcERcdOFh
+Un9fRugUXLeyUcMJppnX1djgPEbbDhVDmJ1XtqQYFgZGhavCrJOCMEXUny8W
+8VKW7B/raHMZ7sjrSZEm9XkUm2ggD//+pnhFmLN+Hu8mrGPEMdcl+8/sFzdd
+zqY+Hyt8ZU/yOKPl1AzfPjjxPYDU1+cxx1oZfbxx7LpG+uH9GL0DG20QNyN5
+0n5yCpZTwe/NuznVqiSvVtvi3bCz9cYjB2CW7vChDFgYfMe7AhakLEi8BRc9
+rvL7Qcbzax9Uw5uMfi5VZyF/m5G/Csh4VJW4DcxVm7c1Gu5aZffAF2bVtL+w
+hNtlkyfi4RiD2Nwp1FNgfeJdDixk3MzJh3V0/D/dhCmrgTU28NvyF/d4MM2H
+SRtAf9c7shQfw+z48HkJMHXqmmwbOU/UoHUNnC+VNfqUzHez6HqPvA40SCo3
+w4x/LVWK4bSkRvt7MOe4rXg0/PbsG9tyMn/iC8uPPI92EfNzYT4jyMsf3h/4
+MjWVrFdg+ZyE0z3qp6LJfIvVmtWwu/w6Tw7pJ84jicL5JrvtGvbAzpWVF73g
+jqX6mu4knxfjQU/h9JKNO13I+bvKsjaiv2B3exUnOFVZ+h0f/rBYffi/8eRj
+j7yQV+yGa7TtZP9y5cRhOPHyrkKS54G0RyXGDHwfja+lHIer86PtwmGF+38f
+SSN5jMmGVcIxv9DvlcJGywe2DsCXdM7zSF6huqZblqiyKTs/q0ufSN6TOx10
+4DTrTge5Nfjdm78neQM87fz4yc9wkWJypzlsnh077Q2zzlUcMIEvKUU8iYeF
+D4tmmHDDr5H6BbDRqsf1ZH+5FqZlI8xf8NHsX5zfEpdl+Bo+3W3r0wCXdkXv
+H4e7C546pcOJT274ztXH+qCvbj5wgUr0rCTM037ytwHsftdMRxqm6y+1F4cH
+h/U1iJ23RVfVIx+DevfNi2GOhqXpCZi5XmObGCx8bn7bFbZeLz85ifOoZUr9
+RvCRt3+oDsG8H/YPDWH9m6+7e2DvXb2+duT59ju/5hHMvh8jCIYzAk5Z1MDc
+HZUutXBU2IzyDTimoj1kAerZP9hc/zvJo0ewwBQevUlJZpLxTUt0IuBQox93
+02F3pvWrP2GtLTWeGTBt7uxbUeQ1Vqpkl0PW924U2MPJnY5FxfCg1E9HzpF8
+Jcz23oVbFK4aPIczGJF67XB5eqjIEjU2pfaedWYE5uTZ95vDrhNurRLoP9Tu
+lNFhWMa3ma4HcxNseMnwL4YDoZthrftGJVxYpDX7TSjJ0+FrfhHMjFAzuULW
+d55ry4ftflgfa4Anzyg3XyD73y0M6yfj95y4EbDWA87OuWtxP57+HdthXbe1
+DspwqNrCdfpw7anDlw3gFuHqt6Jw5hu/NiuYX5XO6EQ/GurruC4we7eY2zXY
+WZUj4g6zQrkfQmDvph5lDzimSEfZCWbZlW7dCmuZ7qKvhm1ZdesdYEGa7A1p
+kqfI8UQzMl/TezPJl7nEQWctqUddfQUFZ9e6qqjDjHdDjfNhiYRFQVKweK7v
+NkWSt6+rlQicWv48wZh8H5ZLXR1Hv6dzt6T6wPRjq88NwLRIA71M2PK8xORr
+8vyZXmkm96Nb93N2L3n+Vmw/IIt+g+dHyL2Eu1VfvSH5uCdltgpgyqmvL5fc
+zwXTsWHYNiJ8bABOWbgocprkPaTUxMR7nO2ep7qkPmfJdvoB+PPaZed14MEK
+zlAOzJSeEbUn+dJ2xj+GJxmFlf6k3+tGqf/C6SE1t1NhXsB1jbl4j/u6eP5U
+JcnbsKNNEk6uM+K8JPnVCzMk4Bny/rj2/++PGuz/AQ7UGzs=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.479517186987348, 5.883314205477544}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwt1wlUjfkbB/C3tN+0oGPmKm5TUkKFQQpvJYQUZUmr20iNVEyRGrwto6SS
+GoU56hYVow1ZC7fFMkq0GEupG2lPm5RC/+8z53/Pwfmc531/v+f5/t73Fm2h
+/6ad0gzDVOAP/ctI0V+6LPPfZxLLfDc2ybOGC2qd9znAJdFjZomwsfBVQyy8
+eI1mzzuq7yzouwi//7m5auFM+EK7JBOO/OdjYyTMnvp+MAIuHaub/xwWRMXp
+WsGGKT7Tp+jh+sRHNW3qLDOo3LtlA8wtvvE6CI5SMlU/BLMX2VsDaizjomf5
+YxrV4z5U/QIHRn9tvgYLnO9NzVJlGUl7XGwR2VBacEyFZXQcTrfeIGeOpXMT
+WSajJ8s9m+6f+yT0jDLLDHFrP8eTffgvGnks05nZqBUAizceiXWC5z22T7Wl
+euCrUlXYPjvBfzbZsyRGBq65G5OoCHuUzBEvhudPye3owXyizGVKWbDp4NdJ
+b2Buzmp5G+yX5JBvTfMzjgWiqehnW6f8zzWweJZfuBz6/TXp2xcJ5RU8kK+A
+eeJ1nsh8gxO+B05VwLzsS52petjPuDbcPQr2aPVd7Uzel792DNbkFSj/RXbu
+inZFfuq8p5vew31f4q9ehFccrjxlMgv9rfE/8Qq+WjQoHQGLC5w3dMKrWz+c
+q4PVumf/3QC3hXXs0tHH/g7+o/mw3inbKF9YXPF5nhcclN7mmwtzZzfekIb3
+VRUPvYclwfn2Mehnv8m0KBUD9Pnxl2ppODviis4cWGSWeuED5p2jmBBsTn7D
+u1OKPHga3s0rYObcBc3LyGtfZ43nYpjVddibgzxLnzSm68KC05+n1CqxzMyc
+pHJFqqe8PmgA9/4R495B/Ti6pN5UZJkv3cp2D2EmqPF8ONxtF5J4HmY32x6P
+hXUaJLqR5CeV/Dp46OizF7/S/QfrehyxnuCap+52qi/9mCeP/W+nHZjuSFae
+EfwO9rglsqY6x1fY/Br9Nt3xCN1D9TF1SSPmCbWPH4qDPbITBlow75fhOLMi
+qtfUub3F+a734eZ8onynbdjsinw0mjVUaF4mUs/jFjx5wsrzYXDC2b6HozAj
+KLSphiWel8sFyLtRZpemzmyWCbDvUtSHd2Q//DEQZn3M61VhfrbxuhK4L6CM
+/xr3r1Dr75I3hG3SzI/SeQhy4qzhANF5vWkwL3vrkmCYXW44aor+JuvPiEw1
+pPeHf08H/Q8ua7x8E5Z87jSUwnw1ActTymBx1plgCfKQ+T5YXwpzMw6JnyG/
+pn7FGzfIecW2DchX78T5YRHZN7lDHX60SLE/gtbP2W0RooDnl2++SUj1udG7
+NOF/akTyK2DRFcP9X+XxvCw/OVmL9rf6y2ka6gd8q7zGMZ+o4nvZfnimxpvb
+7bDA++91ilhfXmOBTz0sfmN99Qk8nLF2y2u63tlwYwH6y534pOo95cX3y8xF
+/718v9AxmNm37VMhztPlutNWAe3f2jt+E/Ouj9pUsJHyaTItvYg85Cd/MIqn
+fosyZoYgr1WPR7pr4QTpqG1qyLMzoidSMAee5XLCBm47ObJ0L9xXMWX3Tjjm
+ua5mGdXFB7WFcLStpt7kuXj/ut6FrYAbKov93GCuek/vN6zvyfdbmwFLQg/3
+roLlXC38G2DR/birQvQzwuNN5s1DPUd2qQv6Tfbukp5LPuFtw2KeGapq1yxg
+0U/B9zQxb9X9Jmsb8qOmN+PIZ9mF+TErYY9H96OHkaf67Py+hTBjf+e8Gqw6
+/jJYk+r6bXZbcB61deXJ32j/eudd1XIs41XcNKmePOGpbDSsbmX34SYsyLZY
+cgiuUvyokgIzGcN1BXBbxPO9oVRXjj40g9azcL+8i+pnjSpKYVff4X5Xmt95
+KOMk9tdrqRt2h8V73HI59FuyqLzOj/ZrPdYVjvMsE5cMx1A+kROFMZiv3sdK
+u5DWc3n6PBrz83OCvTrInKtfAPJZ8nbLMgPKJ9P23ELk9/dIbcJeWGygkvgE
+Dti9quE+za/cLjFA3sUG4evVjbBfV1H3eng0YbxFaETv97/GJvALY53sK2RZ
+NeFL3B+xI/32KMykHNlpRetHjD3UMsb61pZav09kuSPqslKmsODDwMTj6E/+
+wbTlG4zp+T7UHIr+FzrNY1xhj/Y7T50xn+cfv0zfCYtCi1qXKLKcVeyiR14w
+J8ncqY18ZEMUDgth1q2w5yd5lktt8Z7iRPult76ykWO5xQ7r09bRegdST4lk
+WSZEq9bbjOp2h7SM4HPdjk0GVOdiY0dlWG793YTwH8jX1BtlUNePGXmmQP19
+C6tZD9+tWOQ2QvN2d4w/hbW83O61weLpg7wwOXo+tj1thjmnOGUXnGfL4Sxe
+O+W3xFrJAf1yqclOY7CkP+XcNpxnTEXT0ETKI944zU2J5fz1dS/okgel3m3h
+sdyl/Ul6FjDTnNezAHlVFYal0bxcaE5+hzLLVcZ8642ifl1l+X4436yvsQ/z
+KY9Df2bfRt6fXCIKXlF+o133HqE+N0h5rpQJrl9b8zEZ9R0rBsSzYKbUVMoA
+/u3dD0rryJ9uvQ/H+v3CgmofWHLlthd+HnEDh+doRlC98dq/+ej3bIzxomQT
++v2kOPAMzkfL6cHdDKqL3F/g+4kLNPHIvgiL/uHNw/vDbRoMXk7mKpadtcb5
+HFO8qE3XS5ImCDchT6OkI0tTyCWu66Jl8L2x/PiVaFhwdf943wSWy6yb0nSA
+1tdMP54EC8RBpl5k2fMygXDAt7cWm2FWTnUj6kx2e2zAKlpP7KvVi7pqzhFt
+M7reuHI0DOsfG0kMX0h12/lZVrIsZ3RFOnIB3d+wMMgA/XUbT65cQtf7z3+n
+h/5nCo/mraR+Fn8ynofzdJxuq7+V5qu01jHB/L13cpv8ab1W80JtPL8ZMxr1
+48khic8HkFeW2QuVK7C48E/pM8jzrZHE/SW5s16Bh/Nteb/57jjlUzDB3hLu
+STqbqz+fzkvPxgznsdvxaL49LPG9eHoI70vJXKMN+8n7eviBWO+jxaSFp2HG
++sa9YuwffTXN/DrM2vIXv8LzZrXGMqKS1jusdawa/SdN0fJ/S/erPAi5juc1
+LqflThssvqTVdRLP89IB3+AuWi+vbloQzmfXSLFqB3lr2ZAv3pc9IddNm+n+
+WOVNR5G3dnLC5zpYFGCysVKa5RpHb3IPqH7z8ePV0vg+eJhqXkh1dedn36VY
+xn/nb1kZ1E/Ydt9PUiwXNHJmeSJdr28foI/r8/N6gyLnUx7rDqRgPcWlb86G
+wIK9gRpm2M9LQ/NxEPWr8JuhEs7zksDuX8pD9Lub2xfYU1huf5jWY2Vzx9D/
+Pktnv1i637WdPwHn+T4+TyWd9nfQ9pZCHsLbxUVFNN+kksp2uLx+KL/+v/UV
+8nKQn6W5h2Scrq+etdIS+aos2KA0awFcpaifjvP9cXV/mR0s2FBdUob69qN9
+8cGweOzXxGz4OTexO42uP7HD0RZ+tfaFXzksKl49cAvPj5zF9uctsOTSzw79
+2H+cPgv+//8TBfZ/11uc6w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.666233980906949, 2.1296932060463307}, \
+{0, 1}], LineBox[CompressedData["
+1:eJw9lQlQE2cUx7dQaURsyx0NJNnsrhU0ioBAKcWneJRDRUYq5VA8oBjEFMMl
+Rm4BE1shWEQUwVbKIai1pANoS7QEUTEYFC2HDqZaREektCgFRvptdb6dyez8
+Zr+8753/R26TBkUZEQQhRT/2/eahIWRqGj3mQNxK/Lm+nQKJq1mRONMC8Yaf
+4sspOPT90qxgG0sgAuu4bbkUELVp4cImxF/t9J2XQYHsafLQjm1WQHDD7MeV
+FHQ9Dw8qNrVG5yuvHKihILbfx9ejFjG3pJZzj4KVD+qWBHnaAJGv72k1pyF6
+CTeitwFxxbJXzp/TcPyZ9omFtS26/4LKrYIGvbS9qmsT4oLOLRHPaFg7cKRR
+vY9lVQnlwoDDjYx+50zEKYrYj2UM3E939T8iQRxp6aetYoDe1bPnzieIhQt4
+5TcZkCVaaiMn2PuftmYYGGjbbr6srQ5xRoPI4TEDpIPv+YBQxPBwnbSbgX12
+6hu5pux5he2qBgbiZz1pvt+K4rl1KaU6m4FXx95fLChA7LF4Mmc1A5N5nVqr
+PYiFDrpcggGXD/xnLpCy8RetM6hpCNcqtosViDXOWyxjaWipOWvHY+0JZyWU
+0DQsumYyaWuH7pu/NLH+T5SvuwbZ3sOIY5wrTNUUkDVlp1/MQfGM5G04o6LA
+8+Kx8qtqlsfnVWRS8PJxtIVPOBf5v9zrRRYFJRM6gjCZg+y5xuYUU7DW2CpE
+cgZx5NlM54sUZPUePOC0ai7ixlDtMAXuUdzZDR2ICZ9WahENJQNmoVIvHorv
+8kfpiTT88Jo+41eA+ImY+42GhvPi6uleLWJuDuhMGfjizm3vvH7E+TGXrq1H
++WpxjCzsZs8nnQ9TMiC/4G5q3IA4JMF4pImBEzG8O2lyxJr2Hc2/M5C9d/fE
+uCtiTnbQQ1SPmA75rbBHyJ/5moOlAwwc3RkaZ69iOXWh+zUGlJyQlx2s/4Fz
+DfxTDCR8WRtz0gTxQN2nzRIGrGZY9032onhHStVrHRh4vuaXflE74ozxqKsD
+qN98h/tv6xFzlaeyvqUhVxEm404gdkobfTeAhqY87Tv0cmRP01PQyKFhf1VG
+UWAl4g958upOCsZit4o9KORv5NaAFacpaCqYNh1Ss/womTxIwbRZRNWSTXao
+P+09BtMpkA+z82aHv493fheiq7bH//cOIMZs/PjYvnH8ya6r/Xx8vyI8fde5
+UAH2b73c83XfrwLsv8YrqO1vIyGOz+1+vrmNrRDHP3vzqcJhnhDnJzU90SLL
+Qojzd+RE8NGt/wpwfvdPVs10aRbg/MeXVqoMcQJcnwr37MWneQJcvwOKwhnv
+3eDj+sYef7QgM5uP639oQ/vYlD8f90fxyu7y3Y583D/lnIWXUyg+7q815zYR
+jCcf91/Qg96Naikf9+eWqdHKgt/4uH81yYOj/i4C3N9JRkmpnf/7/6b/I4iX
+t/0chXg+GnNKpqflQjw/Mw93JD3QC/F8RdMuTnYMiedPJv5RzJGReD4Nxe+v
+9mkk8fzGlcmN/vmLxPNN11fHj9qL8PwHl3uuG/IUYX2QpIbuk3wmwvph4s0t
+G1stwvrCUafEjLiLsP74TylFhay9t/rUJmNKL02QWL9kcX1VPV0k1rdjXskD
+J2pIrH9XXJLKOrNIrI8Sj6I2620k1s+vz0b1qv1IrK+D+S2F0ctIrL/BaWqK
+WUFifeZd59XZbCSxfruZlSmTEkms74FDMr2qksT6/1DlMHjXQOL9oLPc3PeH
+owjvj7lK/d2GVBHeL9fNVipv6kR4/xjXa/RSisL7ydvpsXd3AoX3l25wr9vO
+FsRv99s94zfv/wC2rKt2
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.844981764589882, 8.25073156171056}, \
+{-1, 0}], LineBox[{{6.4999999999976925`, 16.}, {13.49999999999251, 16.}}], 
+        PolygonBox[{{10.6, 16.}, {9.4, 15.6}, {9.4, 16.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 16.9452}, {0, -1}], 
+        LineBox[{{6.499999999996362, 16.000000000005457`}, {10., 
+         10.000000000003638`}}], 
+        PolygonBox[{{7.947677384685548, 13.51826734053906}, {
+         8.206811054955079, 12.280184249251306`}, {8.897834175673825, 
+         12.683281069670574`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 12.823799910437668}, \
+{1, 1}], LineBox[{{13.500000000007276`, 16.000000000005457`}, {
+         10.000000000003638`, 10.000000000001819`}}], 
+        PolygonBox[{{11.447677384685548`, 12.48173265946094}, {
+         11.706811054955079`, 13.719815750748694`}, {12.397834175673825`, 
+         13.316718930329426`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.484057296392571, 12.823799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 16.}], PointBox[{13.5, 16.}], 
+         PointBox[{10., 10.}], PointBox[{10., 4.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/chdfef/ifghgihi.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdfef/ifghgihi.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:eJwl1ws01GkfB/B/EuM+shjlMmxCSSrFomaEciuzIdNd7ktphFJrmRchEkq9
+FBltWxQx7WxU1JRLKlpKbql3WvQS1VC5Rb3f57xzjuN8zu/xPL/v7//M/xyG
+/ge2BMlQFPU3fshvavI7PgZsikZgyKZc7DOn9sDmH4XXvzPZVKtCjvl9fTal
+3Dgbr4J6ky7johkc6uIYbwYzYn+RL9JjU70OiXJesDTaJngxnBZ4sjENtql9
+11+ny6ZkM6qfNcFcLZ1TR+FK/wW1dCM2Ra/rW+tB3MkR7YKZP8oG/ARPOjCv
+lMFd9bVMB2IWK3yarN/+1XkvXM/bNeD4I5syDVTcfxa26g63TIEH555d3Av3
+e615cBdu+kW8Yhn6sUxNyBiGOTm5d5NgWp3CfKVF2O+X1Kpu2GnWMUkXzi4O
+ViX5pKYVdw1gKn6Qtg+OvRHrqwlX0jWPF8Jpo6szv2G/aqPxTbeIubr2r2Cb
+xp1mNfCJK781/En6ydE0vQT/oCkcTYYFj7Ou8uC8owPNXjBXXrzPCBZN5/F/
+hFsP9MTdQT8cg8KlE8hr6bjNkEXm+UVwuw2utPl3hRD5ythWdX/BaatoPgzY
+tE474A/iefUvYhci17ZY44twifsFx+4FqL8I+UjmGSsTJGTBnPH0zw2waQ79
+rVAH/UkyRCOw2ESosRr+fCRyDhP9MLffPNPCwLzDMlR3w9lKbbfi4cBbq1Mv
+wfQ8s7NusN8zrzIpzAv5+mEFPCNSOczCvMTTfeZWcE2e9r1MmDm4J9ATdrlR
+5N8F+53QiuDDIvrQfl1j5NsuVq2Dq7svsH1h3vrr5vPRj7kJrSIFLnH1oIfC
+yupH9Erhwb6Isrswl3M5txam7+p6p4Z8/d09LXWw5LHFlA+s6xuzpgbmvjhz
+KgOuPvKvd1fg1li39WWwX4DwchosPTRxXgTLrgu94Qc36X8Nvghbeg4/WEn2
+m/71djSc62fcPQcWXxuimcMz88oXtiFPSRh3wWP0Q7v6/vrvcKvSty8/w71K
+4ZlxMH/HyJ2HyOddpem/m8zj4TDPEnaanxnsTupi2r0cbZyrPL3BGeaEfSkf
+1WJTcS1vlTeR/Rqatm6F6zkG8wNgSeV/zjZo4rmvcZhJgSf9Kxqc4BNzV92v
+InV7q8iuHzDHzW6iT+R++3ovSoZrvI6etyF5uGq2bjDjVvyTJJJX+c97S+Hk
+V4Wuz+BQaWaIKRwY6jvKXIzvQ9/DE+tgj41GBftgm3fLXcJhfqCj6w3YZclE
+7lW4ekeD40fY8lxq0gQschc6GZqgz/yxwx7ob9KvK2sDsdEb3u8wL/mBwm7Y
+RifZaxz2cCh3DoE5EfU2LOTl275L9zch75e+qljY6uC2Ng6cl9C75ALMHVz6
+1ypSVzMdukbW6x33V4FNk6djimBxPOOoBP3EOt8sOgy35j76WEG8WTbLiszz
+bPxAPMw3aa/vxPkFppFJHFJn7ZQPhO0/OLeawDyGIusV8vQ/f5guD3NLdZ1d
+4Fjz5fJj5D4WcC9f1cB855epD5H7W9m7UxHmyJZ2vif3WyUzef98fN8qBroo
+/D2T06bSo86moosXvzEk+6ccOugDe/Q9UiTnt74M5/XTMfdWg8fHYU51Y0s6
+3JQ4SbXAk2/mmbnDUtsIHW3kFTClnYvhwMT8xUEwr0vYoQdH6+YoiODJ1WpN
+FjDt2Js8yhR1jRI5X5hRm9a0ER5MO9h4CmY+iWtNgWN76pxewYKxF553YKln
+quwK9GezRRLWB9uISjTSSL+M/H9m4crFTlt7Ye7NiEWKZth/d/9zE+R1Yv/2
+Mw3OG/smE0Tylw7bT2E9t/2zahbslx2/9zXMvm2keREOdet/egu29P7mcx72
+8LysdhL2o7f7HoHpixQUdpN+hBFTdrBuBq/DHA79UBPVj/OlOVoXZ8n9Gt3j
+FgP3Ksr99hz22zGwdAx5uo5tsRHCg+lr6/bAn3fEOuTDlaFRUylqmN+FK0mZ
+MKU2nrhBFff393jPLJhfH7ZNUQX3KTPErQi2lHkf91oJ+8eFB9fC7LFkg6eK
+2IfW988gzPwjQ7tPAfP3+OrDJPk07AKMYfHM2bt7YUlaTt05Gt5vuqWFV2H+
+m7SoDXCZU5PmJMmrb/fdFNb9O0xtI+Zn6T9lz4Z7nef45RJblIWmwoIIaqwX
+pnsb+k3Aeaclw3pLULd3n03BeftUjdu9Yfaa6eNL0R/19FJlAiwRbd3YDYuu
+pBkUwgK5MJlk5LnUUxdaBvP6dl83UCb3ZklqOVxZ83JGAAdaC02LiVNGR2bh
+zxNdf6TB4oAcVwvMhx1QKg0i1vFQNyc+tiDODpYuW/vgE9ZTifp6ynC21D8l
+GY5zbX/bg/4FOqvWSXC+KODK3Guw5NFAqBIssHDJTCD14OJhZTLfG4eCdsB8
+I+/b75FX+WuWugMstkgNrpbHvTS+dm4l8ZA4P1YO38eG7qgVcKWPaqLtPDY1
+Ut4Wsg5masxYK8riveU1eHIbnE07b/xJBu//xtebEkn9APPQ9zlsqj0hc1cV
+2a/a6Yw1nDes+nIc5szW1hdTOG/o/J51yEO/s6DFAZ4xH9HPIPNl/reFAfMH
+8xV7yDxyjy43hj06miZNlmK+55hV/rBLsUlzJMxXKqx5DMtW/HxeBHO0g+K9
+cZ5yeNGL9zD1bW/2F3iw43TAQnOcp1a35yL6vSTadN8O5udub9g8F8/d77r6
+Zjjbx63oA8zIcDLbAreWhIYdQl66VmS2C8xOf/L8Jcybcy1uJSyYcrPTwnxm
+kq3vq8OWvulMA9jeUbt6kPTbYhIzhvXsKfdFt2H62NzWkzBl/EH1OOm/QSfh
+C87b9+CJgEv6tZh3eAkcaB4zvRSWGMobWqFf0Wqhshyc3TWrsBB5BJc9ooYw
+H6Zr0ciz7ywqu3ShdxeZV5Kt2GeWRTU1PnVsJ/fTZmNzxzSL8g77tOI1uc89
+HwIjJlmUzVq9XeNk3pPb7q8aZ1Htm5966pLzzFQ67D6zqGYn57ebYeaDTve8
+MRaVqzm48wQs3scTbB1lUV3VucHPYD+75l8TpCzKZW2tqz7yi12L12vBBTdf
+y+wn83ofP8yA855cCLsD+5XnM/iwVWH5LrllWN8sE8PCftLTUf1uMNOtnLMB
+55kGnuGmwPy9qVH8TyzMKzrlJsx2tNbrRH/JdjKPumGBeseilejf6Vym/key
+fnnkkiMT6L8zdvU4TP1t+yQXeT1S1/NInVmw8tGBKdTnlEhewpJ5FdqT8KSG
+oW0tqYek3jPAvOJYe2rOkPrDwqxXqDdpS7RCyfk983OWwTMPpzZYk/NCQn9S
+x/6fr6oeJHkENAY3C/3Qihtqu5BXsuiY+E/0WyC/zlRIzEgVnUS+wKI1/qfI
+PE4MaVlhHpPWcuXxZF5sJUn0MIsqaf7h7mHigqriqLd4Pux1paQuVk5wPvMG
+zy/a8vlpcn89oh6r9+D5B0eO3CROCdH91Maiao54fHkLU9LIRMtG5DWMcTMi
+82jaPzh8k0UJvt+9FUysqxitLmBR0fIDhUJi8slb+///c5ax/wedUK1J
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.6273814311035784, 11.151823299819789}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt1gs41OkeB/C/O60YGbfKNi5dFpVKUWimTdOFahYt9lgGFZ1aplUd5DIR
+DyWJCieH2YTQhVJRYlyKTTQuleQIjVxSTTEat+z3PXs8D/N8vP/3fX+/33v5
+j5FvkPM+eYqibuKXfP79h8Gi/vdjxKLoHc9e3l3EooT1cy/cw/8VV4UYuMI8
+F9rZY3BisH5B5/csSjak0cSEK+oCL+6C07VS8nRgm2nrgVJDFtVjxMsYRb/2
+wm5XbVhwtMK/Ey6720/xFrIo/lF1jR6YlSQ1aVnAouKprFw59J8uKH9gB+sX
+1hcx4KfOjbZl82GFUkVHeFvPwy3bYIa+oXIkbNkpd0hiwKJUnxxNvUueb66T
+vw3TzsywP8NOpRvkzsH6DRlZZsiv9I14LIE8n2Vq5g2LOBEqmbBNe1PZaVjR
+11qvDhZNrYu5Do+E6fTMwIJdizg18NjJ1VYOmH/wwoNzDbC7hgHrHLxtuXVY
+FdzAznnZTeJ7sVs5H+aEBNYvQT7Fp/gzUfAhheIlfrDAtHzAEfaMs8pNglUP
+m02ok/6imJYrxLRV0keIXxR82uUy3JHdrRYGq2Y36MfCyxbK51nArgYFQU4w
+1/BWWg3qOX25jDaB+VktkY/WwbJghs4ZWHQxml6BdRq5IO38jsQnqep1g20i
+aztCkR+jzdVHAz5kneXbpc+ikv89ub+PrFv/Y7/1sKXmLdZz2Cr7JC1ND/V9
+G5/7Dh6L3HB+Shfr6e9ZTkf/Ora06hAs6vZf7AmHO1x5+EkH+2nUw6EM7pIb
+bYyHLV8XepsgPquHbGVbmHVPdeoiPDJdbatKLJukKyO/9OEDLyV0FnWVmya1
+h9VV8jtHYZ7gbE0QXHojYFgDzzOqnIPSYdkB+8CNcLH9Y/87sDDlUVUE3LBy
+5606mHFRI6AeLlvRoUbqa/Xtur8O4uXF5X0kz3NF/bE+MFXz+loaqfdQ5eVc
+mPs8xf0g2U/53SpdMOP65arV8OCxD7dnYUladg7Zz+LRwkx11KenbLvcLtim
+mS0m7byjVqtKkb/dGvvZl6R/voH5fNj0RnXDeVgQEDsUh3ralBSctCbjrS6b
+KweHxFU015D6fTGKT8K5sfN3CNkA88omtlvBRzzz9+SgHnzBjMI4OUev/vgm
+DzOUyqXP4fDx3056a2O9etuftcMWP+cbVc3DfI8nCz+Tc3ZQY3ApTI3VaJth
+PP24A7xsLdTvvaZ5GLz3fm6yGcxStnjVBYuClBc20fD8eSUtJ8TH23q9OAEW
+7tZiVMMWu7Qv+MCc8dvKa0l+A+vzXWEWP6ddAF9T43mRdv4/wxW/wWOJqW9O
+wgxuawsb9VKtrDF+QPrfd4o9BtPHEpfNwlxJ360E+GmT2NYR8TAcFP0jSX3b
+A+0zYJ63G4vcU8I2x7E+Em905RF1+EjFWq4xyc/Kq7oA87nqlqo6wzzjULYl
+TO9y3vIbTCuZ4eQi/nQn4+M8uNgila4JSwxcnDxIvQyrPY4g/4Y9ofeWkHa3
+ANMu1I9idJi+wnyWSuZuO2HXACWf32HRgwT3ZpyzihLzWCnJJ2xf5V7YU2bc
+vB8W/PKjog58dXii4aIm9ouKAacP57DHTWTprIF8P9dta4YDtLt+UJ+LeC9Z
+Ua9g4Uolw5bvcD73hn+h0J8rXNN3bQ4+6R0Gm+GO+ZMmhWpkvVN0L8E2Mc2t
+Laro/5/HAQrknsjRuWmmSp7/WnaU3EszNEmZCp4/8MT8PZwcwVaPhBnViRWe
+yFfV2S4vBE6mt2fUwunqsVlX4B6HiCgDUq8Aix1TMH/aS82D7IfxO0+CMT5j
+T9BkBCz7fnGMAuKx/FxyJBbmCFSuZMFcrbmLAkn/VKd6GxL/+3nWNnB8fm/q
+I1jY036mH/NRhgXc9ci3J3I4KBQue+fbnEDy3zcYKkO8jKQMzg1YtCD2HwFw
+SHR0lgDm70xKfIb8k4dnlH6FeZaJX61gqvdgZh/GtzQLzcom74FXz3asgYvt
+ftyoC/PfZJe6ID7RiufSLNx71NCpyR3Ih2p0lm6EOzhensbIV3Ioef0kzrmg
+or9SrITxyg+7tcGySO2FWYrw+laPRphT0i3+RQH70a/6dq8eOWfUr0vlUW/d
++q10jBcvrzGhIYf5TotivOFBP2b9AgrtT12TK2GROOp50TcmRZVsSjZHfDyf
+S9y4GSZV/GnvRxI/JT4c0zTNpIQZzqV05MdR4MpOwKzQne+iyT3vP/4iC5b0
+BL95C9MOPm03QH+eG69gFeolzHdpegsLdX5w9If5jUUJQ5iP5c+dcwJ2H9Dx
+noN4uOHizHCYtnJ7eh7MsHzM9iDtLa+n7BA/j68q1oNlL0x9q+Eexvb/3sd8
+MkZr8jLkK3zwVYUN8/wMnwWQ/GWVwZVkP99dvD+MtO+5v9QMlhk2K7vD3Lyh
+1rPI3928W3OWjH9gKngc9eP51hUHwZLWiem9emTdlw9cQzyiwcyvvbg3e/7Q
+uxkyi3rJplYEk3t0zF7JidRr3jw/Q5ijm3hvYBLtLSpzxLhHaSm2p31lTIo2
+GGn8J3kvbXL72i6FL9gaNJH3StedXrdRJsVVjq/9CIsMt/ys8Bn95TMDzcl7
+74x1aucHJiVi2ytEkfkP+n3kDGM+cbWtGBZyPdvjBphU8ljhkCviZR3TPH62
+H/VlsLY+gRn0og3BYvRfMM6xR77CfxUuWkl8VsE4H+b7vde6Axdv9toth/pw
+U2qTRtC/uDbIjk2+l1gcH7mN8SWjJvsOwyy7E7p9Q4ivmZ8RRdr5oUXbRpgU
+I+zO0iBS78wNPnc/Yr13HfvCJPu9KLM+XIJ8FaN+HyX7LVHidRj50XYvzUkk
++//dqUSTL4hHqvZak8ST9afzCZhn/iglmqzHRkojgrTr1y98T/IXpC/TIO2N
+3T9xiJXDE1dhvGST7nXlqB8//2la2yfMv0SabUHea2KV2QjExws986IY7y3B
+puX3wgeZlKWhE9sRFuqyFUbfov7RJ9ZSMGWa5qXbDW8uT2zFe03o+lPtYBvG
+2+FSXAtTy67e4tcyKf4Ho8A27f9/r+U9/PuTzvoLN7T2Kw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           
+           9.996694214876033]& ], {4.016469192730548, 5.934756130901607}, \
+{-1, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000001556`, 17.}, {16.000000000002885`, 17.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18., 17.6952}, {0, -1}], 
+        LineBox[CompressedData["
+1:eJw91H1ME3cYB/B2dhtvS4skDhtmy93JcMy2dwdFMJsPZWKJIOVFrcjkpUCY
+lE3n2Ox8aZMFtqEgiK7qCiumgQoaOoowDS91dkx5ETWYoSJ1sgaJojjE4SRl
+v+6P3yV3l08ud/d7+T5PaN5naQWvcTicVHR67+8vQReODDj/HxQcn4V102Jk
+x0/hizEUmOy9Z9M2IPvs9yfyKRDTr7Ym70bOiU817qPAqZPMdZm8Li4cOkiB
+3fV4fdHvyCcyt1aWUCBLKFxNPkVWbTvgUVKgv1UzMRtIo/+ldB8NokAwXH81
+UoIsHmgeu06CVPqmyaZAVv+YlVZGQrpFL+rchLxmxI8rJyEPpJPhacg+NUfl
+DwnYq8oo1iUjQ741rIGAsLulyU1xyGbuYE0BAU2PMlIiZMijcc/2xBCwoOoT
+u4Te72dtcojQ82a3/d4SZIPPuERIQM1mXVT2tHc+kXMrVhHwHqchsPa2dz4l
+E9UbCVDfXVn1dT+yYcEvWk/Aw8FhXd8l5OqMpDoHAfZfLWsvOpDnTxH5/iQc
+Pv8xvewKspV/8FAmCSdutw77jXpt3n7FSgKXsy83asb7vivHNUPCuEFb38j3
+jmdziWc1BaHLQ8/8HYk830jysyiYFh3RJO5Atvm6F76ioPKjPN3x75EFSdVT
+egrePmwKMLcj7+3bn7yHgjB9SIP8HnJwXCUnnYJFOa9bxWWAsyu9NyKUgnfe
+8L3AiJDNLRLqTxImDULtoShkzvzrjJGEwUJFR0U8svqFZIOSBEFd8CdPlcjW
+gjPNLwmgn6nN/gnIskam3kaAJYcf17sW2XZTyfucgG9vFXmKIpBVpsoABQGl
+Y7Hua8uQ4bLoMUnAA543d8jB/ucblxOgDf9NSE/R+Hmm1Mg1jtD4/Q8sMz3g
+pPH3bUFN2c8v0Pj/du3kD4JOGo/vn9PdiaVdNB7/v9+4a7/op/H8nJ4XCUP3
+aTz/B0OvFK0eGq9PXcXEjqsEg9fv7AHNbPZGBq9vhqOufOeXDF7/53/tMnU0
+MHh/Lj0a3/LWAIP3z/1dbe62GQbv72Xfsvp+Pov3PzFCJZt7l8X52JJy+tpU
+NIvzI1Fsd65fx+J8vYyWlcd8yOL8FUvu7C6LYnE+O3nZT7RhLM5vamt5v3kp
+i/MdmylMIhYYnH+3PcYldjO4PkJWtNhGhhlcP12rKtrUPQyur53tLcfK2xhc
+f3rn9eA/zjG4PqtyDPeVPzO4fo/dmdekdDO4vttjc+UDNxhc/xrppyEBTxjc
+H9p6Tt4cE7C4f0hWBl00rmFxf1k8csMvXsPi/mMZ5VnbqljcnxJSIf3cLyzu
+X0mBvY6lLhb3tw6uN3+RuP/9B3PT46g=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18., 8.354800000000001}, {0, 1}], 
+        LineBox[CompressedData["
+1:eJwt2Hs4lGkfB/DHkgYlp2QrGYNyikEaEU3IKZVNMlpq8o5TVCqVsFFUEkKU
+YzsVosQkCSmULWWsKZPklWar3dSmJskx9X7vrrc/cn267+e+v7+vx1xddAN3
+rg/6iaIoBRmKIl8pGvmLzqZ+/NFlU0xu+841MEd+/pQ6TD3e1V4EawVMrpsL
+R46Vsj7AXOE5UzW4OM+jxw5fy+YIYyfx7zXei4YTYZsstb5uWHhgSrMVZp80
+zi8hz5kymROwW95FfhisIs6u0Gdg//XpXAM4VJWR4ghL+BHcGzr4+uUYz5vY
+U36TDsw00YjxhamurAXHF+Ac05KydXBzrJ/CpDabGp7fFWgPJzjcmxULz1jR
+XcSAM5JG9ynDX+tm1svAKmffZNbPZ1Ntbznc5ySfNOREPFxGq91WBwssMhwC
+4R6T+7U5P/Kf1CGWezwmHw17zZFZehCOiFZ4sRVutlc0qoHp2/k8H9LT6gp/
+Cve1imOdN5D1F70LNsPJp5KKtpDnW/Vf3oej3DuG9sMJTWqJLMwj9TUxKCK9
+6/Vml8Jso4aoP2GpYslVZcwfZbc0RRH5vayOPAyDaRk3j5H5qYXGe6rh5Eea
+9ALSh02ZwWvY2e3otXfEHVTsJJydlxhpp4d898t8RmBO2dd9KbB0+fhkFxzh
+4vRVDFNXV+jmwH2rhrZr6aOPqK99dvD7X9Wz1sNeTxsz2pFPnP35/CFY5N1z
+y43k1/EIKoYzInU76jAfzb+Q1UDWcz3adWG5lgVz78L8NZ7aKehLvEVQ2QRT
+jb8xx+bh/sxPzKtwpKuL8W6Ys+RZcB45z9u7YGou5i8/nhJD8gSq2v4OJynF
+mvnC9GvCi5uI72zUtiT51nOcLGHPxZosZbJ+dZfSInhAQ2vNB8zH91qfZQNH
++A5++zHvDUXZIJijl53XCme8/Y9NOVm/0jBxG2a/N3pNIc8wFXngD+LB4dZg
+uK8n6EkPLKp89EYMC/OzF4/D3MCcIWfMx06u/WaA+1UKlu8RwO+jrxhtJn3c
+3stURR8qVxJl+HBzROj+rbDXaj/uW1iSORhYCG9IXnaHZYD3o/yW1m047ngy
+LxkWULnjd+G28EOhPTC7gnanAk71nj2qvxD5WVb50XDCyDZeOOx1rE/dCM7N
+cPylHGanCjVbkMc/rrCtD2Z6/NZI8laEmXPkFiFP5vP59ZhnzDiOoQML/MuU
+9eFWpaK3psSSiP4T6Ieqdlczg/kFT7+P/Ez2vzurR5430LgVDi8xGmXMgtma
+rIGPWmzK8PaqqiHcJ8k7kpUM93hY14lgae/CjmVwdNVPo5dJ/kKfffJwrnWz
+6zFY5JA6WzoH5/AKjgTB1OZtbSNw3yuzEHcyX4Ljyp+x37+ryN8apn/Y+nQD
+HHFMZ5cJHJnnWlYCU3X7LRbDKqdN2uSRj96Ql2tH+gg+EL8bVkkKlfWFm9Ps
+s17CA6dNTeNJP6GK6V6Yd0P72OJrcILVsbm18NcZ4pOfSL4rDW4z0U+cqrav
+Dealm1k+9yL9PXSkH4EpneDMOLhmXtHyJ3CGhrF7GkxX/dRlYIj82qnLDsEi
+8dT0KJhNs//uS963Xh+tWzDXL+yCGiz+927SN0Py83Yv/RruL7yRZrrUCPuZ
+e8MdYJFwRlggzHWzHr1B8hv+wjgMS6wYbQawhkd7XzYsHXspn44+UmW8m/LJ
++rJruqPoM0q6IpOsM7fT4kJI3/9cFiSS8+2aFvytyabquH4y28j5FrURe2Hp
+Vo0n7mQ9JPHFfHjA9vqfBmTdNa2zfzY+jx6at1CwwI/tcQvW6vZIfY78zKrw
+sTpik7qx23DzZ1nNR7Bbx5qci6QP2ZpYWZwnZKmdyYMjr9+t94Sdwy7dOk36
+sZzmVEbu++OQPd+QfD5eLVFB3rjYRkEtLHAK74yHk3YJZvWSvqQ6fh9hqZzT
+VQXkUemRfcrB/PO3LPJ2JnmTHhnWwoX/njZKhvljvvdk0NcGheYvj0kfn4rk
+WKQ/Rpcuwxj7jZZ5rYdDP6/7azcsmfju9wtMxX33vgMnuPxjZQUzOX+XzzTB
+/txC/zGcL5wZ4rIelphz68/DA4c+SdJMyPvnftCavK/zks7dhvnDbPnryCsM
+b2S9gkUzMgsXwjQ1x38nYOmCm7YZmD/1xB/F00zxPpV32I+hP1ql7kdZmB73
+QjMI1pfLko5gv4pl1kSfBu719/aXwM3Hj58KgrnXAgPumJDPE/5NWdgtkRf7
+O8lX77nipjq+D/unx8bAlJN5ZTrMLdput5Gcl6FqFw+3sjyzrEm+gx8rUuEN
+9MOG88h5d25vvQ4Lm/o5CiRvjjhwBJaa16n9RCx4d3w17hNnNrXIw/SULzVV
+sHDlyuVapI8OZ3lt5F+SVlm3lKxv6VicBvs3fn64lfSTp1A3Ppt8HjWG5ZL7
+Np/e7I8+MpwCJ3tgZmHRxiryfj54H6aLPiRKtnmDcOTkPPudsFR1NUMdffrn
+rKpvglW+lzK04cIHsTIqizHvM5aeIuxl5GMXAKvsWD2nF8/TvudUF8OCCxYB
+6XCc3NTEK1jio3vFiNyXnqr8sxncu2y0CvmG7Z4EO8Kiwx6WC2FR1TSVLXBz
+633tLMw7JveoZgcskBkZH0c//s5nzu+C2Z/bl/FIfzaFf4SS/foBlk/V2NTr
+zXFFPuT8gJvtHFjUEGlsC9N9TFgfVDHfEk+xFkzZuFQWwLywcM9h5OMPWTjw
+4IrHyhGdJL964jl3WHT5rsoVMp96sbEneV4td+wkzEzrbNoGt9k8+z2GPF/T
+OXAezrWYztgJZ8Q8HZTCzS2HdIhVYoaneSFPT+PS8liYPfQkqwHuy1lnlQNL
+k74FG2MeSUHSyZsw12BYLQ+OowV8HIRFtEvWFPrQMGd/MEZ+/iOW0E+DvN+9
+5yPNyOf3eBwfju6fqm0kfZ7f3tsJa+1+nDTDHOcdOZH/mqzLDrICYFGZpIm8
+7xkDl6WXYYlwZ/UNmOanO/AFFhyY77oPbujiuc9n4uf11Krrc+E7WYslNjB7
+qWpsGfJtfJzx33Uw/XCrhT4sd+F+MReW/ua+4RTmU4yIGdoG8z9fnZhEH2Mv
+Nwh3kP0XZqWTvp3NS1IiyPn3/KK7VDDvQqXHPPL8OzfxWthStP0EB+aW6jvW
+zWJTjz8V9LiR5/v2TX5XZlPLJwzkWSRP863+WPibAyNWn5x3IWQbEx6LKL2o
+RnxrjKMDp2o8GvoJlkztPuEKaxkfWz+IeemhG+eUwD3L/3z2HOZzT+y3mEXm
+SV/zDGZni5+/gpcoBo9KSH/fQkQc5CtbGZhM+kp4l829Dx+VM0tWwvnMuS0r
+WJivNevMQQbJX9g7dQ6eGHyvsoLkEb7YJoN+9pXlBP7o64Dl63Ww6XDxr0dg
+L7dpBcnwnZzDtRWkv/Ldooswe3bnrCck/9s1cpfh/rLG0a+w4BpPIxO2lZeT
+07PA+6Z8yWMTXJyW/dcquJmf50eDLVMYQTyYe4hyPYs8KdzWvN9gkaK1Cx3u
+6XwjzIDZO08nnsI8MZcVzhSR/fsf3J/E/JUz7kouwJIKq73t6Mvr3ftXxAnx
+dV/Oz0SPckLDszB/YWdH+gw2VXojNP4UWY+6lpivxKYcrYK/JJHz6eGzRIps
+Stmup20P2T9gt5kFL2Q2craS+/5T8vGJAhz1VH0dTJ2szqiE28wfBTuQebZ/
+tWmBbb4FX2KS84PVlJTwvENBvtoicl6MU/RReOLgpd8ZZF2scNQE9zt/ylDV
+J8/711pIYSa/pN+E7LdLGGxDXsWa7sW2xL39zHLM45/bIl5L9l/Qm52EeWkh
+d/3CSB6zqhFP9BEY9GY8mewPfqU2BlveDKuuIF6anmaP/qo7fdd0wXSPlt5g
+2LBBEDkJS9nXh6Jg5T63Kj1LfP9GNEzI+trTRfkeMHePv6MtnGXdIN4B099p
+3nuN84WOa3VPEvfrGTPglzt09l6Cm/v9li9Bvn+6Z8s2k+eT40v0kd+Nu8Kl
+k+zf86H6G+Y1++RJ64ETarwf/Il+eJE2vF6YihQ9OIc+TbOHWrthiaviriQa
+m/pgYyTpIK6Rrzs8HXk6Q66Q8/luOQ4X5TE/TWaTgJz/NfvexDTsn+TYniW+
+m3YvEea0uNafIHnUh7Vc4GoVnksMWdeWFzrCdfPUncNh9vECjWhYMc1+ZAtZ
+35HK+ws+Gn9otx+5Xzn3wn7cV1xamsUh3jgt2QJ5yqqn3gaQPIOXFOWQtyzf
+/HYYuc+rVvoSPsrvlo0j58Ud4JH3JbJCaUs2eT7uYU4W5m9d89eiatKfhu4m
+D/RTfTF7t5js9zrX+hwWWSvPmyD9rCitdML78f4f/AfHCvtDdI33wkk5ryw9
+YHq0Tc92OFjT/OEuWNLwt44pnGJz2fIMzP72ceVVnLdc6qRbT9Yt2e4yMP+B
+z75umPuG08NAHsGv9as/wAnjId0LkPfHLyGW/P/3DzT2/wADNNc5
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.667326901390272, 4.30940414848786}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt1Qs0lGkYB/BZRUOqySWztQZjjJHFnHJal40vK020LiVyTUVmp8aoHFSa
+ynbshJzaVtFFOklDZSeUkVwWue2k0bp201LbSCtJbYrs/93tO2fOc37nne95
+n+d5zztjsVmyNkaLRqNtx4fE/x9ziqZHogVFo87IbzebwT3yoLWwf5E/qwxm
+uJt0y2GFR8SmRrjGLNt7Gh6lDKUf4cgTCw4GsCmacHLdp8XI927+3ozTxCKH
+47HwB3sJ7T6cn2poo4B/GelfomdJ0eSJYjnZl7Fod8RiWCky3x0I35Bsq3WG
+KWe7O4XwgTeFcifY37FxZAyO3tuQwIPVW1SZjsi71Xk4YTZMt9H+QgiPH3Fo
+e4qYvM0vIx3xgOTqEiWivCVMegqxPOeW6jAiP0UTehJR1KvdGYHo1N7Zc5BE
+99pwJ0RqIK07DNFtp2i+KWLUwihPHmJqqOCfuWS93mH4BeqZmyxYziD9Pbm0
+lMxpGfcok032Tah6FA179/cpPGFm2o4yK9ijddg0Cd4waOD6CvNg1/glVrDJ
+fC+Ib8OqicgRLdKPcUDiZZgTWKwdBCsevJVeIOfl9bj2Cnw062VmCezVkvZM
+i4P807vjVfBN6QlBILxhblfzR3hBZxD9LEz5nDV2wf6TfRJ1H2yeuHboRzho
+o848uhVFk11wMemC+Q37WVzY/KXNJOk30NMzainML33UsgdWGtzx4sPMCrb6
+Nuk7OcyXBStWqO9po67HJeqn08j/xL7J8xt4ZAXfoxeOP3EkLRhuGvZzvAyP
+7hifFwOvuTTrzxRYc25UthG+Ed+eGgDTfZbdXQWrDPU4drD8NVdjBnfTxBGG
+MM99qv8F9i9enrFoFukvxTvnCmwfEyrRI+srh2Q/kPMrPLedBfP9Y5K4cBxN
+zPyOzCt8l40G/Z5StgmTYNmbaJMy+Ezm8fWV5P2wQ5YZMHP2rglt9KfMfhu6
+C96z+lVdCPFzVqOYnL88tUABC2Jrl++F9d8ai3S46FfTFn8aHq8oHQqC6759
+3aWCC1IYAXkwryaxXR/1FNqXbuqDmQOt7cFw4sP8i9rW6MfSIqcIHpshOmkB
+965K3jcFf9Luufk13BKX8asv5vFwjarAGmboTKXnwOn0jteGcN2EYrAb/ivv
+vu048su42QId9MWmzTr/O6yOTXflwG7yZ3akHvnPAyEOcHuT8pMEFhoN7LQm
+52BU7LOS1Nvfkz4HDnSijNhwTnBu2yDyl/qKH+vC5q5x4VfhzKjAfdNW5L5d
+dIqDPQ9sHZxJ1vtMnpF7Xv99ndYiUo9dka0G/Rg1t1avgJWHUlTFsPo3g6Ek
+mFFaxyf3JOG5b2QVmWeoliX5nTFf6Gami/7U17KOuZJ5hfqkRcAKXkckubfv
+je8cLIfj60s9BOT7sZxuXR7m6fZ3jQjes1+2OQSOfzHPOg8eEJlFnyM+WVbV
+D3NPmZf1wv7zLXtsUa+XlPVOywb9VpznSUn9aseWr2Dm6swPHfAtRcldK1jT
+2S9lYz7L1OUNLFjI8jHdBhdS8ihdYrPu6kvw+yiNjwb5eZwts7vgsbG7mhpY
+VtBRNAqPBF+0OAb3Tq8Ln4CdXKest8DC7sNfviL3xDmX70zqvcLU/wPm3DNy
+MIFzDCr3k/wbjl3PpsHyxuEqCaxnGG/6HvMQTpW1k/ONdi7JnSbzU1d4v0T9
+hakF98n7oy7jk0Xk/iUx8yk4v7IqTwzPvC45mwzTh8dkrvBYdVNWNannkUhs
+AksDbkbooz+BvGvhTLi8NWvdJphxy8pvBsza8dN6Jayc4XbaGN6ZlWs9ZzHO
+Jag2xAWuGXS7FgZH1csqJbAwgE7lw/nN7g9KyXra9YYe+L+H8/n/ypb6F1+a
+WGI=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.165661129127848, 11.57565554834886}, \
+{1, 0}], LineBox[{{16., 17.00000000000231}, {16., 9.999999999998607}}], 
+        PolygonBox[{{16., 14.1}, {15.6, 12.9}, {16.4, 12.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.9452, 13.5}, {-1, 0}], 
+        LineBox[{{16.000000000007276`, 17.000000000003638`}, {
+         10.000000000005457`, 13.5}}], 
+        PolygonBox[{{12.48173265946094, 14.947677384685548`}, {
+         13.316718930329426`, 15.897834175673825`}, {13.719815750748694`, 
+         15.206811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.823799910437668, 15.984057296392571}, \
+{1, -1}], 
+        LineBox[{{16., 9.999999999996362}, {10.000000000001819`, 
+         13.499999999996362`}}], 
+        PolygonBox[{{13.51826734053906, 11.447677384685548`}, {
+         12.683281069670574`, 12.397834175673825`}, {12.280184249251306`, 
+         11.706811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.823799910437668, 11.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{16., 17.}], PointBox[{16., 10.}], 
+         PointBox[{10., 13.5}], PointBox[{8., 8.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/cgdhef/ifghgihi.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdhef/ifghgihi.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:eJwl1ws01GkfB/B/EuM+shjlMmxCSSrFomaEciuzIdNd7ktphFJrmRchEkq9
+FBltWxQx7WxU1JRLKlpKbql3WvQS1VC5Rb3f57xzjuN8zu/xPL/v7//M/xyG
+/ge2BMlQFPU3fshvavI7PgZsikZgyKZc7DOn9sDmH4XXvzPZVKtCjvl9fTal
+3Dgbr4J6ky7johkc6uIYbwYzYn+RL9JjU70OiXJesDTaJngxnBZ4sjENtql9
+11+ny6ZkM6qfNcFcLZ1TR+FK/wW1dCM2Ra/rW+tB3MkR7YKZP8oG/ARPOjCv
+lMFd9bVMB2IWK3yarN/+1XkvXM/bNeD4I5syDVTcfxa26g63TIEH555d3Av3
+e615cBdu+kW8Yhn6sUxNyBiGOTm5d5NgWp3CfKVF2O+X1Kpu2GnWMUkXzi4O
+ViX5pKYVdw1gKn6Qtg+OvRHrqwlX0jWPF8Jpo6szv2G/aqPxTbeIubr2r2Cb
+xp1mNfCJK781/En6ydE0vQT/oCkcTYYFj7Ou8uC8owPNXjBXXrzPCBZN5/F/
+hFsP9MTdQT8cg8KlE8hr6bjNkEXm+UVwuw2utPl3hRD5ythWdX/BaatoPgzY
+tE474A/iefUvYhci17ZY44twifsFx+4FqL8I+UjmGSsTJGTBnPH0zw2waQ79
+rVAH/UkyRCOw2ESosRr+fCRyDhP9MLffPNPCwLzDMlR3w9lKbbfi4cBbq1Mv
+wfQ8s7NusN8zrzIpzAv5+mEFPCNSOczCvMTTfeZWcE2e9r1MmDm4J9ATdrlR
+5N8F+53QiuDDIvrQfl1j5NsuVq2Dq7svsH1h3vrr5vPRj7kJrSIFLnH1oIfC
+yupH9Erhwb6Isrswl3M5txam7+p6p4Z8/d09LXWw5LHFlA+s6xuzpgbmvjhz
+KgOuPvKvd1fg1li39WWwX4DwchosPTRxXgTLrgu94Qc36X8Nvghbeg4/WEn2
+m/71djSc62fcPQcWXxuimcMz88oXtiFPSRh3wWP0Q7v6/vrvcKvSty8/w71K
+4ZlxMH/HyJ2HyOddpem/m8zj4TDPEnaanxnsTupi2r0cbZyrPL3BGeaEfSkf
+1WJTcS1vlTeR/Rqatm6F6zkG8wNgSeV/zjZo4rmvcZhJgSf9Kxqc4BNzV92v
+InV7q8iuHzDHzW6iT+R++3ovSoZrvI6etyF5uGq2bjDjVvyTJJJX+c97S+Hk
+V4Wuz+BQaWaIKRwY6jvKXIzvQ9/DE+tgj41GBftgm3fLXcJhfqCj6w3YZclE
+7lW4ekeD40fY8lxq0gQschc6GZqgz/yxwx7ob9KvK2sDsdEb3u8wL/mBwm7Y
+RifZaxz2cCh3DoE5EfU2LOTl275L9zch75e+qljY6uC2Ng6cl9C75ALMHVz6
+1ypSVzMdukbW6x33V4FNk6djimBxPOOoBP3EOt8sOgy35j76WEG8WTbLiszz
+bPxAPMw3aa/vxPkFppFJHFJn7ZQPhO0/OLeawDyGIusV8vQ/f5guD3NLdZ1d
+4Fjz5fJj5D4WcC9f1cB855epD5H7W9m7UxHmyJZ2vif3WyUzef98fN8qBroo
+/D2T06bSo86moosXvzEk+6ccOugDe/Q9UiTnt74M5/XTMfdWg8fHYU51Y0s6
+3JQ4SbXAk2/mmbnDUtsIHW3kFTClnYvhwMT8xUEwr0vYoQdH6+YoiODJ1WpN
+FjDt2Js8yhR1jRI5X5hRm9a0ER5MO9h4CmY+iWtNgWN76pxewYKxF553YKln
+quwK9GezRRLWB9uISjTSSL+M/H9m4crFTlt7Ye7NiEWKZth/d/9zE+R1Yv/2
+Mw3OG/smE0Tylw7bT2E9t/2zahbslx2/9zXMvm2keREOdet/egu29P7mcx72
+8LysdhL2o7f7HoHpixQUdpN+hBFTdrBuBq/DHA79UBPVj/OlOVoXZ8n9Gt3j
+FgP3Ksr99hz22zGwdAx5uo5tsRHCg+lr6/bAn3fEOuTDlaFRUylqmN+FK0mZ
+MKU2nrhBFff393jPLJhfH7ZNUQX3KTPErQi2lHkf91oJ+8eFB9fC7LFkg6eK
+2IfW988gzPwjQ7tPAfP3+OrDJPk07AKMYfHM2bt7YUlaTt05Gt5vuqWFV2H+
+m7SoDXCZU5PmJMmrb/fdFNb9O0xtI+Zn6T9lz4Z7nef45RJblIWmwoIIaqwX
+pnsb+k3Aeaclw3pLULd3n03BeftUjdu9Yfaa6eNL0R/19FJlAiwRbd3YDYuu
+pBkUwgK5MJlk5LnUUxdaBvP6dl83UCb3ZklqOVxZ83JGAAdaC02LiVNGR2bh
+zxNdf6TB4oAcVwvMhx1QKg0i1vFQNyc+tiDODpYuW/vgE9ZTifp6ynC21D8l
+GY5zbX/bg/4FOqvWSXC+KODK3Guw5NFAqBIssHDJTCD14OJhZTLfG4eCdsB8
+I+/b75FX+WuWugMstkgNrpbHvTS+dm4l8ZA4P1YO38eG7qgVcKWPaqLtPDY1
+Ut4Wsg5masxYK8riveU1eHIbnE07b/xJBu//xtebEkn9APPQ9zlsqj0hc1cV
+2a/a6Yw1nDes+nIc5szW1hdTOG/o/J51yEO/s6DFAZ4xH9HPIPNl/reFAfMH
+8xV7yDxyjy43hj06miZNlmK+55hV/rBLsUlzJMxXKqx5DMtW/HxeBHO0g+K9
+cZ5yeNGL9zD1bW/2F3iw43TAQnOcp1a35yL6vSTadN8O5udub9g8F8/d77r6
+Zjjbx63oA8zIcDLbAreWhIYdQl66VmS2C8xOf/L8Jcybcy1uJSyYcrPTwnxm
+kq3vq8OWvulMA9jeUbt6kPTbYhIzhvXsKfdFt2H62NzWkzBl/EH1OOm/QSfh
+C87b9+CJgEv6tZh3eAkcaB4zvRSWGMobWqFf0Wqhshyc3TWrsBB5BJc9ooYw
+H6Zr0ciz7ywqu3ShdxeZV5Kt2GeWRTU1PnVsJ/fTZmNzxzSL8g77tOI1uc89
+HwIjJlmUzVq9XeNk3pPb7q8aZ1Htm5966pLzzFQ67D6zqGYn57ebYeaDTve8
+MRaVqzm48wQs3scTbB1lUV3VucHPYD+75l8TpCzKZW2tqz7yi12L12vBBTdf
+y+wn83ofP8yA855cCLsD+5XnM/iwVWH5LrllWN8sE8PCftLTUf1uMNOtnLMB
+55kGnuGmwPy9qVH8TyzMKzrlJsx2tNbrRH/JdjKPumGBeseilejf6Vym/key
+fnnkkiMT6L8zdvU4TP1t+yQXeT1S1/NInVmw8tGBKdTnlEhewpJ5FdqT8KSG
+oW0tqYek3jPAvOJYe2rOkPrDwqxXqDdpS7RCyfk983OWwTMPpzZYk/NCQn9S
+x/6fr6oeJHkENAY3C/3Qihtqu5BXsuiY+E/0WyC/zlRIzEgVnUS+wKI1/qfI
+PE4MaVlhHpPWcuXxZF5sJUn0MIsqaf7h7mHigqriqLd4Pux1paQuVk5wPvMG
+zy/a8vlpcn89oh6r9+D5B0eO3CROCdH91Maiao54fHkLU9LIRMtG5DWMcTMi
+82jaPzh8k0UJvt+9FUysqxitLmBR0fIDhUJi8slb+///c5ax/wedUK1J
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.6273814311035784, 11.151823299819789}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt1gs41OkeB/C/O60YGbfKNi5dFpVKUWimTdOFahYt9lgGFZ1aplUd5DIR
+DyWJCieH2YTQhVJRYlyKTTQuleQIjVxSTTEat+z3PXs8D/N8vP/3fX+/33v5
+j5FvkPM+eYqibuKXfP79h8Gi/vdjxKLoHc9e3l3EooT1cy/cw/8VV4UYuMI8
+F9rZY3BisH5B5/csSjak0cSEK+oCL+6C07VS8nRgm2nrgVJDFtVjxMsYRb/2
+wm5XbVhwtMK/Ey6720/xFrIo/lF1jR6YlSQ1aVnAouKprFw59J8uKH9gB+sX
+1hcx4KfOjbZl82GFUkVHeFvPwy3bYIa+oXIkbNkpd0hiwKJUnxxNvUueb66T
+vw3TzsywP8NOpRvkzsH6DRlZZsiv9I14LIE8n2Vq5g2LOBEqmbBNe1PZaVjR
+11qvDhZNrYu5Do+E6fTMwIJdizg18NjJ1VYOmH/wwoNzDbC7hgHrHLxtuXVY
+FdzAznnZTeJ7sVs5H+aEBNYvQT7Fp/gzUfAhheIlfrDAtHzAEfaMs8pNglUP
+m02ok/6imJYrxLRV0keIXxR82uUy3JHdrRYGq2Y36MfCyxbK51nArgYFQU4w
+1/BWWg3qOX25jDaB+VktkY/WwbJghs4ZWHQxml6BdRq5IO38jsQnqep1g20i
+aztCkR+jzdVHAz5kneXbpc+ikv89ub+PrFv/Y7/1sKXmLdZz2Cr7JC1ND/V9
+G5/7Dh6L3HB+Shfr6e9ZTkf/Ora06hAs6vZf7AmHO1x5+EkH+2nUw6EM7pIb
+bYyHLV8XepsgPquHbGVbmHVPdeoiPDJdbatKLJukKyO/9OEDLyV0FnWVmya1
+h9VV8jtHYZ7gbE0QXHojYFgDzzOqnIPSYdkB+8CNcLH9Y/87sDDlUVUE3LBy
+5606mHFRI6AeLlvRoUbqa/Xtur8O4uXF5X0kz3NF/bE+MFXz+loaqfdQ5eVc
+mPs8xf0g2U/53SpdMOP65arV8OCxD7dnYUladg7Zz+LRwkx11KenbLvcLtim
+mS0m7byjVqtKkb/dGvvZl6R/voH5fNj0RnXDeVgQEDsUh3ralBSctCbjrS6b
+KweHxFU015D6fTGKT8K5sfN3CNkA88omtlvBRzzz9+SgHnzBjMI4OUev/vgm
+DzOUyqXP4fDx3056a2O9etuftcMWP+cbVc3DfI8nCz+Tc3ZQY3ApTI3VaJth
+PP24A7xsLdTvvaZ5GLz3fm6yGcxStnjVBYuClBc20fD8eSUtJ8TH23q9OAEW
+7tZiVMMWu7Qv+MCc8dvKa0l+A+vzXWEWP6ddAF9T43mRdv4/wxW/wWOJqW9O
+wgxuawsb9VKtrDF+QPrfd4o9BtPHEpfNwlxJ360E+GmT2NYR8TAcFP0jSX3b
+A+0zYJ63G4vcU8I2x7E+Em905RF1+EjFWq4xyc/Kq7oA87nqlqo6wzzjULYl
+TO9y3vIbTCuZ4eQi/nQn4+M8uNgila4JSwxcnDxIvQyrPY4g/4Y9ofeWkHa3
+ANMu1I9idJi+wnyWSuZuO2HXACWf32HRgwT3ZpyzihLzWCnJJ2xf5V7YU2bc
+vB8W/PKjog58dXii4aIm9ouKAacP57DHTWTprIF8P9dta4YDtLt+UJ+LeC9Z
+Ua9g4Uolw5bvcD73hn+h0J8rXNN3bQ4+6R0Gm+GO+ZMmhWpkvVN0L8E2Mc2t
+Laro/5/HAQrknsjRuWmmSp7/WnaU3EszNEmZCp4/8MT8PZwcwVaPhBnViRWe
+yFfV2S4vBE6mt2fUwunqsVlX4B6HiCgDUq8Aix1TMH/aS82D7IfxO0+CMT5j
+T9BkBCz7fnGMAuKx/FxyJBbmCFSuZMFcrbmLAkn/VKd6GxL/+3nWNnB8fm/q
+I1jY036mH/NRhgXc9ci3J3I4KBQue+fbnEDy3zcYKkO8jKQMzg1YtCD2HwFw
+SHR0lgDm70xKfIb8k4dnlH6FeZaJX61gqvdgZh/GtzQLzcom74FXz3asgYvt
+ftyoC/PfZJe6ID7RiufSLNx71NCpyR3Ih2p0lm6EOzhensbIV3Ioef0kzrmg
+or9SrITxyg+7tcGySO2FWYrw+laPRphT0i3+RQH70a/6dq8eOWfUr0vlUW/d
++q10jBcvrzGhIYf5TotivOFBP2b9AgrtT12TK2GROOp50TcmRZVsSjZHfDyf
+S9y4GSZV/GnvRxI/JT4c0zTNpIQZzqV05MdR4MpOwKzQne+iyT3vP/4iC5b0
+BL95C9MOPm03QH+eG69gFeolzHdpegsLdX5w9If5jUUJQ5iP5c+dcwJ2H9Dx
+noN4uOHizHCYtnJ7eh7MsHzM9iDtLa+n7BA/j68q1oNlL0x9q+Eexvb/3sd8
+MkZr8jLkK3zwVYUN8/wMnwWQ/GWVwZVkP99dvD+MtO+5v9QMlhk2K7vD3Lyh
+1rPI3928W3OWjH9gKngc9eP51hUHwZLWiem9emTdlw9cQzyiwcyvvbg3e/7Q
+uxkyi3rJplYEk3t0zF7JidRr3jw/Q5ijm3hvYBLtLSpzxLhHaSm2p31lTIo2
+GGn8J3kvbXL72i6FL9gaNJH3StedXrdRJsVVjq/9CIsMt/ys8Bn95TMDzcl7
+74x1aucHJiVi2ytEkfkP+n3kDGM+cbWtGBZyPdvjBphU8ljhkCviZR3TPH62
+H/VlsLY+gRn0og3BYvRfMM6xR77CfxUuWkl8VsE4H+b7vde6Axdv9toth/pw
+U2qTRtC/uDbIjk2+l1gcH7mN8SWjJvsOwyy7E7p9Q4ivmZ8RRdr5oUXbRpgU
+I+zO0iBS78wNPnc/Yr13HfvCJPu9KLM+XIJ8FaN+HyX7LVHidRj50XYvzUkk
++//dqUSTL4hHqvZak8ST9afzCZhn/iglmqzHRkojgrTr1y98T/IXpC/TIO2N
+3T9xiJXDE1dhvGST7nXlqB8//2la2yfMv0SabUHea2KV2QjExws986IY7y3B
+puX3wgeZlKWhE9sRFuqyFUbfov7RJ9ZSMGWa5qXbDW8uT2zFe03o+lPtYBvG
+2+FSXAtTy67e4tcyKf4Ho8A27f9/r+U9/PuTzvoLN7T2Kw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           
+           9.996694214876033]& ], {4.016469192730548, 5.934756130901607}, \
+{-1, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000001556`, 17.}, {16.000000000002885`, 17.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18., 17.6952}, {0, -1}], 
+        LineBox[CompressedData["
+1:eJw91H1ME3cYB/B2dhtvS4skDhtmy93JcMy2dwdFMJsPZWKJIOVFrcjkpUCY
+lE3n2Ox8aZMFtqEgiK7qCiumgQoaOoowDS91dkx5ETWYoSJ1sgaJojjE4SRl
+v+6P3yV3l08ud/d7+T5PaN5naQWvcTicVHR67+8vQReODDj/HxQcn4V102Jk
+x0/hizEUmOy9Z9M2IPvs9yfyKRDTr7Ym70bOiU817qPAqZPMdZm8Li4cOkiB
+3fV4fdHvyCcyt1aWUCBLKFxNPkVWbTvgUVKgv1UzMRtIo/+ldB8NokAwXH81
+UoIsHmgeu06CVPqmyaZAVv+YlVZGQrpFL+rchLxmxI8rJyEPpJPhacg+NUfl
+DwnYq8oo1iUjQ741rIGAsLulyU1xyGbuYE0BAU2PMlIiZMijcc/2xBCwoOoT
+u4Te72dtcojQ82a3/d4SZIPPuERIQM1mXVT2tHc+kXMrVhHwHqchsPa2dz4l
+E9UbCVDfXVn1dT+yYcEvWk/Aw8FhXd8l5OqMpDoHAfZfLWsvOpDnTxH5/iQc
+Pv8xvewKspV/8FAmCSdutw77jXpt3n7FSgKXsy83asb7vivHNUPCuEFb38j3
+jmdziWc1BaHLQ8/8HYk830jysyiYFh3RJO5Atvm6F76ioPKjPN3x75EFSdVT
+egrePmwKMLcj7+3bn7yHgjB9SIP8HnJwXCUnnYJFOa9bxWWAsyu9NyKUgnfe
+8L3AiJDNLRLqTxImDULtoShkzvzrjJGEwUJFR0U8svqFZIOSBEFd8CdPlcjW
+gjPNLwmgn6nN/gnIskam3kaAJYcf17sW2XZTyfucgG9vFXmKIpBVpsoABQGl
+Y7Hua8uQ4bLoMUnAA543d8jB/ucblxOgDf9NSE/R+Hmm1Mg1jtD4/Q8sMz3g
+pPH3bUFN2c8v0Pj/du3kD4JOGo/vn9PdiaVdNB7/v9+4a7/op/H8nJ4XCUP3
+aTz/B0OvFK0eGq9PXcXEjqsEg9fv7AHNbPZGBq9vhqOufOeXDF7/53/tMnU0
+MHh/Lj0a3/LWAIP3z/1dbe62GQbv72Xfsvp+Pov3PzFCJZt7l8X52JJy+tpU
+NIvzI1Fsd65fx+J8vYyWlcd8yOL8FUvu7C6LYnE+O3nZT7RhLM5vamt5v3kp
+i/MdmylMIhYYnH+3PcYldjO4PkJWtNhGhhlcP12rKtrUPQyur53tLcfK2xhc
+f3rn9eA/zjG4PqtyDPeVPzO4fo/dmdekdDO4vttjc+UDNxhc/xrppyEBTxjc
+H9p6Tt4cE7C4f0hWBl00rmFxf1k8csMvXsPi/mMZ5VnbqljcnxJSIf3cLyzu
+X0mBvY6lLhb3tw6uN3+RuP/9B3PT46g=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18., 8.354800000000001}, {0, 1}], 
+        LineBox[CompressedData["
+1:eJwt2Hs4lGkfB/DHkgYlp2QrGYNyikEaEU3IKZVNMlpq8o5TVCqVsFFUEkKU
+YzsVosQkCSmULWWsKZPklWar3dSmJskx9X7vrrc/cn267+e+v7+vx1xddAN3
+rg/6iaIoBRmKIl8pGvmLzqZ+/NFlU0xu+841MEd+/pQ6TD3e1V4EawVMrpsL
+R46Vsj7AXOE5UzW4OM+jxw5fy+YIYyfx7zXei4YTYZsstb5uWHhgSrMVZp80
+zi8hz5kymROwW95FfhisIs6u0Gdg//XpXAM4VJWR4ghL+BHcGzr4+uUYz5vY
+U36TDsw00YjxhamurAXHF+Ac05KydXBzrJ/CpDabGp7fFWgPJzjcmxULz1jR
+XcSAM5JG9ynDX+tm1svAKmffZNbPZ1Ntbznc5ySfNOREPFxGq91WBwssMhwC
+4R6T+7U5P/Kf1CGWezwmHw17zZFZehCOiFZ4sRVutlc0qoHp2/k8H9LT6gp/
+Cve1imOdN5D1F70LNsPJp5KKtpDnW/Vf3oej3DuG9sMJTWqJLMwj9TUxKCK9
+6/Vml8Jso4aoP2GpYslVZcwfZbc0RRH5vayOPAyDaRk3j5H5qYXGe6rh5Eea
+9ALSh02ZwWvY2e3otXfEHVTsJJydlxhpp4d898t8RmBO2dd9KbB0+fhkFxzh
+4vRVDFNXV+jmwH2rhrZr6aOPqK99dvD7X9Wz1sNeTxsz2pFPnP35/CFY5N1z
+y43k1/EIKoYzInU76jAfzb+Q1UDWcz3adWG5lgVz78L8NZ7aKehLvEVQ2QRT
+jb8xx+bh/sxPzKtwpKuL8W6Ys+RZcB45z9u7YGou5i8/nhJD8gSq2v4OJynF
+mvnC9GvCi5uI72zUtiT51nOcLGHPxZosZbJ+dZfSInhAQ2vNB8zH91qfZQNH
++A5++zHvDUXZIJijl53XCme8/Y9NOVm/0jBxG2a/N3pNIc8wFXngD+LB4dZg
+uK8n6EkPLKp89EYMC/OzF4/D3MCcIWfMx06u/WaA+1UKlu8RwO+jrxhtJn3c
+3stURR8qVxJl+HBzROj+rbDXaj/uW1iSORhYCG9IXnaHZYD3o/yW1m047ngy
+LxkWULnjd+G28EOhPTC7gnanAk71nj2qvxD5WVb50XDCyDZeOOx1rE/dCM7N
+cPylHGanCjVbkMc/rrCtD2Z6/NZI8laEmXPkFiFP5vP59ZhnzDiOoQML/MuU
+9eFWpaK3psSSiP4T6Ieqdlczg/kFT7+P/Ez2vzurR5430LgVDi8xGmXMgtma
+rIGPWmzK8PaqqiHcJ8k7kpUM93hY14lgae/CjmVwdNVPo5dJ/kKfffJwrnWz
+6zFY5JA6WzoH5/AKjgTB1OZtbSNw3yuzEHcyX4Ljyp+x37+ryN8apn/Y+nQD
+HHFMZ5cJHJnnWlYCU3X7LRbDKqdN2uSRj96Ql2tH+gg+EL8bVkkKlfWFm9Ps
+s17CA6dNTeNJP6GK6V6Yd0P72OJrcILVsbm18NcZ4pOfSL4rDW4z0U+cqrav
+Dealm1k+9yL9PXSkH4EpneDMOLhmXtHyJ3CGhrF7GkxX/dRlYIj82qnLDsEi
+8dT0KJhNs//uS963Xh+tWzDXL+yCGiz+927SN0Py83Yv/RruL7yRZrrUCPuZ
+e8MdYJFwRlggzHWzHr1B8hv+wjgMS6wYbQawhkd7XzYsHXspn44+UmW8m/LJ
++rJruqPoM0q6IpOsM7fT4kJI3/9cFiSS8+2aFvytyabquH4y28j5FrURe2Hp
+Vo0n7mQ9JPHFfHjA9vqfBmTdNa2zfzY+jx6at1CwwI/tcQvW6vZIfY78zKrw
+sTpik7qx23DzZ1nNR7Bbx5qci6QP2ZpYWZwnZKmdyYMjr9+t94Sdwy7dOk36
+sZzmVEbu++OQPd+QfD5eLVFB3rjYRkEtLHAK74yHk3YJZvWSvqQ6fh9hqZzT
+VQXkUemRfcrB/PO3LPJ2JnmTHhnWwoX/njZKhvljvvdk0NcGheYvj0kfn4rk
+WKQ/Rpcuwxj7jZZ5rYdDP6/7azcsmfju9wtMxX33vgMnuPxjZQUzOX+XzzTB
+/txC/zGcL5wZ4rIelphz68/DA4c+SdJMyPvnftCavK/zks7dhvnDbPnryCsM
+b2S9gkUzMgsXwjQ1x38nYOmCm7YZmD/1xB/F00zxPpV32I+hP1ql7kdZmB73
+QjMI1pfLko5gv4pl1kSfBu719/aXwM3Hj58KgrnXAgPumJDPE/5NWdgtkRf7
+O8lX77nipjq+D/unx8bAlJN5ZTrMLdput5Gcl6FqFw+3sjyzrEm+gx8rUuEN
+9MOG88h5d25vvQ4Lm/o5CiRvjjhwBJaa16n9RCx4d3w17hNnNrXIw/SULzVV
+sHDlyuVapI8OZ3lt5F+SVlm3lKxv6VicBvs3fn64lfSTp1A3Ppt8HjWG5ZL7
+Np/e7I8+MpwCJ3tgZmHRxiryfj54H6aLPiRKtnmDcOTkPPudsFR1NUMdffrn
+rKpvglW+lzK04cIHsTIqizHvM5aeIuxl5GMXAKvsWD2nF8/TvudUF8OCCxYB
+6XCc3NTEK1jio3vFiNyXnqr8sxncu2y0CvmG7Z4EO8Kiwx6WC2FR1TSVLXBz
+633tLMw7JveoZgcskBkZH0c//s5nzu+C2Z/bl/FIfzaFf4SS/foBlk/V2NTr
+zXFFPuT8gJvtHFjUEGlsC9N9TFgfVDHfEk+xFkzZuFQWwLywcM9h5OMPWTjw
+4IrHyhGdJL964jl3WHT5rsoVMp96sbEneV4td+wkzEzrbNoGt9k8+z2GPF/T
+OXAezrWYztgJZ8Q8HZTCzS2HdIhVYoaneSFPT+PS8liYPfQkqwHuy1lnlQNL
+k74FG2MeSUHSyZsw12BYLQ+OowV8HIRFtEvWFPrQMGd/MEZ+/iOW0E+DvN+9
+5yPNyOf3eBwfju6fqm0kfZ7f3tsJa+1+nDTDHOcdOZH/mqzLDrICYFGZpIm8
+7xkDl6WXYYlwZ/UNmOanO/AFFhyY77oPbujiuc9n4uf11Krrc+E7WYslNjB7
+qWpsGfJtfJzx33Uw/XCrhT4sd+F+MReW/ua+4RTmU4yIGdoG8z9fnZhEH2Mv
+Nwh3kP0XZqWTvp3NS1IiyPn3/KK7VDDvQqXHPPL8OzfxWthStP0EB+aW6jvW
+zWJTjz8V9LiR5/v2TX5XZlPLJwzkWSRP863+WPibAyNWn5x3IWQbEx6LKL2o
+RnxrjKMDp2o8GvoJlkztPuEKaxkfWz+IeemhG+eUwD3L/3z2HOZzT+y3mEXm
+SV/zDGZni5+/gpcoBo9KSH/fQkQc5CtbGZhM+kp4l829Dx+VM0tWwvnMuS0r
+WJivNevMQQbJX9g7dQ6eGHyvsoLkEb7YJoN+9pXlBP7o64Dl63Ww6XDxr0dg
+L7dpBcnwnZzDtRWkv/Ldooswe3bnrCck/9s1cpfh/rLG0a+w4BpPIxO2lZeT
+07PA+6Z8yWMTXJyW/dcquJmf50eDLVMYQTyYe4hyPYs8KdzWvN9gkaK1Cx3u
+6XwjzIDZO08nnsI8MZcVzhSR/fsf3J/E/JUz7kouwJIKq73t6Mvr3ftXxAnx
+dV/Oz0SPckLDszB/YWdH+gw2VXojNP4UWY+6lpivxKYcrYK/JJHz6eGzRIps
+Stmup20P2T9gt5kFL2Q2craS+/5T8vGJAhz1VH0dTJ2szqiE28wfBTuQebZ/
+tWmBbb4FX2KS84PVlJTwvENBvtoicl6MU/RReOLgpd8ZZF2scNQE9zt/ylDV
+J8/711pIYSa/pN+E7LdLGGxDXsWa7sW2xL39zHLM45/bIl5L9l/Qm52EeWkh
+d/3CSB6zqhFP9BEY9GY8mewPfqU2BlveDKuuIF6anmaP/qo7fdd0wXSPlt5g
+2LBBEDkJS9nXh6Jg5T63Kj1LfP9GNEzI+trTRfkeMHePv6MtnGXdIN4B099p
+3nuN84WOa3VPEvfrGTPglzt09l6Cm/v9li9Bvn+6Z8s2k+eT40v0kd+Nu8Kl
+k+zf86H6G+Y1++RJ64ETarwf/Il+eJE2vF6YihQ9OIc+TbOHWrthiaviriQa
+m/pgYyTpIK6Rrzs8HXk6Q66Q8/luOQ4X5TE/TWaTgJz/NfvexDTsn+TYniW+
+m3YvEea0uNafIHnUh7Vc4GoVnksMWdeWFzrCdfPUncNh9vECjWhYMc1+ZAtZ
+35HK+ws+Gn9otx+5Xzn3wn7cV1xamsUh3jgt2QJ5yqqn3gaQPIOXFOWQtyzf
+/HYYuc+rVvoSPsrvlo0j58Ud4JH3JbJCaUs2eT7uYU4W5m9d89eiatKfhu4m
+D/RTfTF7t5js9zrX+hwWWSvPmyD9rCitdML78f4f/AfHCvtDdI33wkk5ryw9
+YHq0Tc92OFjT/OEuWNLwt44pnGJz2fIMzP72ceVVnLdc6qRbT9Yt2e4yMP+B
+z75umPuG08NAHsGv9as/wAnjId0LkPfHLyGW/P/3DzT2/wADNNc5
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.667326901390272, 4.30940414848786}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt1Qs0lGkYB/BZRUOqySWztQZjjJHFnHJal40vK020LiVyTUVmp8aoHFSa
+ynbshJzaVtFFOklDZSeUkVwWue2k0bp201LbSCtJbYrs/93tO2fOc37nne95
+n+d5zztjsVmyNkaLRqNtx4fE/x9ziqZHogVFo87IbzebwT3yoLWwf5E/qwxm
+uJt0y2GFR8SmRrjGLNt7Gh6lDKUf4cgTCw4GsCmacHLdp8XI927+3ozTxCKH
+47HwB3sJ7T6cn2poo4B/GelfomdJ0eSJYjnZl7Fod8RiWCky3x0I35Bsq3WG
+KWe7O4XwgTeFcifY37FxZAyO3tuQwIPVW1SZjsi71Xk4YTZMt9H+QgiPH3Fo
+e4qYvM0vIx3xgOTqEiWivCVMegqxPOeW6jAiP0UTehJR1KvdGYHo1N7Zc5BE
+99pwJ0RqIK07DNFtp2i+KWLUwihPHmJqqOCfuWS93mH4BeqZmyxYziD9Pbm0
+lMxpGfcok032Tah6FA179/cpPGFm2o4yK9ijddg0Cd4waOD6CvNg1/glVrDJ
+fC+Ib8OqicgRLdKPcUDiZZgTWKwdBCsevJVeIOfl9bj2Cnw062VmCezVkvZM
+i4P807vjVfBN6QlBILxhblfzR3hBZxD9LEz5nDV2wf6TfRJ1H2yeuHboRzho
+o848uhVFk11wMemC+Q37WVzY/KXNJOk30NMzainML33UsgdWGtzx4sPMCrb6
+Nuk7OcyXBStWqO9po67HJeqn08j/xL7J8xt4ZAXfoxeOP3EkLRhuGvZzvAyP
+7hifFwOvuTTrzxRYc25UthG+Ed+eGgDTfZbdXQWrDPU4drD8NVdjBnfTxBGG
+MM99qv8F9i9enrFoFukvxTvnCmwfEyrRI+srh2Q/kPMrPLedBfP9Y5K4cBxN
+zPyOzCt8l40G/Z5StgmTYNmbaJMy+Ezm8fWV5P2wQ5YZMHP2rglt9KfMfhu6
+C96z+lVdCPFzVqOYnL88tUABC2Jrl++F9d8ai3S46FfTFn8aHq8oHQqC6759
+3aWCC1IYAXkwryaxXR/1FNqXbuqDmQOt7cFw4sP8i9rW6MfSIqcIHpshOmkB
+965K3jcFf9Luufk13BKX8asv5vFwjarAGmboTKXnwOn0jteGcN2EYrAb/ivv
+vu048su42QId9MWmzTr/O6yOTXflwG7yZ3akHvnPAyEOcHuT8pMEFhoN7LQm
+52BU7LOS1Nvfkz4HDnSijNhwTnBu2yDyl/qKH+vC5q5x4VfhzKjAfdNW5L5d
+dIqDPQ9sHZxJ1vtMnpF7Xv99ndYiUo9dka0G/Rg1t1avgJWHUlTFsPo3g6Ek
+mFFaxyf3JOG5b2QVmWeoliX5nTFf6Gami/7U17KOuZJ5hfqkRcAKXkckubfv
+je8cLIfj60s9BOT7sZxuXR7m6fZ3jQjes1+2OQSOfzHPOg8eEJlFnyM+WVbV
+D3NPmZf1wv7zLXtsUa+XlPVOywb9VpznSUn9aseWr2Dm6swPHfAtRcldK1jT
+2S9lYz7L1OUNLFjI8jHdBhdS8ihdYrPu6kvw+yiNjwb5eZwts7vgsbG7mhpY
+VtBRNAqPBF+0OAb3Tq8Ln4CdXKest8DC7sNfviL3xDmX70zqvcLU/wPm3DNy
+MIFzDCr3k/wbjl3PpsHyxuEqCaxnGG/6HvMQTpW1k/ONdi7JnSbzU1d4v0T9
+hakF98n7oy7jk0Xk/iUx8yk4v7IqTwzPvC45mwzTh8dkrvBYdVNWNannkUhs
+AksDbkbooz+BvGvhTLi8NWvdJphxy8pvBsza8dN6Jayc4XbaGN6ZlWs9ZzHO
+Jag2xAWuGXS7FgZH1csqJbAwgE7lw/nN7g9KyXra9YYe+L+H8/n/ypb6F1+a
+WGI=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.165661129127848, 11.57565554834886}, \
+{1, 0}], LineBox[{{16., 17.00000000000231}, {16., 9.999999999998607}}], 
+        PolygonBox[{{16., 12.9}, {15.6, 14.1}, {16.4, 14.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.9452, 13.5}, {-1, 0}], 
+        LineBox[{{16.000000000007276`, 17.000000000003638`}, {
+         10.000000000005457`, 13.5}}], 
+        PolygonBox[{{13.51826734053906, 15.552322615314452`}, {
+         12.280184249251306`, 15.293188945044921`}, {12.683281069670574`, 
+         14.602165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.823799910437668, 15.984057296392571}, \
+{1, -1}], 
+        LineBox[{{16., 9.999999999996362}, {10.000000000001819`, 
+         13.499999999996362`}}], 
+        PolygonBox[{{12.48173265946094, 12.052322615314452`}, {
+         13.719815750748694`, 11.793188945044921`}, {13.316718930329426`, 
+         11.102165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.823799910437668, 11.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{16., 17.}], PointBox[{16., 10.}], 
+         PointBox[{10., 13.5}], PointBox[{8., 8.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/cgdhef/ifghgihi.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdhef/ifghgihi.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:eJwd1gs0VGsbB/BNqiFFSVFoCA0mDVHqqBlS6WoqNJxC5dZ9KjoKoYhKRe66
+jVBKZahVyGU4XYg0J5RqymCKk2QizhTx/d/PWq1Zv9n7fd7n+e93k+H2/Rv9
+lCmKGsI/8kkpRvGjz6FoBFM5VM2O32p74GLbig4TuOUyv+GjHofiaXRm7YA1
+Fc8stsKRTu22xbCdIPtE90xcF4ZdNtTmUOJ3C2LOwnbPFvZegnUW/Tl2Bay4
+f+2o6TQOxX+u1zqN3H/Y7XsJXKOq30rB1KKnqRunY7+qwtIxcIvlp6BuWJBr
+pGUA07UWJEXooN7Jtuh1pJ7hGEs1XfT5Qav6HBwY6NR9EvaJXfHwA1k/Q67W
+B9ck3Cu2Rb/yVxcTnGdwqPRPRg8SYYZylm8cHMIzOfQVDrR32y2Ei30XVXEw
+v8LELVEES4c3lZyCI8d61pfArAfr+6phKZWoeQUWrG4t7IJ9Ar8s5sM6tj+1
+FbBz3obv82HN/Q02vTBnk+XRHvRD36tu/YLU39gbn0X6l+x0vgALz97Vd4MZ
+rJnP2LD8nZXpRF3Sx+oxLejPLiF/XwPmF2+3WuoFFyuu8i7DLRZDka8xb2T0
+krvh5PqX/v3LSR5uTiEHYcFhpelkrhazDRJy3VmeWTgTFmUoj82CRSYF/LPY
+p4uprC0h9TJGOCRXxt9RJpb4lEfvTE4l33sv5abAwlOJrAUwbWHG40moE9jY
+r/IVz4n7l+RzKpwXsE6tlDy3WdwQM/TR5XifmQXnzdv2tIo8xxc8B2KfnoaP
+npiDm7KNVgLbLct82gvTLtYv/kzqPXMtDCXnsPpRtgmZS2vngl8wpaXldIjM
+IVE/HmCA7wslx57D6ZnlESI4wTxmrSn6TE/hDyvPQv5XHxyMgrmrhirmEm/z
+r3hN5qvLTeHAfMeEJYbkuY5yefaw8wODw1tgmoZuqxGct/tKWjQsZkl6Bsl+
+Qym5ZE6pJE67DOaNv52eANs1x8YfhjVNmcEHSL6DilFzWPhL7raIrN9T6/0R
+/Wv6LN79L3muxh03Usi5iQ/rOUHOQXVznhuZ16dURZ08jx3er4xggVFYbgzm
+446aKiuRc2ja6TuAfAKb63j95Fwc+LDcB053mTN9GE5/5RFVh/eKW7EsRg/3
+c2kH19rD4qsGMldS/+XxKw/xXtboNO/KIefYivbLAaa7e7qoot/AdycXt+K9
+5jE2v4uEWcx7Oy+Q9/6HW8x45CENKLq8FdYJ7zbMgFn0njYHuOnM1GgdOvYp
+CbJgw5xuMxM/uIUK93CFmV/EAwUw7YTMIYKsz2s4MwjLHTm1ZXDQ3I78BYbI
+Y5P3WFXye6Th/PZ9cGDS00BvWN1cpHsJVpg6DJTC6WF+typgfsWmQ9Mwn/Ns
+h53NMDfX/PYeOOcs11IKF7MjsovJ/JFx7q1wnE1fwwD8+FJ9ZSMs/u+QM52c
+x0GXSlJPwY//aQMzT9VOuQbThFnlVnBOEv1FBLmeUnVEG46fG8D2hAW3PzOk
+qDfV36h1PiylsyQXYF+r3+Ya5P7dagXz4D1a2ue/YV5WZ11BCfqPVpm6ugkW
+JtWU28D8lY6u1TDPwc0rF3nkWeauKiX5tKWe1oRdVQ145bCga3VIqBbOhxbX
+uh6Wxvd4d0/Bfvat4zuJ2SJHP1iq53ViIvanL7a51zOZQ9VvVm5YSuYvNLoW
+B+stHUw/YkjqjJ+/CA60lFqUwaJ2wwwlmE8f+UvFCH00jx9t10ReMmoeF46b
+fOfIB1jYnye5BLNiwsbL4T1TacpdMD0q5qIO1v8YsLOaNxu5Wi6zcYVb/uEx
++DAVR/2+AsuS077kwdIzfiE/YKcdzq/fwF2prkUuZJ6Hvx8MwbzKnsP5sL1b
+1ystY3jINV4Z89t9lfXNguP4JV9d4GLHVl86HJmvO3IOZqbzFdowp8njySNY
+2PJxQAnu0gye0gjrnZRqfEZ9QUdr9itYxfZv7mNigyR2CVyW9WTMVdJ/+U3R
+SS3yd0VwMQTm3/ilYw8zhLy0TTA9+dKK9+hPJI71tybrnWqWBMBiscv66TCH
+M6mmA/NR7cZcFZiWv8bTDQ4LPak1hLyKT7E6RMhvy/srjcOwwCss2QLW2Zey
+QQ33i15kbbTVwFyuzPrZMCt7Ac90EurvGvfbGZbPsw6fPxHzOt+feQTWrK+v
+91XH++Dv/7kI5l7OFokmoP+GjoIfsPBZnWINvFbV/KA98pAbHqCpwny7Tlks
+rPnsDw+FGqnflNoEJ2SVmurgep77axrdBPc1jr3gC28ZflAbAEsTK+rfwHFW
+Tok3yXWzcx67sP9jea5HByz86e6thf6SbRuDtUzRT+zRCbWwYiUzxw4WH5CP
+RGIedds9ehthAedgFUuDnB/3dG84UlZm2wA7WTx230ac8k2FQfJqkenw4HQf
+V43NsHFou+5yUv9tv5wPC47YKJmTesbZaw7Ba4OXiWlwnPmhp1tgTSPTetKf
+IixHby4cFLXPtxymNi53eI798qhZOulkvge1fhPh+BP9HodhlszK0wz9tiis
+gj1hzZej0SaYh+/OClpB1r+7f0cN8/uOyVe1J3lEe15sR557UjvDiaXf+m88
+VMX5KggWOJN68vh1yTT8PySEWekDC161Fx4fjzz0aq9Fw5zyItv4cfh+eFPi
+PXK9PlG9ZCzO8Qxr96+waGNTmwacPvGUy1zMx5eFnEtR4VDDuT6RQSRf2fqO
+tXBgdvH1SpjuVXBqAfxDdslVfQ7OxcjsYS7MWGM4gQeL29alpcNOvrruApiu
+z60ej/qRA5s722HOsWFmGvy1dqVQnwFP0zBciv64N6sU62Eq6Ht7H5xHNzoY
+DAsmv9LPxzzy8LrlCbBI2dt9C+Z1/uOQwVWYft7Me5j4baPFNVh6+HptFPKJ
+35xJz4Q1s2XrZbCN33XzOFi+nW+hjzxDVvV/2gv7/Buwaw45r0Wlq9fB4oBI
+PQruOpGWxiD93coIuY71xlMv2imT+0cOy2bCNQ47b0swjzzL/tMO7H87Pyaw
+FBZkblWcQL/R4WMrLsORk/PdT2Ae2UhTZRzM6mDk7ML8ZffuWoSTvM7SE5Yh
+L7HmY/cwOOFG5k6dMcj37TeDWHLdvOt2vxLOa5dGG6lHrbI+30oh79RxwSJY
+WvjHjLpRNsV6uXfeN1h09L2y3gib4iZO+NeE5OOyL6FymE0ZswUT/Mk8/l6f
+KofYFOPP2OzbJE+9av3Z8HCuX/B/JP+F4RO6f7Ep9bP905zM0P9bVSNtXKe5
+iFUTYGlP7YVMeGrR/DctsM/n3HQ+6lMXV1vomaP+3YLeuN9squzWpN7NsMg7
+7dAr9OOqctT7NLESrVcP/X/9R9uwCBZq89c3wzn5ai4NML3X7H0s5r3fOyHm
+IyxfoOVhrow8rYUd7f9f77f0HhwoGqchIZ6aoT8DecnHHJ1TZ05+3/xU5sE2
+devKC2Gf5BdVAbCeiVNlIhyZVDt3BRy02sxvL9m/zHlpH+oFHbWZvpLsn/RU
+dy8slq7fZEj2b5yhWop+mL8DE0cwL+eGyqaP6DcwfTKjDRakWo+pRv7cy8es
+62A6i81IwfzDjowjFTA1FOywCnkpYn5tLYNFvYrGPgWbqmH+rH9C1pv3vL0+
+iHyWKFm/J/d7nX575AebkvfqBg2TfI8wlSL68Dy8Tw0ySH/H12x8JmdTa9Wz
+rnqTeeqsaqu+san4h4OyKySPO90Xbn9FPzlREhnxHIO5W7rZVI7Sxw3zLFCf
+tn9R8xc2JVR6/jEUjjT0uqSF6zbb6sfWEEd03lLDeuc5knWTmVi/cunD3B42
+Fe3xeqsbzGk/PljTy6a25CdMuwD7dJR5mn1nU3GPAm49gaWcvQHn0K/o+LLC
+bzCdE2o22o88fs63U5+LemrmN/wH2NQeuaJOH6ZPql4nxPzcA9Sx2bBP1Uhz
+zX/IKyqng1wXvZw+4yry4v0t1JhEnGjQZPyTTQna/jo5QPafzLd3gWt+DzNf
+k/1XeUVNJ67tnl9E/KRtSijWx511Hj1D7rdXrwxF/celnyb4k/mqqCuzsL9m
+xJNGR3K/r0sDH/lLXmcUGcPUpGsq4ZjHlZ9cNxEW/Ezrd0X+jzk3v48iL5Fl
+g/F05FV8ZU3SMMnPMS15VyebCmLE3lIheY3Uz2lox/u2w6RIh9QrDln0WoL3
+8RNPYAdHuvF3ipuQT5hZ5w5yPbRwmqAOz7/60tEM4kcdnfoivG8F7pI3xGWz
+ftTcwfPsYzFJPhRX4zTvLPZL1VwSQCwYtV8YVEnlWU+5c4+Y/CSUUyrk05Lz
+P4Clt9A=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.1148, 9.674800000000001}, {1, 1}], 
+        LineBox[CompressedData["
+1:eJw9lglQVFcWhttmkwg08F73Q5QlEhgkstgYAZF5Z3ASFBEQo4IK1coqBEFF
+NpE0AsqA7IM6EEOjAyIYNtkUhBaEFIvQamQUrQpoQkBBGmURWZz7ku7bVV1d
+X73X955z7zn/fz4/Eubhz2axWJfQl/mdevsJffSA9eeHhKvG2prLyYirwnpf
+5BPwbrdxEX9hLbCEa8edXQiwcO76ZqMfYsPyr010CKj5kGD2t841wBqCE8ss
+9H78Gel/TBBn6aTMqhAQW7/DcV2aLlov5kH9BgJ6LyoEG8+vRutprDweSoDd
+wSMR2acQhx/kz3USwPpR1apQEbFVSsyrTSR8dAzkXbmhAyxN/oX+ahIOdA/f
+7ghALNh79rINFxK5xe1GDojdp1VutnIh63joUNIGxELJpwPbeFB4MY+Os0Y8
+NJNh3swDnmdvYoQbYtG34Zu+oEDtUL+jJA6xISdnTyQF2qmSWKqB4WqPsxUU
+pF6vu2c5z7zPsVnuoqBiF/HdDw4oPlZFQejPFIzGLiW3xyPW7P1JWkJB7GSu
+/aYGJv4/BgyCKUgX6zu8GUY8dL5ijqDAIm+kPfsjYsnOY7dKedBmpmVYu8Tw
+q9ZL5jxIC+n+fGIUsSAgoaqUC3b8XHvFJoZdxEmGXHh7c+XLxZPM/jkl9wtI
+sM6qCeBxEYs6D88YknA7VejaLELxSuONDeoJcPYR/xGoy+S/zz1BgO5j2zdX
+Is5RaL3GUPcvCDjdU/Tl2BgPnVedR4IiARl5hUdtnRFbRU5eYxNgY9rcuniT
+i943u9GvT0CCeP9P1RRiUbf11f0ELNUbPT6WSaL1DT66lxFQ/4+Fkes6iN2X
+bXu1SYifdmmYRnGw4CXxLo2EkL6jy6++Qyw0MezncKH+bJzDc3vEkpYtY5e4
+kBpbx1dCcbGGtBay9Hjw4gav041hYUbbV/k8WN/VnhyzBbFgzqlRhYKuWFMV
+C1/EorKsBgEFdTvpny1R3bLE/lm/iCgoJXVOpw8i1qzRG7tPwe40X/6QPorP
+MDbFsoeChce+dOZhxKyjw563KGjSjs7kXWGebx7MiqfA6u1LlksvYsl6jTBL
+Cn4tNnUTvUZc1RQy0MUDjklkgOc0k2+V530PHiRB2a7mEeY8cme1JFxQXz3r
+aSdGLB4qMNvOBXvvgNlTQsTwWq/pHgmibl/dfaaINY1fem8j4VyKCyG9zeS/
+dsDpMQH/qkp0O2HL5LPzyMdIAnTnnvssXNdG/VVgvswnIP29xDhAHbH4R52y
+z9B9HFfqUzumhdZfcJj/pA0prQERyf2a6LwurDxBENAniPrtoA1i997LBv8k
+oPKmRvmlvRyUT1HvlUwCnPg+VsuHNND+Jh427whQzHEeLr6gjvpz0pkMJGFx
+tuiT62s1pl43RY2SMPmU3BoVg1jqrqsUzoWkvqFBc3vEQqUz3DkuBFqtD1W2
+YN534ihH8YC0zm43c0U89FAvA9XdRhf25rQ8xCJejvoOCtaFVf9qtojYsLL8
+cRYFceOPOEnRaP+q1R+87lIw9gujV4ilA9fCeynYd3eD9PR5Dfy8eour4RMF
+Dv5/kfdSV0QwB6/fEnls65NqDt4/JGYgZ/4hB8fn9lzf+NF9Do7/N8nr9pRz
+HJzfQI03q5rLwfn3U3X6B05q4PNJiyrqX3FNHZ+f0ZL026AyNXy+m0c1bbZn
+r8Lnf8+MT80IPsP387Rj2nfESBXfX0Obd6317yr4fgubnBxVq5Tx/Yu3fxCs
+yVTC9dFxOeCZwQVFXD+5pG3PnkoFXF+HJvkE+YmN6+92FOGa/j0b12e3abnf
+eT4b12+tN2HtRrFxfZM+FYdbzdi4/iMe2C0HBrJxf/gkcYYfdbBx/7xYYZsw
+vFUB9xc/17aAblPA/Zco7Ff93VkR92eQdsJxUY8i7l/H2oqpa3ZKuL+FVPS0
+WpoS7n/dfY9OChqUsD6Ia/+dP8OwTD8C/6ucvCNFCevLotoGBVsTJaw/A2L/
+bF6OItanIBNVflWfAtavZ/aNXuuG2VjfJKbuxT9IVmD98/c6L1QuYWF9DFsS
+eun/b5mW62eDcfTug56LtFxf73w9kmo+Mk/L9TducEkguDhHy/VZbLrUoXFm
+hpbr91Ptr/xLyt/Tcn0fL3wRpWb1jpbrf1tqjdYkMUXL/SG2+En0zkNSWu4f
+otI731uqIpb5y/iyn7SRy/Bf/hOxO2nVnmjEMn9qyavUsjRC68n8SzlIdXRK
+Ee0n87fgvbfcMlRRPDL/i68znYc107TcH32+vEteNULxy/wz8tW96Ra1WVru
+r67vH0jN2xDL/Ld0Y9kKDp/J/y9/9kvfET++C7HMv/OXgqfCVyGW+fvfzaJ1
+xvzQ/2X+3+J0pCTNC+0nmw9MyEE6cQLFJ5sfxCOnLO6sR/HL5ouID9L9wWtQ
+vrL5I+J91cREyRtaPp+IK7XjrHpGaPn80ugxVd7ZN0zL55uq8qDcN83PaPn8
+E25ZOvHERULL5yPxw5CF08IWWj4/MVOVUCX/rny++j9tFrxA
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.75, 4.0548}, {0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000001556`, 17.}, {16.000000000002885`, 17.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18., 17.6952}, {0, -1}], 
+        LineBox[CompressedData["
+1:eJwV2Hk81PkfB/CJbRLR5JzkLFeuxlGr09eEVY5GK12Sm9VhEJGEqFiRYoVc
+STX5ReNc2bZEjig7OWJlmZRSW9skJMTv9emfeTwfn+v1fj8+Y77fNL2CdvqK
+0Wg0mQU0GvmkTc3jnypFE5FPOYoW0Xp+iaManDpyPUmeoqlkb1Yqh1nXW39e
+qEDRAr62nlmtTtEKezYyjsL1zb+0VsDUsp6mB3BVnQdbSwPzE/Yc+wqL1muO
+hMCx1f0ucooU7eTlnhsNsChc55MsnG/v1c3QxH4VPupkvvts+dN9cNrgQ6kG
+uDmMo50Pc9pTJI/DGoxrf/aR8RzpE8owR+A+LLES+8++Si5HXlNxyQNGMMc1
+ic6GL728FG8Dcxc3zT9DfcVqDpQznKZ3JN0f7qv9JEvMTR7MloBbbXIlbWGG
+c5FnnSxFm7ZXuGsCe/hdCIqDP2gL1RVh/qEAO0/YJ1MjawJ5hBIJtm7wFLW7
+phOu7z4ZHQrfLt1lwIe5hptLb8CBsv9cS4Njb4rZjMOyG4/wwmHWoHn4Xpzf
+0NZ8ygcWTBq6dsLDTy7IuJH5rbul96Ge24t82txJ/Y+ilv0Lz57wzT9C+tfo
+GxCDfvS7q48kkv3y+z8x0F/RiJU3OV/jn0M3s2HOhcDtr8h8Yc2UnBLm9/ay
+NVCPRilv+gQ8VZAe5Uv6w8m93QYLMp3r+bDgj2QdGpOitWlOp8+T/hyWubcc
+5nVdddqxiqLRtGMZSrDt5oTNeTDV5bbiG9b78GMb38CC2VyVBtgj5WLEai3s
+/yU/LgzmGzfaesMC81d/KME3eh3jL8Ee2ilSZcjLqC8Wq4HrywypLXArK0nn
+KbFeW0gHuS8NESO9MG3u1D0feF+zavtzWNgu85EOV4zd+9wGa0SPW9ehX1qF
+n8arYRbDaF08rHFw+2A2HHuo1tgXHsvqWxJJ8hX/HOQFT06nM12JZ9xEUbDP
+LeNKM5gbrOtK7pvd4Zvn5Mm45fYJGs7bVG6kPEP6saP2jT/5fhT13noHe8iX
+6Q/DDUOZCsOkH0+e9QWing8J5U0jsHDv1v2zcIPEXzkTMMOtpzwN/Zj28321
+jOzfY1unif6u9KDv2QAzNjNP3ILL7t9VO0r6tTPeb+Vy+NKmnv/B1Gazm+fg
+tlUlVz/DhaHZnB741y9Ndpu1keueRrqEMkU7at5vdx4W5Sz8Rx126Hvz9QUZ
+X7fpozJc5V19bbUO6pmNeT6N9aljThUhcOFn/7GHsNt+x4dVsChsRVMozHRJ
+bfgIe9jPdsrD900+yavoYj+GdWAJyfv07eUtsGi3lvcGeN8c864LzPgz8G9y
+306KDKLcyXz7qWFP2EWTH+YGUyfjbBfC+qJvT3cQB0usqyN/P/7avXoDMc2V
+cYbcF0XrbFWyX4Wn4S9wd17c6VmS30qzPAB28XOK/ZvkExRFJcBsLt3mdzjN
++Jb8Pbht6E5kFsz5ZlsjjfNyiifzYsh6k7We4bBeB/P9UVhY8Jo2Rr4/F4zM
+A+BYr6zcKNTj0ibRf5isl9yYLo369fOb+NFkvEJt6Cr8w5X70zkwNRHhbor+
+Ui2HfR7BGmdNVe/CxRk/S3wj8xdcymWtoGjPu9sif0Q9aQxvhQy487XW82jY
+wyS6fAgejvF68RgWrJy4y1CBi7zEl+uh/oNPfteGee22RQFwfU3GGTV42iqP
+XgPTAsycZ7E+4PHT7DmY8ilLeQiLqbHnLVdj/86ynmDYTqqLFQEztFTql8EV
+dK3L12F+dj/vBvK+92xVaYFFL2256+AfpB02DsAaX46bt6De/Nj4BSPE4lcW
+HYRPOvTKDsOUqfCGOPxGM6Ogm+x/xH9tHfpXtzTX9T7Zv+Tw3FnYdaW281VY
+aH3F6gjsMxPxLYbk+2dCKgjuG3v90Q2mDeqpp8B+TIuXG2DBBu5oMywY3HZC
+hZzfFX1OGed1fllq/gM5nys9kgC/Nm+0HEf9HkOKfQuQP0ItKvA/WDQ8uPs8
+8eXoRWS8fuh8rRrqz0+0Ey4keVIPf6qAR18oGGiRvOduvGCjv0XJDolOMCvp
+h7RWOGfyOz2BnJexLWcLfme1KtazGuG03gbrQngq7Q5TUh85m2c63sFVEe3H
+XWGhzfscJn53c8+ZN16H+TkhDgawjLKP4wRMcVr+1oR3Tr/yZRvgvl0bSv6O
+9QmGdyJ/hfndc//Vw3Pb15i2G5B7Rq8Kgq2dPC+KGSJf6qIEGZiS/2vxGph2
+YFVrEfJe2r/54g7ijsAAU3iuxajUGxYqNSQ0ol7zwfyIQ3AsV9fADWb82FTk
+D3ONOmXE4E0FT/32woxHl7fWoX+nT0tFs+E0LQEtCRZN2NC1yX6xWUeDYdlt
+KiHiMKfieUwYnDFe7Skkeaea+n+DZazUEu/DgjGdZ8/gXJnWpELiGm6ALs4b
+96kfSIQ1ggqD02GOv8z/ImHG+qQ7y5D/ie312mMwK7F3cR68b/FKpyi4/pJX
+2xrUbxG4a3Uq6d/69y8b4ZJAl2OlcKE33eRn9JebG9XYB4vU+p/1wktORCsv
+RV6+m9xBBzz3uK6xnHKCC4OF5rfhEvmJgExYNPuE9wU25xerviL9zh9TZuC5
+R+0/0TlTI4x/O+PIhI2jX07FwRbXJcNkYfYu04cdsMdp0dk5rOdJ3nBWNEa/
+094r1sOpGT17XWHB1i6PI/B0kuTr83BaZ4K6FDx5p/twLUzxPrfmI6/5VsuJ
+XjJ+0s/BGP5g1S7zLyxMZLY/QL069ALhZ5hl6Oa0Fz5tUar9ERbZzZ6iwXpl
+71YNwvWdKp516B+XNZnbTMZVBpSSYb/M+Voe7KGYVBkGC3c//nCW5DNpWnIS
+bs1VH/CGOZaOZflwiZTcBjY5z/JYxwD5flid5GmRfPH5e8xxnmKhY5Y0zJez
+pxeR+5vNMpxHP+rZp86S+96xQaA2A1PRleWlcH8WvUwM82lXRloo1D+4fjSZ
+9IuW3FjdDa987/l8Hcw7MFpmgv5ShzoUSB6LK7TgUNjil9/YOcbk98Jo4jb8
+5qe0Z/1kfdSNsRdw4tWC5pVrUJ+Sa8EczPzt4pMgWHDUv0kOz1FH+y2cH8Dc
+d73PlOGOBSY7F7EoWtZDzxdknPWaed4Ibj0feHUe68d1KxnOcGKXWPwQrHt8
+po4Laxh5H62GZwScjGSY2Vn6OB5+4iMtLCTzq5a4OsJCbR8tPpwmkyijANNz
+lrPukvXXtkncQ70MdpfKPZglNRnsCofShx3JOOsTbWoO/ZpwzzxUDlPj4al1
+8II41/3XiXtGt6bA3W095pkwY2E24wQco/DJ/AzMpz+oOA3PTT0oCyXnrUrN
+vkneCyRrZ7zI+JWZobewZe3+Qy6wBzN+txXOr5A/ZbYN5nb7F/HhXM4dTzas
+F7CijNx/Vc6FDgrmHHfWPQg3LsmTs4F5hep9PPjp1e/xO+DCGNnqMTiEdUnP
+A47ILOCvR3/vfE1+EA4HfH49dAIWvYp/cInM39iaVwmLnRAdqCT9cu8oeQmX
+7Lud1Uvq1TW0E8dzrHieMnuOjL987KAEO/Ncl+qYID9/k5kqGT//6KYjPGou
+raEAl2+xrQ6F9frnh+axX0vYzvFM4qDQwUF4zTaDrTUwn7ldvgr+Hhl9RwAz
+E/VFcXBc+KO4Edgu9cf19vDB1e9txuHYjvyPsrD7XJ1gFk7ce1FtAPWO/v7B
+ap6sl9jTfgtWGC0QI+MUnfrzFMxjHa3/AkvcW+Z3AL45QPm+JU653vATHLBw
+55I+Uo/DFNsSlooYGG82Ic8nQ7XWcKSPcmg13Gqm77QHTln7k7CY5LtQdjqS
+zO/3+ZXUx7ljb3oT/lp6rjiZ5PW6WUTub9Skr8UZuHDBt8sayK/Y0rc8AQ5I
+eR/kDxsOvB5IJPvvdrAqh89mNHakw30vVeen4Wuq1Bg5ry/ANs8K/a3qzpj/
+g8w337r2NKx9u82f5C9kyq6ug3cphez/RuqvqmS/hUPSfLpVTXG/Jh53LMJz
+c6Tx8iJrOEBbtlwZXlP29fhheE9DY7A67G39fTbdlLwvmm5VhO1vT764C+u9
+CZkn7zVq/yZ3DcDMLjm1QXhxvFvTDGwRFVlUAVcahTcqmOF7WJMnHgvLrUxY
+oQ/rDXnLbIODuKyDFrCE/XAjA2b9tfMXCtYY+3FtP+oVry47yIY9yq6682Dt
+7wblW2BOXLL4KbiyuICxjqx3cEo5ADeEeR9eDceq6f9nB6c3ab5aTs437U+y
+ghfP7q+RgHmbBrTIuPeg48avJL+8+Qvy3rjG9lXbG1JfvbJ6DPl7pR5X3gdL
+lPAelMKr8N7dAdM69b++gX3Zu5Rb4b7b4bF6yL/IxiW4BaZMNlUEwTuihRVP
+YFacdMFd+DvXSofsV/s6x0Ic/XyrY9j6juynG3VsG5zU9W77AuRj8pq4SbCK
+YG65GsyPb8qsh1981/a0hGsnVtV9gN3OOSj6wFPZsmZL8N5i9rsCPZnUa79h
+TJW8ty3hDFfAo9xTKZpw6E+lzv1wWt+0tRI8S/4fg6wnn6uo/wPv2Bb8
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.502886362674069, 4.972562773393563}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl1gs4lGkbB/DRN0kqTTk02tmJIlOpUEkO9Va0oxymkSUmjRArNGVrbfQ1
+4nOISq1Escl5Zm05pEbJYRsbkUaIYjOWighJPruLvv9zfXNdrvf6Xe97P899
+38/9ztA/dJTvN4tGo2Xhj1z//zGhaHRyNaBojIm8RStgVvx0X98KiiZsany8
+E87s9bpQCcse5fwjhCNCvOTn4UKb0sIf4dTnnjUusOBI1bzzsGD0mMFiuGJQ
+GnUNNtCv7n6ynKL5tjVV3YStxZwVYpgTl3o7Cy4qPmK7EZbLt8ZmwLY++bkD
++hRN6RD78DLM9XS6ngWP+pepRpH1z93le8Pusg6Ho3AXw+W+EdwVrsh1h4dq
+MoL+q0fRTPxE31BwjnXKz80wI4d7yojke+LK4nuwLOFmwkJSv+VsRgHMG4z9
+96f1WP+ZqzAHFtq5RDXB/dn8vb/AajXu5iWwbVhFxQM4M/eMfSas90+bVivM
+rfWeToOth/afGCM+e0OT3Oc80ZdpIT8TnZ9/J/F3Wq8nWsDi5eqPm+HUaMYl
+T5hRtGXbFFxXlx0UDid6GoQwkZ9ox0T/FTg6YNewOWxc5KQugTmW3pdIveM3
+dhqWwpTtpZUR8FTe5GgJbGBZ4p9J4qVGV/JhtcPcOXLSv3RBaRJccPx+5Rs4
+OnomMASedKQEdFOKxhT/5bYdNh4bfsaGOSuZieqwbxx/80a49f2+qAbUl6jN
+fLcTTl+frRkDizUOHHeErR173K3hvp59t3nw5NMMq55lyDN3UTm5z3urGrMb
+jjgsGLYl9vtgX86maGGlkg/mcEFdMN0MLpJ+e8EAdu9prJV9jbyOhLVrwB2e
+urP3wvTArPEJ5G9S4nZqmoV5FLBXvYZlrDZaNWzho/9bLdwx0nc2DR5dfkXt
+Nhz2pW8kHrbVYGy4DgsjPlsnwfK5Ke4JZD0dgUgK16mW+IphZb/2vTY4Ojhw
+QTgc11wYpYH9G4dONxAnvfxyhwcr3W3azsLUY7dHV2FZlSUrCVZb1/XxNdw/
+9tYxGxbHOp7VR32UQqf9Adw/9KzfA07ttX/fQfJnX5qOgaeGg+P+guvy1qzO
+YpP5q0pgoX7h6vYkCVwo5d+hYPHJ8jXX4ehXZWW+cHWeSu8J2EKy3C4WDnDp
+TN0Cm9DSjPKJi++ufod81B44b3tE+m/T7i+Gg9a/vfoKrnt7cXoO7JvWLBoi
+65fQPSJR/1BIst0kzD1fHDP6FUXbV+vXMk3OYylvaj/M/aTOIraonzn221KK
+prVT7jdBnt9WJVkH82IcLd7DlNEZ62xdnDNf0+0leX5Fr78BHGbTJZOTebOb
+7C5jYr/t20//SuqNrM3zgOVBAcpkuMjs5KAWzByIXRtBns+KGnuzhKIpGuVF
+pH4Tq545TXDH33MkznBcU014I0w1+1huJfnImNJuuF/vhrcpia+Inj8b66UL
+gwdWkX7MKF23wA7l9d4cePSgc0oYXLipRXct6a/ZhsOVsFA9mGVB6kn8RkcV
++edUP15vT+Ifyv/cDSv3drQfhPuHDxvFwfS9WZ7hJH4J+3I5PP/YV0+vkf27
+bPidcJeAr/mQ3O9cteM97KAfOKEk+b6/O7cPrg58ZzzbDHOyqn7zY7jVv/I7
+DhyWpsP/CWYpYwPtYeFB71dcuOLbHbP94QLzUe4A8uVOqG0SwzxO5NRJONl1
+k2Eyud/pp/cZ/dgYcNwyC2ZE9sX7ww5+B3SlcNIHtwvPddBPTpD0F5j2oqPF
+Eo72H16aD9c1nGDnaiPuHrszHVYuM2TpwEkX3NPOw0UJEtPLWvheyMi3PEXi
+e6/u/hpuVKg0+5B8suJv3ddE/3pTLu6BLfyc/wiC1czLHprBmcWS0E2wA6el
+YCnM5BfrasMBZ1xT6CS/8lvh8+Ap41tlH8n3BfOW4xKYmnVEs5fMe3XBfnPY
+OKnmPJk3PSPJVT/itdoNbeR59p9ON+FE8WuzDlgk4G19Q/af2D5A+l+3ZU2D
+MfKVm//n6QjMMFq9IRSmvv8+nOyv+OFUdSkscihwZpP8I9dND8CphadDrGHu
+pfHeRdrkPQp9eoDUI1WZz4FHveK3RpLzYvKaVsE5OstO55L45GuHtOEwr2dW
+9bDs1Ysxsl6HNN9skPTL2SMnHw76bLhWfQPy3G2b4gwrdh1aYgjzVLe19SJ/
+sU/rXCu4v51l5w/LP2502QPrOe+K/GMx5m2JhtgVHj3FL9sNF70sOLgfVm4O
+O1q6CL9TLvqqbjCj/EkIC7bQSmhwgt29vI+eY2D/8XXc7XBHxM0JFbgxfp7T
+erjaoHKnxkKch013ty7ZT6t7zFID7yWdvXIWrFCYJl9cgOv+PYcGUI+JOn0B
+A77TsKNHQeZD2eNTOR/7dNI/lJP+jJyWXoPTPbIrSX948vGpLFg0+lZ0hfRz
+5HhKCxwQt208nsTPeP69EutZ2EfRo83IeZuapMCtI4N6xElu0oW6yKfwgyTm
+HCz69VFaHpweyl13lczrlnGPTcg/tWumQULiq7yeP4BlM4PPa8j7sqshiIl6
+DQyY4a/hyQE7+i641XCqfgYOWHFLzQdOyjbJ0Ee9wlCNuCBYVKe4a0f643rN
+Twhrhc5t+I7cnyUX2cBD1dSFRJj5wub4v2CByOpRIUzFFgsOY//MtFxuPTkv
+lT3l6ciX1hNo2AMX8f1X30Z9NCu3nz6R9Y/+EJCDfgxpJc6hbUS8fUtg9Dys
+FxBsoQorlpcy3NUx/4O1esTKCttqzlyc1xd8yHmT/wfVqP8BWpudvQ==
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.57964504524893, 4.283992682631731}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl1g041NkeB/AxtxUKs0iIjCivSUxCrcZL5KUoTDbqqiyjuEaJiUIScsUo
+yYZ2vFRTVFLKSlJUREVYE2rH646yGkIKu/d79s7zeL7Px5n///z+v3POH519
+4Tt+olIolAr8kPz/ZzmTYkBShUlJGKGvfazFpBwbVbE9B7fKtawugN03R3mZ
+LcF4mYidA89V/3K5jbhkhegG3HpoYn+EKhyUrTgAm4WPtMkuZVLq2hfNWOD+
+MhXbeOfh8qs3rApgvbGmPkU1XDcna6Ohjfkk/n9EwgGsO+zLcKRuU9tj2FfO
+3FaTjvkPB383BXMVlAOD4Owd10wV1JkUWl/t8xuwVfsPTsR1RSamn+CkkStJ
+X/B9/v5agb4Ok7Ig9v3mlzDv2dVqb5huFPX+HCwTKeBGkvF2n0BPUs/QqcJT
+sMr67jAZMp61+GYK7H8688Vj1M/jtHTFkPE8FetEWCS/QTUANlvTpeUBc5P/
+rWQNe09ss10NCwsvfy8DJ9joJtFhtY4h4WvUJxyzbzaG2eHKp8/BAdUHHnrC
+VSyvaBbcOPyhJhNuNeFSyfPT19b8/geZv3RB6yv0J91Dd5ZF+jXIWxcNM/s8
+Hr1VI+t3y8YSriu40HcQ/Qgw6a1XhPMnLbxkNJgUibbjfmlY6NV44hpMi55d
+vwxmDB+95LIM99Eo+30rPOkmL+6HJXHHY/Nhycudk+GaTIrgt68DUqjHbODH
+qY9wVbxr8SZYwuBN78C6i/wKHyTB5cMHFYtgmjpD8RU8WBqW2gV77mG6qpH+
+M+XGJ2DmhTh50j92tN3KKdiXqq9eRNYjqdBeBHOZgVE9sFqbw5n7sKBtRYHs
+Cialw1HLKR4Wsv2yjWDRg3uRG2Hx4Y2LfoC9W6hXJ1EfT2sihAknRJ68foPU
+P2j5lgE3rHS2D4Nndrozl8Hl4aHvrODUZ0espzCfXnHH9iWwpDRlvgE28OJe
+koYbvXnOZ+DGuPAqRZg5RzXfTiy9/idzuJyro6gCd1Sq6JF+0T0KbN/i+QXN
+1fpPYY4gnVoCq2gdDzBHvQa7hD7RpF91OTl3YLX/rnvmAzuyzM854pyo7eR5
+2cHe4UYsEcyPSGFtgA0kHT4nyLrn2YY7wiWtnf00ZK7d/uP+xFKrJLuRFIum
+wkSkzb0MtctIbn2aSyX5vdfM6ABZN/vl9hPIBS2ZbLIuag4BnZbIoMrTcnZk
+XYpNRuOR4p89RvyRMvda1r1AbulfUXsQKdrksEMJ/TurUigOI78v2TXvDV+h
+zocEkuupnlaZ8EaOkdATrutdyKmFTaP5LutgmuFQgYisF7vShvTNU4e/dxKW
++IrDJKiLH9Ou9BUumS1rbIF93QOaxuCxshjTMph9+wf/32CblCm/LNJnZj3r
+Nlw7KN0QB4tbpgdPwIcoRZwoWC1MeN8Vni55Ij5KzqFYfkAB7vcb10yDPW2K
+K9vIeS3Z7HeVXH+5IzOH1LUv3q2NfL9j7j7Zr5wHIZ+lkTPcFjMLZJKMZ70T
++V6l6CwNaXJq+FoGuc+loo/fcJ2/2zXTXlhSr1r8mdRxdG+WCebl638MmSXr
+EWH75zG4qllgpkSus6rf/QIWbj5qsB5eHFSuq6SLfRIR9ZJN5ldXbtwOt6ZQ
+vpXAFVq/bkiBKSW61BGYF8wdL4fpQzc71+I+7j9+G38JCydc9Mk81xkK4new
+r0pOTgP8rWZIrw+mOdv1LET+xZbOFyI9e4bG7JGaibpdT5FVGXyLw0j+s2P9
+15E8vYjzOciNp2rM05Bqcw9KSpHJH4tOBSHFzy4KbiPTtio8IvfJ/VNJIECy
+PJY36CAFFjUhWcjIF84saWQqtTckDOk9tEYygbrMgg8/t4XvaihcGYG3rFlr
+KAN3yBgsGiXneo6f14IMmK3SmiUOczpA9lvosc02S0k/WNlTXrD06zlVJmy1
+VpiiRfbLrf3PI+G6Q5uMP5F109NovEP6GaFwshl+0bZKaZb0gzpz7S78RP8N
+Y4se6uE4LC2Da0efR+bC/IdL0yvI9+UnxsRw6pdu2UbYqMvjoeVK8n6jv/kI
+axh/XhYP0x/rczQxf6u1W/ojuFGD07yT7E/R18kpMj4UbZ8HC74rqKGvQr7f
+2jIAR4nWvbeFPf1ctU1Jn54YTnvAqSypnig4+46lszfMd2DdqSbro6h13x1O
+WJJ+cRou22ZYbwPzZK3F+qjT/5VZGLk/9/TqWHd4VeWkDgWmjRd07INN5M0v
+9q4kfWUYH4BVRCP3q2Duo2VHyLhEOX/vBTK+J5pNrufdc9kdCwtUWYcMYVdl
+1dXBcB0rvoT0scbC5ZM/bJWlkEf2UfJeN4c9sIRp6Ef2jdH8OCOU+ATXZCvM
+ubJyTQqckLg9/HvyPIz06ZuwTHxRRDf6wZ2PKeuHzYRNjqXwcNDibvI8YueI
+nGTyPpluTgwm/eoJyPgPzGMssr0L10n9VREI087n+yzQx3l439kZAmuGh4q9
+YYm/sWwc7Blnq1hMxv0UfuHDGU+rpUZhGm+heStckSuxXm2AurZ8uCdH9pV2
+WnYgzEkU55D6aydVQnkwxTm/9TycfuRfN2/BtKyA5SL4Jn+X+DGc6kCjk35Z
+mu/xeA4LTqgmh8EVUp+r62Bf2dIN1+HBs2/z/rl+QDujF47scx05D7ducvOg
+og/Dqf0Lo2BJE2tcHc4vVy3dAc+MZl1cAXfvqq8wNSB/51zNNOG05ARpeVK/
+to7vQjj3aA5HgucLyGgKH8L9NRzYMT0we74gtgrOeK3u3gozY4YWn4TzH8pn
+EfNpKjrkXPSf/HnfO5h37sqsHNwQ+7f1F5i+K2HuFVn/d3s/aGE+9pd3kRfI
+uXKaK/KE68yox4PhuPGUr2fgqm2/ttjBiTVOc+2wVcv1XAMy7vDalW6I+fUZ
+UVpkPxjuYXBgNTOGM3mPyIkMu+tgg55GUwY5D11Ub0Uj8v9kZqYPfCA6tNMX
+zi0/ppxE3mtUn7aL8JY3H2oekveQRolGO/zPB/UrkTRm/g8iD+gn
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.867783472564531, 9.687357802186902}, \
+{1, 0}], LineBox[{{16., 17.00000000000231}, {16., 9.999999999998607}}], 
+        PolygonBox[{{16., 14.1}, {15.6, 12.9}, {16.4, 12.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.9452, 13.5}, {-1, 0}], 
+        LineBox[{{16.000000000007276`, 17.000000000003638`}, {
+         10.000000000005457`, 13.5}}], 
+        PolygonBox[{{12.48173265946094, 14.947677384685548`}, {
+         13.316718930329426`, 15.897834175673825`}, {13.719815750748694`, 
+         15.206811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.823799910437668, 15.984057296392571}, \
+{1, -1}], 
+        LineBox[{{16., 9.999999999996362}, {10.000000000001819`, 
+         13.499999999996362`}}], 
+        PolygonBox[{{13.51826734053906, 11.447677384685548`}, {
+         12.683281069670574`, 12.397834175673825`}, {12.280184249251306`, 
+         11.706811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.823799910437668, 11.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{16., 17.}], PointBox[{16., 10.}], 
+         PointBox[{10., 13.5}], PointBox[{7.5, 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}]},
+       "\"afbf/cgdfeh/ifghgihi.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdfeh/ifghgihi.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:eJwd1gs0VGsbB/BNqiFFSVFoCA0mDVHqqBlS6WoqNJxC5dZ9KjoKoYhKRe66
+jVBKZahVyGU4XYg0J5RqymCKk2QizhTx/d/PWq1Zv9n7fd7n+e93k+H2/Rv9
+lCmKGsI/8kkpRvGjz6FoBFM5VM2O32p74GLbig4TuOUyv+GjHofiaXRm7YA1
+Fc8stsKRTu22xbCdIPtE90xcF4ZdNtTmUOJ3C2LOwnbPFvZegnUW/Tl2Bay4
+f+2o6TQOxX+u1zqN3H/Y7XsJXKOq30rB1KKnqRunY7+qwtIxcIvlp6BuWJBr
+pGUA07UWJEXooN7Jtuh1pJ7hGEs1XfT5Qav6HBwY6NR9EvaJXfHwA1k/Q67W
+B9ck3Cu2Rb/yVxcTnGdwqPRPRg8SYYZylm8cHMIzOfQVDrR32y2Ei30XVXEw
+v8LELVEES4c3lZyCI8d61pfArAfr+6phKZWoeQUWrG4t7IJ9Ar8s5sM6tj+1
+FbBz3obv82HN/Q02vTBnk+XRHvRD36tu/YLU39gbn0X6l+x0vgALz97Vd4MZ
+rJnP2LD8nZXpRF3Sx+oxLejPLiF/XwPmF2+3WuoFFyuu8i7DLRZDka8xb2T0
+krvh5PqX/v3LSR5uTiEHYcFhpelkrhazDRJy3VmeWTgTFmUoj82CRSYF/LPY
+p4uprC0h9TJGOCRXxt9RJpb4lEfvTE4l33sv5abAwlOJrAUwbWHG40moE9jY
+r/IVz4n7l+RzKpwXsE6tlDy3WdwQM/TR5XifmQXnzdv2tIo8xxc8B2KfnoaP
+npiDm7KNVgLbLct82gvTLtYv/kzqPXMtDCXnsPpRtgmZS2vngl8wpaXldIjM
+IVE/HmCA7wslx57D6ZnlESI4wTxmrSn6TE/hDyvPQv5XHxyMgrmrhirmEm/z
+r3hN5qvLTeHAfMeEJYbkuY5yefaw8wODw1tgmoZuqxGct/tKWjQsZkl6Bsl+
+Qym5ZE6pJE67DOaNv52eANs1x8YfhjVNmcEHSL6DilFzWPhL7raIrN9T6/0R
+/Wv6LN79L3muxh03Usi5iQ/rOUHOQXVznhuZ16dURZ08jx3er4xggVFYbgzm
+446aKiuRc2ja6TuAfAKb63j95Fwc+LDcB053mTN9GE5/5RFVh/eKW7EsRg/3
+c2kH19rD4qsGMldS/+XxKw/xXtboNO/KIefYivbLAaa7e7qoot/AdycXt+K9
+5jE2v4uEWcx7Oy+Q9/6HW8x45CENKLq8FdYJ7zbMgFn0njYHuOnM1GgdOvYp
+CbJgw5xuMxM/uIUK93CFmV/EAwUw7YTMIYKsz2s4MwjLHTm1ZXDQ3I78BYbI
+Y5P3WFXye6Th/PZ9cGDS00BvWN1cpHsJVpg6DJTC6WF+typgfsWmQ9Mwn/Ns
+h53NMDfX/PYeOOcs11IKF7MjsovJ/JFx7q1wnE1fwwD8+FJ9ZSMs/u+QM52c
+x0GXSlJPwY//aQMzT9VOuQbThFnlVnBOEv1FBLmeUnVEG46fG8D2hAW3PzOk
+qDfV36h1PiylsyQXYF+r3+Ya5P7dagXz4D1a2ue/YV5WZ11BCfqPVpm6ugkW
+JtWU28D8lY6u1TDPwc0rF3nkWeauKiX5tKWe1oRdVQ145bCga3VIqBbOhxbX
+uh6Wxvd4d0/Bfvat4zuJ2SJHP1iq53ViIvanL7a51zOZQ9VvVm5YSuYvNLoW
+B+stHUw/YkjqjJ+/CA60lFqUwaJ2wwwlmE8f+UvFCH00jx9t10ReMmoeF46b
+fOfIB1jYnye5BLNiwsbL4T1TacpdMD0q5qIO1v8YsLOaNxu5Wi6zcYVb/uEx
++DAVR/2+AsuS077kwdIzfiE/YKcdzq/fwF2prkUuZJ6Hvx8MwbzKnsP5sL1b
+1ystY3jINV4Z89t9lfXNguP4JV9d4GLHVl86HJmvO3IOZqbzFdowp8njySNY
+2PJxQAnu0gye0gjrnZRqfEZ9QUdr9itYxfZv7mNigyR2CVyW9WTMVdJ/+U3R
+SS3yd0VwMQTm3/ilYw8zhLy0TTA9+dKK9+hPJI71tybrnWqWBMBiscv66TCH
+M6mmA/NR7cZcFZiWv8bTDQ4LPak1hLyKT7E6RMhvy/srjcOwwCss2QLW2Zey
+QQ33i15kbbTVwFyuzPrZMCt7Ac90EurvGvfbGZbPsw6fPxHzOt+feQTWrK+v
+91XH++Dv/7kI5l7OFokmoP+GjoIfsPBZnWINvFbV/KA98pAbHqCpwny7Tlks
+rPnsDw+FGqnflNoEJ2SVmurgep77axrdBPc1jr3gC28ZflAbAEsTK+rfwHFW
+Tok3yXWzcx67sP9jea5HByz86e6thf6SbRuDtUzRT+zRCbWwYiUzxw4WH5CP
+RGIedds9ehthAedgFUuDnB/3dG84UlZm2wA7WTx230ac8k2FQfJqkenw4HQf
+V43NsHFou+5yUv9tv5wPC47YKJmTesbZaw7Ba4OXiWlwnPmhp1tgTSPTetKf
+IixHby4cFLXPtxymNi53eI798qhZOulkvge1fhPh+BP9HodhlszK0wz9tiis
+gj1hzZej0SaYh+/OClpB1r+7f0cN8/uOyVe1J3lEe15sR557UjvDiaXf+m88
+VMX5KggWOJN68vh1yTT8PySEWekDC161Fx4fjzz0aq9Fw5zyItv4cfh+eFPi
+PXK9PlG9ZCzO8Qxr96+waGNTmwacPvGUy1zMx5eFnEtR4VDDuT6RQSRf2fqO
+tXBgdvH1SpjuVXBqAfxDdslVfQ7OxcjsYS7MWGM4gQeL29alpcNOvrruApiu
+z60ej/qRA5s722HOsWFmGvy1dqVQnwFP0zBciv64N6sU62Eq6Ht7H5xHNzoY
+DAsmv9LPxzzy8LrlCbBI2dt9C+Z1/uOQwVWYft7Me5j4baPFNVh6+HptFPKJ
+35xJz4Q1s2XrZbCN33XzOFi+nW+hjzxDVvV/2gv7/Buwaw45r0Wlq9fB4oBI
+PQruOpGWxiD93coIuY71xlMv2imT+0cOy2bCNQ47b0swjzzL/tMO7H87Pyaw
+FBZkblWcQL/R4WMrLsORk/PdT2Ae2UhTZRzM6mDk7ML8ZffuWoSTvM7SE5Yh
+L7HmY/cwOOFG5k6dMcj37TeDWHLdvOt2vxLOa5dGG6lHrbI+30oh79RxwSJY
+WvjHjLpRNsV6uXfeN1h09L2y3gib4iZO+NeE5OOyL6FymE0ZswUT/Mk8/l6f
+KofYFOPP2OzbJE+9av3Z8HCuX/B/JP+F4RO6f7Ep9bP905zM0P9bVSNtXKe5
+iFUTYGlP7YVMeGrR/DctsM/n3HQ+6lMXV1vomaP+3YLeuN9squzWpN7NsMg7
+7dAr9OOqctT7NLESrVcP/X/9R9uwCBZq89c3wzn5ai4NML3X7H0s5r3fOyHm
+IyxfoOVhrow8rYUd7f9f77f0HhwoGqchIZ6aoT8DecnHHJ1TZ05+3/xU5sE2
+devKC2Gf5BdVAbCeiVNlIhyZVDt3BRy02sxvL9m/zHlpH+oFHbWZvpLsn/RU
+dy8slq7fZEj2b5yhWop+mL8DE0cwL+eGyqaP6DcwfTKjDRakWo+pRv7cy8es
+62A6i81IwfzDjowjFTA1FOywCnkpYn5tLYNFvYrGPgWbqmH+rH9C1pv3vL0+
+iHyWKFm/J/d7nX575AebkvfqBg2TfI8wlSL68Dy8Tw0ySH/H12x8JmdTa9Wz
+rnqTeeqsaqu+san4h4OyKySPO90Xbn9FPzlREhnxHIO5W7rZVI7Sxw3zLFCf
+tn9R8xc2JVR6/jEUjjT0uqSF6zbb6sfWEEd03lLDeuc5knWTmVi/cunD3B42
+Fe3xeqsbzGk/PljTy6a25CdMuwD7dJR5mn1nU3GPAm49gaWcvQHn0K/o+LLC
+bzCdE2o22o88fs63U5+LemrmN/wH2NQeuaJOH6ZPql4nxPzcA9Sx2bBP1Uhz
+zX/IKyqng1wXvZw+4yry4v0t1JhEnGjQZPyTTQna/jo5QPafzLd3gWt+DzNf
+k/1XeUVNJ67tnl9E/KRtSijWx511Hj1D7rdXrwxF/celnyb4k/mqqCuzsL9m
+xJNGR3K/r0sDH/lLXmcUGcPUpGsq4ZjHlZ9cNxEW/Ezrd0X+jzk3v48iL5Fl
+g/F05FV8ZU3SMMnPMS15VyebCmLE3lIheY3Uz2lox/u2w6RIh9QrDln0WoL3
+8RNPYAdHuvF3ipuQT5hZ5w5yPbRwmqAOz7/60tEM4kcdnfoivG8F7pI3xGWz
+ftTcwfPsYzFJPhRX4zTvLPZL1VwSQCwYtV8YVEnlWU+5c4+Y/CSUUyrk05Lz
+P4Clt9A=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.1148, 9.674800000000001}, {1, 1}], 
+        LineBox[CompressedData["
+1:eJw9lglQVFcWhttmkwg08F73Q5QlEhgkstgYAZF5Z3ASFBEQo4IK1coqBEFF
+NpE0AsqA7IM6EEOjAyIYNtkUhBaEFIvQamQUrQpoQkBBGmURWZz7ku7bVV1d
+X73X955z7zn/fz4/Eubhz2axWJfQl/mdevsJffSA9eeHhKvG2prLyYirwnpf
+5BPwbrdxEX9hLbCEa8edXQiwcO76ZqMfYsPyr010CKj5kGD2t841wBqCE8ss
+9H78Gel/TBBn6aTMqhAQW7/DcV2aLlov5kH9BgJ6LyoEG8+vRutprDweSoDd
+wSMR2acQhx/kz3USwPpR1apQEbFVSsyrTSR8dAzkXbmhAyxN/oX+ahIOdA/f
+7ghALNh79rINFxK5xe1GDojdp1VutnIh63joUNIGxELJpwPbeFB4MY+Os0Y8
+NJNh3swDnmdvYoQbYtG34Zu+oEDtUL+jJA6xISdnTyQF2qmSWKqB4WqPsxUU
+pF6vu2c5z7zPsVnuoqBiF/HdDw4oPlZFQejPFIzGLiW3xyPW7P1JWkJB7GSu
+/aYGJv4/BgyCKUgX6zu8GUY8dL5ijqDAIm+kPfsjYsnOY7dKedBmpmVYu8Tw
+q9ZL5jxIC+n+fGIUsSAgoaqUC3b8XHvFJoZdxEmGXHh7c+XLxZPM/jkl9wtI
+sM6qCeBxEYs6D88YknA7VejaLELxSuONDeoJcPYR/xGoy+S/zz1BgO5j2zdX
+Is5RaL3GUPcvCDjdU/Tl2BgPnVedR4IiARl5hUdtnRFbRU5eYxNgY9rcuniT
+i943u9GvT0CCeP9P1RRiUbf11f0ELNUbPT6WSaL1DT66lxFQ/4+Fkes6iN2X
+bXu1SYifdmmYRnGw4CXxLo2EkL6jy6++Qyw0MezncKH+bJzDc3vEkpYtY5e4
+kBpbx1dCcbGGtBay9Hjw4gav041hYUbbV/k8WN/VnhyzBbFgzqlRhYKuWFMV
+C1/EorKsBgEFdTvpny1R3bLE/lm/iCgoJXVOpw8i1qzRG7tPwe40X/6QPorP
+MDbFsoeChce+dOZhxKyjw563KGjSjs7kXWGebx7MiqfA6u1LlksvYsl6jTBL
+Cn4tNnUTvUZc1RQy0MUDjklkgOc0k2+V530PHiRB2a7mEeY8cme1JFxQXz3r
+aSdGLB4qMNvOBXvvgNlTQsTwWq/pHgmibl/dfaaINY1fem8j4VyKCyG9zeS/
+dsDpMQH/qkp0O2HL5LPzyMdIAnTnnvssXNdG/VVgvswnIP29xDhAHbH4R52y
+z9B9HFfqUzumhdZfcJj/pA0prQERyf2a6LwurDxBENAniPrtoA1i997LBv8k
+oPKmRvmlvRyUT1HvlUwCnPg+VsuHNND+Jh427whQzHEeLr6gjvpz0pkMJGFx
+tuiT62s1pl43RY2SMPmU3BoVg1jqrqsUzoWkvqFBc3vEQqUz3DkuBFqtD1W2
+YN534ihH8YC0zm43c0U89FAvA9XdRhf25rQ8xCJejvoOCtaFVf9qtojYsLL8
+cRYFceOPOEnRaP+q1R+87lIw9gujV4ilA9fCeynYd3eD9PR5Dfy8eour4RMF
+Dv5/kfdSV0QwB6/fEnls65NqDt4/JGYgZ/4hB8fn9lzf+NF9Do7/N8nr9pRz
+HJzfQI03q5rLwfn3U3X6B05q4PNJiyrqX3FNHZ+f0ZL026AyNXy+m0c1bbZn
+r8Lnf8+MT80IPsP387Rj2nfESBXfX0Obd6317yr4fgubnBxVq5Tx/Yu3fxCs
+yVTC9dFxOeCZwQVFXD+5pG3PnkoFXF+HJvkE+YmN6+92FOGa/j0b12e3abnf
+eT4b12+tN2HtRrFxfZM+FYdbzdi4/iMe2C0HBrJxf/gkcYYfdbBx/7xYYZsw
+vFUB9xc/17aAblPA/Zco7Ff93VkR92eQdsJxUY8i7l/H2oqpa3ZKuL+FVPS0
+WpoS7n/dfY9OChqUsD6Ia/+dP8OwTD8C/6ucvCNFCevLotoGBVsTJaw/A2L/
+bF6OItanIBNVflWfAtavZ/aNXuuG2VjfJKbuxT9IVmD98/c6L1QuYWF9DFsS
+eun/b5mW62eDcfTug56LtFxf73w9kmo+Mk/L9TducEkguDhHy/VZbLrUoXFm
+hpbr91Ptr/xLyt/Tcn0fL3wRpWb1jpbrf1tqjdYkMUXL/SG2+En0zkNSWu4f
+otI731uqIpb5y/iyn7SRy/Bf/hOxO2nVnmjEMn9qyavUsjRC68n8SzlIdXRK
+Ee0n87fgvbfcMlRRPDL/i68znYc107TcH32+vEteNULxy/wz8tW96Ra1WVru
+r67vH0jN2xDL/Ld0Y9kKDp/J/y9/9kvfET++C7HMv/OXgqfCVyGW+fvfzaJ1
+xvzQ/2X+3+J0pCTNC+0nmw9MyEE6cQLFJ5sfxCOnLO6sR/HL5ouID9L9wWtQ
+vrL5I+J91cREyRtaPp+IK7XjrHpGaPn80ugxVd7ZN0zL55uq8qDcN83PaPn8
+E25ZOvHERULL5yPxw5CF08IWWj4/MVOVUCX/rny++j9tFrxA
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.75, 4.0548}, {0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000001556`, 17.}, {16.000000000002885`, 17.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18., 17.6952}, {0, -1}], 
+        LineBox[CompressedData["
+1:eJwV2Hk81PkfB/CJbRLR5JzkLFeuxlGr09eEVY5GK12Sm9VhEJGEqFiRYoVc
+STX5ReNc2bZEjig7OWJlmZRSW9skJMTv9emfeTwfn+v1fj8+Y77fNL2CdvqK
+0Wg0mQU0GvmkTc3jnypFE5FPOYoW0Xp+iaManDpyPUmeoqlkb1Yqh1nXW39e
+qEDRAr62nlmtTtEKezYyjsL1zb+0VsDUsp6mB3BVnQdbSwPzE/Yc+wqL1muO
+hMCx1f0ucooU7eTlnhsNsChc55MsnG/v1c3QxH4VPupkvvts+dN9cNrgQ6kG
+uDmMo50Pc9pTJI/DGoxrf/aR8RzpE8owR+A+LLES+8++Si5HXlNxyQNGMMc1
+ic6GL728FG8Dcxc3zT9DfcVqDpQznKZ3JN0f7qv9JEvMTR7MloBbbXIlbWGG
+c5FnnSxFm7ZXuGsCe/hdCIqDP2gL1RVh/qEAO0/YJ1MjawJ5hBIJtm7wFLW7
+phOu7z4ZHQrfLt1lwIe5hptLb8CBsv9cS4Njb4rZjMOyG4/wwmHWoHn4Xpzf
+0NZ8ygcWTBq6dsLDTy7IuJH5rbul96Ge24t82txJ/Y+ilv0Lz57wzT9C+tfo
+GxCDfvS7q48kkv3y+z8x0F/RiJU3OV/jn0M3s2HOhcDtr8h8Yc2UnBLm9/ay
+NVCPRilv+gQ8VZAe5Uv6w8m93QYLMp3r+bDgj2QdGpOitWlOp8+T/hyWubcc
+5nVdddqxiqLRtGMZSrDt5oTNeTDV5bbiG9b78GMb38CC2VyVBtgj5WLEai3s
+/yU/LgzmGzfaesMC81d/KME3eh3jL8Ee2ilSZcjLqC8Wq4HrywypLXArK0nn
+KbFeW0gHuS8NESO9MG3u1D0feF+zavtzWNgu85EOV4zd+9wGa0SPW9ehX1qF
+n8arYRbDaF08rHFw+2A2HHuo1tgXHsvqWxJJ8hX/HOQFT06nM12JZ9xEUbDP
+LeNKM5gbrOtK7pvd4Zvn5Mm45fYJGs7bVG6kPEP6saP2jT/5fhT13noHe8iX
+6Q/DDUOZCsOkH0+e9QWing8J5U0jsHDv1v2zcIPEXzkTMMOtpzwN/Zj28321
+jOzfY1unif6u9KDv2QAzNjNP3ILL7t9VO0r6tTPeb+Vy+NKmnv/B1Gazm+fg
+tlUlVz/DhaHZnB741y9Ndpu1keueRrqEMkU7at5vdx4W5Sz8Rx126Hvz9QUZ
+X7fpozJc5V19bbUO6pmNeT6N9aljThUhcOFn/7GHsNt+x4dVsChsRVMozHRJ
+bfgIe9jPdsrD900+yavoYj+GdWAJyfv07eUtsGi3lvcGeN8c864LzPgz8G9y
+306KDKLcyXz7qWFP2EWTH+YGUyfjbBfC+qJvT3cQB0usqyN/P/7avXoDMc2V
+cYbcF0XrbFWyX4Wn4S9wd17c6VmS30qzPAB28XOK/ZvkExRFJcBsLt3mdzjN
++Jb8Pbht6E5kFsz5ZlsjjfNyiifzYsh6k7We4bBeB/P9UVhY8Jo2Rr4/F4zM
+A+BYr6zcKNTj0ibRf5isl9yYLo369fOb+NFkvEJt6Cr8w5X70zkwNRHhbor+
+Ui2HfR7BGmdNVe/CxRk/S3wj8xdcymWtoGjPu9sif0Q9aQxvhQy487XW82jY
+wyS6fAgejvF68RgWrJy4y1CBi7zEl+uh/oNPfteGee22RQFwfU3GGTV42iqP
+XgPTAsycZ7E+4PHT7DmY8ilLeQiLqbHnLVdj/86ynmDYTqqLFQEztFTql8EV
+dK3L12F+dj/vBvK+92xVaYFFL2256+AfpB02DsAaX46bt6De/Nj4BSPE4lcW
+HYRPOvTKDsOUqfCGOPxGM6Ogm+x/xH9tHfpXtzTX9T7Zv+Tw3FnYdaW281VY
+aH3F6gjsMxPxLYbk+2dCKgjuG3v90Q2mDeqpp8B+TIuXG2DBBu5oMywY3HZC
+hZzfFX1OGed1fllq/gM5nys9kgC/Nm+0HEf9HkOKfQuQP0ItKvA/WDQ8uPs8
+8eXoRWS8fuh8rRrqz0+0Ey4keVIPf6qAR18oGGiRvOduvGCjv0XJDolOMCvp
+h7RWOGfyOz2BnJexLWcLfme1KtazGuG03gbrQngq7Q5TUh85m2c63sFVEe3H
+XWGhzfscJn53c8+ZN16H+TkhDgawjLKP4wRMcVr+1oR3Tr/yZRvgvl0bSv6O
+9QmGdyJ/hfndc//Vw3Pb15i2G5B7Rq8Kgq2dPC+KGSJf6qIEGZiS/2vxGph2
+YFVrEfJe2r/54g7ijsAAU3iuxajUGxYqNSQ0ol7zwfyIQ3AsV9fADWb82FTk
+D3ONOmXE4E0FT/32woxHl7fWoX+nT0tFs+E0LQEtCRZN2NC1yX6xWUeDYdlt
+KiHiMKfieUwYnDFe7Skkeaea+n+DZazUEu/DgjGdZ8/gXJnWpELiGm6ALs4b
+96kfSIQ1ggqD02GOv8z/ImHG+qQ7y5D/ie312mMwK7F3cR68b/FKpyi4/pJX
+2xrUbxG4a3Uq6d/69y8b4ZJAl2OlcKE33eRn9JebG9XYB4vU+p/1wktORCsv
+RV6+m9xBBzz3uK6xnHKCC4OF5rfhEvmJgExYNPuE9wU25xerviL9zh9TZuC5
+R+0/0TlTI4x/O+PIhI2jX07FwRbXJcNkYfYu04cdsMdp0dk5rOdJ3nBWNEa/
+094r1sOpGT17XWHB1i6PI/B0kuTr83BaZ4K6FDx5p/twLUzxPrfmI6/5VsuJ
+XjJ+0s/BGP5g1S7zLyxMZLY/QL069ALhZ5hl6Oa0Fz5tUar9ERbZzZ6iwXpl
+71YNwvWdKp516B+XNZnbTMZVBpSSYb/M+Voe7KGYVBkGC3c//nCW5DNpWnIS
+bs1VH/CGOZaOZflwiZTcBjY5z/JYxwD5flid5GmRfPH5e8xxnmKhY5Y0zJez
+pxeR+5vNMpxHP+rZp86S+96xQaA2A1PRleWlcH8WvUwM82lXRloo1D+4fjSZ
+9IuW3FjdDa987/l8Hcw7MFpmgv5ShzoUSB6LK7TgUNjil9/YOcbk98Jo4jb8
+5qe0Z/1kfdSNsRdw4tWC5pVrUJ+Sa8EczPzt4pMgWHDUv0kOz1FH+y2cH8Dc
+d73PlOGOBSY7F7EoWtZDzxdknPWaed4Ibj0feHUe68d1KxnOcGKXWPwQrHt8
+po4Laxh5H62GZwScjGSY2Vn6OB5+4iMtLCTzq5a4OsJCbR8tPpwmkyijANNz
+lrPukvXXtkncQ70MdpfKPZglNRnsCofShx3JOOsTbWoO/ZpwzzxUDlPj4al1
+8II41/3XiXtGt6bA3W095pkwY2E24wQco/DJ/AzMpz+oOA3PTT0oCyXnrUrN
+vkneCyRrZ7zI+JWZobewZe3+Qy6wBzN+txXOr5A/ZbYN5nb7F/HhXM4dTzas
+F7CijNx/Vc6FDgrmHHfWPQg3LsmTs4F5hep9PPjp1e/xO+DCGNnqMTiEdUnP
+A47ILOCvR3/vfE1+EA4HfH49dAIWvYp/cInM39iaVwmLnRAdqCT9cu8oeQmX
+7Lud1Uvq1TW0E8dzrHieMnuOjL987KAEO/Ncl+qYID9/k5kqGT//6KYjPGou
+raEAl2+xrQ6F9frnh+axX0vYzvFM4qDQwUF4zTaDrTUwn7ldvgr+Hhl9RwAz
+E/VFcXBc+KO4Edgu9cf19vDB1e9txuHYjvyPsrD7XJ1gFk7ce1FtAPWO/v7B
+ap6sl9jTfgtWGC0QI+MUnfrzFMxjHa3/AkvcW+Z3AL45QPm+JU653vATHLBw
+55I+Uo/DFNsSlooYGG82Ic8nQ7XWcKSPcmg13Gqm77QHTln7k7CY5LtQdjqS
+zO/3+ZXUx7ljb3oT/lp6rjiZ5PW6WUTub9Skr8UZuHDBt8sayK/Y0rc8AQ5I
+eR/kDxsOvB5IJPvvdrAqh89mNHakw30vVeen4Wuq1Bg5ry/ANs8K/a3qzpj/
+g8w337r2NKx9u82f5C9kyq6ug3cphez/RuqvqmS/hUPSfLpVTXG/Jh53LMJz
+c6Tx8iJrOEBbtlwZXlP29fhheE9DY7A67G39fTbdlLwvmm5VhO1vT764C+u9
+CZkn7zVq/yZ3DcDMLjm1QXhxvFvTDGwRFVlUAVcahTcqmOF7WJMnHgvLrUxY
+oQ/rDXnLbIODuKyDFrCE/XAjA2b9tfMXCtYY+3FtP+oVry47yIY9yq6682Dt
+7wblW2BOXLL4KbiyuICxjqx3cEo5ADeEeR9eDceq6f9nB6c3ab5aTs437U+y
+ghfP7q+RgHmbBrTIuPeg48avJL+8+Qvy3rjG9lXbG1JfvbJ6DPl7pR5X3gdL
+lPAelMKr8N7dAdM69b++gX3Zu5Rb4b7b4bF6yL/IxiW4BaZMNlUEwTuihRVP
+YFacdMFd+DvXSofsV/s6x0Ic/XyrY9j6juynG3VsG5zU9W77AuRj8pq4SbCK
+YG65GsyPb8qsh1981/a0hGsnVtV9gN3OOSj6wFPZsmZL8N5i9rsCPZnUa79h
+TJW8ty3hDFfAo9xTKZpw6E+lzv1wWt+0tRI8S/4fg6wnn6uo/wPv2Bb8
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.502886362674069, 4.972562773393563}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl1gs4lGkbB/DRN0kqTTk02tmJIlOpUEkO9Va0oxymkSUmjRArNGVrbfQ1
+4nOISq1Escl5Zm05pEbJYRsbkUaIYjOWighJPruLvv9zfXNdrvf6Xe97P899
+38/9ztA/dJTvN4tGo2Xhj1z//zGhaHRyNaBojIm8RStgVvx0X98KiiZsany8
+E87s9bpQCcse5fwjhCNCvOTn4UKb0sIf4dTnnjUusOBI1bzzsGD0mMFiuGJQ
+GnUNNtCv7n6ynKL5tjVV3YStxZwVYpgTl3o7Cy4qPmK7EZbLt8ZmwLY++bkD
++hRN6RD78DLM9XS6ngWP+pepRpH1z93le8Pusg6Ho3AXw+W+EdwVrsh1h4dq
+MoL+q0fRTPxE31BwjnXKz80wI4d7yojke+LK4nuwLOFmwkJSv+VsRgHMG4z9
+96f1WP+ZqzAHFtq5RDXB/dn8vb/AajXu5iWwbVhFxQM4M/eMfSas90+bVivM
+rfWeToOth/afGCM+e0OT3Oc80ZdpIT8TnZ9/J/F3Wq8nWsDi5eqPm+HUaMYl
+T5hRtGXbFFxXlx0UDid6GoQwkZ9ox0T/FTg6YNewOWxc5KQugTmW3pdIveM3
+dhqWwpTtpZUR8FTe5GgJbGBZ4p9J4qVGV/JhtcPcOXLSv3RBaRJccPx+5Rs4
+OnomMASedKQEdFOKxhT/5bYdNh4bfsaGOSuZieqwbxx/80a49f2+qAbUl6jN
+fLcTTl+frRkDizUOHHeErR173K3hvp59t3nw5NMMq55lyDN3UTm5z3urGrMb
+jjgsGLYl9vtgX86maGGlkg/mcEFdMN0MLpJ+e8EAdu9prJV9jbyOhLVrwB2e
+urP3wvTArPEJ5G9S4nZqmoV5FLBXvYZlrDZaNWzho/9bLdwx0nc2DR5dfkXt
+Nhz2pW8kHrbVYGy4DgsjPlsnwfK5Ke4JZD0dgUgK16mW+IphZb/2vTY4Ojhw
+QTgc11wYpYH9G4dONxAnvfxyhwcr3W3azsLUY7dHV2FZlSUrCVZb1/XxNdw/
+9tYxGxbHOp7VR32UQqf9Adw/9KzfA07ttX/fQfJnX5qOgaeGg+P+guvy1qzO
+YpP5q0pgoX7h6vYkCVwo5d+hYPHJ8jXX4ehXZWW+cHWeSu8J2EKy3C4WDnDp
+TN0Cm9DSjPKJi++ufod81B44b3tE+m/T7i+Gg9a/vfoKrnt7cXoO7JvWLBoi
+65fQPSJR/1BIst0kzD1fHDP6FUXbV+vXMk3OYylvaj/M/aTOIraonzn221KK
+prVT7jdBnt9WJVkH82IcLd7DlNEZ62xdnDNf0+0leX5Fr78BHGbTJZOTebOb
+7C5jYr/t20//SuqNrM3zgOVBAcpkuMjs5KAWzByIXRtBns+KGnuzhKIpGuVF
+pH4Tq545TXDH33MkznBcU014I0w1+1huJfnImNJuuF/vhrcpia+Inj8b66UL
+gwdWkX7MKF23wA7l9d4cePSgc0oYXLipRXct6a/ZhsOVsFA9mGVB6kn8RkcV
++edUP15vT+Ifyv/cDSv3drQfhPuHDxvFwfS9WZ7hJH4J+3I5PP/YV0+vkf27
+bPidcJeAr/mQ3O9cteM97KAfOKEk+b6/O7cPrg58ZzzbDHOyqn7zY7jVv/I7
+DhyWpsP/CWYpYwPtYeFB71dcuOLbHbP94QLzUe4A8uVOqG0SwzxO5NRJONl1
+k2Eyud/pp/cZ/dgYcNwyC2ZE9sX7ww5+B3SlcNIHtwvPddBPTpD0F5j2oqPF
+Eo72H16aD9c1nGDnaiPuHrszHVYuM2TpwEkX3NPOw0UJEtPLWvheyMi3PEXi
+e6/u/hpuVKg0+5B8suJv3ddE/3pTLu6BLfyc/wiC1czLHprBmcWS0E2wA6el
+YCnM5BfrasMBZ1xT6CS/8lvh8+Ap41tlH8n3BfOW4xKYmnVEs5fMe3XBfnPY
+OKnmPJk3PSPJVT/itdoNbeR59p9ON+FE8WuzDlgk4G19Q/af2D5A+l+3ZU2D
+MfKVm//n6QjMMFq9IRSmvv8+nOyv+OFUdSkscihwZpP8I9dND8CphadDrGHu
+pfHeRdrkPQp9eoDUI1WZz4FHveK3RpLzYvKaVsE5OstO55L45GuHtOEwr2dW
+9bDs1Ysxsl6HNN9skPTL2SMnHw76bLhWfQPy3G2b4gwrdh1aYgjzVLe19SJ/
+sU/rXCu4v51l5w/LP2502QPrOe+K/GMx5m2JhtgVHj3FL9sNF70sOLgfVm4O
+O1q6CL9TLvqqbjCj/EkIC7bQSmhwgt29vI+eY2D/8XXc7XBHxM0JFbgxfp7T
+erjaoHKnxkKch013ty7ZT6t7zFID7yWdvXIWrFCYJl9cgOv+PYcGUI+JOn0B
+A77TsKNHQeZD2eNTOR/7dNI/lJP+jJyWXoPTPbIrSX948vGpLFg0+lZ0hfRz
+5HhKCxwQt208nsTPeP69EutZ2EfRo83IeZuapMCtI4N6xElu0oW6yKfwgyTm
+HCz69VFaHpweyl13lczrlnGPTcg/tWumQULiq7yeP4BlM4PPa8j7sqshiIl6
+DQyY4a/hyQE7+i641XCqfgYOWHFLzQdOyjbJ0Ee9wlCNuCBYVKe4a0f643rN
+Twhrhc5t+I7cnyUX2cBD1dSFRJj5wub4v2CByOpRIUzFFgsOY//MtFxuPTkv
+lT3l6ciX1hNo2AMX8f1X30Z9NCu3nz6R9Y/+EJCDfgxpJc6hbUS8fUtg9Dys
+FxBsoQorlpcy3NUx/4O1esTKCttqzlyc1xd8yHmT/wfVqP8BWpudvQ==
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.57964504524893, 4.283992682631731}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl1g041NkeB/AxtxUKs0iIjCivSUxCrcZL5KUoTDbqqiyjuEaJiUIScsUo
+yYZ2vFRTVFLKSlJUREVYE2rH646yGkIKu/d79s7zeL7Px5n///z+v3POH519
+4Tt+olIolAr8kPz/ZzmTYkBShUlJGKGvfazFpBwbVbE9B7fKtawugN03R3mZ
+LcF4mYidA89V/3K5jbhkhegG3HpoYn+EKhyUrTgAm4WPtMkuZVLq2hfNWOD+
+MhXbeOfh8qs3rApgvbGmPkU1XDcna6Ohjfkk/n9EwgGsO+zLcKRuU9tj2FfO
+3FaTjvkPB383BXMVlAOD4Owd10wV1JkUWl/t8xuwVfsPTsR1RSamn+CkkStJ
+X/B9/v5agb4Ok7Ig9v3mlzDv2dVqb5huFPX+HCwTKeBGkvF2n0BPUs/QqcJT
+sMr67jAZMp61+GYK7H8688Vj1M/jtHTFkPE8FetEWCS/QTUANlvTpeUBc5P/
+rWQNe09ss10NCwsvfy8DJ9joJtFhtY4h4WvUJxyzbzaG2eHKp8/BAdUHHnrC
+VSyvaBbcOPyhJhNuNeFSyfPT19b8/geZv3RB6yv0J91Dd5ZF+jXIWxcNM/s8
+Hr1VI+t3y8YSriu40HcQ/Qgw6a1XhPMnLbxkNJgUibbjfmlY6NV44hpMi55d
+vwxmDB+95LIM99Eo+30rPOkmL+6HJXHHY/Nhycudk+GaTIrgt68DUqjHbODH
+qY9wVbxr8SZYwuBN78C6i/wKHyTB5cMHFYtgmjpD8RU8WBqW2gV77mG6qpH+
+M+XGJ2DmhTh50j92tN3KKdiXqq9eRNYjqdBeBHOZgVE9sFqbw5n7sKBtRYHs
+Cialw1HLKR4Wsv2yjWDRg3uRG2Hx4Y2LfoC9W6hXJ1EfT2sihAknRJ68foPU
+P2j5lgE3rHS2D4Nndrozl8Hl4aHvrODUZ0espzCfXnHH9iWwpDRlvgE28OJe
+koYbvXnOZ+DGuPAqRZg5RzXfTiy9/idzuJyro6gCd1Sq6JF+0T0KbN/i+QXN
+1fpPYY4gnVoCq2gdDzBHvQa7hD7RpF91OTl3YLX/rnvmAzuyzM854pyo7eR5
+2cHe4UYsEcyPSGFtgA0kHT4nyLrn2YY7wiWtnf00ZK7d/uP+xFKrJLuRFIum
+wkSkzb0MtctIbn2aSyX5vdfM6ABZN/vl9hPIBS2ZbLIuag4BnZbIoMrTcnZk
+XYpNRuOR4p89RvyRMvda1r1AbulfUXsQKdrksEMJ/TurUigOI78v2TXvDV+h
+zocEkuupnlaZ8EaOkdATrutdyKmFTaP5LutgmuFQgYisF7vShvTNU4e/dxKW
++IrDJKiLH9Ou9BUumS1rbIF93QOaxuCxshjTMph9+wf/32CblCm/LNJnZj3r
+Nlw7KN0QB4tbpgdPwIcoRZwoWC1MeN8Vni55Ij5KzqFYfkAB7vcb10yDPW2K
+K9vIeS3Z7HeVXH+5IzOH1LUv3q2NfL9j7j7Zr5wHIZ+lkTPcFjMLZJKMZ70T
++V6l6CwNaXJq+FoGuc+loo/fcJ2/2zXTXlhSr1r8mdRxdG+WCebl638MmSXr
+EWH75zG4qllgpkSus6rf/QIWbj5qsB5eHFSuq6SLfRIR9ZJN5ldXbtwOt6ZQ
+vpXAFVq/bkiBKSW61BGYF8wdL4fpQzc71+I+7j9+G38JCydc9Mk81xkK4new
+r0pOTgP8rWZIrw+mOdv1LET+xZbOFyI9e4bG7JGaibpdT5FVGXyLw0j+s2P9
+15E8vYjzOciNp2rM05Bqcw9KSpHJH4tOBSHFzy4KbiPTtio8IvfJ/VNJIECy
+PJY36CAFFjUhWcjIF84saWQqtTckDOk9tEYygbrMgg8/t4XvaihcGYG3rFlr
+KAN3yBgsGiXneo6f14IMmK3SmiUOczpA9lvosc02S0k/WNlTXrD06zlVJmy1
+VpiiRfbLrf3PI+G6Q5uMP5F109NovEP6GaFwshl+0bZKaZb0gzpz7S78RP8N
+Y4se6uE4LC2Da0efR+bC/IdL0yvI9+UnxsRw6pdu2UbYqMvjoeVK8n6jv/kI
+axh/XhYP0x/rczQxf6u1W/ojuFGD07yT7E/R18kpMj4UbZ8HC74rqKGvQr7f
+2jIAR4nWvbeFPf1ctU1Jn54YTnvAqSypnig4+46lszfMd2DdqSbro6h13x1O
+WJJ+cRou22ZYbwPzZK3F+qjT/5VZGLk/9/TqWHd4VeWkDgWmjRd07INN5M0v
+9q4kfWUYH4BVRCP3q2Duo2VHyLhEOX/vBTK+J5pNrufdc9kdCwtUWYcMYVdl
+1dXBcB0rvoT0scbC5ZM/bJWlkEf2UfJeN4c9sIRp6Ef2jdH8OCOU+ATXZCvM
+ubJyTQqckLg9/HvyPIz06ZuwTHxRRDf6wZ2PKeuHzYRNjqXwcNDibvI8YueI
+nGTyPpluTgwm/eoJyPgPzGMssr0L10n9VREI087n+yzQx3l439kZAmuGh4q9
+YYm/sWwc7Blnq1hMxv0UfuHDGU+rpUZhGm+heStckSuxXm2AurZ8uCdH9pV2
+WnYgzEkU55D6aydVQnkwxTm/9TycfuRfN2/BtKyA5SL4Jn+X+DGc6kCjk35Z
+mu/xeA4LTqgmh8EVUp+r62Bf2dIN1+HBs2/z/rl+QDujF47scx05D7ducvOg
+og/Dqf0Lo2BJE2tcHc4vVy3dAc+MZl1cAXfvqq8wNSB/51zNNOG05ARpeVK/
+to7vQjj3aA5HgucLyGgKH8L9NRzYMT0we74gtgrOeK3u3gozY4YWn4TzH8pn
+EfNpKjrkXPSf/HnfO5h37sqsHNwQ+7f1F5i+K2HuFVn/d3s/aGE+9pd3kRfI
+uXKaK/KE68yox4PhuPGUr2fgqm2/ttjBiTVOc+2wVcv1XAMy7vDalW6I+fUZ
+UVpkPxjuYXBgNTOGM3mPyIkMu+tgg55GUwY5D11Ub0Uj8v9kZqYPfCA6tNMX
+zi0/ppxE3mtUn7aL8JY3H2oekveQRolGO/zPB/UrkTRm/g8iD+gn
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.867783472564531, 9.687357802186902}, \
+{1, 0}], LineBox[{{16., 17.00000000000231}, {16., 9.999999999998607}}], 
+        PolygonBox[{{16., 12.9}, {15.6, 14.1}, {16.4, 14.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.9452, 13.5}, {-1, 0}], 
+        LineBox[{{16.000000000007276`, 17.000000000003638`}, {
+         10.000000000005457`, 13.5}}], 
+        PolygonBox[{{13.51826734053906, 15.552322615314452`}, {
+         12.280184249251306`, 15.293188945044921`}, {12.683281069670574`, 
+         14.602165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.823799910437668, 15.984057296392571}, \
+{1, -1}], 
+        LineBox[{{16., 9.999999999996362}, {10.000000000001819`, 
+         13.499999999996362`}}], 
+        PolygonBox[{{12.48173265946094, 12.052322615314452`}, {
+         13.719815750748694`, 11.793188945044921`}, {13.316718930329426`, 
+         11.102165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.823799910437668, 11.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{16., 17.}], PointBox[{16., 10.}], 
+         PointBox[{10., 13.5}], PointBox[{7.5, 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}]},
+       "\"afbf/cgdfeh/ifghgihi.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdfeh/ifghgihi.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:eJwl1gk4lfkeB/C/rmTJmj3pdAnZxjVpyqj3bbG3nETpxtyTaCrkmI7BRDQo
+y0myTCrLYWJaEC22yOnGkEqHkSzTHddWo2UOI1nH/f6f+z7Pec7z8f7/v//v
+933f8zxW+YV4BCwihJzFh37//9JgydQCLiOWrE9+9PG4OktISu82JWOWvHH4
+QX5AjSV1Ra7vVsGxatX3fOEh8YGarbBN3uYtT1VZsv37gNkQWKq0+MW8CkvW
+/sMyqwiWBO5W3QvHZoTLD8Lckm/de5RZIphMTzBZjb97uK1OhkX2Bn8Fw+Iy
+tX8dhTv9fO2r4DSTnJ4wWPOZh3QB5gdM5JfA3sPH+xxNWKKmt1ROAfW9U4w7
+z8C854498fDVZ1tHxHB5yHORLvp7M84GjMM2e754ex9mv8+Y1zPF+mOKv9hi
+npbPI/+9Dm4Z0N90hs5nk/qFC+x9grnyC5yz5aXXTthstOWcNvJJbFUQusKx
+cxar3WGfmyq19rDo5uBimp9/1QdTI7q/yEUYBbvcPxMhC3cHTLwWwL/OCbP7
+0U/ahkzrvXS9VfaNGpidOxLAgeWHJ6UXYJGW+ulOnJ8o2FgZCEs78g4IYIFz
+tJ0rPPXgYMEiOKLUIM4SJrqexxZjPv8wJlwH7l/irj+GvMR5ostKdP/5+GXt
+S5Gv4VVtRTg2NS6tTAk5eTldXwaLQ4uH0xVZ4lB6ONeM1gvZwTmrwJLGy/XN
+LjAn7bdrGfJ4HuW5iSdof/dPvW1YQusEd/xE65V+VNSAS0Ivrh2i+/tIQaoc
+SzKLokZNML84LjF1PXw1qv19MMxJr3ulBj8dL1SqgrlzLlXaMC/JYnaBrm/V
+CHSGs9ckhzmZoV7934V5MGnx35FIbXrFUBvnOQSdTngEx+r0vSiGPTmBAZMw
+p8eF54J+M4u3p6xcgzntyuvHYONe55mNsGjLnZxLmG/7invGu2F+WNz9dZg/
+vrR/zJtaOukshmUjFRu8YIm61pfWyEtgnnfABZb+4F8SCTfebCW2MPe7K3q5
+sKe7ZJsmrLb7cX4mvNYgSXEM/Ygv3DT6Cq5z7ApuhUUPkr6eRv1q6/rSQtim
+uVL5COxzSkcrClZLyT1biv7im5oHvGHuzJLxNvRfIj5q+yXc/16jvwPz8mz5
+I8Z0feiE9kPkU16QkalD85Ds21i4GOe7+4ZpwvzbGadjZJH//sh9BnD5A197
+v7/hvWM9L35G7/+3O2HPIuyL+OfynbTeT+9GD8jgnEoZr3Daf3sdiSOYbyDN
+6QbNf7CCyVtgMMexc8M0b70yNvkvhhhw+XxTzM+JWrpLMs+Qtd8MjwVTxyWq
+nICv/rhiqJK6M50XCjda6xNijnqvxkN+hrPLreed4NjnUwNHUU9NUHktCea1
+2dlycV73qaG5JljioJ9mh34MMh/azcD8ghsmL2CfoFODxhao/2lEGo3+Hax8
+prdZ0N/HiR9NMF+QKK17PywdnvyzCebvvbf3EBybLJz2QB5mBjENB+l+dkNS
+EzylWNLuBfO+qkjWRn5mWi5VrAX9XU1tZmEf++xpI5jvMJi8Ce4XrQmVgVlD
+VVlVWLPjum0f+uNcuGhagXqxt3dG3qH9xsdxTeBrq8rOC6k77pWEop+c7z5W
+HaHzWo4tz0b/uuJwTTfYZp/jfD7mk+9KuGALi4oGe1YhD7b/23YjmL3UNToy
+h7zty5evpPlVBwcXzDAkKMh312pYvDNA1X+KIb9u8OtdR++XOZpvnmTI3OzQ
+3T1wf/OArNsEQ2Qb8g+epO6dXZk6zpD1QxPjJfS82i1Z+mMM8UxI13xN908U
+G/75B57nEVbPjOZXuE186AMs77r0OM0n2kNw7j1DhHdbmipp/lqBhiHw3VpV
+GWIJu/lYEqzPVP5M4AyzWlZ/2KAe72nt62SYp7yQFyZliA95uqMFFmctK0vC
++f5PPF7Ow/3FOcJG9GfW1ydnbgXrXj6vif7fnZQTu8M8v1s2X39kiFRZaY8f
+vX+J33Yd8/qH9cYFw+yTR8GtnxjCeSwUUoskMYJq5MNdIbf8EF1fWu0VMM2Q
+nJHfXXfB4pQHZk2wUMUk63NaX1xh/BzmRgtb1WHOqxuz0XBnrf6nt+hP1Nak
+LkG9zrqK3Y10npgX55pxXkuqvnEunT9dY+sx9BO/zulOBJ3frkTwEP1POTWY
+7qfrVUvDejBffNHmcJbOb6S75iHyiLA7yLWh+591tWkgz3KJhoI5vf8qIz/x
+DUPEWs/SrKlHf9ZRGGKIt0v74U10/eDg+m9+Y4jufpksWj925rBb+Euc1xVx
+K4a6N6yQJ8HzUXnffYuuX9R6sqWRIduHi5+8oRZezL1diffFqGbEDPOSbsMP
+NYV4P/7z+6bj1JzHNeIo9GuSf7uSml5p9WSO/n9hxf4PT74hSw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.7026940733168927, 12.067904665985203}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl0w00lPkeB/A/dd1pZZJG5KVGKsPZJrfSmXTb53HlrYhSim27k+rm2lCb
+rBDTOzXLKLUVjjlWm5abt6Kd2hoW11u3oS2TIVNGXnMnidHqut//2ecc5zmf
++b/9ft//wyE8Zut+Y0LIOfzR9x+PBUumpvE4sqT0u9YnhrkskSzLK6+EfWsc
+pR2w68uBL6Jhkp/mdgM2X/LzGwGsLXF4EAr79v7Y3L+YJaJ89YdJc5bIuW/V
+JfAhWeiFVJi0x5ekwMrqw50c2DrU6HIoLPbiKj5x8fZt/ccXsIRjq+4ywzzL
+xzIhrPff6H9/NkseqCxmucD8kSNf55myJNZtT5Ar7Brv7HXpM5Yk3fD4loVl
+vbe88maxZKbPIye6P78q7mUTB7+v8a6Ih1nWcq0dXJtusySXzre2n/j+zyxR
+PSjbUgvLM12MPeBOhc3EEK130c0oa9j/uLRpLvo1V8i/todTucsur4KVhY7b
+A+DTbwb8AmGZlbLuBzrf3sR2Lyy2Wdhog/PsGqXSKJpv+b+ti+Cgox2nqFWb
+Cw/4o95+M9PgcLrf+5X3PsCGRBPlJjiouOznXPTH02hMXGj+buOCdehf3Ly1
+/RPN75jEtY6atAQ0wFrF6tpVyOtgi6LvPM3/bf9YCiwzWxHrA5e67xcVwKWK
+OUaEWjyUn0PH7zTUVTrQexqZcwDO4vjNjoblfwsRzYClEewCAazK3333G3re
+mYu8Pj7WWxjr76G+Dbqx0WJYlZ3+qQP1jz3M25MI6wVdkd3olzOluxMMa3cG
+GB4jn7G14R1r6HpHP78SE5bsO/hV4FJYXJF1XvonlnzuXmq7iK7/nDsvZiZL
+BNq4VkfY/JbCWDwD9/r8TOZKWP6UqztgjN+V3/I2wuzyjcHpRrifhA9VEfS8
+xKSSFwT37XA7Qwq7xkSoN8NZ5ZuPVdDxX19NvJpmCL/t1koNLDm7dvAkrJI7
+HzZCv5IablIKvMv96qQjzHrmDrbBqy19q1iax6P6OHfsZ/isuHU7HT96xORf
+sLldyqM9NE+bWbPdUU9EyN2QvbCyT7rrBbxLLlOH0vWcBXNOon7R8l2TG2DZ
+7u0vXNBfxMHkniV0v197Y5pgQVa120eal3Xvmx3I47dk3VQdzef7U9xmmMRW
+FqbBskyTBjvkV1Aq/OQNkyuVgT5wi9CGENr/w/vx3jDfZ11D1CLUWXNMbQVL
+dE09moXI831htwL7+cq12s2wmOukdYVFx5/ZNNujHqHndBLqkdc6fLcNNg+d
+Z1mA+lVRM34asUN9C50SitGf9bs7a3Jg1iO/Lhd5xEsKhX+HSbZ6iiA/34rR
+2yJYuzvozP0phuy8ohgUwEp7q7bjH2FPJ+cVdP2SDibMwJB7+7QtfnTcVG8b
+Ps6QiBNP98XR8cFafcEY7u9CRl0ZLDl8UbfiPUMKp4QuBlh+ctjVbJQh4q8S
+vvRCvfyuwnue7xhSeqFYkwWLd0cpn+sZIhdZWL6m/Zk2ttTBV6/I0wToX9m6
+5uZszBfvuGy0j+bR+SztB1i77a9VMliyyOJQCvbnj/KSi2AtbzL1Is7nfFnd
+U0bHE67Vt6A+mXukXz5dn5V32g71i+5kjCXC/IBoJmaCISTg2nyGjrf6bStH
+v0r2edMwrae8sebpJNarjU3PweSsoq8G+egzGq+b0/ojO5wP/84QQTBvSErz
+NInObIPlFjvGp20xv/Pshpdwaa+XVTSsnRh5nU7nT+ZrNDZY7/e/X15jP86m
+yd8CYPkN3qAG56X2CP/ZsADr04ydJajH2l5TEAhLutnbatTPF6+b22eN9Yv3
+P3qH/uRuiRmZMN++YnUH8igNe+y+BWZ7DC/zkeehIulWJ1j58G3Z/WHsv953
+OY+Odz+9sq4f+a73cLOCJXklIYM96H8weURIPUc38KybIf1ha01CqVUW3go1
+8k//GHmRunBkpKqNIexAwsF2mCRqt75vRn9Nb1850vpV8cvd6zA/zHX7EWrv
+I0Z7q7H/5IK/VFPvHIqLVuJ7iTN7x0H/JP28J1OD+dFdgd7UMZKw7Hp8fyH2
+sUepq157Cx+jnqx51peomzn+9Tg/6MztohxY0rZlYU475u+xi5FRh4Y+aetE
+vwdGT0dRVywONn+F72um0++rYKVHTVIu+tX2nmjS0Xpq+q8P9+L7yD7XcgJm
+s5/0afqQ73y/QjNYGSmUBAwwpKGpq/IC7X9/xjXBIPq9fkM7bYX1G345FQan
+1ilio2FlxfPIdswnR0VTmvnYL3Bp23XkrR9eahoAK4MUNTffMMSw7L/m9ZZY
+3zpUxNExJD58p8sm6tTJ8f9ocZ8zm8e7ebAhuQD/kkR5ouqbc7BkZU5cdyu+
+z02X1J50vCrdxwH56S3vps2nps/V9X+8eez/AXlZLnI=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.7973059266831077, 7.067904665985203}, \
+{-1, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000002274`, 17.}, {13.500000000002274`, 16.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.552325660469876, 17.180083206945802}, \
+{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:eJwt1A1Qk3UcB/A/AjlexFHIazAUkJERxEENAntADpUXJW68nHgMZtRQKIPV
+ASoN2nByunjLKEYspGMIcYsY7tJiFHnzRFkkuHlcIpBwNAILhUCi7/+u5+65
+/33uefl9f7/nf89O4btp+VsIIYdx0pWYNnF4M2SOrlyGGF3GzDNwe2xrVQfM
+M/T2tsGSr9M/48Oq9HESDc807wlxhEPV7wxrn2cIKy+ieDSQIdzqDb4bPHQ4
+RX4ZXjoxoijwYoiN47GMi/DkK1cr+z0ZEs7JyaFmWUkbWXCoaU3bCUuKGn4p
+8GBItHOC22041yYybNqdIcr3FXYE9SR2/hun4NLFOc5rtP6H7+2LhLvjHxwo
+h+UlEpk3bJn+LkgHm9r+knFh+cHxikVYvUYOZcInZSXlXkEMYTuNCdvh8C6u
+Fw/WGQO5LNQX318tiYMNVbyCMljXsz5Jr4emnvl3AWY7TPnT53nPHJdmI/9c
+VELRPJ3fNbGrDtY5lMV00nrHw6zW4aecg7HZcNaktcAb89BxHtnbwiKP5EZP
+2H3QqO9Cv6kZJ9uWcH9pi07Pp/OpNSSpYEeflNdtYd7qE9tgmFlImh/cjfVG
+81Ul8liCkxsVsMTekLeCfriK2cUimARrRAnwzNYAQR4s79E6N7rB/nX3RPDS
+yA/9864MuaMfelQFm8z3tvPh3JbU37upCw9JTTuwH6KjTFOwMZbfUAEn913Y
+4Ys88tIwQSLMlfnkC+DaNbMwBn4qlRQ0w+7X92dmwP7nlGQEJm/JEuvg6KOu
+qsewceflh7OwTmrb4YB5sNiT02+gvmXbvlYn+r19TrT8DLdz+gs2cL9vXdQA
+D/kJ+SjNBOsjf91Uwaz6bxy+hNWJleZlWJTcpThC52m6GfEi+leb+x6y4KZx
+j02G7o+agDkN+pls368IgSfKysyZcO2fYssTPC+NO+JiDWsi355pgoeVSV9d
+CUA/FQlTHrRe/o9LZXDTJ6uXJMjHuunwZgrM5lwZGEM/Bq+Lr4bDoqZCOz9Y
+o/o7IQT2tb/2oNiFIaerRVZ7YbUn99TIcwzhB3mKc+AsS8WuONi0HFh0AU6t
+Kvl09FmGHDCHa6/D8rPcymrY4MjPtkU+vVUpKw+Ov02c4qlHvVqF8HLNb+Vn
+qGu+XZHDXIGsh35P34GIkBE4+e4XRbdgXeC0/0uoxxvfXjlB99MLijUl7Lg0
+tngXZjeG9zkjr2bq7K4BOp+PtX9UwvzZtYV6OCvG+vw03C1MkabTet4d1cHo
+V/35sRR7+v7Hdz7IgsUNyk4t8s+9XL9bAA9v3XbpKJ2XuM6yF2ZH3ai3gXMj
+AiZW8L4hU4u+158hq4OzP52n3rNhXQgTVcj6FjjUaCwMp9dd7lsJkff0rbQ1
+J1j3Pf+fXvSnKXbJ3/D7/7/mjH1OVz/mP8lKx0w=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.16438510075492, 12.373697879094095}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwl1AdMU1EUBuDnQsBSI45UaLHuAZYqEFGoPhSwisQiEjWiVHBgBSxqFKmD
+RK2ioDWGpQYbqEnVxjgogiuiKHVECeJi6Au2igmBgqtiLf5HX9LcfL05955z
+8s4bm7x12Yb+DMMsxI/W/48/ywykdRzLhJYnauRw5MGaQ71jWWbCD73yBMz0
+VjJfYMf9rsgGmOMdKXwKc+Z+X/gBiNNs7CyD3ftK4xbATpd9qhrmeQa3psP2
+XO5tMCwYUJiQDxtD3Np7xCxTkR7yRw9XrI7PM8GRVkmREVZm1k9bT/Zu22yA
+rWVH5gph5Y2esAKYu87TXB7DMlXbGmP2wMx7L6cEtpbI5q+G60u859z1Q172
+EeJgWNBW/DwJVseem+IBu49THxsFW/jNlhbUE/rJPdEqYpl7DSP3XoUd+Trp
+E1gnbTHnwu3OW1/rYKeX6s4m2DL+yrEWeHn57dJYWJnksg3CefdSEobKYH3M
+TH4EbLxwLnEWxT/5HXsUNmU+WEP78gNFCa2wYfF+1VI4NeWuKgT51zrSVqTD
+RoPobD5coXq3q5D2F03+ycG8wcLzj+l+k2PtSPQjr0AUM4jqKU+LDYJ36LW7
+F8K67JZNctiU0+SgfocfSAiMh9O0JcmvqZ9dioJlcJUhJcxvOs73nDU4GpaL
++7xSYGnW2R3T4fBuobYMXrnt+1IPWCG7kdsEX8nOGG5GPsvpfwnL5LTN5kXB
+ARQHF7Mu30eobz2dC2ctqtsZDnN0L9zOC3poQv+klBes7Gfu9oXzKG/Yznp9
+PS7Ee0l1wWL/sEJPuJbqJvNDF5/yRR6GUxo78sl5da0rAFY08J8/gnXd7y43
++WB/RpL5NKwocDWWwvqapxczYOVH7a1sWG37MymK6oufV50BP5s4+rCY4usu
++tG+KbCvpz/VG71bdgbmhr2N6qT3TdiY/YLiXa2/PsJT1lVtGY77v0XLBTa4
++Lx/bzIs2D5Q0kMWVZ6shplhVVFDcF776blx3qjHPXPJ50A4i5vKpsLWJR6i
+JLg+SHOwEnZ0uu0rovpsxiIH3LFKK3sDWzJsu6ahXxzNBfqhm1D7Ug4n0tyQ
+LWskcbCR5gpWN6t6I2ADzR3MugVc8oE7aC4D0c8RqTeb6T6aW1jgkpVr4WCa
+a9iyZUCDCG6kuYcZ7YdcA+px/sJ3AVZ0RNT4wSx9N+Cs6OofOvTn3yNFnbT6
+sH8BRImRiQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.763809742330267, 6.7638097423302685}, \
+{1, 1}], LineBox[{{13.500000000007276`, 16.000000000003638`}, {
+         7.500000000005457, 12.5}}], 
+        PolygonBox[{{11.01826734053906, 14.552322615314452`}, {
+         9.780184249251306, 14.293188945044921`}, {10.183281069670574`, 
+         13.602165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10.323799910437668, 14.984057296392571}, \
+{1, -1}], LineBox[{{13.5, 16.00000000000231}, {13.5, 8.999999999998607}}], 
+        PolygonBox[{{13.5, 11.9}, {13.1, 13.1}, {13.9, 13.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.4452, 12.5}, {-1, 0}], 
+        LineBox[{{7.5, 12.500000000003638`}, {13.500000000003638`, 
+         9.000000000003638}}], 
+        PolygonBox[{{9.98173265946094, 11.052322615314452`}, {
+         10.816718930329426`, 10.102165824326175`}, {11.219815750748694`, 
+         10.793188945044921`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10.323799910437668, 10.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{4.5, 10.}], PointBox[{13.5, 16.}], 
+         PointBox[{16., 6.5}], PointBox[{7.5, 12.5}], PointBox[{13.5, 9.}]}, 
+        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}]},
+       "\"afbf/cgdheh/fihjgigjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdheh/fihjgigjij.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.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215283621492`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"6751841f-76ff-4ad2-97b9-dda1369270a5"],
+
+Cell[BoxData[
+ GraphicsBox[{InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl1gk4lfkeB/C/rmTJmj3pdAnZxjVpyqj3bbG3nETpxtyTaCrkmI7BRDQo
+y0myTCrLYWJaEC22yOnGkEqHkSzTHddWo2UOI1nH/f6f+z7Pec7z8f7/v//v
+933f8zxW+YV4BCwihJzFh37//9JgydQCLiOWrE9+9PG4OktISu82JWOWvHH4
+QX5AjSV1Ra7vVsGxatX3fOEh8YGarbBN3uYtT1VZsv37gNkQWKq0+MW8CkvW
+/sMyqwiWBO5W3QvHZoTLD8Lckm/de5RZIphMTzBZjb97uK1OhkX2Bn8Fw+Iy
+tX8dhTv9fO2r4DSTnJ4wWPOZh3QB5gdM5JfA3sPH+xxNWKKmt1ROAfW9U4w7
+z8C854498fDVZ1tHxHB5yHORLvp7M84GjMM2e754ex9mv8+Y1zPF+mOKv9hi
+npbPI/+9Dm4Z0N90hs5nk/qFC+x9grnyC5yz5aXXTthstOWcNvJJbFUQusKx
+cxar3WGfmyq19rDo5uBimp9/1QdTI7q/yEUYBbvcPxMhC3cHTLwWwL/OCbP7
+0U/ahkzrvXS9VfaNGpidOxLAgeWHJ6UXYJGW+ulOnJ8o2FgZCEs78g4IYIFz
+tJ0rPPXgYMEiOKLUIM4SJrqexxZjPv8wJlwH7l/irj+GvMR5ostKdP/5+GXt
+S5Gv4VVtRTg2NS6tTAk5eTldXwaLQ4uH0xVZ4lB6ONeM1gvZwTmrwJLGy/XN
+LjAn7bdrGfJ4HuW5iSdof/dPvW1YQusEd/xE65V+VNSAS0Ivrh2i+/tIQaoc
+SzKLokZNML84LjF1PXw1qv19MMxJr3ulBj8dL1SqgrlzLlXaMC/JYnaBrm/V
+CHSGs9ckhzmZoV7934V5MGnx35FIbXrFUBvnOQSdTngEx+r0vSiGPTmBAZMw
+p8eF54J+M4u3p6xcgzntyuvHYONe55mNsGjLnZxLmG/7invGu2F+WNz9dZg/
+vrR/zJtaOukshmUjFRu8YIm61pfWyEtgnnfABZb+4F8SCTfebCW2MPe7K3q5
+sKe7ZJsmrLb7cX4mvNYgSXEM/Ygv3DT6Cq5z7ApuhUUPkr6eRv1q6/rSQtim
+uVL5COxzSkcrClZLyT1biv7im5oHvGHuzJLxNvRfIj5q+yXc/16jvwPz8mz5
+I8Z0feiE9kPkU16QkalD85Ds21i4GOe7+4ZpwvzbGadjZJH//sh9BnD5A197
+v7/hvWM9L35G7/+3O2HPIuyL+OfynbTeT+9GD8jgnEoZr3Daf3sdiSOYbyDN
+6QbNf7CCyVtgMMexc8M0b70yNvkvhhhw+XxTzM+JWrpLMs+Qtd8MjwVTxyWq
+nICv/rhiqJK6M50XCjda6xNijnqvxkN+hrPLreed4NjnUwNHUU9NUHktCea1
+2dlycV73qaG5JljioJ9mh34MMh/azcD8ghsmL2CfoFODxhao/2lEGo3+Hax8
+prdZ0N/HiR9NMF+QKK17PywdnvyzCebvvbf3EBybLJz2QB5mBjENB+l+dkNS
+EzylWNLuBfO+qkjWRn5mWi5VrAX9XU1tZmEf++xpI5jvMJi8Ce4XrQmVgVlD
+VVlVWLPjum0f+uNcuGhagXqxt3dG3qH9xsdxTeBrq8rOC6k77pWEop+c7z5W
+HaHzWo4tz0b/uuJwTTfYZp/jfD7mk+9KuGALi4oGe1YhD7b/23YjmL3UNToy
+h7zty5evpPlVBwcXzDAkKMh312pYvDNA1X+KIb9u8OtdR++XOZpvnmTI3OzQ
+3T1wf/OArNsEQ2Qb8g+epO6dXZk6zpD1QxPjJfS82i1Z+mMM8UxI13xN908U
+G/75B57nEVbPjOZXuE186AMs77r0OM0n2kNw7j1DhHdbmipp/lqBhiHw3VpV
+GWIJu/lYEqzPVP5M4AyzWlZ/2KAe72nt62SYp7yQFyZliA95uqMFFmctK0vC
++f5PPF7Ow/3FOcJG9GfW1ydnbgXrXj6vif7fnZQTu8M8v1s2X39kiFRZaY8f
+vX+J33Yd8/qH9cYFw+yTR8GtnxjCeSwUUoskMYJq5MNdIbf8EF1fWu0VMM2Q
+nJHfXXfB4pQHZk2wUMUk63NaX1xh/BzmRgtb1WHOqxuz0XBnrf6nt+hP1Nak
+LkG9zrqK3Y10npgX55pxXkuqvnEunT9dY+sx9BO/zulOBJ3frkTwEP1POTWY
+7qfrVUvDejBffNHmcJbOb6S75iHyiLA7yLWh+591tWkgz3KJhoI5vf8qIz/x
+DUPEWs/SrKlHf9ZRGGKIt0v74U10/eDg+m9+Y4jufpksWj925rBb+Euc1xVx
+K4a6N6yQJ8HzUXnffYuuX9R6sqWRIduHi5+8oRZezL1diffFqGbEDPOSbsMP
+NYV4P/7z+6bj1JzHNeIo9GuSf7uSml5p9WSO/n9hxf4PT74hSw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.7026940733168927, 12.067904665985203}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl0w00lPkeB/A/dd1pZZJG5KVGKsPZJrfSmXTb53HlrYhSim27k+rm2lCb
+rBDTOzXLKLUVjjlWm5abt6Kd2hoW11u3oS2TIVNGXnMnidHqut//2ecc5zmf
++b/9ft//wyE8Zut+Y0LIOfzR9x+PBUumpvE4sqT0u9YnhrkskSzLK6+EfWsc
+pR2w68uBL6Jhkp/mdgM2X/LzGwGsLXF4EAr79v7Y3L+YJaJ89YdJc5bIuW/V
+JfAhWeiFVJi0x5ekwMrqw50c2DrU6HIoLPbiKj5x8fZt/ccXsIRjq+4ywzzL
+xzIhrPff6H9/NkseqCxmucD8kSNf55myJNZtT5Ar7Brv7HXpM5Yk3fD4loVl
+vbe88maxZKbPIye6P78q7mUTB7+v8a6Ih1nWcq0dXJtusySXzre2n/j+zyxR
+PSjbUgvLM12MPeBOhc3EEK130c0oa9j/uLRpLvo1V8i/todTucsur4KVhY7b
+A+DTbwb8AmGZlbLuBzrf3sR2Lyy2Wdhog/PsGqXSKJpv+b+ti+Cgox2nqFWb
+Cw/4o95+M9PgcLrf+5X3PsCGRBPlJjiouOznXPTH02hMXGj+buOCdehf3Ly1
+/RPN75jEtY6atAQ0wFrF6tpVyOtgi6LvPM3/bf9YCiwzWxHrA5e67xcVwKWK
+OUaEWjyUn0PH7zTUVTrQexqZcwDO4vjNjoblfwsRzYClEewCAazK3333G3re
+mYu8Pj7WWxjr76G+Dbqx0WJYlZ3+qQP1jz3M25MI6wVdkd3olzOluxMMa3cG
+GB4jn7G14R1r6HpHP78SE5bsO/hV4FJYXJF1XvonlnzuXmq7iK7/nDsvZiZL
+BNq4VkfY/JbCWDwD9/r8TOZKWP6UqztgjN+V3/I2wuzyjcHpRrifhA9VEfS8
+xKSSFwT37XA7Qwq7xkSoN8NZ5ZuPVdDxX19NvJpmCL/t1koNLDm7dvAkrJI7
+HzZCv5IablIKvMv96qQjzHrmDrbBqy19q1iax6P6OHfsZ/isuHU7HT96xORf
+sLldyqM9NE+bWbPdUU9EyN2QvbCyT7rrBbxLLlOH0vWcBXNOon7R8l2TG2DZ
+7u0vXNBfxMHkniV0v197Y5pgQVa120eal3Xvmx3I47dk3VQdzef7U9xmmMRW
+FqbBskyTBjvkV1Aq/OQNkyuVgT5wi9CGENr/w/vx3jDfZ11D1CLUWXNMbQVL
+dE09moXI831htwL7+cq12s2wmOukdYVFx5/ZNNujHqHndBLqkdc6fLcNNg+d
+Z1mA+lVRM34asUN9C50SitGf9bs7a3Jg1iO/Lhd5xEsKhX+HSbZ6iiA/34rR
+2yJYuzvozP0phuy8ohgUwEp7q7bjH2FPJ+cVdP2SDibMwJB7+7QtfnTcVG8b
+Ps6QiBNP98XR8cFafcEY7u9CRl0ZLDl8UbfiPUMKp4QuBlh+ctjVbJQh4q8S
+vvRCvfyuwnue7xhSeqFYkwWLd0cpn+sZIhdZWL6m/Zk2ttTBV6/I0wToX9m6
+5uZszBfvuGy0j+bR+SztB1i77a9VMliyyOJQCvbnj/KSi2AtbzL1Is7nfFnd
+U0bHE67Vt6A+mXukXz5dn5V32g71i+5kjCXC/IBoJmaCISTg2nyGjrf6bStH
+v0r2edMwrae8sebpJNarjU3PweSsoq8G+egzGq+b0/ojO5wP/84QQTBvSErz
+NInObIPlFjvGp20xv/Pshpdwaa+XVTSsnRh5nU7nT+ZrNDZY7/e/X15jP86m
+yd8CYPkN3qAG56X2CP/ZsADr04ydJajH2l5TEAhLutnbatTPF6+b22eN9Yv3
+P3qH/uRuiRmZMN++YnUH8igNe+y+BWZ7DC/zkeehIulWJ1j58G3Z/WHsv953
+OY+Odz+9sq4f+a73cLOCJXklIYM96H8weURIPUc38KybIf1ha01CqVUW3go1
+8k//GHmRunBkpKqNIexAwsF2mCRqt75vRn9Nb1850vpV8cvd6zA/zHX7EWrv
+I0Z7q7H/5IK/VFPvHIqLVuJ7iTN7x0H/JP28J1OD+dFdgd7UMZKw7Hp8fyH2
+sUepq157Cx+jnqx51peomzn+9Tg/6MztohxY0rZlYU475u+xi5FRh4Y+aetE
+vwdGT0dRVywONn+F72um0++rYKVHTVIu+tX2nmjS0Xpq+q8P9+L7yD7XcgJm
+s5/0afqQ73y/QjNYGSmUBAwwpKGpq/IC7X9/xjXBIPq9fkM7bYX1G345FQan
+1ilio2FlxfPIdswnR0VTmvnYL3Bp23XkrR9eahoAK4MUNTffMMSw7L/m9ZZY
+3zpUxNExJD58p8sm6tTJ8f9ocZ8zm8e7ebAhuQD/kkR5ouqbc7BkZU5cdyu+
+z02X1J50vCrdxwH56S3vps2nps/V9X+8eez/AXlZLnI=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.7973059266831077, 7.067904665985203}, \
+{-1, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000002274`, 17.}, {13.500000000002274`, 16.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.552325660469876, 17.180083206945802}, \
+{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:eJwt1A1Qk3UcB/A/AjlexFHIazAUkJERxEENAntADpUXJW68nHgMZtRQKIPV
+ASoN2nByunjLKEYspGMIcYsY7tJiFHnzRFkkuHlcIpBwNAILhUCi7/+u5+65
+/33uefl9f7/nf89O4btp+VsIIYdx0pWYNnF4M2SOrlyGGF3GzDNwe2xrVQfM
+M/T2tsGSr9M/48Oq9HESDc807wlxhEPV7wxrn2cIKy+ieDSQIdzqDb4bPHQ4
+RX4ZXjoxoijwYoiN47GMi/DkK1cr+z0ZEs7JyaFmWUkbWXCoaU3bCUuKGn4p
+8GBItHOC22041yYybNqdIcr3FXYE9SR2/hun4NLFOc5rtP6H7+2LhLvjHxwo
+h+UlEpk3bJn+LkgHm9r+knFh+cHxikVYvUYOZcInZSXlXkEMYTuNCdvh8C6u
+Fw/WGQO5LNQX318tiYMNVbyCMljXsz5Jr4emnvl3AWY7TPnT53nPHJdmI/9c
+VELRPJ3fNbGrDtY5lMV00nrHw6zW4aecg7HZcNaktcAb89BxHtnbwiKP5EZP
+2H3QqO9Cv6kZJ9uWcH9pi07Pp/OpNSSpYEeflNdtYd7qE9tgmFlImh/cjfVG
+81Ul8liCkxsVsMTekLeCfriK2cUimARrRAnwzNYAQR4s79E6N7rB/nX3RPDS
+yA/9864MuaMfelQFm8z3tvPh3JbU37upCw9JTTuwH6KjTFOwMZbfUAEn913Y
+4Ys88tIwQSLMlfnkC+DaNbMwBn4qlRQ0w+7X92dmwP7nlGQEJm/JEuvg6KOu
+qsewceflh7OwTmrb4YB5sNiT02+gvmXbvlYn+r19TrT8DLdz+gs2cL9vXdQA
+D/kJ+SjNBOsjf91Uwaz6bxy+hNWJleZlWJTcpThC52m6GfEi+leb+x6y4KZx
+j02G7o+agDkN+pls368IgSfKysyZcO2fYssTPC+NO+JiDWsi355pgoeVSV9d
+CUA/FQlTHrRe/o9LZXDTJ6uXJMjHuunwZgrM5lwZGEM/Bq+Lr4bDoqZCOz9Y
+o/o7IQT2tb/2oNiFIaerRVZ7YbUn99TIcwzhB3mKc+AsS8WuONi0HFh0AU6t
+Kvl09FmGHDCHa6/D8rPcymrY4MjPtkU+vVUpKw+Ov02c4qlHvVqF8HLNb+Vn
+qGu+XZHDXIGsh35P34GIkBE4+e4XRbdgXeC0/0uoxxvfXjlB99MLijUl7Lg0
+tngXZjeG9zkjr2bq7K4BOp+PtX9UwvzZtYV6OCvG+vw03C1MkabTet4d1cHo
+V/35sRR7+v7Hdz7IgsUNyk4t8s+9XL9bAA9v3XbpKJ2XuM6yF2ZH3ai3gXMj
+AiZW8L4hU4u+158hq4OzP52n3rNhXQgTVcj6FjjUaCwMp9dd7lsJkff0rbQ1
+J1j3Pf+fXvSnKXbJ3/D7/7/mjH1OVz/mP8lKx0w=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.16438510075492, 12.373697879094095}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwl1AdMU1EUBuDnQsBSI45UaLHuAZYqEFGoPhSwisQiEjWiVHBgBSxqFKmD
+RK2ioDWGpQYbqEnVxjgogiuiKHVECeJi6Au2igmBgqtiLf5HX9LcfL05955z
+8s4bm7x12Yb+DMMsxI/W/48/ywykdRzLhJYnauRw5MGaQ71jWWbCD73yBMz0
+VjJfYMf9rsgGmOMdKXwKc+Z+X/gBiNNs7CyD3ftK4xbATpd9qhrmeQa3psP2
+XO5tMCwYUJiQDxtD3Np7xCxTkR7yRw9XrI7PM8GRVkmREVZm1k9bT/Zu22yA
+rWVH5gph5Y2esAKYu87TXB7DMlXbGmP2wMx7L6cEtpbI5q+G60u859z1Q172
+EeJgWNBW/DwJVseem+IBu49THxsFW/jNlhbUE/rJPdEqYpl7DSP3XoUd+Trp
+E1gnbTHnwu3OW1/rYKeX6s4m2DL+yrEWeHn57dJYWJnksg3CefdSEobKYH3M
+TH4EbLxwLnEWxT/5HXsUNmU+WEP78gNFCa2wYfF+1VI4NeWuKgT51zrSVqTD
+RoPobD5coXq3q5D2F03+ycG8wcLzj+l+k2PtSPQjr0AUM4jqKU+LDYJ36LW7
+F8K67JZNctiU0+SgfocfSAiMh9O0JcmvqZ9dioJlcJUhJcxvOs73nDU4GpaL
++7xSYGnW2R3T4fBuobYMXrnt+1IPWCG7kdsEX8nOGG5GPsvpfwnL5LTN5kXB
+ARQHF7Mu30eobz2dC2ctqtsZDnN0L9zOC3poQv+klBes7Gfu9oXzKG/Yznp9
+PS7Ee0l1wWL/sEJPuJbqJvNDF5/yRR6GUxo78sl5da0rAFY08J8/gnXd7y43
++WB/RpL5NKwocDWWwvqapxczYOVH7a1sWG37MymK6oufV50BP5s4+rCY4usu
++tG+KbCvpz/VG71bdgbmhr2N6qT3TdiY/YLiXa2/PsJT1lVtGY77v0XLBTa4
++Lx/bzIs2D5Q0kMWVZ6shplhVVFDcF776blx3qjHPXPJ50A4i5vKpsLWJR6i
+JLg+SHOwEnZ0uu0rovpsxiIH3LFKK3sDWzJsu6ahXxzNBfqhm1D7Ug4n0tyQ
+LWskcbCR5gpWN6t6I2ADzR3MugVc8oE7aC4D0c8RqTeb6T6aW1jgkpVr4WCa
+a9iyZUCDCG6kuYcZ7YdcA+px/sJ3AVZ0RNT4wSx9N+Cs6OofOvTn3yNFnbT6
+sH8BRImRiQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.763809742330267, 6.7638097423302685}, \
+{1, 1}], LineBox[{{13.500000000007276`, 16.000000000003638`}, {
+         7.500000000005457, 12.5}}], 
+        PolygonBox[{{9.98173265946094, 13.947677384685548`}, {
+         10.816718930329426`, 14.897834175673825`}, {11.219815750748694`, 
+         14.206811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10.323799910437668, 14.984057296392571}, \
+{1, -1}], LineBox[{{13.5, 16.00000000000231}, {13.5, 8.999999999998607}}], 
+        PolygonBox[{{13.5, 13.1}, {13.1, 11.9}, {13.9, 11.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.4452, 12.5}, {-1, 0}], 
+        LineBox[{{7.5, 12.500000000003638`}, {13.500000000003638`, 
+         9.000000000003638}}], 
+        PolygonBox[{{11.01826734053906, 10.447677384685548`}, {
+         9.780184249251306, 10.706811054955079`}, {10.183281069670574`, 
+         11.397834175673825`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10.323799910437668, 10.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{4.5, 10.}], PointBox[{13.5, 16.}], 
+         PointBox[{16., 6.5}], PointBox[{7.5, 12.5}], PointBox[{13.5, 9.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T5", " ", "P2", " ", "N10"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbf/cgdheh/fihjgigjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdheh/fihjgigjij.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:eJwt1As0lekaB/DXuDZGKjTOFLnsQ27RkKOi79MuNuM2KoRmqShEzDkOKp12
+LQ3nRGl0IbLcRqYyo6HGbaKxNbvk0lRnq8SOQmVcdyWk83/OOd9ae+31W8/7
+vt/z/L9vb+Mdcf4RHzHG0vCh7/9dGjyb/YDLmGdhz6v2K9R4Vtl5Vc/QhGf8
+7ukPs6o8S72mkesGy0Mb3hjD1cVR15Jh1lJWEK2CdZm5jlWwOH1Q0q3MM6mN
+xzEFrTcfS0uBJSquvWtMedb0VaW1Fxx0M8oiFTbyU1UnO/mOurbDYev8E/fD
+Q/HFU4sFsMuuN/dgL6UrVqFwofcH4SbcT8NS+iSPvCsuexxeKqj3vA+LT1nJ
+ytCf6JOud8p/xv653TrRmEdaYd1mQV4bWr9SHfdlBlobycLdugo4I/Be3BbY
+6ButvAvIozDIZWkI3NRSEyGch/kHE8sDYHG/0+FGOPRClY4HrX++Uaj3Mc8c
+3Abq7am+49IJDk4YzvLVJ+v7aa2Fy/u/bJhCf/zdSZEavCDk6WcymKWulRTh
+vPBq39yrVL8RN6YNd7+ICD9DHjXV24J+En5YdPIA2brNNAn9Die1q+2med30
+9h/EfHzjv/cEw0abok7HY359iZZuIOVzubtuK/LZfMtuchvVAyfOrEeeclvF
+t3G0X9v+ocNHqG+P0cqgvM2KO1Yr8UxF9l6ziva/EKgFM/SZ3Hu7H24KPfF4
+9QeOKWY/Njag+YQKw4VzHFs6KsrYBvNOrefWv+fYgk8f8yVUD74bfW+WY37p
+Js7D5AnjNgncFXtoq6MZHOijp4v13YUnIw+RNxhJ62C72xPCFrLdQM8POH9q
+4uCgqjnVj9v24/5eFi5HOZhXvjRdgv78lAQ58bD8L651EehfVHF/8iy5xWWr
+DeYL//xOZzVc+H2UwTicXJZ0/6Y5Pb/8hAvIg3X16LbDTaOLg9yRV+Tx65+2
+0v7EFRelsKJ3Sdt1qkdk/EuAfDVm0o9epH4OpZ/fQr+HYPGzE9TP4WZhEBzT
+s7Pjv/1sut5oCYdpdG71pfr5Ifc2nCcP1K60gVnOHpX1cIp5JptP530mncpA
+PzEjKyMmML98wPZRFfrNacxu64Z5fc/7v2A+tuvJy3Y4rFe6rgrzD7c7G96m
+vI6VZ65BPjW+J6I7yIKcZZrI83KjPKqX9o/sK3g1jefzs6X7NNx0aEXnyBTH
+lpucblhG86XvX2T2lmORRzwXU7/scV1Z4WuO6Rb9ujqN7CnW2aPgWI6K0xXK
+j42Li49Pwkvu1mkux/7tZmwhbJ3RG7wZFpuXMMUEx5ynkuILyCaKjFWoz1pk
+tA7CzD27pgNe8LZIuMIC+7+cnqvB+UY9a9rjYLFTYtkz3D+1UvnURbJQtEGI
+/jZsH1N+AvO9P4c2o3/n+oP9qpbYr3dG3x/zbUiMDxGQvR5odM/g/SvMZE4w
+b+I25o08FAYTMh5mSl8cO433S/+v3QEcLJZEeRfT+23zapsDXLj2GzV75Juf
+omRnDMtvurRGwwmedhHqdH7F/KwEOEti9WgI/RhdL/b2gZ0vTOX/Rv3t8+kZ
+xXnOl3Nl35FDPMoGcL8EwbnaozTPrZXx6ehnrPir7VHkOScrOfrNmWd+05/M
+ef828w752JeVCMnhiaWvML/IWDnShc7b2T90A/mIyuYErlQ/f0xyEnkqJmWp
+vlRfo3Zx7zjuX76zORJmRZvnyUY4FhRw/lIGrZf5DNm/4hhTacuto/qeJVY6
+QxxrSLI8Mk52C//1+HOOOSXVzthSXimqorp+jpULRnwSyHOp9sV96M/7cFoD
+5XctP+gLOGZTfbqaFerKf7r6E1wt3WHqR+7QzWrDfvGNaOuzsLjP58U/cX6Q
+8O/ZD6m+Q8ehY5BjoUp8sp41rGYacOglxyRKBus8yI6cPOkPPE/zivy/kfse
+1HqMceyUjW1FNswHLyp5gHnH7B9OlpPTNgZ7IY8s3e7wKlqvPR2Vh/druPH/
+XhUzdQX5lfb1SL6HxdaxiYffYL1/a+1ZsnqK4xzc5fiy4x90Hv/6+TLkr3Hr
+90dhcJNffP9T1K0dk/o4qmve2SuEu/UXzjckV7+tdMf5yz+5lfke8/Gi5Xmv
+0U+nplKq3Ir+b9oKAvH7UFlpMyqlPM45uB7APIofjU7XkCW7DJ8Oc0w+991Y
+JeVTZP/Ht3g+NaHGJlVUj1+l//kzjj37+kl/I9UTZ3VbeznWJD1wREaOLaot
+kyFvuezhO3Kn6NS6To5VRh4MMKP513dMlDbjeRYUz4SQw+bphf2E+e9ExuaS
+jdRfaKVxzCFmaq6b7LfPcFFeIxN7DjQLbGCN5OyW0kYmemRdupfcZRGrXdiI
+//+XX9eQ6cr6hanQ9wr+PwSlKl4=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.5944997717265688, 13.169947406655712}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwt1Q001WccB/AnoXtauM1NuMrl1qgktVhW/P9JEV0RRTi6Mb3S9DqsuKVJ
+7Za7jVBebmrFUZFsySHXKLJR3bFipRuSMK6XoYR9n23/c+6553N+z/P8Xv7P
+OX+z4C83hWoQQkLxo/9EPYlnGkv+fcxZwp5XKfU4LCk9OKTxsxlLuOeScnoR
+r9IQduyFxQVdxRdh+Rl9/jyYvWERZAgfLW9+pxKwRLB5kfYubZbMuxZ47QrM
+iqpnyLRYoqhRjEfANtteS1I0WRL4xjjShdpH82n8VJZYvrIwXwAXbN8m3amB
+/2NPpAaw4mDpvTVTWDJjx0i1Hqwm/mXzCUt8vqnYzoPlxyVLlkwwJMEybq+Q
+rr8hD1r7gSFW70fjVsKquRflme8Z8thsf4c/LD6RdMP1HdbX2sXE0vqi7z0Q
+jWJ92t7xq/S8ffVri0YY4kl8hutpPz0i3xh4xSUyPETPc1O05sINXJssA/RP
+HmVfssH+Io5T1VJYZef+BQfnO+82jXWm8cRbx4XIX9TKXSeCBb0B4fvHGBLW
+kPXBDZbPIeEvUW/7pprJVTTupb9jK/rxyxy2EsKSR5EltZMMWe4T1zaO/I87
+wpIT0b/JQAah9ckHIpvNMB+1h7IxifZ/WFj4A9z5UGbsA0cUL9Jugdvv+Dbp
+0PonBQfG4BpBWmGCKeImF2M64eL5h6cPzYVrNlRfhmXJH2cHwzJr0XRruj4r
+3aFpDvKEq03PIL/rHOf1gbA4ZOadKNTHrruZ02eC/K/qr6eNM2SX2FF6HpYr
+az1Ool9uj56HN6wa4/M2YD4FAeZ+FjAbeHRAE/MkDkqePo3rmsdVDjEkco9b
+1yy6f8EFQfoAQ2Tmpqut6fkZftOy1Xg/JrXJW6mthFp1fzHEku+SlET9kTJQ
+3cUQzvJLq/6EJVNt86s6GdLZ16K7APWSod4JvzcMEXy3Z1UULKk10C/qwPrW
+p88f0HjtM6sGWGBRJdRB/5J7Wcb5WM/VPp7sAiuaBq8te8sQRa7rigPUd5xD
+13YzJPX0y/LT1JHc8mrUIzt6/9a3MEm2v+6Gegvcd0uOwGJtoaiyH/fv9PL0
+9dQuzcvsBxkiySuK0qJ2/r07Bf0LcjOkeahH4KPU/O1vhhjGP//MkVr4dUvl
+MENG+btuK9CfWKrcF4H5yUd6O+3o/BaHdtyH/cJeu/7IR/6rY0tLYcsXtWlc
+WLzDzXsj3PmqtPKYMdbr1EtjcZ64IeVCvxHOv9sf5IV83J1DORGwJDlzSx3q
+Sy10nZgwxHkuPvmTqJ9VemrIqd9eSevrQ3773I1bYPaBzbxEzCOhxzZFSOPN
+I/ZamJ+kV3aWQ+0gfRHdinreu7dpUgtFVsueM6R4t7/rbOriaH/dBoZEnDwW
+7UDdoTt++SHO8+UFHaKOCJR1lzAkR9dRUEydOt/2ShbmG/lUrIl6iefcosak
+csJdGh/sQ61urNuQU05SCyocL1O3Jx6oyS0nbHcmv4da5Wz9UybM525faExd
+XjN0Cu8vwbN7K3WrU1VIIe6jn/eKr6jPTtn88BfMY/Wac7HU1YR3tw7znBlu
+tB+WHPm1vRD113BExJ3Go45onG9Gf4ZtYTo0vn7qIyMV7nv6mzN3kZ/d8r1d
+JubxuGUw2ovO+6Zv5e125PuwcOUz9Cfh51Z8jvtoeTM43gtWuLZdMMI8Of2f
+5lXMxn7j8F4HWBVSFLgYVqRLAzKwXjHREpNmAJ8KHrR9jXkdalVPh8mJTzx0
+2xjyrDHbN34W9ktLnGxRj8K8pEsPlkSFnDrRhPvHWK7L49H8SU8yn6Af73yn
+AB5932VlHPQ/Gib7w4z3/3cjtey/74g++w/yhW0e
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {0.30479999999999996, 7.7452}, {1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.999999999998543`, 17.}, {14.999999999997012`, 17.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.5, 17.6952}, {0, -1}], 
+        LineBox[CompressedData["
+1:eJwd2Hk8VPv/B/CxJCqSGzeUkAoNKWuWa8oSskzIlsrWj0q2XI31zi1JlkxJ
+TdahCKFJKVGyJURGhEIpQuWiRVlavq/P74/yePqc897Omc85Q8Er0P4gP4VC
+4efDP/ykKJH/5GgUcfJzNY0SOla+xB0eYnTxh8Gxni0urTDvM9N5EFZKWmNj
+sZZGoaW2a29dQ6Mwfy8ueAYzK+MuBcNede0dW+VpFI8Aa5fL8H5mVnIMzLGQ
+si6E01NDD7aS9TundmXDIdOmm1cqYF0xVjsKzrud2edK3CU7agJbzR+NuAwH
+PfmoOIv8fcOiRzth3k7BmExY/AbblaJIo2h47tfQhq3kBS3Ww+JJ4f81ydIo
+EWnWRcYwpe7TTSd48k/7fXZk/YVkynsZGsVCTvm2I8yTzf87Fn56svUwncSr
+G+ajwqwktysmMG1u464RaRqlqVj7xWbYI2Sgkguf0PbulIJrx6tfpcLLLv04
+PY/65J0eeKbAyooOsoMwXax99Aps5VtWUQvTFISXdZLz85LCrsHMJXX+ksgn
+vtTRPZX0G7KOGwDH7TiwOY70azGY+wLOnqcF/kvim7U62KOf1Q0CJmSdZkjb
+2Q273Fh6NA1mnbPKdMM8hEOkTW7A4ldHTIdgukZDcRc8JCit74H5iofEy/Cj
+fo5xL/c5fFY+LGcbHDTiaG2I674/Yu0Yg3jL+C4WfMfopE0NzNSMKH8KD0xb
+TS5eh3qYnw7OwG+7yyodYLroLjMB3Bf3NdVO5cDMIobWLNZvR2pQ38NB1Pg1
+z+HCZxWZ6ko0yrTm4rEM2J636PNR2IMp7GEH902ln86Ha6WzFL+gvtAEnyXd
+cFDn96OJcIHIzbhZYpeWudVws4VaiMR65N9X3FiCfv32sW4qwCzRrNfGsE9M
+5eUNMO1Zu14/5jV9RW2CrA+9q/c9CbNa1DtWwrV6stGG8IfwrDoKOZ7V2ysC
+779snjiGfPInJvkmcT26w9VUn8AU85y0DzAjLetBKcwJyKBScPzhnFeB5+Ah
+y0pXdTjpY+gBBulv5eHSYzB3fiDeB2ZOvGhshy8uXL/pTOLJzHptQ73Z8dN7
+HGD6oZPny+EIz0tsF1jDhNOhhX6X2TF0/Uj8CivdamKRMydPkHmsuFlFw/z+
+Ohy/7xqZL2uvYy2caWam20Py//vZUBvX5+zdY9Ji6I+jxViTASd1dpXawNPV
+o4aT8NDvv2xSyfrrwi5JfG6/+gmvGCTzCWQUKMOsv+dGlTegfrHRpZthuc2r
+roXChatTF8i6l6W9ag0cz5CaloL7dsl5CmxE/qaxhi+I39qkdGgHLG/UEVEA
+zz8SzQ2HubrDBZbE7nn3rsHiqyKT36D+brezDU/gWkvPDyGwafOWbe/gIWuJ
+Gn642UpW8CuJ56UqfRHzkNn0OXqWxItRHdsC+3Gb/L8QzzVUvcQ80x9PzZPz
+6UatWRfggPNPijtJPoeGUS9YPm3YvJKs/+yWtIA5y2Q7Mkj+0pgqM7hmtsQ7
+hvSzRcvbHWY69ah7wUzqqUuJsOCMlK0lqe+B2GAnnFDyvVobnnYSeExFPY1u
+xgYqMK8ifznZL/klg03XwxrB16sk0M+G1U7fVEk9AnLGabCPvs4SA5gSw39X
+FvOJSNdv20Pqc+mSyIU5/rtWRcIWtc4bxTFvqYwze4vhyonTDlawDn1P+luY
+ddb/XRRcsyEvQlEZ9/fbfYIFcH0s1d4PrvXjN2iEaVXzuuWwR86VuB44oip4
+1S9YubHdcwCOWqP6xFIF83zV2vKcXN/8HJVUmObx8K8G2DSlbX0fzFT2rcmH
+1TvrX0upYq7mxffIc4Gq4XHPBmYvPb6IDt9fZOsbCU8/ZT6Whds00n9lw+Lc
+vQ+b0Z8g0+3XXXiIa5LtAn9LnXFsgikVPQYTmI8630uPVph+p5MZD1PCMyca
+ST63+fktsPXv/A3kfO4B09IJzNuwquVCHszyL35HPj8lz0wFz5B8X0Jl8uCB
+w7wwf7LeuZfHge09k0TtSP7t5xMq4SElzuetMC/F59E4PO8btUMGrpXgLGxG
+vtiQkhkhUl9O0p1Esv9R5NvmMQ/x8o5rZD8cNX+s/53M65RKWwj6kTq6w/0n
+PKSfkzZD9s9cs3ei5Pyi66J/YR5iwtQ1KjCNxy5gwtavFvfbkvp8YlbWwrEi
+dqdjYGWB5O9zcGi5hCLpd5ZPU5WKfb+qiWnznawLl/Y6wnp8292NNsFJZikh
+cGiQlPdpmP2I4RAL/1pYatMF09r3XT0DD2Q4f5Kj4vp4jcWegN+Oiar6wazl
+jyICSXyZux9KYO7wu/jd8MuZ3j0fYcbZHiVVOEAsiaeghvvp6uGNC6hvJNL7
+DzuYd9T+XhNcVfdMNwRmBB4yTIGtZq7VJcAau0u2OhMvUrzKhpl+g+sUyDy+
+hu7IhDlTLxa9xrxi31QcuQjTDcOVz8CNc6728XBQM/u6KRzVkPvPMZjmcql7
+Jawj8HeDK8yt71r+gzzPbrooGJHjq3R6F2D3N+bVa0m83dw8cnx6unm1ADwk
+YD1sRu6/oTJD0h9zUkzkLFyZLKDTB4uf8Ur9AJeHO/q0kf7rb0hSUa9F2Xe9
+FjjePcT7EPn8VOxv7YCVebHvi+GCjILmIdjF9s+tk7C9zN6wHzBeWG5rYH7u
+tvfyFZG/9n7aJzLvTImUKntYbyY6oQimXrjCTSTrD4T29cMTUwc3tKmRfdeN
+LYDnthsn+IiEOuIZBfDk4QIJ+nl3mB72bdlWWCf1fmwhPO1/qUsH/mGdJv0V
+bk6eoJL3nvqg85uMNuP+eKt2VRbWi+y+8S8sns/Y/hP5xm3cnzyEGW++xTyH
+/Z0SR2eIDVy2FcD7fKf2r9DAPkw1zgyGc9Qz7irClReDlurDid7JderE7AoR
+fniqrpOhDWvcOS7XhnkMCvms0IWF66jV6WT/ml42ownTe4oUgmAZ5SUPqfC4
+7hFrW/jXozJtEr9WrfWFDvl8BBrvkCTxLRbmVeEk5oExIVg+47TvJlg4fsx/
+GvWyjjTu0YPTjbvju2HlYDZjN2w7ddfwPsz7mc8fRuKrLYougvX6Ksuuwv5G
+wwLZcPyOte398LJGIeMMcvwirz3S6KfGqJSWBwsH5S64wVbrXW/fgsff3bHI
+hguZj3o74NrkNbeHYDmtvYxvMHPwXM1azHvnudyIP1AvzZy+zBU+1/ZbUQPm
+KLyOToDj3l85QYcLTQ6Yl8PC9S8eHiP9JjB+PYVrVjx9y4bFvWVvvYYHJ6pf
+18DNAlFTw3DxxMfcEXjowKu6ftjIacWfIlvQvx2l+jHsWpCsvwmm/6E8Xgi3
+8CvJW8Hi1ZLNTHj5kpKfPrDerV0Gu+H/JPZrRsJ9zx2CVsOSdzztk2BOBK9t
+BP2197gqsGF2uVV3CZwaV5OdDVtcaBI9DkfpTlA4MNde870ZLFM/disTdtn5
+NF8W/vh80jGNnC8Wpz+PeRfFCJQkwKz6PduH4dzzd65Ewxrrg0d74QHD08aB
+8PiRz/19MINreM4D9hBOtB+FuS1FpfYk/8bY77/h6gR6rjk5/+W6WSXkE7nn
+ftCI9GvqsITsnz7Oh57rkvUZ1YhEuCs0qkCHxNfsNWiBE2TYB/RhebtVfEvR
+/7pz6o4mpH7l6N225Hr43ebshguPuV5lwdXHQ1UOkvrH/y+yAz5gUZ5B6h9P
+nIsSxntzvsry4HSYcvVW0jbY2VJspgquzKl44wF7vo22fgUL53pIR8PlrOMx
+AlsR323ULBmWkrwcowJXLhedZcHt30X07GDeTK1J/Dry/viSfQyeHtnx8Bi8
+e832rDSY/vFHlCMsWmbpdpusFxpRqHCzVtjiDpg9T1f7gXrDhxaE3sEuhlna
+5H7x0zOcmIE1LC8yU2DHB9uYfJr4fRbjvDOc2t/XsBget+j5pAB7X3s+JQzz
+KpeKfsL8tn0NCFkE021vyT8m8/V6/eEn4sVrKsmT/WSnULfiF5jj9IWTAvfY
+rBcahYM6bFrJ88t8rcrlXtgjst+CfE+SrBKYbIYpfEU7L5D9NM5XuhoWz/AO
+KIM3j2zbeIP0s2VuhHxPOqV5YXkBcWmYO9k/hc5eKOGQfnwfrzaAb2gdupkD
+M+wfSYXDgi++5l0h9RkMzFXBNuquz0q2kue1u/Uvsp+a5rqSfJVf/jlFw/y2
+j5TJkPlZiIoo/wMn2YXVjpH6AwIH7sLRuZH1guh/1bPIM+PwD4Wjh9eTeag6
+H16O9/hV93L6LWBKs6LCJti9QW51AMywdHqkD6tPT8ldIOdTrf8zgl0V13bc
+g4Pi2eVa5HvDCjnZV2Td5gd3LbyE/B1AC/fP//9xgPY/mqO4+g==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.0723744310654, 6.280370328210516}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl1gk4VekfB/BDhmsrdBMSyhITum0yBp1QabNniRCKtJAwikSZukq6leWq
+JqbuY4ksIes/opFUY4non61Edjf7UJrv+//f5/Hc5/Occ97f8v7ec63y8LM5
+LEhR1CP8kW/q2w98dOj/f6vSFMe9VsZSl6ZUNraqDsHa+c3eSbBhDWvwBUzf
+XPHyAyw3pc5KhNte/nNs6TqaCvl9Y/QB8rztgKwxnGI2qsWEKXPO1gNw2229
+uprVeN70hrI3sXF4RBAcU7Cowgtm1EhxVWGJM8KTtnCgxi2v5lU05R8b4KAH
+MwuXLrsKp9fsWLcYputEo3fD7p58y07kY14VrbUMvvtjyXQG3LBQXDusgrzS
+Km4Hwmqj+tFNcKBsxvNtcFxQ8981sNrI4TYmbKZg/MtLOF3i0SAf/agMV89o
+gzcVFyW0wXZebpYTcPn8kg9v4NkU279kEU9T58FCI2wW7q1Dww1VF8/3wnI7
+c5yOw7OSphIMrD8p3jGdCIdcMWTrwyEWWiUVcEw3VyEIfu3Wyu6G+T8b7yyD
+2+lvmTOwttpBKQbqlYu2HRJEf9zj3yk5wu2HWLkUHNjuMJYGC12bkufjfjb7
+jcAkzG35KtoIt/+5P0qRhT5qUuo8WHj1X2IGcJtkS50vzEg+5G4Nx02cXLQG
+vvfrNO8QLGTM8/yAevV3VTn4wtp2JoNXYMPvZq7H4Fqv+FZ9+AL7wU+HYU2b
+WcFGZfQ/NWHBAVZpe7zXAJZ4Kmu3HWZ5si/kK9EUr8LsoC7xmZjqbXCtvUUm
+E56t5MgMrET/L0X1TyD/Yr0F5Sw4S7RvpgJmL45Wj4GHbehZDuxukt7ChkNC
+rBR84XTVHLcU2GdmXsWC1C9rza6HFfVEDLfCuWFmLdKIV6B/fZDMp7ti8ctD
+MN3Q3LcPdrx6jFUCM98cVTxO5lflop808u9+bJbBJesfyfroCTuezBpohDUH
+u9Y9hC3SdF6IIf8QX6G0TtjEufUgi9QTNhr1DRb0UZZzhPsH9ytS6NeVp776
+EXBKcsHNL7h+83LJfCpMpwR/yoPjRgLy6kh/xjN+uMHB3fpNA3B6KN94Evn5
+OF1nLlqP+Yx1sgmAnw5vDV8G+1ufXt6FemMux55SgYsNr+2nYcf/xBSqwuld
+PL+7ijiPjBVnlMnz1YqL51bg3Oz3s2LCs+Kvn7vBBq4mOmR92kqj9K0C5uUP
+SZsRxO/uXGvnDMucEt7WDFNtF8fm5NHHW+VpJTDnTSKvEN7g6meeTPKVfbXy
+Gjy3ee+nS2TeeqnISNh+/p18AMy9n3ziBqwgV+bhAReXrF1SCpdyWcOkX9zY
+cNMZ4q7vHHvYfCy+yRTxNZ6MvHIm+RiJFybB5i7783xguebQw+Pw53GB0TAW
+6RNXfyfqMSm68yqRzD9Pr+gGPNpvalBM8lNOnXoFZ6cPdbbDUszMHj657nlf
+XQj1s/u/cL7B5a8+22vDDQbLPYbhDeWvs21hVtyOTRWwnsBAYAgxb9PxILhq
+6OzSJFgzXPCrFCyY26VdQPZnxXmZeOT3cJVQdi1Z/6KPizBcaTXQ3gJz8384
++qLe1Jwgjw/Ekro7XsjRVM2MpOV74oesZ6qw3b0i+QY4t9noxKXleD9xGpIq
+4e6j7UlTspizjXnzmSTf0PSRYPj+6abcW7CKspDCEjhO28LlDMzZVXrn2TKc
+pz+elbvCIV6DVzmwRml53HY4Yk3RxTC49sm3m+vIvIjoxUXBCh8f/6pE5stN
+3DYVzjor1ixD5uc5Y74DpqcFrBeTeXNclqyBeFXz4bulYSm3vONnYe75PRMr
+YPOpW3NN8IE5b1ldUp+TcbIW6unseSe/E7ZiT9b9BltUlwkfgRn3XdyL4Gwr
+94RoUv9mOZEe+Kmov2kuqWfv/Olp2Lws0rWN1N8q9WAU1n37Xo3agPW5zlQd
+fFd/Q5s6cfXac2w44NyOdzthuTX9nLXwuGlfthfMTtmq/gT58dieW0Jhd++/
+T2rDDYr2t6/AlNWegluot0+ty+MmnBJvJDLOxHuebr5A3Ob64+s+2GQ03PYq
+8eNDytlL8Tsh0sc5B1vZ3qXkYb76R0tfWCVgd3CcDE35aoaN2cAMf/FIdZhz
+2l/4F7K+yMz3emnE88vep0TyUQ4MSIANnOSjhWCfkPWDZ+Du8hy/EdTvniQ2
+QFye4RH3X5jPSTgVB0fQzVZvYMd4EZUa+Ozvivk1cEo530EM8XT9r/i9IPtp
+yb7gDGt4rWqtJ/s/q3QgH862t33bRfanrtFYHPl3mqz/Mk3225PiuMAbegX0
+mKTe1Pqf/oS9+npj9eDZfZTwW5h9ejjMheSrlTw2AgfbVRyIIv1sv+40Cpcy
+Onyy4IbVPLoJfty5qbcJTn9ZvzoJzmL1rZ4m/SthCJvBTf98TGFuhKOCfFuQ
+36UhQyUd2KePp2kNx1goZxrD+vwEo3LUq5F+otAcZuTYX1aE3UfCpfbAnKH8
+oBApmgqf+G1mO9ytdvvIoyWYT0NtMQO48rNAYuhi5Hkw20wTpnJkeN6SNPVu
+peC4NByh0LgqTAL7v513exb50dz5yGfiOO+7msc6iEMY943guZaigmqy30fn
+QifEcP5Ur6VmwhyW3sInWOiOzuFEcl0sWEIU94+OrTzIJs/nv85wg3Pf2xac
+J/0pi9jVCQs3FRiEk+c3nzM5i/hNYspupJ+cNBO3Nchv+hxHi8xjRFbVhTaY
+mio1SIMrJYOdIlBPXJlYYxWJ5+0gKYN6Dbe0N/UQ7zabiIR9Cu07GKhPqv6e
+Zg18T1LNgQXnSnbItcJ1bMYlx43k93i2Jwe2T9ySeh5OOWmdYgFTFj8L8sj+
+zMcGFiBe7MNC0eekf0ZMdi/yiUrX9O4k94/01PUj/+I8O+lxmC/5OfEF6otI
+iHFaIPFbgvWuoT9R1e2TgpvwPnWWNdkhSlP/+8B88v+rCP0vmGLqoA==
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.28233829669103, 4.3021661698002225}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwd1Q1Uk1UYB/D3oM6hk40Pa8R0I3FNAwRkOgXhTRZsKLCQD5EUNPBMhISD
+FB+KJAOmWE4OJAnogqBpM2d+AQ3BEALF45LpwbAUlUaQSk4UAbX/bee8u+e3
+3fu8z/Pc+57XdcuOyGQbiqI+wUVGikO+5tPU6Bt8XGjKV2aQ7phHU4LNByJv
+wT2Ltaf6eDTVZo3b1QGXi6pWfAAbqtgzrsOGooLBkxgFrZZgK8aopS+LF2DU
+UMdTvDFPnS8rbXiHpuiVQRklsIpxqnMl8Yna0KdwtbxO9sAZ6x3Ojqfhvrou
+s6QW1vBtW8bgy/b7L2bDhucOESrkyYvKtG6FCxqKuU58muLeKrm/HVa8lmQd
+g52aJsqK4LahqzkcAU3949w9/zSsfLyjWw6bRv7sHYYla9zyc4gZsZs8kY8u
+c+3vNTB38unLz+DE8BffnoMNrApdKyzyeSlqg6WmsO3TUB+9qGpDC8zszMhb
+BQ+1lDSfhN3c3/9iG+lH8/CmMrhP6NxRCHOGGA9TYae7HRv2waKS63GB8PRH
+dquzYaU61p1F7ldmkx9B4seEcPSo594edwEbpujlnwcS15tCGpFP+g+PPfrI
+vkXz5obB2scelXnww5C7GhPqo1JTjnnCXO+BfcHwqIcul/RTk5Kw7QwX/WkJ
+ze+FmVl1FA/WKqc/vwKbo59+VPQ25u88POsP2Dc2NPbZW/ChirO2iFfulN+d
+BnP454wRMKtr+fDYXOSV1tith6Oawtdp4HRzSN485DveWXUtEKZDSjU1sHKJ
+mzcDNlmSWE6oN/EXhuKhE+qO+fdmPNy4hvfoNly5cE5UHayyOX9xEPby82+y
+wD2v43bPwPpKTmq80JWm/PeaX4lhZuzWGx/DibGZ0Zmw4KtIx32wLq+H0QQn
+JrPUx+F7A2yxDfLP3i51bYHdtd/0y+Ehx+ot7fB3R+UzS2GvGz5KI9zztz37
+Esy1JA3qXMn5EHdb4HH3K7z9sMy7v3kSplaZfttM4tdcDZyANR+W+/rAGv96
+3QCsPHa/6xXyv3eHF34aXt+QI/+VnL+i7MptMHN+n/oQ6UfGyMRsEu/gpCKB
+nJ9pzAdHSD2yPUFLyXkTTq9xJs5W/8yGp7xYngfQH0XDj8mP0N9niZHCF46I
+07Alphc251hSE+DRwbCVxKpaw8wrDtifKettMn90xeSAHyzIXbDVHvGiVIHl
+TfY01bVBv0oCK1sqloTAErcAlxRYMbCMPcRB3ecLRfUwK37eT0dhdfBiIdkf
+Sr/raCos8S8r8kD90o0xikgOeb5nFWfBKh/r0ggy/5U0ivTXqNij3wwXnKhf
+/AY283cLS/7/fyTd712sD/ATG8n6of7bn8JKxlTTFNx3ZP/uw7B/oZ2jFPlx
+Lyx8coZ42UXFl/B6s19YO1lfY0zrhbUZPWs6YF+7ArU96jWl65c3w/oupksQ
+bNjItdbCxuqDnkkwXV01UgCvpU3qDNjL2GobA1cnD5uUsMgroMoN3lnke0IG
+NyadlDxB/sqxa+0ceH3/ze8bYVoQcOcS6afYxlhI6n39vHEjsfyseB2czndx
+sJB64r3qFsGj2rRM0o8+YXCQLaw1VL9Xy8b57KkfsZL+hruGZtnBYX9Zh2FZ
+cIN/8Bycs2wP4ROYvpzL4LNQj0V0nsJ6aiIu2nY2fl/XGsCHu6TtdnazsI9f
+l3fKifWrh31tEeeC+9V8cr8xsbOKiecm1zOS7A+XvB/gcfJ+cKX/A1GYJ70=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.225285377617156, 7.188392099638602}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl1QdUU1ccBvAHIo5qIIiUImCQsFQkzGLV8CpTBKTWSRFTZZWhyWkUtCC0
+IsMqBhRKiZYhRQqKESUgRUTZGGhEiwzFNAeRikakDFuw9Ls25+S888t9793/
+/e6Iyb6DW0PUKYpKxpdc//+soKmF5LqKpngHL19kwTsSJ3+/tZKmShauFzvB
++c/KGg7DIkFvGw0/7j7fuRrW3vMknQu7eVcYKK1oKqciUmYDn3tX8SAHztcv
+H9aFa3K+1PscFhnmtalMaMpryLlPB367OfNeHey/4NrjXkv8bvqkIhlWjxhO
+/wWmtJx/9IJrOwSax+H6PvEjTfhAx/M3obBiJOlVA4umijTrMrbD+hoFod/B
+rDRxpR/co5q57QavWBVQ9xlpvyLzXQxHfZlVtAeW5zS61y6nqTHH43MEMF9c
+NiGADzQXWZyER11St3Bhzs7rrEvk/ur2+aZw0tzF3U3ERz/qZsHHxtsMB2Ge
+sXL/xzA7JqNzltQX17Y7BDb4k6vQw3jlyu7wEjhXFRZjAUs2NO1/B3ML/3hn
+A1NWGzgc1HfeLcaOmP+wgB8Kr49d4cSGSxKXqOfBtbK1WQzy/LTVF49gg1oH
+HxX6s4yTjS9CPh7XuloayPhNHwZvgE/aXFScgSW98TGhMO+pUdfnMO2e50Hy
+jppXYs2EwzeW+orhfZNa7W0WmL/msiNF8E+bV0sS4LepFxwK4KOekXMd4VSt
+s5EZsNLWYWLEHPOv9u2ZQ7A0ZEFuMVx9OlvkB9/9NPB5KMyf2P3QCM5WzZxb
+A88/M2r+DPXnv/l30awZ8oqxLimGNVPvB/bCOdI1lcFkPscsV9bBsR3C30xg
+1SHry1dgSjSpcYfk1/bxL5dgjtr9DA9YKrQ7UgbXrxsY7DFGLvLkRdWwRDas
+FwdXb/KZugfLpVPp9rBOv2viM5guPTygBtdcVLuujvokOZbFw0ao2+mE0ARO
+FKidIF4hCfvRhYwnQ8wk929dIp0JIO1Npwc4MC8kJVsAj24Sph2CS5W8jG9h
+7ZOMh/dglmPKnjS43vWrZhvUq7dPcCcFZgVf6TkP+7hLhr4h7ZJo5jyMV7f4
+7r4QYg7XywX+rjl2nRsc7q/7vRAOHq8e0ifPn935dRG80O2S+yDJz+tRlwxe
+bb1fTPKhuhvbR2CZX21CMMmr4Kuns3AOJ6LTEG5tbZ03H/PD+TXmbBcb8/1b
+SvUceLhSMpECixzK/hzD/W63x5e7wD38F3rdsHw4aOU/pti/Uz98Ug4zpu00
+foXzh7c2xMF23kf2Hoepta+TXOFuLitvGzwqsP9ZAy5cwGu1gf29Dyw8QeYz
+/Z+YpaTds8B/FnnduNnaPxemjznYx8NjjF4JBddb+hTOgfmv7TxIOz9hwv4H
+zE+Fs0mSDpzY9/tf62BDRtWUOWmPPuU8YYj+bJYqaVixPSWxCW5s7fQOgrW5
+dTvL4eKBMt140j87zFMCD95QLRGT+rr85e0w/7qtmRRmCYz5M/C4xStXGanP
+1fraRvRXr6jK6yfjZce75cJKzf1XlaTd9Hv2LGywzPJTxfvxXr0dRdbjLW7K
+A+KDLpYDMOPKdlYtzDGO8/JDHv6ZWctySZ7ZbP1qOMBkzttouKesLvwD5JdZ
+55HnbErmsYNpDwft0g6cxrnrnPrK5jOyvyLiZFVwjmagP9lPh30X3D8IhzPM
+hJHwkKc81gzWf3vRgJw3B2RdI32Yd7q502Mb7FdMb8uEq+V6CU5kvciKW3zh
+nsqnLeQ89c+a4mjBkjenbatQXwVz2/oe0m9DQK4rPPQo0r0U5oV5mzRhfDJj
+603J5Dm2hYiGM7UD+6Ng7cCXozXIJ3PkGCsI5ruU71oLcx8EyXbDot2LK+qR
+d6xstdleci58FJG2HdYQWn0QTd6n+vvx9DKsw8PHNMj/gFwsHZPC3FKZz3lY
+Uax0TIN1Gtuf3yTvf3naSAh78zhSUq8i39woFv7EkHlqkrzf9mbeOVi0t9aT
+ifEl6jAZrTBvue2wOczSPPpUC/077Vpb6EjaEwQ3wuFmqy1/rSPnrJ3N0U64
+szLpmjPJpyI9az3GY+zX8uEq8r/nmb2kHE6tnenQMSH7U/zECHm8UP/55Wv0
+LxErVckkn6V903dJPjVxaYNwfnvVq1Mw5esabod8RYWhulvgUY/ukSg4QsNO
+l6wLRUkbnQGPS2KLyL4aPR4dfwHXqI2MO6PkHLo5WSmCLzNd5V/AnMf2mpFw
+Y1cz+x7qUvwRJrIm73+3aZCsa1bNDkEf7tOnW/qbyT54oVYqhJPshTsD4Pcf
+eBG5GtL/AZvf91E=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {6.662419809687106, 10.755933890072207}, \
+{1, 0}], LineBox[{{15., 17.00000000000231}, {15., 9.999999999998607}}], 
+        PolygonBox[{{15., 14.1}, {14.6, 12.9}, {15.4, 12.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.9452, 13.5}, {-1, 0}], 
+        LineBox[{{15.000000000007276`, 17.000000000003638`}, {
+         9.000000000005457, 13.5}}], 
+        PolygonBox[{{11.48173265946094, 14.947677384685548`}, {
+         12.316718930329426`, 15.897834175673825`}, {12.719815750748694`, 
+         15.206811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.823799910437668, 15.984057296392571}, \
+{1, -1}], 
+        LineBox[{{15., 9.999999999996362}, {9.000000000001819, 
+         13.499999999996362`}}], 
+        PolygonBox[{{12.51826734053906, 11.447677384685548`}, {
+         11.683281069670574`, 12.397834175673825`}, {11.280184249251306`, 
+         11.706811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.823799910437668, 11.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{3., 9.}], PointBox[{15., 17.}], 
+         PointBox[{7.5, 7.}], PointBox[{15., 10.}], PointBox[{9., 13.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T6", " ", "P1", " ", "N11"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbf/cgdhei/fhhjgigjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdhei/fhhjgigjij.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:eJwt1As0lekaB/DXuDZGKjTOFLnsQ27RkKOi79MuNuM2KoRmqShEzDkOKp12
+LQ3nRGl0IbLcRqYyo6HGbaKxNbvk0lRnq8SOQmVcdyWk83/OOd9ae+31W8/7
+vt/z/L9vb+Mdcf4RHzHG0vCh7/9dGjyb/YDLmGdhz6v2K9R4Vtl5Vc/QhGf8
+7ukPs6o8S72mkesGy0Mb3hjD1cVR15Jh1lJWEK2CdZm5jlWwOH1Q0q3MM6mN
+xzEFrTcfS0uBJSquvWtMedb0VaW1Fxx0M8oiFTbyU1UnO/mOurbDYev8E/fD
+Q/HFU4sFsMuuN/dgL6UrVqFwofcH4SbcT8NS+iSPvCsuexxeKqj3vA+LT1nJ
+ytCf6JOud8p/xv653TrRmEdaYd1mQV4bWr9SHfdlBlobycLdugo4I/Be3BbY
+6ButvAvIozDIZWkI3NRSEyGch/kHE8sDYHG/0+FGOPRClY4HrX++Uaj3Mc8c
+3Abq7am+49IJDk4YzvLVJ+v7aa2Fy/u/bJhCf/zdSZEavCDk6WcymKWulRTh
+vPBq39yrVL8RN6YNd7+ICD9DHjXV24J+En5YdPIA2brNNAn9Die1q+2med30
+9h/EfHzjv/cEw0abok7HY359iZZuIOVzubtuK/LZfMtuchvVAyfOrEeeclvF
+t3G0X9v+ocNHqG+P0cqgvM2KO1Yr8UxF9l6ziva/EKgFM/SZ3Hu7H24KPfF4
+9QeOKWY/Njag+YQKw4VzHFs6KsrYBvNOrefWv+fYgk8f8yVUD74bfW+WY37p
+Js7D5AnjNgncFXtoq6MZHOijp4v13YUnIw+RNxhJ62C72xPCFrLdQM8POH9q
+4uCgqjnVj9v24/5eFi5HOZhXvjRdgv78lAQ58bD8L651EehfVHF/8iy5xWWr
+DeYL//xOZzVc+H2UwTicXJZ0/6Y5Pb/8hAvIg3X16LbDTaOLg9yRV+Tx65+2
+0v7EFRelsKJ3Sdt1qkdk/EuAfDVm0o9epH4OpZ/fQr+HYPGzE9TP4WZhEBzT
+s7Pjv/1sut5oCYdpdG71pfr5Ifc2nCcP1K60gVnOHpX1cIp5JptP530mncpA
+PzEjKyMmML98wPZRFfrNacxu64Z5fc/7v2A+tuvJy3Y4rFe6rgrzD7c7G96m
+vI6VZ65BPjW+J6I7yIKcZZrI83KjPKqX9o/sK3g1jefzs6X7NNx0aEXnyBTH
+lpucblhG86XvX2T2lmORRzwXU7/scV1Z4WuO6Rb9ujqN7CnW2aPgWI6K0xXK
+j42Li49Pwkvu1mkux/7tZmwhbJ3RG7wZFpuXMMUEx5ynkuILyCaKjFWoz1pk
+tA7CzD27pgNe8LZIuMIC+7+cnqvB+UY9a9rjYLFTYtkz3D+1UvnURbJQtEGI
+/jZsH1N+AvO9P4c2o3/n+oP9qpbYr3dG3x/zbUiMDxGQvR5odM/g/SvMZE4w
+b+I25o08FAYTMh5mSl8cO433S/+v3QEcLJZEeRfT+23zapsDXLj2GzV75Juf
+omRnDMtvurRGwwmedhHqdH7F/KwEOEti9WgI/RhdL/b2gZ0vTOX/Rv3t8+kZ
+xXnOl3Nl35FDPMoGcL8EwbnaozTPrZXx6ehnrPir7VHkOScrOfrNmWd+05/M
+ef828w752JeVCMnhiaWvML/IWDnShc7b2T90A/mIyuYErlQ/f0xyEnkqJmWp
+vlRfo3Zx7zjuX76zORJmRZvnyUY4FhRw/lIGrZf5DNm/4hhTacuto/qeJVY6
+QxxrSLI8Mk52C//1+HOOOSXVzthSXimqorp+jpULRnwSyHOp9sV96M/7cFoD
+5XctP+gLOGZTfbqaFerKf7r6E1wt3WHqR+7QzWrDfvGNaOuzsLjP58U/cX6Q
+8O/ZD6m+Q8ehY5BjoUp8sp41rGYacOglxyRKBus8yI6cPOkPPE/zivy/kfse
+1HqMceyUjW1FNswHLyp5gHnH7B9OlpPTNgZ7IY8s3e7wKlqvPR2Vh/druPH/
+XhUzdQX5lfb1SL6HxdaxiYffYL1/a+1ZsnqK4xzc5fiy4x90Hv/6+TLkr3Hr
+90dhcJNffP9T1K0dk/o4qmve2SuEu/UXzjckV7+tdMf5yz+5lfke8/Gi5Xmv
+0U+nplKq3Ir+b9oKAvH7UFlpMyqlPM45uB7APIofjU7XkCW7DJ8Oc0w+991Y
+JeVTZP/Ht3g+NaHGJlVUj1+l//kzjj37+kl/I9UTZ3VbeznWJD1wREaOLaot
+kyFvuezhO3Kn6NS6To5VRh4MMKP513dMlDbjeRYUz4SQw+bphf2E+e9ExuaS
+jdRfaKVxzCFmaq6b7LfPcFFeIxN7DjQLbGCN5OyW0kYmemRdupfcZRGrXdiI
+//+XX9eQ6cr6hanQ9wr+PwSlKl4=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           
+           9.996694214876033]& ], {2.5944997717265688, 13.169947406655712}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwt1Q001WccB/AnoXtauM1NuMrl1qgktVhW/P9JEV0RRTi6Mb3S9DqsuKVJ
+7Za7jVBebmrFUZFsySHXKLJR3bFipRuSMK6XoYR9n23/c+6553N+z/P8Xv7P
+OX+z4C83hWoQQkLxo/9EPYlnGkv+fcxZwp5XKfU4LCk9OKTxsxlLuOeScnoR
+r9IQduyFxQVdxRdh+Rl9/jyYvWERZAgfLW9+pxKwRLB5kfYubZbMuxZ47QrM
+iqpnyLRYoqhRjEfANtteS1I0WRL4xjjShdpH82n8VJZYvrIwXwAXbN8m3amB
+/2NPpAaw4mDpvTVTWDJjx0i1Hqwm/mXzCUt8vqnYzoPlxyVLlkwwJMEybq+Q
+rr8hD1r7gSFW70fjVsKquRflme8Z8thsf4c/LD6RdMP1HdbX2sXE0vqi7z0Q
+jWJ92t7xq/S8ffVri0YY4kl8hutpPz0i3xh4xSUyPETPc1O05sINXJssA/RP
+HmVfssH+Io5T1VJYZef+BQfnO+82jXWm8cRbx4XIX9TKXSeCBb0B4fvHGBLW
+kPXBDZbPIeEvUW/7pprJVTTupb9jK/rxyxy2EsKSR5EltZMMWe4T1zaO/I87
+wpIT0b/JQAah9ckHIpvNMB+1h7IxifZ/WFj4A9z5UGbsA0cUL9Jugdvv+Dbp
+0PonBQfG4BpBWmGCKeImF2M64eL5h6cPzYVrNlRfhmXJH2cHwzJr0XRruj4r
+3aFpDvKEq03PIL/rHOf1gbA4ZOadKNTHrruZ02eC/K/qr6eNM2SX2FF6HpYr
+az1Ool9uj56HN6wa4/M2YD4FAeZ+FjAbeHRAE/MkDkqePo3rmsdVDjEkco9b
+1yy6f8EFQfoAQ2Tmpqut6fkZftOy1Xg/JrXJW6mthFp1fzHEku+SlET9kTJQ
+3cUQzvJLq/6EJVNt86s6GdLZ16K7APWSod4JvzcMEXy3Z1UULKk10C/qwPrW
+p88f0HjtM6sGWGBRJdRB/5J7Wcb5WM/VPp7sAiuaBq8te8sQRa7rigPUd5xD
+13YzJPX0y/LT1JHc8mrUIzt6/9a3MEm2v+6Gegvcd0uOwGJtoaiyH/fv9PL0
+9dQuzcvsBxkiySuK0qJ2/r07Bf0LcjOkeahH4KPU/O1vhhjGP//MkVr4dUvl
+MENG+btuK9CfWKrcF4H5yUd6O+3o/BaHdtyH/cJeu/7IR/6rY0tLYcsXtWlc
+WLzDzXsj3PmqtPKYMdbr1EtjcZ64IeVCvxHOv9sf5IV83J1DORGwJDlzSx3q
+Sy10nZgwxHkuPvmTqJ9VemrIqd9eSevrQ3773I1bYPaBzbxEzCOhxzZFSOPN
+I/ZamJ+kV3aWQ+0gfRHdinreu7dpUgtFVsueM6R4t7/rbOriaH/dBoZEnDwW
+7UDdoTt++SHO8+UFHaKOCJR1lzAkR9dRUEydOt/2ShbmG/lUrIl6iefcosak
+csJdGh/sQ61urNuQU05SCyocL1O3Jx6oyS0nbHcmv4da5Wz9UybM525faExd
+XjN0Cu8vwbN7K3WrU1VIIe6jn/eKr6jPTtn88BfMY/Wac7HU1YR3tw7znBlu
+tB+WHPm1vRD113BExJ3Go45onG9Gf4ZtYTo0vn7qIyMV7nv6mzN3kZ/d8r1d
+JubxuGUw2ovO+6Zv5e125PuwcOUz9Cfh51Z8jvtoeTM43gtWuLZdMMI8Of2f
+5lXMxn7j8F4HWBVSFLgYVqRLAzKwXjHREpNmAJ8KHrR9jXkdalVPh8mJTzx0
+2xjyrDHbN34W9ktLnGxRj8K8pEsPlkSFnDrRhPvHWK7L49H8SU8yn6Af73yn
+AB5932VlHPQ/Gib7w4z3/3cjtey/74g++w/yhW0e
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {0.30479999999999996, 7.7452}, {1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.999999999998543`, 17.}, {14.999999999997012`, 17.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.5, 17.6952}, {0, -1}], 
+        LineBox[CompressedData["
+1:eJwd2Hk8VPv/B/CxJCqSGzeUkAoNKWuWa8oSskzIlsrWj0q2XI31zi1JlkxJ
+TdahCKFJKVGyJURGhEIpQuWiRVlavq/P74/yePqc897Omc85Q8Er0P4gP4VC
+4efDP/ykKJH/5GgUcfJzNY0SOla+xB0eYnTxh8Gxni0urTDvM9N5EFZKWmNj
+sZZGoaW2a29dQ6Mwfy8ueAYzK+MuBcNede0dW+VpFI8Aa5fL8H5mVnIMzLGQ
+si6E01NDD7aS9TundmXDIdOmm1cqYF0xVjsKzrud2edK3CU7agJbzR+NuAwH
+PfmoOIv8fcOiRzth3k7BmExY/AbblaJIo2h47tfQhq3kBS3Ww+JJ4f81ydIo
+EWnWRcYwpe7TTSd48k/7fXZk/YVkynsZGsVCTvm2I8yTzf87Fn56svUwncSr
+G+ajwqwktysmMG1u464RaRqlqVj7xWbYI2Sgkguf0PbulIJrx6tfpcLLLv04
+PY/65J0eeKbAyooOsoMwXax99Aps5VtWUQvTFISXdZLz85LCrsHMJXX+ksgn
+vtTRPZX0G7KOGwDH7TiwOY70azGY+wLOnqcF/kvim7U62KOf1Q0CJmSdZkjb
+2Q273Fh6NA1mnbPKdMM8hEOkTW7A4ldHTIdgukZDcRc8JCit74H5iofEy/Cj
+fo5xL/c5fFY+LGcbHDTiaG2I674/Yu0Yg3jL+C4WfMfopE0NzNSMKH8KD0xb
+TS5eh3qYnw7OwG+7yyodYLroLjMB3Bf3NdVO5cDMIobWLNZvR2pQ38NB1Pg1
+z+HCZxWZ6ko0yrTm4rEM2J636PNR2IMp7GEH902ln86Ha6WzFL+gvtAEnyXd
+cFDn96OJcIHIzbhZYpeWudVws4VaiMR65N9X3FiCfv32sW4qwCzRrNfGsE9M
+5eUNMO1Zu14/5jV9RW2CrA+9q/c9CbNa1DtWwrV6stGG8IfwrDoKOZ7V2ysC
+779snjiGfPInJvkmcT26w9VUn8AU85y0DzAjLetBKcwJyKBScPzhnFeB5+Ah
+y0pXdTjpY+gBBulv5eHSYzB3fiDeB2ZOvGhshy8uXL/pTOLJzHptQ73Z8dN7
+HGD6oZPny+EIz0tsF1jDhNOhhX6X2TF0/Uj8CivdamKRMydPkHmsuFlFw/z+
+Ohy/7xqZL2uvYy2caWam20Py//vZUBvX5+zdY9Ji6I+jxViTASd1dpXawNPV
+o4aT8NDvv2xSyfrrwi5JfG6/+gmvGCTzCWQUKMOsv+dGlTegfrHRpZthuc2r
+roXChatTF8i6l6W9ag0cz5CaloL7dsl5CmxE/qaxhi+I39qkdGgHLG/UEVEA
+zz8SzQ2HubrDBZbE7nn3rsHiqyKT36D+brezDU/gWkvPDyGwafOWbe/gIWuJ
+Gn642UpW8CuJ56UqfRHzkNn0OXqWxItRHdsC+3Gb/L8QzzVUvcQ80x9PzZPz
+6UatWRfggPNPijtJPoeGUS9YPm3YvJKs/+yWtIA5y2Q7Mkj+0pgqM7hmtsQ7
+hvSzRcvbHWY69ah7wUzqqUuJsOCMlK0lqe+B2GAnnFDyvVobnnYSeExFPY1u
+xgYqMK8ifznZL/klg03XwxrB16sk0M+G1U7fVEk9AnLGabCPvs4SA5gSw39X
+FvOJSNdv20Pqc+mSyIU5/rtWRcIWtc4bxTFvqYwze4vhyonTDlawDn1P+luY
+ddb/XRRcsyEvQlEZ9/fbfYIFcH0s1d4PrvXjN2iEaVXzuuWwR86VuB44oip4
+1S9YubHdcwCOWqP6xFIF83zV2vKcXN/8HJVUmObx8K8G2DSlbX0fzFT2rcmH
+1TvrX0upYq7mxffIc4Gq4XHPBmYvPb6IDt9fZOsbCU8/ZT6Whds00n9lw+Lc
+vQ+b0Z8g0+3XXXiIa5LtAn9LnXFsgikVPQYTmI8630uPVph+p5MZD1PCMyca
+ST63+fktsPXv/A3kfO4B09IJzNuwquVCHszyL35HPj8lz0wFz5B8X0Jl8uCB
+w7wwf7LeuZfHge09k0TtSP7t5xMq4SElzuetMC/F59E4PO8btUMGrpXgLGxG
+vtiQkhkhUl9O0p1Esv9R5NvmMQ/x8o5rZD8cNX+s/53M65RKWwj6kTq6w/0n
+PKSfkzZD9s9cs3ei5Pyi66J/YR5iwtQ1KjCNxy5gwtavFvfbkvp8YlbWwrEi
+dqdjYGWB5O9zcGi5hCLpd5ZPU5WKfb+qiWnznawLl/Y6wnp8292NNsFJZikh
+cGiQlPdpmP2I4RAL/1pYatMF09r3XT0DD2Q4f5Kj4vp4jcWegN+Oiar6wazl
+jyICSXyZux9KYO7wu/jd8MuZ3j0fYcbZHiVVOEAsiaeghvvp6uGNC6hvJNL7
+DzuYd9T+XhNcVfdMNwRmBB4yTIGtZq7VJcAau0u2OhMvUrzKhpl+g+sUyDy+
+hu7IhDlTLxa9xrxi31QcuQjTDcOVz8CNc6728XBQM/u6KRzVkPvPMZjmcql7
+Jawj8HeDK8yt71r+gzzPbrooGJHjq3R6F2D3N+bVa0m83dw8cnx6unm1ADwk
+YD1sRu6/oTJD0h9zUkzkLFyZLKDTB4uf8Ur9AJeHO/q0kf7rb0hSUa9F2Xe9
+FjjePcT7EPn8VOxv7YCVebHvi+GCjILmIdjF9s+tk7C9zN6wHzBeWG5rYH7u
+tvfyFZG/9n7aJzLvTImUKntYbyY6oQimXrjCTSTrD4T29cMTUwc3tKmRfdeN
+LYDnthsn+IiEOuIZBfDk4QIJ+nl3mB72bdlWWCf1fmwhPO1/qUsH/mGdJv0V
+bk6eoJL3nvqg85uMNuP+eKt2VRbWi+y+8S8sns/Y/hP5xm3cnzyEGW++xTyH
+/Z0SR2eIDVy2FcD7fKf2r9DAPkw1zgyGc9Qz7irClReDlurDid7JderE7AoR
+fniqrpOhDWvcOS7XhnkMCvms0IWF66jV6WT/ml42ownTe4oUgmAZ5SUPqfC4
+7hFrW/jXozJtEr9WrfWFDvl8BBrvkCTxLRbmVeEk5oExIVg+47TvJlg4fsx/
+GvWyjjTu0YPTjbvju2HlYDZjN2w7ddfwPsz7mc8fRuKrLYougvX6Ksuuwv5G
+wwLZcPyOte398LJGIeMMcvwirz3S6KfGqJSWBwsH5S64wVbrXW/fgsff3bHI
+hguZj3o74NrkNbeHYDmtvYxvMHPwXM1azHvnudyIP1AvzZy+zBU+1/ZbUQPm
+KLyOToDj3l85QYcLTQ6Yl8PC9S8eHiP9JjB+PYVrVjx9y4bFvWVvvYYHJ6pf
+18DNAlFTw3DxxMfcEXjowKu6ftjIacWfIlvQvx2l+jHsWpCsvwmm/6E8Xgi3
+8CvJW8Hi1ZLNTHj5kpKfPrDerV0Gu+H/JPZrRsJ9zx2CVsOSdzztk2BOBK9t
+BP2197gqsGF2uVV3CZwaV5OdDVtcaBI9DkfpTlA4MNde870ZLFM/disTdtn5
+NF8W/vh80jGNnC8Wpz+PeRfFCJQkwKz6PduH4dzzd65Ewxrrg0d74QHD08aB
+8PiRz/19MINreM4D9hBOtB+FuS1FpfYk/8bY77/h6gR6rjk5/+W6WSXkE7nn
+ftCI9GvqsITsnz7Oh57rkvUZ1YhEuCs0qkCHxNfsNWiBE2TYB/RhebtVfEvR
+/7pz6o4mpH7l6N225Hr43ebshguPuV5lwdXHQ1UOkvrH/y+yAz5gUZ5B6h9P
+nIsSxntzvsry4HSYcvVW0jbY2VJspgquzKl44wF7vo22fgUL53pIR8PlrOMx
+AlsR323ULBmWkrwcowJXLhedZcHt30X07GDeTK1J/Dry/viSfQyeHtnx8Bi8
+e832rDSY/vFHlCMsWmbpdpusFxpRqHCzVtjiDpg9T1f7gXrDhxaE3sEuhlna
+5H7x0zOcmIE1LC8yU2DHB9uYfJr4fRbjvDOc2t/XsBget+j5pAB7X3s+JQzz
+KpeKfsL8tn0NCFkE021vyT8m8/V6/eEn4sVrKsmT/WSnULfiF5jj9IWTAvfY
+rBcahYM6bFrJ88t8rcrlXtgjst+CfE+SrBKYbIYpfEU7L5D9NM5XuhoWz/AO
+KIM3j2zbeIP0s2VuhHxPOqV5YXkBcWmYO9k/hc5eKOGQfnwfrzaAb2gdupkD
+M+wfSYXDgi++5l0h9RkMzFXBNuquz0q2kue1u/Uvsp+a5rqSfJVf/jlFw/y2
+j5TJkPlZiIoo/wMn2YXVjpH6AwIH7sLRuZH1guh/1bPIM+PwD4Wjh9eTeag6
+H16O9/hV93L6LWBKs6LCJti9QW51AMywdHqkD6tPT8ldIOdTrf8zgl0V13bc
+g4Pi2eVa5HvDCjnZV2Td5gd3LbyE/B1AC/fP//9xgPY/mqO4+g==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.0723744310654, 6.280370328210516}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl1gk4VekfB/BDhmsrdBMSyhITum0yBp1QabNniRCKtJAwikSZukq6leWq
+JqbuY4ksIes/opFUY4non61Edjf7UJrv+//f5/Hc5/Occ97f8v7ec63y8LM5
+LEhR1CP8kW/q2w98dOj/f6vSFMe9VsZSl6ZUNraqDsHa+c3eSbBhDWvwBUzf
+XPHyAyw3pc5KhNte/nNs6TqaCvl9Y/QB8rztgKwxnGI2qsWEKXPO1gNw2229
+uprVeN70hrI3sXF4RBAcU7Cowgtm1EhxVWGJM8KTtnCgxi2v5lU05R8b4KAH
+MwuXLrsKp9fsWLcYputEo3fD7p58y07kY14VrbUMvvtjyXQG3LBQXDusgrzS
+Km4Hwmqj+tFNcKBsxvNtcFxQ8981sNrI4TYmbKZg/MtLOF3i0SAf/agMV89o
+gzcVFyW0wXZebpYTcPn8kg9v4NkU279kEU9T58FCI2wW7q1Dww1VF8/3wnI7
+c5yOw7OSphIMrD8p3jGdCIdcMWTrwyEWWiUVcEw3VyEIfu3Wyu6G+T8b7yyD
+2+lvmTOwttpBKQbqlYu2HRJEf9zj3yk5wu2HWLkUHNjuMJYGC12bkufjfjb7
+jcAkzG35KtoIt/+5P0qRhT5qUuo8WHj1X2IGcJtkS50vzEg+5G4Nx02cXLQG
+vvfrNO8QLGTM8/yAevV3VTn4wtp2JoNXYMPvZq7H4Fqv+FZ9+AL7wU+HYU2b
+WcFGZfQ/NWHBAVZpe7zXAJZ4Kmu3HWZ5si/kK9EUr8LsoC7xmZjqbXCtvUUm
+E56t5MgMrET/L0X1TyD/Yr0F5Sw4S7RvpgJmL45Wj4GHbehZDuxukt7ChkNC
+rBR84XTVHLcU2GdmXsWC1C9rza6HFfVEDLfCuWFmLdKIV6B/fZDMp7ti8ctD
+MN3Q3LcPdrx6jFUCM98cVTxO5lflop808u9+bJbBJesfyfroCTuezBpohDUH
+u9Y9hC3SdF6IIf8QX6G0TtjEufUgi9QTNhr1DRb0UZZzhPsH9ytS6NeVp776
+EXBKcsHNL7h+83LJfCpMpwR/yoPjRgLy6kh/xjN+uMHB3fpNA3B6KN94Evn5
+OF1nLlqP+Yx1sgmAnw5vDV8G+1ufXt6FemMux55SgYsNr+2nYcf/xBSqwuld
+PL+7ijiPjBVnlMnz1YqL51bg3Oz3s2LCs+Kvn7vBBq4mOmR92kqj9K0C5uUP
+SZsRxO/uXGvnDMucEt7WDFNtF8fm5NHHW+VpJTDnTSKvEN7g6meeTPKVfbXy
+Gjy3ee+nS2TeeqnISNh+/p18AMy9n3ziBqwgV+bhAReXrF1SCpdyWcOkX9zY
+cNMZ4q7vHHvYfCy+yRTxNZ6MvHIm+RiJFybB5i7783xguebQw+Pw53GB0TAW
+6RNXfyfqMSm68yqRzD9Pr+gGPNpvalBM8lNOnXoFZ6cPdbbDUszMHj657nlf
+XQj1s/u/cL7B5a8+22vDDQbLPYbhDeWvs21hVtyOTRWwnsBAYAgxb9PxILhq
+6OzSJFgzXPCrFCyY26VdQPZnxXmZeOT3cJVQdi1Z/6KPizBcaTXQ3gJz8384
++qLe1Jwgjw/Ekro7XsjRVM2MpOV74oesZ6qw3b0i+QY4t9noxKXleD9xGpIq
+4e6j7UlTspizjXnzmSTf0PSRYPj+6abcW7CKspDCEjhO28LlDMzZVXrn2TKc
+pz+elbvCIV6DVzmwRml53HY4Yk3RxTC49sm3m+vIvIjoxUXBCh8f/6pE5stN
+3DYVzjor1ixD5uc5Y74DpqcFrBeTeXNclqyBeFXz4bulYSm3vONnYe75PRMr
+YPOpW3NN8IE5b1ldUp+TcbIW6unseSe/E7ZiT9b9BltUlwkfgRn3XdyL4Gwr
+94RoUv9mOZEe+Kmov2kuqWfv/Olp2Lws0rWN1N8q9WAU1n37Xo3agPW5zlQd
+fFd/Q5s6cfXac2w44NyOdzthuTX9nLXwuGlfthfMTtmq/gT58dieW0Jhd++/
+T2rDDYr2t6/AlNWegluot0+ty+MmnBJvJDLOxHuebr5A3Ob64+s+2GQ03PYq
+8eNDytlL8Tsh0sc5B1vZ3qXkYb76R0tfWCVgd3CcDE35aoaN2cAMf/FIdZhz
+2l/4F7K+yMz3emnE88vep0TyUQ4MSIANnOSjhWCfkPWDZ+Du8hy/EdTvniQ2
+QFye4RH3X5jPSTgVB0fQzVZvYMd4EZUa+Ozvivk1cEo530EM8XT9r/i9IPtp
+yb7gDGt4rWqtJ/s/q3QgH862t33bRfanrtFYHPl3mqz/Mk3225PiuMAbegX0
+mKTe1Pqf/oS9+npj9eDZfZTwW5h9ejjMheSrlTw2AgfbVRyIIv1sv+40Cpcy
+Onyy4IbVPLoJfty5qbcJTn9ZvzoJzmL1rZ4m/SthCJvBTf98TGFuhKOCfFuQ
+36UhQyUd2KePp2kNx1goZxrD+vwEo3LUq5F+otAcZuTYX1aE3UfCpfbAnKH8
+oBApmgqf+G1mO9ytdvvIoyWYT0NtMQO48rNAYuhi5Hkw20wTpnJkeN6SNPVu
+peC4NByh0LgqTAL7v513exb50dz5yGfiOO+7msc6iEMY943guZaigmqy30fn
+QifEcP5Ur6VmwhyW3sInWOiOzuFEcl0sWEIU94+OrTzIJs/nv85wg3Pf2xac
+J/0pi9jVCQs3FRiEk+c3nzM5i/hNYspupJ+cNBO3Nchv+hxHi8xjRFbVhTaY
+mio1SIMrJYOdIlBPXJlYYxWJ5+0gKYN6Dbe0N/UQ7zabiIR9Cu07GKhPqv6e
+Zg18T1LNgQXnSnbItcJ1bMYlx43k93i2Jwe2T9ySeh5OOWmdYgFTFj8L8sj+
+zMcGFiBe7MNC0eekf0ZMdi/yiUrX9O4k94/01PUj/+I8O+lxmC/5OfEF6otI
+iHFaIPFbgvWuoT9R1e2TgpvwPnWWNdkhSlP/+8B88v+rCP0vmGLqoA==
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.28233829669103, 4.3021661698002225}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwd1Q1Uk1UYB/D3oM6hk40Pa8R0I3FNAwRkOgXhTRZsKLCQD5EUNPBMhISD
+FB+KJAOmWE4OJAnogqBpM2d+AQ3BEALF45LpwbAUlUaQSk4UAbX/bee8u+e3
+3fu8z/Pc+57XdcuOyGQbiqI+wUVGikO+5tPU6Bt8XGjKV2aQ7phHU4LNByJv
+wT2Ltaf6eDTVZo3b1QGXi6pWfAAbqtgzrsOGooLBkxgFrZZgK8aopS+LF2DU
+UMdTvDFPnS8rbXiHpuiVQRklsIpxqnMl8Yna0KdwtbxO9sAZ6x3Ojqfhvrou
+s6QW1vBtW8bgy/b7L2bDhucOESrkyYvKtG6FCxqKuU58muLeKrm/HVa8lmQd
+g52aJsqK4LahqzkcAU3949w9/zSsfLyjWw6bRv7sHYYla9zyc4gZsZs8kY8u
+c+3vNTB38unLz+DE8BffnoMNrApdKyzyeSlqg6WmsO3TUB+9qGpDC8zszMhb
+BQ+1lDSfhN3c3/9iG+lH8/CmMrhP6NxRCHOGGA9TYae7HRv2waKS63GB8PRH
+dquzYaU61p1F7ldmkx9B4seEcPSo594edwEbpujlnwcS15tCGpFP+g+PPfrI
+vkXz5obB2scelXnww5C7GhPqo1JTjnnCXO+BfcHwqIcul/RTk5Kw7QwX/WkJ
+ze+FmVl1FA/WKqc/vwKbo59+VPQ25u88POsP2Dc2NPbZW/ChirO2iFfulN+d
+BnP454wRMKtr+fDYXOSV1tith6Oawtdp4HRzSN485DveWXUtEKZDSjU1sHKJ
+mzcDNlmSWE6oN/EXhuKhE+qO+fdmPNy4hvfoNly5cE5UHayyOX9xEPby82+y
+wD2v43bPwPpKTmq80JWm/PeaX4lhZuzWGx/DibGZ0Zmw4KtIx32wLq+H0QQn
+JrPUx+F7A2yxDfLP3i51bYHdtd/0y+Ehx+ot7fB3R+UzS2GvGz5KI9zztz37
+Esy1JA3qXMn5EHdb4HH3K7z9sMy7v3kSplaZfttM4tdcDZyANR+W+/rAGv96
+3QCsPHa/6xXyv3eHF34aXt+QI/+VnL+i7MptMHN+n/oQ6UfGyMRsEu/gpCKB
+nJ9pzAdHSD2yPUFLyXkTTq9xJs5W/8yGp7xYngfQH0XDj8mP0N9niZHCF46I
+07Alphc251hSE+DRwbCVxKpaw8wrDtifKettMn90xeSAHyzIXbDVHvGiVIHl
+TfY01bVBv0oCK1sqloTAErcAlxRYMbCMPcRB3ecLRfUwK37eT0dhdfBiIdkf
+Sr/raCos8S8r8kD90o0xikgOeb5nFWfBKh/r0ggy/5U0ivTXqNij3wwXnKhf
+/AY283cLS/7/fyTd712sD/ATG8n6of7bn8JKxlTTFNx3ZP/uw7B/oZ2jFPlx
+Lyx8coZ42UXFl/B6s19YO1lfY0zrhbUZPWs6YF+7ArU96jWl65c3w/oupksQ
+bNjItdbCxuqDnkkwXV01UgCvpU3qDNjL2GobA1cnD5uUsMgroMoN3lnke0IG
+NyadlDxB/sqxa+0ceH3/ze8bYVoQcOcS6afYxlhI6n39vHEjsfyseB2czndx
+sJB64r3qFsGj2rRM0o8+YXCQLaw1VL9Xy8b57KkfsZL+hruGZtnBYX9Zh2FZ
+cIN/8Bycs2wP4ROYvpzL4LNQj0V0nsJ6aiIu2nY2fl/XGsCHu6TtdnazsI9f
+l3fKifWrh31tEeeC+9V8cr8xsbOKiecm1zOS7A+XvB/gcfJ+cKX/A1GYJ70=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.225285377617156, 7.188392099638602}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl1QdUU1ccBvAHIo5qIIiUImCQsFQkzGLV8CpTBKTWSRFTZZWhyWkUtCC0
+IsMqBhRKiZYhRQqKESUgRUTZGGhEiwzFNAeRikakDFuw9Ls25+S888t9793/
+/e6Iyb6DW0PUKYpKxpdc//+soKmF5LqKpngHL19kwTsSJ3+/tZKmShauFzvB
++c/KGg7DIkFvGw0/7j7fuRrW3vMknQu7eVcYKK1oKqciUmYDn3tX8SAHztcv
+H9aFa3K+1PscFhnmtalMaMpryLlPB367OfNeHey/4NrjXkv8bvqkIhlWjxhO
+/wWmtJx/9IJrOwSax+H6PvEjTfhAx/M3obBiJOlVA4umijTrMrbD+hoFod/B
+rDRxpR/co5q57QavWBVQ9xlpvyLzXQxHfZlVtAeW5zS61y6nqTHH43MEMF9c
+NiGADzQXWZyER11St3Bhzs7rrEvk/ur2+aZw0tzF3U3ERz/qZsHHxtsMB2Ge
+sXL/xzA7JqNzltQX17Y7BDb4k6vQw3jlyu7wEjhXFRZjAUs2NO1/B3ML/3hn
+A1NWGzgc1HfeLcaOmP+wgB8Kr49d4cSGSxKXqOfBtbK1WQzy/LTVF49gg1oH
+HxX6s4yTjS9CPh7XuloayPhNHwZvgE/aXFScgSW98TGhMO+pUdfnMO2e50Hy
+jppXYs2EwzeW+orhfZNa7W0WmL/msiNF8E+bV0sS4LepFxwK4KOekXMd4VSt
+s5EZsNLWYWLEHPOv9u2ZQ7A0ZEFuMVx9OlvkB9/9NPB5KMyf2P3QCM5WzZxb
+A88/M2r+DPXnv/l30awZ8oqxLimGNVPvB/bCOdI1lcFkPscsV9bBsR3C30xg
+1SHry1dgSjSpcYfk1/bxL5dgjtr9DA9YKrQ7UgbXrxsY7DFGLvLkRdWwRDas
+FwdXb/KZugfLpVPp9rBOv2viM5guPTygBtdcVLuujvokOZbFw0ao2+mE0ARO
+FKidIF4hCfvRhYwnQ8wk929dIp0JIO1Npwc4MC8kJVsAj24Sph2CS5W8jG9h
+7ZOMh/dglmPKnjS43vWrZhvUq7dPcCcFZgVf6TkP+7hLhr4h7ZJo5jyMV7f4
+7r4QYg7XywX+rjl2nRsc7q/7vRAOHq8e0ifPn935dRG80O2S+yDJz+tRlwxe
+bb1fTPKhuhvbR2CZX21CMMmr4Kuns3AOJ6LTEG5tbZ03H/PD+TXmbBcb8/1b
+SvUceLhSMpECixzK/hzD/W63x5e7wD38F3rdsHw4aOU/pti/Uz98Ug4zpu00
+foXzh7c2xMF23kf2Hoepta+TXOFuLitvGzwqsP9ZAy5cwGu1gf29Dyw8QeYz
+/Z+YpaTds8B/FnnduNnaPxemjznYx8NjjF4JBddb+hTOgfmv7TxIOz9hwv4H
+zE+Fs0mSDpzY9/tf62BDRtWUOWmPPuU8YYj+bJYqaVixPSWxCW5s7fQOgrW5
+dTvL4eKBMt140j87zFMCD95QLRGT+rr85e0w/7qtmRRmCYz5M/C4xStXGanP
+1fraRvRXr6jK6yfjZce75cJKzf1XlaTd9Hv2LGywzPJTxfvxXr0dRdbjLW7K
+A+KDLpYDMOPKdlYtzDGO8/JDHv6ZWctySZ7ZbP1qOMBkzttouKesLvwD5JdZ
+55HnbErmsYNpDwft0g6cxrnrnPrK5jOyvyLiZFVwjmagP9lPh30X3D8IhzPM
+hJHwkKc81gzWf3vRgJw3B2RdI32Yd7q502Mb7FdMb8uEq+V6CU5kvciKW3zh
+nsqnLeQ89c+a4mjBkjenbatQXwVz2/oe0m9DQK4rPPQo0r0U5oV5mzRhfDJj
+603J5Dm2hYiGM7UD+6Ng7cCXozXIJ3PkGCsI5ruU71oLcx8EyXbDot2LK+qR
+d6xstdleci58FJG2HdYQWn0QTd6n+vvx9DKsw8PHNMj/gFwsHZPC3FKZz3lY
+Uax0TIN1Gtuf3yTvf3naSAh78zhSUq8i39woFv7EkHlqkrzf9mbeOVi0t9aT
+ifEl6jAZrTBvue2wOczSPPpUC/077Vpb6EjaEwQ3wuFmqy1/rSPnrJ3N0U64
+szLpmjPJpyI9az3GY+zX8uEq8r/nmb2kHE6tnenQMSH7U/zECHm8UP/55Wv0
+LxErVckkn6V903dJPjVxaYNwfnvVq1Mw5esabod8RYWhulvgUY/ukSg4QsNO
+l6wLRUkbnQGPS2KLyL4aPR4dfwHXqI2MO6PkHLo5WSmCLzNd5V/AnMf2mpFw
+Y1cz+x7qUvwRJrIm73+3aZCsa1bNDkEf7tOnW/qbyT54oVYqhJPshTsD4Pcf
+eBG5GtL/AZvf91E=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {6.662419809687106, 10.755933890072207}, \
+{1, 0}], LineBox[{{15., 17.00000000000231}, {15., 9.999999999998607}}], 
+        PolygonBox[{{15., 12.9}, {14.6, 14.1}, {15.4, 14.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.9452, 13.5}, {-1, 0}], 
+        LineBox[{{15.000000000007276`, 17.000000000003638`}, {
+         9.000000000005457, 13.5}}], 
+        PolygonBox[{{12.51826734053906, 15.552322615314452`}, {
+         11.280184249251306`, 15.293188945044921`}, {11.683281069670574`, 
+         14.602165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.823799910437668, 15.984057296392571}, \
+{1, -1}], 
+        LineBox[{{15., 9.999999999996362}, {9.000000000001819, 
+         13.499999999996362`}}], 
+        PolygonBox[{{11.48173265946094, 12.052322615314452`}, {
+         12.719815750748694`, 11.793188945044921`}, {12.316718930329426`, 
+         11.102165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.823799910437668, 11.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{3., 9.}], PointBox[{15., 17.}], 
+         PointBox[{7.5, 7.}], PointBox[{15., 10.}], PointBox[{9., 13.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T6", " ", "P2", " ", "N12"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbf/cgdhei/fhhjgigjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdhei/fhhjgigjij.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: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]& ], {2.8245590828532245, 13.052815449711932}, \
+{-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]& ], {0.17544091714677545, 8.052815449711936}, \
+{1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000000416`, 17.}, {15.49999999999958, 17.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.75, 17.6952}, {0, -1}], 
+        LineBox[CompressedData["
+1:eJxFlAtMFFcUhoeisYKCluWhVh4zI9BIKcywsK2UHm2KUA0KLBZEZXWBWooV
+2fAQEOVVd8lCjYq81rIoBeRVUGK1lZfQEhYEUSuSSOVhk+Vhu0UoCAvbO9bc
+nWQy+XLvnHPvOf/57Y4cD4h4iyCIUPRyX56Oe5yBeP3Q0CCeWfjN8wMgRMUe
+3m401LSNDqSlIz6qWed3gIZGv/LVil7EGu/YV3E0yJ0/CzY3dQGivrF56jQN
+bSE1pkYeiNUXPyo9SYNV/NkXioOIg2VO0WIaeoqeHvNPQ6w8sj/Ji4ZXm+6o
++5WIYYNN6xoaVLFDPxj8wrH8nz/uU9AYcmDKuA8x8fCuQS4F+9K/33H8KeJb
+WovrOymozuR7rxhD7CPbXGlAQUKUqEU3inheGlDQQoJ904lHf3P7h88HGGSR
+UCgRZzT2IxZMSLVCEr7QdndK7iI+EyXgMSTw8wbXZtcjtvWwtLMmwWRirCPh
+MuKj+X6uG0mwyZ8yupfN5fN2TbInYUBolMlLQnwu46ugHSSk9o4mN0cjjjH9
+1TeaBFlm7NdrwxG7GDvaXCEhYEA5seIwYs3jAu0wOh+ZOhPKrUtDenO3UFAV
+4i6QfMPV57k7P5qC9/mWC3tOI94rsGAbKDCsCFUVX0LsWGE3qqFAqyEsrt3g
+8uumxhxoiGjZKkz5nbtvR/aeQBpeCHnCwQXuvPmzT2JoqL8ingskXVH8NidN
+Kg3+pChe/DniVt9Dj1NokChbHRNOII6p1FVE0SDd63/b+BLi4d27Q31pSPZU
+l7XcRCwK8rqxkYafPNr/iniAeN78usMIBbWkao2Fmov/cK69hILvCle5CeYQ
+27YVLIVQsGpy8lCOjtv/56ksMwqGI/9VMgYMEFZ5L83vk2DVY1lcokXrVknO
+cIEEuwvW9sppLn/30jYRCfEnd8p8n3Px8gV3PiQhMtG9b5LL7zjOquzI/3Xc
+ilgQ5FK1AfX7bJcLr1a/Lvv2VvzNYv3/S1+ODIbl6OOrWXW4KEOf37Zwddi9
+VFd8vnkerzT2jP78MZHz3Z1S/f0Ch/gvx/P1949s91xfVKuvT1a7ZSh06euX
++GOd98y4vr7ysE8GpCYMrn/dUIlMwWdwf44FK96uOcjg/plVT1bbZzG4v8Xw
+qDqjisH9NzTVje/rYbA+loLL+OHjDNbPA5V6ZT3BYn1JSrs65etZrL/BoTTj
+sk0s1medY5j5ojWL9RufnHNxmlt/o+80182Z281YrP/3qmeTJ1eyeD6WxWaz
+zCyD52fa/N1t0lEGz1d3lP10XB+D56/S0E0gb2LwfEbKFSm76hg8v3Mf525d
+d5XB8y3NKwHiMoPnX5isur2oYLA/XDt1uOkct/+Nf+wqv2o2U89gf3HPIfcv
+dzDYf7Y8+9TS+RmD/YmNoM7XLTPYv9SyxHfEJIv9zas8UDPrw2L/k/T/XDER
+w2J/LH/itNhQwGL/9Cky4bU0s9hfHXqz0hUjLPbfuNeCdsP+/B9S6DsJ
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.75, 8.354800000000001}, {0, 1}], 
+        LineBox[CompressedData["
+1:eJwt2Hs4lNsXB/CX3C+FijBpdCIiplCSNGlcKjEkl1yanEguNR1CJU1CkphK
+JVQTFUo4pahUQyoj50RyQhekRIcaNRUiv+8+z88f1vN59rvXXmvNfkdP+kHb
+PYKlKYrSlKIoEikZ8ovOpP77mcOkhMFj/i6wj/JsjjIsWCvtmAM7TykzUYKp
+on0WH2BBNb33529MyiVGrpihz6QUtDwKu+C2gVT3aDh1C1fnFll/8Y92OZz9
+PCgmBa7WMnd+C4t//dq+GqY7tWcqzmZS/PhCQ3lY5kzfLAPiAwyV+4iv1vNK
+LBGr7tNE0Yhx3ow/rBFTayP1TIiVWBYLiAcDH71D3grb2eZ02Lo/cv0FONSH
+Pk0epszVZkbAY/ZhAx8QZ6gEqduRuhXb5B4iCkpGrukiSnKqXgkQu262j8si
+qjnd+baX9PMPK3AcfYsbFz0JJPsGxVekEMslU0scSD/rmkw0EG0X5+Rbkn0S
+/+z5iEUnnAJIrDKRZ3iQ+hbe1l2AGNcxR0Ty0vWSBEzEtn0JH68iNmqmGfkj
+cvt//9CJKFzmFnqA9PGX4i819DF20iXzBjx88UWMHexy1cx9CLbeaP8gGI4X
+8SVkXpzQ1pwkxPr2jJAExPJV9OmnEZnGbI8niM5aQffPIwqa9y3VxtyFUWMl
+Z4gjUnKC4T69r/vT4WlRrJGrsOAmFbsNtu2UmyKGjVZqeLNgFjuuwxj3wmeh
+Y8wUuOT+lipfmGvYmt+MupKebopJgJvm8dWOkLnbruKcgqvCXy9nkXkNrnO+
+AIded+sewXyHJeqHLsLiSN3Kcph7fotUHpyqW7czHK4/XaR0CG77J/iiKbmX
+1ayt22C29mfFwVn4/GbesHYl+9Wzu0/AjRFHWubBama9OV4w81JNlRzM2/f8
+MwOOuOK2/R364XUKYg1gmn/G1kdkHnZaAgtYKNzSXwqzZVQrfGEO61bvObI+
+6cGnLDidPzacAzNWeeR2w9F+ixzOwz5/bjw3E/V5Kg5zr8OhceHBrnDbIfnc
+ZpizTBTOI+uvqQ3kPeLQlolJv/wxqsaczOfgxRWvyfNcg7BI0k9p+htpzKvu
+8daUa3C2zpmjs8h9nWn+ZYzMx+xmGrlXvB9Ja1cbYC7pB6IWw8z2WVrZcCjr
+agJ5Ty0PPqnvgXkmEi6N3KOG6ZJ5hji/+lnBT5yXJD0QEA6nFiZJPSX3PX1I
+qwBuW5w/egqult5+somsVz/c6QOrtXTVfIGN3ktuacDWlwMmKc7FPPpTio9h
+Hj63ndZMhbsiLo+O6+E9/DqmrgHzTNX/jYDz0hI85GCxCrv13UzU0eGybwj5
+KE/l0jD4VeT3Ha2wMKTiiTRs6jHdqwJWc3W5UU7DfUos5vNhQZbvaAxsG9N3
+IYL0k/Niujdcdeqm1hpY/DU0wB2W8Zm8zgzmcw6Pb4ZLAk+nzSD5Qoal+TAr
+61q+MtnvWM99Cou3Degowrx1/kGzcH6q1JRxdZgrx1+8B04qdW02hLtyl4pe
+wzI2K7KdyP6dFQUr0J9aX2tDFMnvdZ11HuZbu3Muw4z6bt8f8OZ8hY5+Yl/n
+cTtyv3b6ejIwj3LrzwNRsFigk7cH5pguuUPmWWd60klE1lkt37JhmZFPzZpG
+yFuZsCIZZl2/U7kJFgzFbfWGu1SOHS8k6zeebVIj+5uXLemFqfJc22s4vyRh
+29+6xji/NECDCQtrajsdYU73lzd30Y9/rv2OEFgscfRkwOlN6Yq7Ye4S2Yt5
+mI9CmXXlflit/ugqBbiJZq6WAJfPHaiJ08X7lSVtwiXr7bbeX3Vwzvejx3xh
+wZ1nnfGw+EuipS3Jx1mSqg1nBfqt0TEm835R0KiNz3PjQofvqJfeOv9gNiwZ
+nlH0DGYYhEQmwHOWRX37E+au8gkjdnY8eOQksbB46ym44lJSViLMnD156WOY
+YbyoI5b0/0jvihLOa0rY8ZCYX1tWGEAsa8Y6QPLby227Awtm/hDmkHzDPUI9
+9GP91wK9e8SHpOckwpZJ4ZUDsFjkp9MFC/0KQg1Qv7B2z2YLzIMevTSXzE94
+a4ZtLNzWPuFdSua90iWtEH51JiZglMxriaxmDSxUil/iPA/rlflFxM5rFYJP
+wMzPWnOLYMbCHk4nLNTaczYazn4/0fybCfaf4q40IvtD7PI4cJfers0PUQ8t
+JWj0OCzcfM/NDWYOmR+rhhmxqfMb0J910aMD7TBnk1yzDWy0/GjUR5Lvr8T9
+l8j89DwzPhMvi7qnASuIzA/2w+wbSlLJM/B3bKIkk+xnC6clSMNVkfNX18CU
+U8fHTC18PhZ+lfkwf7jUaQFcFx42iwc3lSRf69fE35cl5sN+sOBzxso7cFaB
+mcia1Dv0x7dLcETsh8naMH2nZU4JWf+WrTdB5lFp87oBTt3/WHmQzIsV7jEB
+N+Ve4b+DufFFRx1xHo9zcrQXZk/ZG5AHX+g01v0Gi9uXtfyEk76qLJ+C/OJ5
+vPyNqN+WnjTPClbT2b6qFmbaa9JCyDznrlunh/6FLrNaBaTehSknt8FiXXFh
+D8zVn7a9lHjDyzRTU5y7dNvXdrgxxdt8F1zu3EH/RO5zvjntMczfdmG8jzzP
+Pi2aOh/rqpllIng4aOiuP8xN3p/Mh9vc2orPETfIS+zI/dbbntgBq11qSHqB
++sQRadnKZoinq28FwNyWlisL4C6Dle9b0V+bDjWyBha46I+wYO7DOPsNMJ3h
+7lqOeUWnarb4w+xbq0NnwnN6/trtSfbLbr15dDo+39dRyfYwL8bKSwPOpsmU
+GMHUU8/2gmn4vnk7RUoRLg8vVl8NG8Vatr+fT97z7+/lYcGuC+U1MD30K6Nz
+Kr6vzosnk374LTYlTfDz5ewwHsw+M63vJUz3L1MOhQW7t7AnYMrrvsQbFqte
+sLNGvldWDJE7zJF9qXWAnN8zrdoLpjKKd76EPZ0dErfATWMmPraol9fmszqJ
+7FcQBgpg2rGs2yVkf4qGrDT6HTZ8J+kkz+c+6PaDy3f9KaCReTI6eorgd6om
+oxzSf55L+jvYyM+l9zLxRzV9Zcxz+E2d0jB5fiv3hTacXl3a52COekLufp0M
+VxS/Hz5q/t/3xWty32mO1fXtMG9m429XiJ+/S1NlYB6/7u7xhBPSRV+NYbHt
+8qI+1PtM94fHCljNWisgHD6WmDF9HdyksmlaN/oNGwnrCyTPs6+/dIVpn5rv
+bCbP/3tX5zbm56VjUEfM+dG/3gi2682I3UjOe1Lx+awGkzIsfJC6Hi4POPLv
+bHg0bmqnE8n3o7+iSh3/nhwwTF8M05Vpg7/D6TYv7xvAbBdd+7nwvIHHt6fC
+VKwuWwZeJCcvlCbruQ6ZP9Xw+VrUqvaRfq02u6pgXXxswreZeNe925ZwX07K
+ugdwV51IsgOusjqRch/mZD9iCOH6yeuVH8NspxfdOqiPMX37rg6YX1A4GA/H
+m7p3j5D9Z/16u2D+slvBGqTfaAvnFeg3dNtTvfmkv1zjqmzYpVXudxeYue8B
+8y2sYNTjsJ2szw1K08b8GqIb/8yCubLHVZbCdUcCo++Q/v0Zi1iwZvfEmrdk
+fgsOpVnA06INvssvIN/nDtcUyH38fn6ZCcwcY+2rQ/429wCFNTCH494TCjc8
+afs9BOa2ynYMo97VIUOZ8TD72yfHOPi2WYj8EZg6vlH0L/o3yqhJPkXyjw8d
+9IEruEFKeSS/rNL3B5hvY0tiWw7c5SQ+YQHnH14anQULlx+O9p2Cc10L8w7B
+PJHx8dDJeP/qt6zcQ+op3KR6RpWcN7g/jDwvvCwcV2FSlxeNpvuQfEuCsjLh
+YZsvlxxhgZ2+/Xr4D9oR9UXkfPHfi9zg3drHJ+aS/Qsbj+yBu2LtD84k+Wdx
+Df+BNZxGTmiR/endz3xwnr9e2XtNmB5rc/YnPGp6U6JL8g22G95AfYZ0fYrk
+4/3qUdiD+m9yVaWsybzKdOfpo7+sD+ISV7hcyk2GB/NkP8SR+rsi/ETP4Vcj
+befSYLGifL4O5kVF2ZiUwvzeg5y18L3lw+MtZP/rkbKtsNpDWvcomf9hK5tI
+OPrvnKP6C7HfakOtF1xKy//bEeZ9ebXQEM740LFlK7Hp3rOvcJ7t8d7VqTD7
+9lTLePjyjPTMfLI++7GBAhxYJZtYCQuVExQV0Y/k6ejlR8RXew0G0P+FuU+e
+PyW+56xTh3n5H/+s2gIzVR68yVVmUpcknkVNZP1FUmSCEvpUvWUlggXmJo4x
+ikxqw9mF++/CnLX87+kKTConzCyllJxfvL60QZ5JxZQ5BZ+BKZ8f3VawULTb
++zDcdT1FqkUO3/f7Vgp2wfT1axwvwKZJrH2kP2Zs8uli2EVJd7Y/2a/KPdEF
+x82aOOlBzteKFbCQbzS1XriW1PcwUv8prCDpdHEl+T2jG2JRj1xqxhVPYnfb
+H5aod3TKJOVNpN6Pe3XGSP0rHNZHkXWvOqta9Fcdbbbg8H/zWeEVj/6/9PnL
+FZF+BujqdMyn6a1kEumf5/ZspAA2Ne4xHiTPq2uoUpjnzfeLPadaoP7QfmUz
++C1N29kGprzP1RrDm0W3ajhk/csf1kPYryBTmZgMCwKpR0kwTc6aUwjTf7mr
+f8D51F4G+yHMS234TINP7jDb+YbYys58PuoNSZ9v9IXkW3TFma74//9Hsfx/
+VGD+D6J4HSk=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           
+           9.996694214876033]& ], {13.471090192570806, 5.161297472978525}, \
+{1, 1}], LineBox[CompressedData["
+1:eJw9lXlQE1ccxxcLNYCYDSErJgri7lKtyGWHVDvVn+JBCw5gsRILSCkEWxA5
+goLgBRJxMAoZ5FIGGSynpam24oEKapCrXqhUUauIFKIVi1Qy0EJf+sfvzezs
+fGbn7ftd3+9ziti6LmoKRVFR5DG9C0cnyXIE6v/FwcZiv8LQQ4RbNZ4Jt1go
+nOI2cc+GMLzIPVrLQsHAqklJhgNQ9t9sc8hloXT/zNJVQ7OBis+sn5XBQuV6
+67iHCsLV58bd9rIw8jqhQtkyC6iiKbsjNCzkPV9+X7mYsLHWx7WSBaNY1kw3
+yID6TTgjs52F9gilBe9N+Knc/I6RhRy9dlT/VEp4uNzBjQNoF8jXawlTma12
+MRyoVPtzFArC2Uvnza3l4JzTduc4LxMHZmkHOfBs3DH5yXzC7nnRPzjzsE+7
+IX+nO+GUWGNXGA97PYJ6p31u4lnXSw/zsDphdGIs0bT/K/nbMzzccj7lp6si
+PHAkheviwefS5UFxH+GPj1n+08tDe3Nq9VmWxBtw8d+OFzyMHXtTYRMhM+Wf
+kNzDQ/Sf00JySwhntzz59hoPuk7DoolWU77STyvLechb2rgoc5Cw8esF1Soe
+ak+m2/QZCdtbaUOX8SCtTCwsHyFcZEgWmvOwpGPcy67HdF5Br4+eA++q8Om7
+6gjHF02ez+Jg+7vdvFhJ2H08w9GHg4UN9KJRa1M86XqpkINneZSDRxmJH940
+OTxmgUtLupw/l3D8OnnAzywcnit9UFE8k+yPmb+1gIXlC1T50QLClKbs6j4W
+XI23PVYm2QO1+WChcA8LH9hNvdH6ZAZQc3JOqbNJf42vA3b6Ew5+f6KjlIWb
+H82v07UxQOXuevP3JdLPPRL1Z4GEdQNbigwsOMVaxx0dlJB63Iu668BB+GT8
+2hVHCNNnN8UqONB1l7dZfEnYXS1+XMhBT+/1C3oXwgFaKrWbg+HurKPxMwnr
+tF1ZEh5W7DR4m8sIC4SKjf48hGnUlsVupv1xp9MyeCi74lK1LYhwk0X+2ZM8
+hLjJZZ5qwgOxfss7eeiOcV3Y1UT4uJnuwu88JBtM+iBsn/UysJ8Hj4bbd1yW
+Mfhd831r36+pDO73te0KPlDH4P9z1qS+U95i8PyqDZLG8T4G45vhuyPycD+D
+8U8flq9c0sVgfgrfMK+xGgbzP3Dv0KmL3zFYn4EzI3mRDIP1CwsypJ6pl2B9
+pcfvB/l7SbD+wY/oHzN0dtifK01GD7mTHfav50PXGxcOirG/1TU5MUWjttj/
+HVS/c4jSFudDrzgIMY9FOD8C78lnN8JFOF+Ns4c6BSM0zl/ik90PXxXTOJ8t
+aWV/7Q2icX51luZtLzka53soXbM5zJrG+Yd5mcOyqTTqI6XPuzOdoVE/iwWS
+TjM5jfrK/GO4YmsUjfoTqoUhw6U06nOOWL1hzSMa9dscCcwrmQj1La1fe9o/
+WIT6v/qTwMxCI0J/2FxRN/vtLyL0D+WK6piMmyL0lwb7LOrafRH6j/vp7Ad5
+bSL0pyP1KarKShH6V43VaGvtFhH6267QLYIljiL0P8fE4rGHjTT6o63wxdIh
+Hxr9U9eb9oWnRoj+auiQnfNMmo7+21IyyPr62aA/F5d06lVO09C/+1Uqs7vj
+VujvJ06UvxfUZ4n+v0kcfXvlcwHeDyfOm/QxFe+P/wBzMXw3
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.5, 9.0548}, {0, 1}], 
+        LineBox[CompressedData["
+1:eJwt0w9Q02UYB/BXioG38WcxYlDSEISBKOgdCfLHn2ODAc6I02utEJLoAE9F
+0LH4szAFByVDizI5Ok7GEgrYIjzDi6vAThDYFKgEzoQgVwhbIPEnjL5v13v3
+u/c+97zv83uf597X5/DxlEw7QogMH53J8jrGZobY6BzEEFeyb8DNlyGaptWP
+u+AHr060boIVbF1JIcysOxPqQ0nRRWGw3LG3hAuP5x/J+DOQIVlFvIS/kS/l
+XCoxwOEzI9Oj8OMi5ql8OHTN6UUjLI+9/DgSlk+3nXgHFtc/78+h61Wpz8XD
+uax8/ZSQIfV/5M5vhIdTi3f9ACdXjEz2+jBkyi0p3ghf6hQvaGDnsOBHjTSu
+eW9nApy7bfTXBjh8uEzHgZ89PVnTDJMldciIgCF5AqHn17BhrKFSBxfvfSlq
+EGa+EW4vhtM7eqot8K25rySpcJdutYCF8wm5Fxul8Lui9J3+cP0Fu+4Y2Mar
+tErgb0NYhj3wW1WL9zNofXXtXkkwz3uAUcNXI7clp8OhVq7yA/hng3usGq7y
+/8jlCl3fJa1pgKWp0WNX4epatW4QznLaaNXT/D6ZnzyBP31UaayFiaJBtR31
+GXYc/6Wc5hMFhaXBwZqZ81n0fxcDu8/D+k1rgXthjWQl6Dqc03zqJBcuFSTU
+jsO7a1yLRlGvo/3c2yuwKLmlqg5WtRjznND/UOPWXa/D/KHaMx5wZYVkCx+2
+cGNZ1LsDrJuHAnB/XjN1sGk8cNBOCycrlMZF5POqTtPK4NA7iqIR2Pwwq9A1
+gN6vewufwzyTTHbPH3W6HXu5EJb2jSqaYBKmdhfBpbOO7adhi/joP0/Dy9qt
+nhkwv1291IN+xM1Mrsng0t/5Dmdh3RBPKaL7h52ixLDXNVcxA9umay470H62
+/WaKg9O/U7jVv8CQuZmxHQfpfndyJga2XOuNyIEN+eyCWW+GHGjyLDwLV//U
+k9AGJ8avHLgCM2qXz8rg8vlE9vdwaPxy8Qk4hdPXP0Et8F7Ig/sDB26tww9u
+x2ZXwH3vs/d4of5chl/SDidzbmtD4FIx8bDCfPeJxBjaT+ZISQTOc0i0FiWh
+/btLjmnhVduNwljY8EVX5Cz8ZVpIdjiN71OpAlBf1MOj3b6wOXsqQg7f1fDq
+7GHVK74/lsOVNy68cZ+eT8s6aKRxk8TcCgs6M6fo+zCX1S4W0HrNC5Z5+l6U
+cp9IWLjf08kB/d+vU4+ubMH5+YkyLqz0CLnTAV9ffnMDtWXaxZQL8203J+3h
+5vGb+mAajxhytiFf6yUv3xk/1H141t4Mq2w5f7XAUlm/Xk+9YalZCcufOel/
+Cha6NH4YBwv8OPbR9D0+6ezxhv8bgv9nP+ZfkwGqQQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           
+           9.996694214876033]& ], {7.286723682459369, 12.031518421803128}, \
+{1, -1}], LineBox[{{15.5, 17.00000000000231}, {15.5, 9.999999999998607}}], 
+        PolygonBox[{{15.5, 14.1}, {15.1, 12.9}, {15.9, 12.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.4452, 13.5}, {-1, 0}], 
+        LineBox[{{15.500000000007276`, 17.000000000003638`}, {
+         9.500000000005457, 13.5}}], 
+        PolygonBox[{{11.98173265946094, 14.947677384685548`}, {
+         12.816718930329426`, 15.897834175673825`}, {13.219815750748694`, 
+         15.206811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.323799910437668, 15.984057296392571}, \
+{1, -1}], 
+        LineBox[{{15.5, 9.999999999996362}, {9.500000000001819, 
+         13.499999999996362`}}], 
+        PolygonBox[{{13.01826734053906, 11.447677384685548`}, {
+         12.183281069670574`, 12.397834175673825`}, {11.780184249251306`, 
+         11.706811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.323799910437668, 11.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{3., 10.}], PointBox[{15.5, 17.}], 
+         PointBox[{15.5, 10.}], PointBox[{8., 10.}], PointBox[{9.5, 13.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T7", " ", "P1", " ", "N13"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbf/cgdhei/fiijghgjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdhei/fiijghgjhj.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: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]& ], {2.8245590828532245, 13.052815449711932}, \
+{-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]& ], {0.17544091714677545, 8.052815449711936}, \
+{1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000000416`, 17.}, {15.49999999999958, 17.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.75, 17.6952}, {0, -1}], 
+        LineBox[CompressedData["
+1:eJxFlAtMFFcUhoeisYKCluWhVh4zI9BIKcywsK2UHm2KUA0KLBZEZXWBWooV
+2fAQEOVVd8lCjYq81rIoBeRVUGK1lZfQEhYEUSuSSOVhk+Vhu0UoCAvbO9bc
+nWQy+XLvnHPvOf/57Y4cD4h4iyCIUPRyX56Oe5yBeP3Q0CCeWfjN8wMgRMUe
+3m401LSNDqSlIz6qWed3gIZGv/LVil7EGu/YV3E0yJ0/CzY3dQGivrF56jQN
+bSE1pkYeiNUXPyo9SYNV/NkXioOIg2VO0WIaeoqeHvNPQ6w8sj/Ji4ZXm+6o
++5WIYYNN6xoaVLFDPxj8wrH8nz/uU9AYcmDKuA8x8fCuQS4F+9K/33H8KeJb
+WovrOymozuR7rxhD7CPbXGlAQUKUqEU3inheGlDQQoJ904lHf3P7h88HGGSR
+UCgRZzT2IxZMSLVCEr7QdndK7iI+EyXgMSTw8wbXZtcjtvWwtLMmwWRirCPh
+MuKj+X6uG0mwyZ8yupfN5fN2TbInYUBolMlLQnwu46ugHSSk9o4mN0cjjjH9
+1TeaBFlm7NdrwxG7GDvaXCEhYEA5seIwYs3jAu0wOh+ZOhPKrUtDenO3UFAV
+4i6QfMPV57k7P5qC9/mWC3tOI94rsGAbKDCsCFUVX0LsWGE3qqFAqyEsrt3g
+8uumxhxoiGjZKkz5nbtvR/aeQBpeCHnCwQXuvPmzT2JoqL8ingskXVH8NidN
+Kg3+pChe/DniVt9Dj1NokChbHRNOII6p1FVE0SDd63/b+BLi4d27Q31pSPZU
+l7XcRCwK8rqxkYafPNr/iniAeN78usMIBbWkao2Fmov/cK69hILvCle5CeYQ
+27YVLIVQsGpy8lCOjtv/56ksMwqGI/9VMgYMEFZ5L83vk2DVY1lcokXrVknO
+cIEEuwvW9sppLn/30jYRCfEnd8p8n3Px8gV3PiQhMtG9b5LL7zjOquzI/3Xc
+ilgQ5FK1AfX7bJcLr1a/Lvv2VvzNYv3/S1+ODIbl6OOrWXW4KEOf37Zwddi9
+VFd8vnkerzT2jP78MZHz3Z1S/f0Ch/gvx/P1949s91xfVKuvT1a7ZSh06euX
++GOd98y4vr7ysE8GpCYMrn/dUIlMwWdwf44FK96uOcjg/plVT1bbZzG4v8Xw
+qDqjisH9NzTVje/rYbA+loLL+OHjDNbPA5V6ZT3BYn1JSrs65etZrL/BoTTj
+sk0s1medY5j5ojWL9RufnHNxmlt/o+80182Z281YrP/3qmeTJ1eyeD6WxWaz
+zCyD52fa/N1t0lEGz1d3lP10XB+D56/S0E0gb2LwfEbKFSm76hg8v3Mf525d
+d5XB8y3NKwHiMoPnX5isur2oYLA/XDt1uOkct/+Nf+wqv2o2U89gf3HPIfcv
+dzDYf7Y8+9TS+RmD/YmNoM7XLTPYv9SyxHfEJIv9zas8UDPrw2L/k/T/XDER
+w2J/LH/itNhQwGL/9Cky4bU0s9hfHXqz0hUjLPbfuNeCdsP+/B9S6DsJ
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.75, 8.354800000000001}, {0, 1}], 
+        LineBox[CompressedData["
+1:eJwt2Hs4lNsXB/CX3C+FijBpdCIiplCSNGlcKjEkl1yanEguNR1CJU1CkphK
+JVQTFUo4pahUQyoj50RyQhekRIcaNRUiv+8+z88f1vN59rvXXmvNfkdP+kHb
+PYKlKYrSlKIoEikZ8ovOpP77mcOkhMFj/i6wj/JsjjIsWCvtmAM7TykzUYKp
+on0WH2BBNb33529MyiVGrpihz6QUtDwKu+C2gVT3aDh1C1fnFll/8Y92OZz9
+PCgmBa7WMnd+C4t//dq+GqY7tWcqzmZS/PhCQ3lY5kzfLAPiAwyV+4iv1vNK
+LBGr7tNE0Yhx3ow/rBFTayP1TIiVWBYLiAcDH71D3grb2eZ02Lo/cv0FONSH
+Pk0epszVZkbAY/ZhAx8QZ6gEqduRuhXb5B4iCkpGrukiSnKqXgkQu262j8si
+qjnd+baX9PMPK3AcfYsbFz0JJPsGxVekEMslU0scSD/rmkw0EG0X5+Rbkn0S
+/+z5iEUnnAJIrDKRZ3iQ+hbe1l2AGNcxR0Ty0vWSBEzEtn0JH68iNmqmGfkj
+cvt//9CJKFzmFnqA9PGX4i819DF20iXzBjx88UWMHexy1cx9CLbeaP8gGI4X
+8SVkXpzQ1pwkxPr2jJAExPJV9OmnEZnGbI8niM5aQffPIwqa9y3VxtyFUWMl
+Z4gjUnKC4T69r/vT4WlRrJGrsOAmFbsNtu2UmyKGjVZqeLNgFjuuwxj3wmeh
+Y8wUuOT+lipfmGvYmt+MupKebopJgJvm8dWOkLnbruKcgqvCXy9nkXkNrnO+
+AIded+sewXyHJeqHLsLiSN3Kcph7fotUHpyqW7czHK4/XaR0CG77J/iiKbmX
+1ayt22C29mfFwVn4/GbesHYl+9Wzu0/AjRFHWubBama9OV4w81JNlRzM2/f8
+MwOOuOK2/R364XUKYg1gmn/G1kdkHnZaAgtYKNzSXwqzZVQrfGEO61bvObI+
+6cGnLDidPzacAzNWeeR2w9F+ixzOwz5/bjw3E/V5Kg5zr8OhceHBrnDbIfnc
+ZpizTBTOI+uvqQ3kPeLQlolJv/wxqsaczOfgxRWvyfNcg7BI0k9p+htpzKvu
+8daUa3C2zpmjs8h9nWn+ZYzMx+xmGrlXvB9Ja1cbYC7pB6IWw8z2WVrZcCjr
+agJ5Ty0PPqnvgXkmEi6N3KOG6ZJ5hji/+lnBT5yXJD0QEA6nFiZJPSX3PX1I
+qwBuW5w/egqult5+somsVz/c6QOrtXTVfIGN3ktuacDWlwMmKc7FPPpTio9h
+Hj63ndZMhbsiLo+O6+E9/DqmrgHzTNX/jYDz0hI85GCxCrv13UzU0eGybwj5
+KE/l0jD4VeT3Ha2wMKTiiTRs6jHdqwJWc3W5UU7DfUos5vNhQZbvaAxsG9N3
+IYL0k/Niujdcdeqm1hpY/DU0wB2W8Zm8zgzmcw6Pb4ZLAk+nzSD5Qoal+TAr
+61q+MtnvWM99Cou3Degowrx1/kGzcH6q1JRxdZgrx1+8B04qdW02hLtyl4pe
+wzI2K7KdyP6dFQUr0J9aX2tDFMnvdZ11HuZbu3Muw4z6bt8f8OZ8hY5+Yl/n
+cTtyv3b6ejIwj3LrzwNRsFigk7cH5pguuUPmWWd60klE1lkt37JhmZFPzZpG
+yFuZsCIZZl2/U7kJFgzFbfWGu1SOHS8k6zeebVIj+5uXLemFqfJc22s4vyRh
+29+6xji/NECDCQtrajsdYU73lzd30Y9/rv2OEFgscfRkwOlN6Yq7Ye4S2Yt5
+mI9CmXXlflit/ugqBbiJZq6WAJfPHaiJ08X7lSVtwiXr7bbeX3Vwzvejx3xh
+wZ1nnfGw+EuipS3Jx1mSqg1nBfqt0TEm835R0KiNz3PjQofvqJfeOv9gNiwZ
+nlH0DGYYhEQmwHOWRX37E+au8gkjdnY8eOQksbB46ym44lJSViLMnD156WOY
+YbyoI5b0/0jvihLOa0rY8ZCYX1tWGEAsa8Y6QPLby227Awtm/hDmkHzDPUI9
+9GP91wK9e8SHpOckwpZJ4ZUDsFjkp9MFC/0KQg1Qv7B2z2YLzIMevTSXzE94
+a4ZtLNzWPuFdSua90iWtEH51JiZglMxriaxmDSxUil/iPA/rlflFxM5rFYJP
+wMzPWnOLYMbCHk4nLNTaczYazn4/0fybCfaf4q40IvtD7PI4cJfers0PUQ8t
+JWj0OCzcfM/NDWYOmR+rhhmxqfMb0J910aMD7TBnk1yzDWy0/GjUR5Lvr8T9
+l8j89DwzPhMvi7qnASuIzA/2w+wbSlLJM/B3bKIkk+xnC6clSMNVkfNX18CU
+U8fHTC18PhZ+lfkwf7jUaQFcFx42iwc3lSRf69fE35cl5sN+sOBzxso7cFaB
+mcia1Dv0x7dLcETsh8naMH2nZU4JWf+WrTdB5lFp87oBTt3/WHmQzIsV7jEB
+N+Ve4b+DufFFRx1xHo9zcrQXZk/ZG5AHX+g01v0Gi9uXtfyEk76qLJ+C/OJ5
+vPyNqN+WnjTPClbT2b6qFmbaa9JCyDznrlunh/6FLrNaBaTehSknt8FiXXFh
+D8zVn7a9lHjDyzRTU5y7dNvXdrgxxdt8F1zu3EH/RO5zvjntMczfdmG8jzzP
+Pi2aOh/rqpllIng4aOiuP8xN3p/Mh9vc2orPETfIS+zI/dbbntgBq11qSHqB
++sQRadnKZoinq28FwNyWlisL4C6Dle9b0V+bDjWyBha46I+wYO7DOPsNMJ3h
+7lqOeUWnarb4w+xbq0NnwnN6/trtSfbLbr15dDo+39dRyfYwL8bKSwPOpsmU
+GMHUU8/2gmn4vnk7RUoRLg8vVl8NG8Vatr+fT97z7+/lYcGuC+U1MD30K6Nz
+Kr6vzosnk374LTYlTfDz5ewwHsw+M63vJUz3L1MOhQW7t7AnYMrrvsQbFqte
+sLNGvldWDJE7zJF9qXWAnN8zrdoLpjKKd76EPZ0dErfATWMmPraol9fmszqJ
+7FcQBgpg2rGs2yVkf4qGrDT6HTZ8J+kkz+c+6PaDy3f9KaCReTI6eorgd6om
+oxzSf55L+jvYyM+l9zLxRzV9Zcxz+E2d0jB5fiv3hTacXl3a52COekLufp0M
+VxS/Hz5q/t/3xWty32mO1fXtMG9m429XiJ+/S1NlYB6/7u7xhBPSRV+NYbHt
+8qI+1PtM94fHCljNWisgHD6WmDF9HdyksmlaN/oNGwnrCyTPs6+/dIVpn5rv
+bCbP/3tX5zbm56VjUEfM+dG/3gi2682I3UjOe1Lx+awGkzIsfJC6Hi4POPLv
+bHg0bmqnE8n3o7+iSh3/nhwwTF8M05Vpg7/D6TYv7xvAbBdd+7nwvIHHt6fC
+VKwuWwZeJCcvlCbruQ6ZP9Xw+VrUqvaRfq02u6pgXXxswreZeNe925ZwX07K
+ugdwV51IsgOusjqRch/mZD9iCOH6yeuVH8NspxfdOqiPMX37rg6YX1A4GA/H
+m7p3j5D9Z/16u2D+slvBGqTfaAvnFeg3dNtTvfmkv1zjqmzYpVXudxeYue8B
+8y2sYNTjsJ2szw1K08b8GqIb/8yCubLHVZbCdUcCo++Q/v0Zi1iwZvfEmrdk
+fgsOpVnA06INvssvIN/nDtcUyH38fn6ZCcwcY+2rQ/429wCFNTCH494TCjc8
+afs9BOa2ynYMo97VIUOZ8TD72yfHOPi2WYj8EZg6vlH0L/o3yqhJPkXyjw8d
+9IEruEFKeSS/rNL3B5hvY0tiWw7c5SQ+YQHnH14anQULlx+O9p2Cc10L8w7B
+PJHx8dDJeP/qt6zcQ+op3KR6RpWcN7g/jDwvvCwcV2FSlxeNpvuQfEuCsjLh
+YZsvlxxhgZ2+/Xr4D9oR9UXkfPHfi9zg3drHJ+aS/Qsbj+yBu2LtD84k+Wdx
+Df+BNZxGTmiR/endz3xwnr9e2XtNmB5rc/YnPGp6U6JL8g22G95AfYZ0fYrk
+4/3qUdiD+m9yVaWsybzKdOfpo7+sD+ISV7hcyk2GB/NkP8SR+rsi/ETP4Vcj
+befSYLGifL4O5kVF2ZiUwvzeg5y18L3lw+MtZP/rkbKtsNpDWvcomf9hK5tI
+OPrvnKP6C7HfakOtF1xKy//bEeZ9ebXQEM740LFlK7Hp3rOvcJ7t8d7VqTD7
+9lTLePjyjPTMfLI++7GBAhxYJZtYCQuVExQV0Y/k6ejlR8RXew0G0P+FuU+e
+PyW+56xTh3n5H/+s2gIzVR68yVVmUpcknkVNZP1FUmSCEvpUvWUlggXmJo4x
+ikxqw9mF++/CnLX87+kKTConzCyllJxfvL60QZ5JxZQ5BZ+BKZ8f3VawULTb
++zDcdT1FqkUO3/f7Vgp2wfT1axwvwKZJrH2kP2Zs8uli2EVJd7Y/2a/KPdEF
+x82aOOlBzteKFbCQbzS1XriW1PcwUv8prCDpdHEl+T2jG2JRj1xqxhVPYnfb
+H5aod3TKJOVNpN6Pe3XGSP0rHNZHkXWvOqta9Fcdbbbg8H/zWeEVj/6/9PnL
+FZF+BujqdMyn6a1kEumf5/ZspAA2Ne4xHiTPq2uoUpjnzfeLPadaoP7QfmUz
++C1N29kGprzP1RrDm0W3ajhk/csf1kPYryBTmZgMCwKpR0kwTc6aUwjTf7mr
+f8D51F4G+yHMS234TINP7jDb+YbYys58PuoNSZ9v9IXkW3TFma74//9Hsfx/
+VGD+D6J4HSk=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.471090192570806, 5.161297472978525}, \
+{1, 1}], LineBox[CompressedData["
+1:eJw9lXlQE1ccxxcLNYCYDSErJgri7lKtyGWHVDvVn+JBCw5gsRILSCkEWxA5
+goLgBRJxMAoZ5FIGGSynpam24oEKapCrXqhUUauIFKIVi1Qy0EJf+sfvzezs
+fGbn7ftd3+9ziti6LmoKRVFR5DG9C0cnyXIE6v/FwcZiv8LQQ4RbNZ4Jt1go
+nOI2cc+GMLzIPVrLQsHAqklJhgNQ9t9sc8hloXT/zNJVQ7OBis+sn5XBQuV6
+67iHCsLV58bd9rIw8jqhQtkyC6iiKbsjNCzkPV9+X7mYsLHWx7WSBaNY1kw3
+yID6TTgjs52F9gilBe9N+Knc/I6RhRy9dlT/VEp4uNzBjQNoF8jXawlTma12
+MRyoVPtzFArC2Uvnza3l4JzTduc4LxMHZmkHOfBs3DH5yXzC7nnRPzjzsE+7
+IX+nO+GUWGNXGA97PYJ6p31u4lnXSw/zsDphdGIs0bT/K/nbMzzccj7lp6si
+PHAkheviwefS5UFxH+GPj1n+08tDe3Nq9VmWxBtw8d+OFzyMHXtTYRMhM+Wf
+kNzDQ/Sf00JySwhntzz59hoPuk7DoolWU77STyvLechb2rgoc5Cw8esF1Soe
+ak+m2/QZCdtbaUOX8SCtTCwsHyFcZEgWmvOwpGPcy67HdF5Br4+eA++q8Om7
+6gjHF02ez+Jg+7vdvFhJ2H08w9GHg4UN9KJRa1M86XqpkINneZSDRxmJH940
+OTxmgUtLupw/l3D8OnnAzywcnit9UFE8k+yPmb+1gIXlC1T50QLClKbs6j4W
+XI23PVYm2QO1+WChcA8LH9hNvdH6ZAZQc3JOqbNJf42vA3b6Ew5+f6KjlIWb
+H82v07UxQOXuevP3JdLPPRL1Z4GEdQNbigwsOMVaxx0dlJB63Iu668BB+GT8
+2hVHCNNnN8UqONB1l7dZfEnYXS1+XMhBT+/1C3oXwgFaKrWbg+HurKPxMwnr
+tF1ZEh5W7DR4m8sIC4SKjf48hGnUlsVupv1xp9MyeCi74lK1LYhwk0X+2ZM8
+hLjJZZ5qwgOxfss7eeiOcV3Y1UT4uJnuwu88JBtM+iBsn/UysJ8Hj4bbd1yW
+Mfhd831r36+pDO73te0KPlDH4P9z1qS+U95i8PyqDZLG8T4G45vhuyPycD+D
+8U8flq9c0sVgfgrfMK+xGgbzP3Dv0KmL3zFYn4EzI3mRDIP1CwsypJ6pl2B9
+pcfvB/l7SbD+wY/oHzN0dtifK01GD7mTHfav50PXGxcOirG/1TU5MUWjttj/
+HVS/c4jSFudDrzgIMY9FOD8C78lnN8JFOF+Ns4c6BSM0zl/ik90PXxXTOJ8t
+aWV/7Q2icX51luZtLzka53soXbM5zJrG+Yd5mcOyqTTqI6XPuzOdoVE/iwWS
+TjM5jfrK/GO4YmsUjfoTqoUhw6U06nOOWL1hzSMa9dscCcwrmQj1La1fe9o/
+WIT6v/qTwMxCI0J/2FxRN/vtLyL0D+WK6piMmyL0lwb7LOrafRH6j/vp7Ad5
+bSL0pyP1KarKShH6V43VaGvtFhH6267QLYIljiL0P8fE4rGHjTT6o63wxdIh
+Hxr9U9eb9oWnRoj+auiQnfNMmo7+21IyyPr62aA/F5d06lVO09C/+1Uqs7vj
+VujvJ06UvxfUZ4n+v0kcfXvlcwHeDyfOm/QxFe+P/wBzMXw3
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.5, 9.0548}, {0, 1}], 
+        LineBox[CompressedData["
+1:eJwt0w9Q02UYB/BXioG38WcxYlDSEISBKOgdCfLHn2ODAc6I02utEJLoAE9F
+0LH4szAFByVDizI5Ok7GEgrYIjzDi6vAThDYFKgEzoQgVwhbIPEnjL5v13v3
+u/c+97zv83uf597X5/DxlEw7QogMH53J8jrGZobY6BzEEFeyb8DNlyGaptWP
+u+AHr060boIVbF1JIcysOxPqQ0nRRWGw3LG3hAuP5x/J+DOQIVlFvIS/kS/l
+XCoxwOEzI9Oj8OMi5ql8OHTN6UUjLI+9/DgSlk+3nXgHFtc/78+h61Wpz8XD
+uax8/ZSQIfV/5M5vhIdTi3f9ACdXjEz2+jBkyi0p3ghf6hQvaGDnsOBHjTSu
+eW9nApy7bfTXBjh8uEzHgZ89PVnTDJMldciIgCF5AqHn17BhrKFSBxfvfSlq
+EGa+EW4vhtM7eqot8K25rySpcJdutYCF8wm5Fxul8Lui9J3+cP0Fu+4Y2Mar
+tErgb0NYhj3wW1WL9zNofXXtXkkwz3uAUcNXI7clp8OhVq7yA/hng3usGq7y
+/8jlCl3fJa1pgKWp0WNX4epatW4QznLaaNXT/D6ZnzyBP31UaayFiaJBtR31
+GXYc/6Wc5hMFhaXBwZqZ81n0fxcDu8/D+k1rgXthjWQl6Dqc03zqJBcuFSTU
+jsO7a1yLRlGvo/3c2yuwKLmlqg5WtRjznND/UOPWXa/D/KHaMx5wZYVkCx+2
+cGNZ1LsDrJuHAnB/XjN1sGk8cNBOCycrlMZF5POqTtPK4NA7iqIR2Pwwq9A1
+gN6vewufwzyTTHbPH3W6HXu5EJb2jSqaYBKmdhfBpbOO7adhi/joP0/Dy9qt
+nhkwv1291IN+xM1Mrsng0t/5Dmdh3RBPKaL7h52ixLDXNVcxA9umay470H62
+/WaKg9O/U7jVv8CQuZmxHQfpfndyJga2XOuNyIEN+eyCWW+GHGjyLDwLV//U
+k9AGJ8avHLgCM2qXz8rg8vlE9vdwaPxy8Qk4hdPXP0Et8F7Ig/sDB26tww9u
+x2ZXwH3vs/d4of5chl/SDidzbmtD4FIx8bDCfPeJxBjaT+ZISQTOc0i0FiWh
+/btLjmnhVduNwljY8EVX5Cz8ZVpIdjiN71OpAlBf1MOj3b6wOXsqQg7f1fDq
+7GHVK74/lsOVNy68cZ+eT8s6aKRxk8TcCgs6M6fo+zCX1S4W0HrNC5Z5+l6U
+cp9IWLjf08kB/d+vU4+ubMH5+YkyLqz0CLnTAV9ffnMDtWXaxZQL8203J+3h
+5vGb+mAajxhytiFf6yUv3xk/1H141t4Mq2w5f7XAUlm/Xk+9YalZCcufOel/
+Cha6NH4YBwv8OPbR9D0+6ezxhv8bgv9nP+ZfkwGqQQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.286723682459369, 12.031518421803128}, \
+{1, -1}], LineBox[{{15.5, 17.00000000000231}, {15.5, 9.999999999998607}}], 
+        PolygonBox[{{15.5, 12.9}, {15.1, 14.1}, {15.9, 14.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.4452, 13.5}, {-1, 0}], 
+        LineBox[{{15.500000000007276`, 17.000000000003638`}, {
+         9.500000000005457, 13.5}}], 
+        PolygonBox[{{13.01826734053906, 15.552322615314452`}, {
+         11.780184249251306`, 15.293188945044921`}, {12.183281069670574`, 
+         14.602165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.323799910437668, 15.984057296392571}, \
+{1, -1}], 
+        LineBox[{{15.5, 9.999999999996362}, {9.500000000001819, 
+         13.499999999996362`}}], 
+        PolygonBox[{{11.98173265946094, 12.052322615314452`}, {
+         13.219815750748694`, 11.793188945044921`}, {12.816718930329426`, 
+         11.102165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.323799910437668, 11.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{3., 10.}], PointBox[{15.5, 17.}], 
+         PointBox[{15.5, 10.}], PointBox[{8., 10.}], PointBox[{9.5, 13.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T7", " ", "P2", " ", "N14"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbf/cgdhei/fiijghgjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdhei/fiijghgjhj.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:eJwl1gk4ldkfB/A30c1OSdas6dqvLUTuaynNpAkjLmWZwpjIUiglrmhki6JJ
+EpUWKkJlFIosoyRL0hXFIG5GISPbLf/vO//7PB7P5/md95zf73fuOe9V2Rvi
+7MdHEMQz/FH/idklfNRI4r+PPkksemYl1cP0zZlvm/XI2veqkxeOw6VGD/Zc
+0iPJnIO1+QxY+epITaweScyZaAb0q5IEZ+jisTDYaTVjPhWWuMXccgjjn1zW
+/s0Spt9aNp2AuPkVtweTKiSRfXs88Trmr8t4dOEOXDi7gfkK8RDa4aCD8GXz
+8gJhfZLNsY34bguH2ruVbYfdrQTjVeHaMI1v6fok+fJUb6wYvM37x6EuxKMs
+xhtpsN3dT7uFGSTRyRUJF4WNC8R4dAZZ+8+Nu3zrqPnI59XWDJI9YBjEMqWe
+P7r5RxeMb7u+YcQVtuwsLvCGk1T8nkXBDYOL9H143jF9+ksuXBq8osAL8VUO
+X3bWwBlZaVudGSQZsZs2/Qb2iQwps8L8Xcr5FmPw/T37BtUx/ue6DfNTVL3q
+V7VXYD6dTyGnPlH1JnnaNCP/nyTzP/bClY9ZtDjsh/iH/NZqql9aVU6bUO98
+1bacDFgmXKJpFv06LCfox4LJEbGOarjZZN/wGrh99GZUKvp7q3ia1aKM8XNB
+Zr/Br1wtQo7BrLX7u13gwOBaeU2Ye9xwlyOeH4/uGClRglV/+Xs3vJdpw78a
+LrS3aY+Ek3ct2iasQ77BjYX5eiRbauJzEQ0mi5imXfC2dZlbrygiX2LmliTq
+mbnnQ7jA5Mm+KhfUY/FyKkgFPsK41n0BcY3U5ipBWObbdYd38GHTnnvC8J4D
+15+Kon+urNl6dXhliup57B+bK7ltvRM8/ET0/mb002twTDQV7pJkfd0OsxQM
+ptpgB6n+P7AfbBkm7bk08tOR6zV2glXMbwd6wMofJt/awzlHI7uy4KDRq983
+wqtm/WNqYfZZzaNKsKQlo4gD5+oIxPFh/hsL0xd6YLOKBqV61KOSsr2VGj8Q
+51wWjfz7K/lk0+CA+QQ3E8T5fB5XWcHcpJNPJtG/grAq9zfIj9P4e1g5+sVJ
+bR9xh7kHfa8ch7U/v4l5roBzZVWyfBd8ezJTTw+uTfIs2oTn5cym7ibLI+6g
+OKwP91YbKY7IYT6TbGMTjH9vI52/FTaLfmT7I+L2IxvkymXR7yXr0QMwJ66m
+Xxdm7fc2yMN4Q79c/8cyOK/pfyRzEI+olBf/FWbdONEli/wvBfbPaMKlr25n
+esGvVVPe0GB2huW6AtRLBo2uIOBmZ/XWIcS3TC9GSMCpusl/iKF/w8oFHSZw
+7tu90hpwIaleEgivJMTUTNHP2sDjT+/AhX99byMRH7S20Z+m1ruRlmmD+NYH
+7q1myDdAXe8nS8TrGNHsw3BW7xoHPcT71VWSiuDwTCtrWdjw/NmOZ3Dzu6lY
+HvLjflU07IInBRV21cDxc22FjbLU+fCxPgLvqGmLy4XNPAJfMZC/6EqLYBZM
+tEU+HEN/7pzbeWqB6o/Kl/Qi2Mes0O4kHBArURYKX/V0duKthSU7abboHzMh
+3NcXLi3q56oiHm8t/+2pNNZv2zotCTt0Rcuug5v/ergggfH/2p8ZObYG5yPt
+ME8JcY+xjQcGpbB+ZaiSFeJqMxbWbnAz6+YTnF9iTVrqxv7V2H9lg4TLsHRE
+mHIMTP56P6Yffq5ll7cRdvR/6KyG+oT67ecEYfqq2r0BqM/3yXGxuVXI51wN
+cRtxRw93jyW48Ftk/igc1m65XBHjM9Il43D+iMm6Qv4dcGHimJEK+r9WTsk3
+GR5PM+bowg7vPhxqg+/fOVFtiPHVxtpK0si3b9TtvD7scum0BQv2zSFScP+x
+PbVaetNhh+QmtVVw9nn9/D+pelP1r3zB+vuTq+afw+2JAsUVyPdGkHxYE1w5
+4xV7CObNOLbcpPrhdChNB+OFh8/pBMOkIl/sB9Tv1T2iKgcH8By+XUE/z/Ln
+5BVT/frAi/Oj+vlgH0cbHhA8STeCX/ytpnEB9ct0hCeIYrxcw5PaBUmMJ7kx
+X3VJosJ/dYwrXHhpxHJCl2TPZd08US6B8+pKk5iD30fbT0jBAX7aB6n9NKg7
+o0gTx/0YnyBiCp8RKJGgiZEEYyzlGbV/d6RvGhuKYv3A2Um8/4jZjz1PT4ug
+nhITBy4sK9/iqQyzOIlOuqj3SvahgVFhrL8r8ucw6vwd6HYegiel1MtLYc36
+CH4xjA/NHhPmwruOWLf4wJXx7iZC6H/flrJ9nSLU96X7AXU+SoaJT25YX6Hr
+2l3sJ9EVLXLsA8wd+vyfM6W1K4KRL52/o4QaX9dQxB6Fg1Y3ilPzZagxL9ih
+PvIgxwzfFyKBmDWIhgeCvk+XwCnddw/9DjsODhsFw6azW0c9qbiy6Q467Lk0
+8XgJ8ynTK3sGUK9747vFQJjIn0u8SL3PBsng68inUnrmI/X+Ke3ITi9D/vSP
+hlvWw2OnfzLPFqbu+ff+C9gfTkSIxT4h9FfBJOYdnDcv3KMoiOfyNi21wS6t
+ygZdNMwnYpreCUeKz148uwLfL1Vx3jC8dD5ewE8A96PUsNUK6vdHfcQOV370
+c6YnyRjeHub+IGQ51ovd7kPdn6HDYb6VfPjvolFZDCe2vaSZwCuXlap+gcvO
+Xs4cXYb3X17GwkbU28CT1GyDZbweZuG+IcItl6ty4Wa+82H34L4mARsdPF+a
+wAschlu7BYQyYbpvYRg/+i1gZ6W1CusbE34h4nBzWIxIHhxuPZGJ80NoWp8M
+0UK+7Z52xdR5vTyyU/g2PL7eZoaANfrqTaRQX7aGleJbzG+yXzp2Nxw62jx3
+Hf6m/nTzEZhsfUin7odcVgWfL0ys8HiL+4NIvVY0IQebmYuc7UN9IkdX/nMR
+89ODVXjn4A5mQwkX+RTWnKv6GWakmZcJwAOHfzCXhetCfT7Oo142bUvkR/Q7
+d8Y/7CWB8foHhppgRz8jWYUlJmHm20Deg81mCL0kHpPgPpo8eZfaT/X4F7x5
+JsHJsX5dBWcYbNuWPsvEeRuKegMXVtS6us0wiVKm+xSB9Txe5bwPmGYS7c01
+S3gfEs75HeOvpphE7d+PWvF7lAi2Cn5XMIn57G+I/QlP7mT/XjOB8cn1OjyY
+vCWgKwTTE9yjmKhfR9PTUw12tJH2Og6/2HNC/F944KtWWjnMEGK1lWC+9pYc
+3T544aFReS7WY+TuXzYHi8x4exd/YRLRvRxr6vdDZ9+Be83IL8s7OobaH6Ha
+tbzX/zKJ7LLXqZ8wPtja27YG9Uw62tFb4E3TnRkBX7He+o7Ui3B3lrZEI1xK
+s9X8Be707xJtgB3HF3nr4FKGevVumGXSFEK9zxU2T1QkYr7LOzXVz8DfdyRZ
+/YD1Tn0uanKAtYTlNtxEfjI58X1isOp9xePFqOdIVGjWW/SX8bj0r55x7Mfr
+uYvl8LUq76DpUZieuJgNnwrf9M/rQbhNdfE0zFaVd/XtZRIS4UzJc3CoaOuL
+gx3IZyyx7xY8EOW1Z38tk5gbnqVT5/O/T8rm///XI/8Hiw6/aw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.887640361876243, 16.89239276247515}, \
+{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., 17.00000000000182}, {13.500000000003638`, 
+          6.500000000005457}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.644786852214096, 8.754409509855492}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJw11wk0lVsbB/CTIZIylFJcUTJXh+i6kQ65hlC4J1SSRJHhGiJl6FTK0eTo
+Cg1kdpKKhi9JOiQUlanbIWRKkoRK6jZ8/+d+67OWtddv7Xd49n/vd7/vUfP6
+09lHhMFgvMI/tf/7U2cxJKldxmK0Hjm5wBYerBxNkYYVe8emJ8M2Rq1PZsBC
+2RMpXXBdWKG6KCxWUZKssZjF4BQa84aXshg32kQn/OBGWY+4R7B02uO2fHj0
+WvBQOhxgsjP7Bew4o1nRFxYOvRGX0GAxGG+VH+jAjc84SlqwTXTU+OslLIb9
+myfeZtS/vqMjC5Yck2ixhbvVOns2wZnx3Nq18KjGJl8FOKBtQMYCjlydUdui
+h+sr5XUyYdkYw2Vp8Lf7L24rwrwsNs8bjmRuDv8H9aQVtySshDveDSpQfbJZ
+O12V4Oqjmypvw6p9Q9UScHGPT8EZOHLRIg0GLPt1+ttomLvY8w8xOPhC/HEf
+ePCUwqVZcLJ/DnsDzFy9VXEJbBhuX+VAx/P1VNbD7LsL/lkPG0dmDuyBc28n
+3XOnfLaJu+TBjaY623dTnreSVZ/B0aPqD1Ng4eiSXjGMN+2PMz73Kf+FUr8a
+wOf3qqz5Amu5B7RSPo4JxdK/Yrycu+szo2E38VClKMrzpErtaThX4k78fcrr
+WdKTXJixo8Z0pibyd5jI5cPRp/VnboSZ94yLMuFW/ZAnWXBmgrXgOGwp5+wz
+AHPXxhsHwgKjjFfqWsgh267fAq6rEM/aDJcmR4rI0PwMxPyWAAvn5xjS/HSw
+va4WwaPyK4KSKM/sGv8H8GS7bbcdXOR6wqoFVhT92Uv5SieKc/+G3XSsOit0
+WQy98z9ePYU59jJ60bDWsuBoAZ3f1j1tNTwqLVp1EeZea94zDW5QHIs8ATde
+btfq1GEx3HXbzgfC/K2s4DtwZrrFOnu4eNm75XmwokluuS48+GNx31nY90ST
+zEy6nvTM0PN0/IlbTp8wfsYutU0X4eSYdRv7YGP57AsC2FDr7K02mH/p3otu
+2DIhuoCsaiBnJ4l6ygVTpvTDpbr1Lw3hbl8+8wvMCp9w8YbTnBnL5+F+3fkN
+65Nh78mG5DUwT2jjXQU3/lm4Zw+NZ9p782E4Tln83HXYWPtRpQzyqquR8Jug
+PGr4P3RofdZ+nWqmjf6ka76m8Mct/r5cuFjp+DMLel5CN3i3wEwJr+OrYF/d
+8Hpl1M2Y9HDQg2/kt8V6wdylq9l0/W8Hnx7Ohlm/vN7wGvevPsBa+ALmjyvs
+vUl5H7vZK4VWkLt/bRRaYR2rhIk2+NTDopVov8Xd7LJDy3KTefAJ56n23tZ2
+J1vd7r8CS673q9wGOyYmhPjCHfkBa7bApVefN6hTnh3nbq6n3N5+WTmAuqNX
++UfRdYvb2+uvwJZNSdYL4LrKot85cId9jBQD5malyLvDWnNtu7ponmcoGqyB
+Wbskxu7SPPPKlq6gHLpNgy7AvH/2KRrBrYMRvodh41Xqcavp/Kj++yF0fkR2
+Ihsuan+8cAcse0ntbSj8bexG63bYUeTsQBrMd2mo84e1qlYdqqbzMxzjYul4
+AwXuBzq/QPMXWlec7A9pi2h9hX43ribzhOuc0bq1vpadoLznVzrGoDUt8t9L
+eWa6v/GneSgSSRoJobzkDhXeg70TE3JKKfeciZ0tsL2RzWkRzJuqc+e2Dlg6
+wfaCA+2DtWIP2nRo//lPUir1p34yqqe6lX9Yd9E+tCO3tRgWVH2uWIDnWPac
+pskxWgcqJdq0z7C6Y/dsprpSJMVoX3AbKWJQ/ZPH3RbegEetkgv6MD5hbeLd
+JtrH9y+PuwAnK62M6odLlUW73SiPLRohwzC3iK0iDzt+PaQ+BEeaF+Q8xjqW
+PXYgrgtWXDNaTs9xnX5u9yOY2fQ8nk3rXmjyopjqU+vqWETPaTTH7RSdH2Rn
++l2TjpfwD4G7za5W9MCDz9zMHKl/9OS0Ztj0SjxDn/atzaU2T2Blr0v19F7h
+BcTo/Q3nlunyGOSRoeFB2F2rjPEB+XD82pzEad8rqOOM0HP3PO6eNjz8xmDO
+R3jQTtua6rMpu+xB+/bo3C9lB2HLHL8EytMzIKP6GtWbrbPhd7q/jOf3Htr3
+ygblw2lfFr6fOhN5RIZ1FV2mvDN7cwxhTkl5yTsaT1/rkz/g2R687cvxHmXU
+2D/1gxvWCh5Gw9yMA3bhtP7/8ntQC/OXObmQd6+20ZTHe7xUszmSjm8ts63Z
+CBsPq95yovt1vzx9nvoljHhLYeUrS+4IYdnPgkkGnO88z3EqE/Pt4eT0iObH
+cu5BJSaNX87tONw8bhunC0uefDTH9t99aMovK2DHrsbHIpSX1L61JnBxeXXH
+HeQ5/+qQBTnTfHphBHwwwjWUjvcViB41gtkmyyOWwJExn/O/4r3Vmyg2V436
+48qHauk9z3FgycPc2PGhDJhpIPV5CvUfyhNyYHe2U0Yv6hdU/gwLglunPBZU
+wY2TXDFfWDhbJiIfzqxY4xII57Zfv51IebjV3ImB4yTHHTiw1pHfFNLg2RtD
+Lu6FJZU/vSiDLbcuGYyGfVMtDPrh6liG4CjMU8iZkEP9ejYOe3Poenea2sxh
+MQn54RrYk30hIgT2bIw78JG+uxqKd2VQHk2z0hVQP69H9c8a2Ex8eochjT9l
+avBreOacJA1XGu+yd1k/4YX1c49EwfzWrckzkO/sXcdHMuHSaQ9ZsnCDmrZt
+DRy8VFpBAs5g39w/RPO1zf/LGL2HIgTx0voYf220UxMs8NoeqEu2XTyZB38b
+UNxiBfODqlZQvbuLrYvc4eLrXbcM4Y9mi7sDYeHwl/BxjF+1oPDaXji4fG5B
+EeX5aqcCB3aMfp3nA59KVTQ4ADPLQtoWUL/2R98YWHDG6nwnvmN4EvX24dS/
+f4l6FjwpPy/dD5ad7+QfAKtUrTXbDBtzWpTMYYOXcUw7uFQtPVYVNjNZd3gl
+nMZQDJoOhy4+wtaBObM9HUTgdXnzSpToelVrxMThYanhdBl4sGAVYxacYu8j
+KgHzSras1IUtP8jli8B1+/rN7WG+w00VUdjm9CI7+k4LvrWgVZLy0J9mQfUG
+n5D8PAuOrE592Qj35s/hqMOq0wIqGRgv66ouk+pjRXkcXArPDHx/ik35tpu3
+uNL6eswRDaPxyN07tY/W0xbl68lUz4BrXzI89WJYSSnVP1JklkfPw6atE53U
+H776cCF8Yz43QNQA/YHSUrlw3WTqN0141Jp7JgneUcVJWwvXpV6PCqPn4aKX
+1S7Yt9MghL6rneOydY7ArPz4S3NhHataXjr1+98RdGA8VVPvj1+Fgx/8c/Yc
+bKjv/qOcvLvJ2wVuHolNq4a1nlaEysDnD7O7aqh/XE/3IX5HVIcpqFM/d0/m
+u8Owd1L2GJ3PfGb01RouipX8XgKXnvXaJAdnLtNYlAsbH3lb37cI6yGryiMZ
+9swavCKAm4cDKw7Bqj94n/nwLouUjWFwZK6nejo8etH8d2/Kw+WHMXlI2M11
+pfE9Vqig47MPX5m1Dm78qVlTAQe1S163ofrvLfjcCV87oyVFNu6xThNDPdK7
+jh2zp/v3yecyYYNVG3a7wJJHv3VshecfEj70of73l/sT4aCrHhv3wcUy4ewK
+mOu1vOwvWKAy6+9BWP3XTica76R7j8kM5HW2zG1TM+U16JyqDWtsUBj6RNfv
+GbI3hffd3vZ9/nLks1eobglf+WuAw4JH9U+4smCdlffdfWDe1PrTTOo/1raf
+C0faPJ+uAHcwW4f4MF+0ZOsI7t9gFl72gM7fs6XwLvlcFbMLDv6SGBAH72aV
+lI/Bk0kL91vC//6INGT9/3fkfwHRDx6s
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.31544096567158, 14.714519496373413}, \
+{-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:eJw9k38slHEcx5+MdmRhKP44sud5lh/P41ey5uenOVTKr+RX4Xal4SqrrqXp
+/LgsxqwzoUJnYmWGW8NIawonhFPikunc7CRb0dQRo++t9n22Z5+99t3zfD+f
+9+f9dhBkRqcaEAThj159/fdQoLXRVycgpDdMa4dI8CrwOCDxQxx/8nJPHQlm
+y1YfWyWIVVO8rkISGseyHEvGEZuHjxvlkZA/z6W77Z2BOCbcsC4mwVi2LG/K
+RBzZMXS6kYTc2pLAiR7EdfbbLkoSZkpjI2cJFyCKYpIpDgXKoPstal/E647p
+xAkKDLKjy4syEOct+a+WUWC61RtwuATxyvzm6GcKOkTN2n21iG3izkSRNISm
+a18cqUOcFaeIv0BDl8LYJ68Csbxz0KGahoXh1K+yHMQgFeX306AU9LPbSYgJ
+I6HlHA07tZVjZd6IVQOeSVoauqMK9nbuQayc4i7M0iB7ctRoQ436B4Lv9YYG
+/3ETw8VuxHKzNVUVDSMeydZTD/Xz9Sp4fBpU3hxZ+x29HrqsVjsazqVdI+Zu
+IV6JmFBPUUC161p1YsTSnBqDUgpW3ionVVLEqhmfhGAKCIH5rPg54mfCNGND
+CgrCODKORn//ocVP70iYbIj3G+Xq5x+r2qwnITbx5UTGecRdAX4zRSSIq7jy
+722I3aV167kkhNvp98vg88oyTYRFJIO/D9EEuVbUMPj/gQVP+zw1DL7fZlXH
+13FZ3J/l4A9ScorF/Tdfd3M5mMni+VZEnCiOhMXzw2TpjsNdFuvj91PHD7vN
+Yv2UJvXfnC6yWN/phF+bNiEs1n/rwas/u+1ZvJ/E6ezV42sM3l/N43SPK0MM
+3i9P4ft+Vz2D99919dF+fj6D/XFW8HsgN4PB/on5YBs8mMJgf6W0x9guCRjs
+v3sQ+HpYxGB/WrS2XLpZwWD/jqwLo+37Gexvn+qmNnKHwf7nykS9rjwW58Ok
+2CoiVsri/JSHamZC1CzOV2Zi4bTI3RXnzzBg2TlK7IrzqW4Y+yLuQ/w/v6y5
+vrrBX/TafLQ=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.0548, 14.}, {1, 0}], 
+        LineBox[CompressedData["
+1:eJwl0wlIk2EYB/CPeZCmNe9pHohFORPMIsycfpKZqHkfiZozTczSrbCmUTHy
+jOZtLUxIY4WkxnQJZeXZMTBrc7NATWdLmZQwdGoeYf+XPhgPv+19n+f/vtvc
+z/HizjMoijqKF6n/Hyea2trG40hTwvyq6CCY+Tp7PBlmfi5WJcDGI5y+pyya
+0kSxVziwWrCUvOZAU7XB2pxNrOsINrglwApVo30drL6z2vHBnqYGjLK1JrDo
+od96EnFq4Z4s9NFZpIyYw/pR8YgM+5jqubA5O8yPX140gm2fDPfOwzSbVZGB
+dZHX1BUWqJQ4bUiJ91v2B+XEwi3aCNds2M/3eX8nzExUvXSBj8zYBbPQZ4BR
+JGfAlaGpd8thH7Eo0pb0VcrXFslcxumNaFgSI88MQS5q4mSuFFZo/swLYalg
+rNAbfV9kFdQ0w3Sxq+YNXHqrXVlPPHVqVzz6WNxs1GXC/PBQrZbcy85tgzks
+XIxrI+cVdnJ1deR+er4ufISZMi//v+gTE3CZswP3U7qQmp9IzpdeMOsKPxgN
+5EmQg2s36WkGy89kTRps0Ze9T0b2y6uafWPhlp6ypLMwy2vdZtgGeZqtZ1WY
+E5LCK4+DqSvT9YdgiVk/1wQWDnbzbpP8QYqJaWus784oGMMcn5q+mBmYS9ve
+94YjBTYBxlivjy5zeoQ5tLgjK4z0M+uv8IGpL28DJTBzI9ZyAVXnIy7ZRfJM
++q9+gnP1Td9uwMyuxuTvZJ91esNPWGpw2HJA5XtcFB3HHKnlryoB3HZQOV5E
+7t2zc3MZVmS6X7gH81tPWJWQ73tQ2C4iddrlmCPy7331410ayT0lSX4Gq69v
+D5nCtVebpGyc94DgUlk1yenGe18DG69EFG4gR201y1kJl65umsaT/A7SGR28
+1dXr8Rjn14QtR6lhXbxz9pIVzp8n0DeQzzmHI6NgPtVd6QX/Dgsv6Wfi9yVr
+GGvFfEmewTkK1pP/EXIMkLqb/gf1UjjI
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.515727445508166, 6.085629021796733}, \
+{1, 0}], LineBox[{{13.5, 6.5}, {10., 12.500000000001819`}}], 
+        PolygonBox[{{12.052322615314452`, 8.98173265946094}, {
+         11.793188945044921`, 10.219815750748694`}, {11.102165824326175`, 
+         9.816718930329426}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.484057296392571, 9.676200089562332}, \
+{-1, -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., 5.5548}, {0, 1}], 
+        LineBox[{{10.000000000007276`, 12.500000000005457`}, {
+         6.500000000003638, 6.500000000001819}}], 
+        PolygonBox[{{8.552322615314452, 10.01826734053906}, {
+         7.602165824326175, 9.183281069670574}, {8.293188945044921, 
+         8.780184249251306}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 9.676200089562332}, \
+{1, -1}], 
+        {PointSize[0.04], PointBox[{10., 15.5}], PointBox[{5.5, 4.}], 
+         PointBox[{13.5, 6.5}], PointBox[{10., 12.5}], PointBox[{6.5, 6.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T8", " ", "P1", " ", "N15"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdfeg/figjhihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdfeg/figjhihjij.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:eJwl1gk4ldkfB/A30c1OSdas6dqvLUTuaynNpAkjLmWZwpjIUiglrmhki6JJ
+EpUWKkJlFIosoyRL0hXFIG5GISPbLf/vO//7PB7P5/md95zf73fuOe9V2Rvi
+7MdHEMQz/FH/idklfNRI4r+PPkksemYl1cP0zZlvm/XI2veqkxeOw6VGD/Zc
+0iPJnIO1+QxY+epITaweScyZaAb0q5IEZ+jisTDYaTVjPhWWuMXccgjjn1zW
+/s0Spt9aNp2AuPkVtweTKiSRfXs88Trmr8t4dOEOXDi7gfkK8RDa4aCD8GXz
+8gJhfZLNsY34bguH2ruVbYfdrQTjVeHaMI1v6fok+fJUb6wYvM37x6EuxKMs
+xhtpsN3dT7uFGSTRyRUJF4WNC8R4dAZZ+8+Nu3zrqPnI59XWDJI9YBjEMqWe
+P7r5RxeMb7u+YcQVtuwsLvCGk1T8nkXBDYOL9H143jF9+ksuXBq8osAL8VUO
+X3bWwBlZaVudGSQZsZs2/Qb2iQwps8L8Xcr5FmPw/T37BtUx/ue6DfNTVL3q
+V7VXYD6dTyGnPlH1JnnaNCP/nyTzP/bClY9ZtDjsh/iH/NZqql9aVU6bUO98
+1bacDFgmXKJpFv06LCfox4LJEbGOarjZZN/wGrh99GZUKvp7q3ia1aKM8XNB
+Zr/Br1wtQo7BrLX7u13gwOBaeU2Ye9xwlyOeH4/uGClRglV/+Xs3vJdpw78a
+LrS3aY+Ek3ct2iasQ77BjYX5eiRbauJzEQ0mi5imXfC2dZlbrygiX2LmliTq
+mbnnQ7jA5Mm+KhfUY/FyKkgFPsK41n0BcY3U5ipBWObbdYd38GHTnnvC8J4D
+15+Kon+urNl6dXhliup57B+bK7ltvRM8/ET0/mb002twTDQV7pJkfd0OsxQM
+ptpgB6n+P7AfbBkm7bk08tOR6zV2glXMbwd6wMofJt/awzlHI7uy4KDRq983
+wqtm/WNqYfZZzaNKsKQlo4gD5+oIxPFh/hsL0xd6YLOKBqV61KOSsr2VGj8Q
+51wWjfz7K/lk0+CA+QQ3E8T5fB5XWcHcpJNPJtG/grAq9zfIj9P4e1g5+sVJ
+bR9xh7kHfa8ch7U/v4l5roBzZVWyfBd8ezJTTw+uTfIs2oTn5cym7ibLI+6g
+OKwP91YbKY7IYT6TbGMTjH9vI52/FTaLfmT7I+L2IxvkymXR7yXr0QMwJ66m
+Xxdm7fc2yMN4Q79c/8cyOK/pfyRzEI+olBf/FWbdONEli/wvBfbPaMKlr25n
+esGvVVPe0GB2huW6AtRLBo2uIOBmZ/XWIcS3TC9GSMCpusl/iKF/w8oFHSZw
+7tu90hpwIaleEgivJMTUTNHP2sDjT+/AhX99byMRH7S20Z+m1ruRlmmD+NYH
+7q1myDdAXe8nS8TrGNHsw3BW7xoHPcT71VWSiuDwTCtrWdjw/NmOZ3Dzu6lY
+HvLjflU07IInBRV21cDxc22FjbLU+fCxPgLvqGmLy4XNPAJfMZC/6EqLYBZM
+tEU+HEN/7pzbeWqB6o/Kl/Qi2Mes0O4kHBArURYKX/V0duKthSU7abboHzMh
+3NcXLi3q56oiHm8t/+2pNNZv2zotCTt0Rcuug5v/ergggfH/2p8ZObYG5yPt
+ME8JcY+xjQcGpbB+ZaiSFeJqMxbWbnAz6+YTnF9iTVrqxv7V2H9lg4TLsHRE
+mHIMTP56P6Yffq5ll7cRdvR/6KyG+oT67ecEYfqq2r0BqM/3yXGxuVXI51wN
+cRtxRw93jyW48Ftk/igc1m65XBHjM9Il43D+iMm6Qv4dcGHimJEK+r9WTsk3
+GR5PM+bowg7vPhxqg+/fOVFtiPHVxtpK0si3b9TtvD7scum0BQv2zSFScP+x
+PbVaetNhh+QmtVVw9nn9/D+pelP1r3zB+vuTq+afw+2JAsUVyPdGkHxYE1w5
+4xV7CObNOLbcpPrhdChNB+OFh8/pBMOkIl/sB9Tv1T2iKgcH8By+XUE/z/Ln
+5BVT/frAi/Oj+vlgH0cbHhA8STeCX/ytpnEB9ct0hCeIYrxcw5PaBUmMJ7kx
+X3VJosJ/dYwrXHhpxHJCl2TPZd08US6B8+pKk5iD30fbT0jBAX7aB6n9NKg7
+o0gTx/0YnyBiCp8RKJGgiZEEYyzlGbV/d6RvGhuKYv3A2Um8/4jZjz1PT4ug
+nhITBy4sK9/iqQyzOIlOuqj3SvahgVFhrL8r8ucw6vwd6HYegiel1MtLYc36
+CH4xjA/NHhPmwruOWLf4wJXx7iZC6H/flrJ9nSLU96X7AXU+SoaJT25YX6Hr
+2l3sJ9EVLXLsA8wd+vyfM6W1K4KRL52/o4QaX9dQxB6Fg1Y3ilPzZagxL9ih
+PvIgxwzfFyKBmDWIhgeCvk+XwCnddw/9DjsODhsFw6azW0c9qbiy6Q467Lk0
+8XgJ8ynTK3sGUK9747vFQJjIn0u8SL3PBsng68inUnrmI/X+Ke3ITi9D/vSP
+hlvWw2OnfzLPFqbu+ff+C9gfTkSIxT4h9FfBJOYdnDcv3KMoiOfyNi21wS6t
+ygZdNMwnYpreCUeKz148uwLfL1Vx3jC8dD5ewE8A96PUsNUK6vdHfcQOV370
+c6YnyRjeHub+IGQ51ovd7kPdn6HDYb6VfPjvolFZDCe2vaSZwCuXlap+gcvO
+Xs4cXYb3X17GwkbU28CT1GyDZbweZuG+IcItl6ty4Wa+82H34L4mARsdPF+a
+wAschlu7BYQyYbpvYRg/+i1gZ6W1CusbE34h4nBzWIxIHhxuPZGJ80NoWp8M
+0UK+7Z52xdR5vTyyU/g2PL7eZoaANfrqTaRQX7aGleJbzG+yXzp2Nxw62jx3
+Hf6m/nTzEZhsfUin7odcVgWfL0ys8HiL+4NIvVY0IQebmYuc7UN9IkdX/nMR
+89ODVXjn4A5mQwkX+RTWnKv6GWakmZcJwAOHfzCXhetCfT7Oo142bUvkR/Q7
+d8Y/7CWB8foHhppgRz8jWYUlJmHm20Deg81mCL0kHpPgPpo8eZfaT/X4F7x5
+JsHJsX5dBWcYbNuWPsvEeRuKegMXVtS6us0wiVKm+xSB9Txe5bwPmGYS7c01
+S3gfEs75HeOvpphE7d+PWvF7lAi2Cn5XMIn57G+I/QlP7mT/XjOB8cn1OjyY
+vCWgKwTTE9yjmKhfR9PTUw12tJH2Og6/2HNC/F944KtWWjnMEGK1lWC+9pYc
+3T544aFReS7WY+TuXzYHi8x4exd/YRLRvRxr6vdDZ9+Be83IL8s7OobaH6Ha
+tbzX/zKJ7LLXqZ8wPtja27YG9Uw62tFb4E3TnRkBX7He+o7Ui3B3lrZEI1xK
+s9X8Be707xJtgB3HF3nr4FKGevVumGXSFEK9zxU2T1QkYr7LOzXVz8DfdyRZ
+/YD1Tn0uanKAtYTlNtxEfjI58X1isOp9xePFqOdIVGjWW/SX8bj0r55x7Mfr
+uYvl8LUq76DpUZieuJgNnwrf9M/rQbhNdfE0zFaVd/XtZRIS4UzJc3CoaOuL
+gx3IZyyx7xY8EOW1Z38tk5gbnqVT5/O/T8rm///XI/8Hiw6/aw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.887640361876243, 16.89239276247515}, \
+{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., 17.00000000000182}, {13.500000000003638`, 
+          6.500000000005457}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.644786852214096, 8.754409509855492}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJw11wk0lVsbB/CTIZIylFJcUTJXh+i6kQ65hlC4J1SSRJHhGiJl6FTK0eTo
+Cg1kdpKKhi9JOiQUlanbIWRKkoRK6jZ8/+d+67OWtddv7Xd49n/vd7/vUfP6
+09lHhMFgvMI/tf/7U2cxJKldxmK0Hjm5wBYerBxNkYYVe8emJ8M2Rq1PZsBC
+2RMpXXBdWKG6KCxWUZKssZjF4BQa84aXshg32kQn/OBGWY+4R7B02uO2fHj0
+WvBQOhxgsjP7Bew4o1nRFxYOvRGX0GAxGG+VH+jAjc84SlqwTXTU+OslLIb9
+myfeZtS/vqMjC5Yck2ixhbvVOns2wZnx3Nq18KjGJl8FOKBtQMYCjlydUdui
+h+sr5XUyYdkYw2Vp8Lf7L24rwrwsNs8bjmRuDv8H9aQVtySshDveDSpQfbJZ
+O12V4Oqjmypvw6p9Q9UScHGPT8EZOHLRIg0GLPt1+ttomLvY8w8xOPhC/HEf
+ePCUwqVZcLJ/DnsDzFy9VXEJbBhuX+VAx/P1VNbD7LsL/lkPG0dmDuyBc28n
+3XOnfLaJu+TBjaY623dTnreSVZ/B0aPqD1Ng4eiSXjGMN+2PMz73Kf+FUr8a
+wOf3qqz5Amu5B7RSPo4JxdK/Yrycu+szo2E38VClKMrzpErtaThX4k78fcrr
+WdKTXJixo8Z0pibyd5jI5cPRp/VnboSZ94yLMuFW/ZAnWXBmgrXgOGwp5+wz
+AHPXxhsHwgKjjFfqWsgh267fAq6rEM/aDJcmR4rI0PwMxPyWAAvn5xjS/HSw
+va4WwaPyK4KSKM/sGv8H8GS7bbcdXOR6wqoFVhT92Uv5SieKc/+G3XSsOit0
+WQy98z9ePYU59jJ60bDWsuBoAZ3f1j1tNTwqLVp1EeZea94zDW5QHIs8ATde
+btfq1GEx3HXbzgfC/K2s4DtwZrrFOnu4eNm75XmwokluuS48+GNx31nY90ST
+zEy6nvTM0PN0/IlbTp8wfsYutU0X4eSYdRv7YGP57AsC2FDr7K02mH/p3otu
+2DIhuoCsaiBnJ4l6ygVTpvTDpbr1Lw3hbl8+8wvMCp9w8YbTnBnL5+F+3fkN
+65Nh78mG5DUwT2jjXQU3/lm4Zw+NZ9p782E4Tln83HXYWPtRpQzyqquR8Jug
+PGr4P3RofdZ+nWqmjf6ka76m8Mct/r5cuFjp+DMLel5CN3i3wEwJr+OrYF/d
+8Hpl1M2Y9HDQg2/kt8V6wdylq9l0/W8Hnx7Ohlm/vN7wGvevPsBa+ALmjyvs
+vUl5H7vZK4VWkLt/bRRaYR2rhIk2+NTDopVov8Xd7LJDy3KTefAJ56n23tZ2
+J1vd7r8CS673q9wGOyYmhPjCHfkBa7bApVefN6hTnh3nbq6n3N5+WTmAuqNX
++UfRdYvb2+uvwJZNSdYL4LrKot85cId9jBQD5malyLvDWnNtu7ponmcoGqyB
+Wbskxu7SPPPKlq6gHLpNgy7AvH/2KRrBrYMRvodh41Xqcavp/Kj++yF0fkR2
+Ihsuan+8cAcse0ntbSj8bexG63bYUeTsQBrMd2mo84e1qlYdqqbzMxzjYul4
+AwXuBzq/QPMXWlec7A9pi2h9hX43ribzhOuc0bq1vpadoLznVzrGoDUt8t9L
+eWa6v/GneSgSSRoJobzkDhXeg70TE3JKKfeciZ0tsL2RzWkRzJuqc+e2Dlg6
+wfaCA+2DtWIP2nRo//lPUir1p34yqqe6lX9Yd9E+tCO3tRgWVH2uWIDnWPac
+pskxWgcqJdq0z7C6Y/dsprpSJMVoX3AbKWJQ/ZPH3RbegEetkgv6MD5hbeLd
+JtrH9y+PuwAnK62M6odLlUW73SiPLRohwzC3iK0iDzt+PaQ+BEeaF+Q8xjqW
+PXYgrgtWXDNaTs9xnX5u9yOY2fQ8nk3rXmjyopjqU+vqWETPaTTH7RSdH2Rn
++l2TjpfwD4G7za5W9MCDz9zMHKl/9OS0Ztj0SjxDn/atzaU2T2Blr0v19F7h
+BcTo/Q3nlunyGOSRoeFB2F2rjPEB+XD82pzEad8rqOOM0HP3PO6eNjz8xmDO
+R3jQTtua6rMpu+xB+/bo3C9lB2HLHL8EytMzIKP6GtWbrbPhd7q/jOf3Htr3
+ygblw2lfFr6fOhN5RIZ1FV2mvDN7cwxhTkl5yTsaT1/rkz/g2R687cvxHmXU
+2D/1gxvWCh5Gw9yMA3bhtP7/8ntQC/OXObmQd6+20ZTHe7xUszmSjm8ts63Z
+CBsPq95yovt1vzx9nvoljHhLYeUrS+4IYdnPgkkGnO88z3EqE/Pt4eT0iObH
+cu5BJSaNX87tONw8bhunC0uefDTH9t99aMovK2DHrsbHIpSX1L61JnBxeXXH
+HeQ5/+qQBTnTfHphBHwwwjWUjvcViB41gtkmyyOWwJExn/O/4r3Vmyg2V436
+48qHauk9z3FgycPc2PGhDJhpIPV5CvUfyhNyYHe2U0Yv6hdU/gwLglunPBZU
+wY2TXDFfWDhbJiIfzqxY4xII57Zfv51IebjV3ImB4yTHHTiw1pHfFNLg2RtD
+Lu6FJZU/vSiDLbcuGYyGfVMtDPrh6liG4CjMU8iZkEP9ejYOe3Poenea2sxh
+MQn54RrYk30hIgT2bIw78JG+uxqKd2VQHk2z0hVQP69H9c8a2Ex8eochjT9l
+avBreOacJA1XGu+yd1k/4YX1c49EwfzWrckzkO/sXcdHMuHSaQ9ZsnCDmrZt
+DRy8VFpBAs5g39w/RPO1zf/LGL2HIgTx0voYf220UxMs8NoeqEu2XTyZB38b
+UNxiBfODqlZQvbuLrYvc4eLrXbcM4Y9mi7sDYeHwl/BxjF+1oPDaXji4fG5B
+EeX5aqcCB3aMfp3nA59KVTQ4ADPLQtoWUL/2R98YWHDG6nwnvmN4EvX24dS/
+f4l6FjwpPy/dD5ad7+QfAKtUrTXbDBtzWpTMYYOXcUw7uFQtPVYVNjNZd3gl
+nMZQDJoOhy4+wtaBObM9HUTgdXnzSpToelVrxMThYanhdBl4sGAVYxacYu8j
+KgHzSras1IUtP8jli8B1+/rN7WG+w00VUdjm9CI7+k4LvrWgVZLy0J9mQfUG
+n5D8PAuOrE592Qj35s/hqMOq0wIqGRgv66ouk+pjRXkcXArPDHx/ik35tpu3
+uNL6eswRDaPxyN07tY/W0xbl68lUz4BrXzI89WJYSSnVP1JklkfPw6atE53U
+H776cCF8Yz43QNQA/YHSUrlw3WTqN0141Jp7JgneUcVJWwvXpV6PCqPn4aKX
+1S7Yt9MghL6rneOydY7ArPz4S3NhHataXjr1+98RdGA8VVPvj1+Fgx/8c/Yc
+bKjv/qOcvLvJ2wVuHolNq4a1nlaEysDnD7O7aqh/XE/3IX5HVIcpqFM/d0/m
+u8Owd1L2GJ3PfGb01RouipX8XgKXnvXaJAdnLtNYlAsbH3lb37cI6yGryiMZ
+9swavCKAm4cDKw7Bqj94n/nwLouUjWFwZK6nejo8etH8d2/Kw+WHMXlI2M11
+pfE9Vqig47MPX5m1Dm78qVlTAQe1S163ofrvLfjcCV87oyVFNu6xThNDPdK7
+jh2zp/v3yecyYYNVG3a7wJJHv3VshecfEj70of73l/sT4aCrHhv3wcUy4ewK
+mOu1vOwvWKAy6+9BWP3XTica76R7j8kM5HW2zG1TM+U16JyqDWtsUBj6RNfv
+GbI3hffd3vZ9/nLks1eobglf+WuAw4JH9U+4smCdlffdfWDe1PrTTOo/1raf
+C0faPJ+uAHcwW4f4MF+0ZOsI7t9gFl72gM7fs6XwLvlcFbMLDv6SGBAH72aV
+lI/Bk0kL91vC//6INGT9/3fkfwHRDx6s
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.31544096567158, 14.714519496373413}, \
+{-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:eJw9k38slHEcx5+MdmRhKP44sud5lh/P41ey5uenOVTKr+RX4Xal4SqrrqXp
+/LgsxqwzoUJnYmWGW8NIawonhFPikunc7CRb0dQRo++t9n22Z5+99t3zfD+f
+9+f9dhBkRqcaEAThj159/fdQoLXRVycgpDdMa4dI8CrwOCDxQxx/8nJPHQlm
+y1YfWyWIVVO8rkISGseyHEvGEZuHjxvlkZA/z6W77Z2BOCbcsC4mwVi2LG/K
+RBzZMXS6kYTc2pLAiR7EdfbbLkoSZkpjI2cJFyCKYpIpDgXKoPstal/E647p
+xAkKDLKjy4syEOct+a+WUWC61RtwuATxyvzm6GcKOkTN2n21iG3izkSRNISm
+a18cqUOcFaeIv0BDl8LYJ68Csbxz0KGahoXh1K+yHMQgFeX306AU9LPbSYgJ
+I6HlHA07tZVjZd6IVQOeSVoauqMK9nbuQayc4i7M0iB7ctRoQ436B4Lv9YYG
+/3ETw8VuxHKzNVUVDSMeydZTD/Xz9Sp4fBpU3hxZ+x29HrqsVjsazqVdI+Zu
+IV6JmFBPUUC161p1YsTSnBqDUgpW3ionVVLEqhmfhGAKCIH5rPg54mfCNGND
+CgrCODKORn//ocVP70iYbIj3G+Xq5x+r2qwnITbx5UTGecRdAX4zRSSIq7jy
+722I3aV167kkhNvp98vg88oyTYRFJIO/D9EEuVbUMPj/gQVP+zw1DL7fZlXH
+13FZ3J/l4A9ScorF/Tdfd3M5mMni+VZEnCiOhMXzw2TpjsNdFuvj91PHD7vN
+Yv2UJvXfnC6yWN/phF+bNiEs1n/rwas/u+1ZvJ/E6ezV42sM3l/N43SPK0MM
+3i9P4ft+Vz2D99919dF+fj6D/XFW8HsgN4PB/on5YBs8mMJgf6W0x9guCRjs
+v3sQ+HpYxGB/WrS2XLpZwWD/jqwLo+37Gexvn+qmNnKHwf7nykS9rjwW58Ok
+2CoiVsri/JSHamZC1CzOV2Zi4bTI3RXnzzBg2TlK7IrzqW4Y+yLuQ/w/v6y5
+vrrBX/TafLQ=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.0548, 14.}, {1, 0}], 
+        LineBox[CompressedData["
+1:eJwl0wlIk2EYB/CPeZCmNe9pHohFORPMIsycfpKZqHkfiZozTczSrbCmUTHy
+jOZtLUxIY4WkxnQJZeXZMTBrc7NATWdLmZQwdGoeYf+XPhgPv+19n+f/vtvc
+z/HizjMoijqKF6n/Hyea2trG40hTwvyq6CCY+Tp7PBlmfi5WJcDGI5y+pyya
+0kSxVziwWrCUvOZAU7XB2pxNrOsINrglwApVo30drL6z2vHBnqYGjLK1JrDo
+od96EnFq4Z4s9NFZpIyYw/pR8YgM+5jqubA5O8yPX140gm2fDPfOwzSbVZGB
+dZHX1BUWqJQ4bUiJ91v2B+XEwi3aCNds2M/3eX8nzExUvXSBj8zYBbPQZ4BR
+JGfAlaGpd8thH7Eo0pb0VcrXFslcxumNaFgSI88MQS5q4mSuFFZo/swLYalg
+rNAbfV9kFdQ0w3Sxq+YNXHqrXVlPPHVqVzz6WNxs1GXC/PBQrZbcy85tgzks
+XIxrI+cVdnJ1deR+er4ufISZMi//v+gTE3CZswP3U7qQmp9IzpdeMOsKPxgN
+5EmQg2s36WkGy89kTRps0Ze9T0b2y6uafWPhlp6ypLMwy2vdZtgGeZqtZ1WY
+E5LCK4+DqSvT9YdgiVk/1wQWDnbzbpP8QYqJaWus784oGMMcn5q+mBmYS9ve
+94YjBTYBxlivjy5zeoQ5tLgjK4z0M+uv8IGpL28DJTBzI9ZyAVXnIy7ZRfJM
++q9+gnP1Td9uwMyuxuTvZJ91esNPWGpw2HJA5XtcFB3HHKnlryoB3HZQOV5E
+7t2zc3MZVmS6X7gH81tPWJWQ73tQ2C4iddrlmCPy7331410ayT0lSX4Gq69v
+D5nCtVebpGyc94DgUlk1yenGe18DG69EFG4gR201y1kJl65umsaT/A7SGR28
+1dXr8Rjn14QtR6lhXbxz9pIVzp8n0DeQzzmHI6NgPtVd6QX/Dgsv6Wfi9yVr
+GGvFfEmewTkK1pP/EXIMkLqb/gf1UjjI
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.515727445508166, 6.085629021796733}, \
+{1, 0}], LineBox[{{13.5, 6.5}, {10., 12.500000000001819`}}], 
+        PolygonBox[{{11.447677384685548`, 10.01826734053906}, {
+         12.397834175673825`, 9.183281069670574}, {11.706811054955079`, 
+         8.780184249251306}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.484057296392571, 9.676200089562332}, \
+{-1, -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., 5.5548}, {0, 1}], 
+        LineBox[{{10.000000000007276`, 12.500000000005457`}, {
+         6.500000000003638, 6.500000000001819}}], 
+        PolygonBox[{{7.947677384685548, 8.98173265946094}, {8.206811054955079,
+          10.219815750748694`}, {8.897834175673825, 9.816718930329426}}], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 9.676200089562332}, \
+{1, -1}], 
+        {PointSize[0.04], PointBox[{10., 15.5}], PointBox[{5.5, 4.}], 
+         PointBox[{13.5, 6.5}], PointBox[{10., 12.5}], PointBox[{6.5, 6.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T8", " ", "P2", " ", "N16"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdfeg/figjhihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdfeg/figjhihjij.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:eJwl1gs01GkfB/C/uxrKZdx2ZN1y2wbZVRTNX1FCkq1t3Daly3RlX/ZNN0Qb
+YuWSxjrE6YZyqbPjTSWXUkwSXqphrEpu8+besEPS+33ed85x5nzO8/x/z+/5
+/f7PM0z2hPvvk6coio8/8k0Nf8VnGU3JyLctTd1uOPkuFb5j5HFKCGd5lMWp
+wFzG25J8+Eav2C7KEOP7Cwti4MqM6yNvWBifK289CvubsC2c4OLmTXOHYV5F
+0/Hcb2gqYt0WsxOw+S+/7FGEuda6mZdgn9g0lVMGNGW8Ka67Gq71OTosD4d2
+dYyNwypNuWUF+jRFB/Kdv7PD/Ef9sh/hdM6SmsOwUaSHuwls/EnoWg4HlnJb
+VWCN8Kjd43Cs/vo8ZTiq6uCkjj1NHZq2Oc2CufOzgfbw/foqmw1wNaea7wHz
+xk2Pn4AjHJlZ22FxdV/0fTg6Vj0xGBaoHGj5Ag87M5VD4I65BjGNfAXHf6J+
+IuZrs87AnqyUhk1wcsbCzjL40mbmvAOs+dJi5gWcp1p+VZ/kY8uyEcEaWmbS
+T8g34YuGNRnXF/tJ78B1dxV8imDeD+wzZL8r8s6aH4SLzZUGLOCuAaN4LThJ
+2/H4IOq1yWQz7wby8xt86FUGu7nOSc3hOkYoi/RLcW2Sc7Ye6rVqq2UQnLI0
+RuWzLp7nSLQ2wpM2coIguNDaoJMDtwXVdFbr4P0woW96wrLUW7NmsFW+l0oo
+vLuPceAyE/1wZ9acgy+ru3Tow1XezyUCuKRg33cV2uhnxgWDMfi3V8v3BBN7
+6x5mI//2Y7FeprDGZ52KcFi9bTxODpYds8i4S8bjn4bNaiEP9Xv1pJ9FtB5L
+FeM+Ua8uaqN+8atnKmzgaL4o3AYuUbi3MgTmOv+5cy0ssT49lAv3568/SPrr
+vj4rpRfOywwy9IRdFz383RT55jie9NgARylqBeyG1Wb69VbDW/mc3Gw4WGZp
+Zg7/Frs//gEsjVP1YcBdj/gKL+A2SUa8GPnt3fJSoRGm2dldf8AhEVMJJST+
+tYtPtsONEbNV/4B579Uyl8If+/p1zOBC/2l+C+pzKMF0YzXy4+U9/poBH9uc
+qe8GF4srru2CXWKcgytRj6SYbokTzPX7+c4yeHhB9+a38AfD/V6xmui3wbS8
+DvzmyzbBWw3Mr2VGGsCpYVqJ7nBO8LnbK+AVE66e+5cifnB40RY470bmh9Al
+NDXBHxOchIMrXdaeVcfzYQEX7sLG3IetLWo0JVJkhJHz+dhy9bQXbBznYLoS
+++l+tix/joF8hDMnIuHqPbWuPTBXTkHnT7jN0ahrBG6zj6gbgY01c0wt8fze
+5wvCJajnrei0+gRYVeKbYgLPqT0rm1Uj5+FZORv2e/qpMAb5mI+uyiTn6bnx
+AF8F+Ubb5ozZwUYWo8HJcKFPsng5mT/XzJyFUwuWv2TCnlcsG32w3/SpZIvP
+JN9/fxCfgq2mRBceww5mDomxxIl/nYmHR/Yzvv0Rzhnq0FwHCxhvd0gRL11h
+6qKM3F8hl3aGwXS27tZK+GTnscaryE/W05x8HH53ZPTKPeRvpVTuuP5/9dww
+Xoz9R7d+36sHn485kxS7GPUWlJ2bY9PUntBbFzwWoX6mSxI/wsH8hEElVdy3
+7Ko0YiO31o5mZezDgJ1E5vtWe7hfVaIp+5Ny10m8S08lAVmK6M8H9d1ucK9P
+zlCRAuIPBBb8Stav15Yfksf6a7ofkH4q2y/c3AGH9uSVTpH7YdA4ZkaOpuJs
+++0dyfscyawSwtztdhO/wrTufxgtsOwIXULO54XUyY7PsJXfosABcj//bOe5
+FfE6i2ocVFBvxXXXOmpgwbZVgeT+rWtjx9HIR+QzeMAQpkaEkUK40zpjlgVn
+7pBG+yL/np1MBulXjEZGSgPcpp83owiPqOwLM8F+6fbD73qxXtosdzoIpqST
+s8XwP0vYA0fg4YcHXhyyI/ewWp8v7NQb528JX3fYJ1lAPI2oTOF78j5ve33k
+NMz7/U0S+X3jOvwQQPIJTQ9/EwJXae9ekCB/XprFk+XwVDurqx/7VR1Vn/sb
+9e8dCXd7TGG9yKbi13Cd7kUF/a8cKrRp5a4nsLk47d4f8xyqKfz+fA1cnK0k
+bzzHoXjZvBtC+JxiiFr93xxKv9awrg9eIXe2ImOaQ92pVl9QJed9c+nR6584
+lIYFfXgNsXFRsuoU4h/SSYyCJ8RDG4UTHErEbQgj9y1VJFfVPc6h6qxtm2fg
+QsVcl9ExDuVZSh9wwv6trs28egKr3pZ8JP2MqLTK98V8aiGFLoUNHZUOrkG8
+Cc3RmyJY9fv1ixiTyPfy3b9k5H2wEMuUsH6ONOiKEulvWPyoDvJ7tzC9l/Rb
+Nn/7krkU8VMar8rBhmXmpSzsJ44RwJaQ+M09BoNwjsj7X/XwRAt7OmIG6306
+/yiN/L5pXY4qhWXGXXf8YdHsOkEq3KS3OkIDLk1I9V4M+z24bN2M/YkWBd0y
+Rbw2nWn78+Q8xvs7i5BP9N0zr92JvxGsdUC+hd7vXRbDTkYGUS7Yn/3I0Mou
+1Fu/cZWJ+gie59gyBDBX6te8cQj96BQm5cHpmrvk/fo4lFWBR20WbP/FKfFW
+N4dKEjMW58KUJuO0cjviOw8rV8ChV+zOatXBk9257WScfDIe/f//Kzb9X7fX
+dwk=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.6003322263215085, 16.89021660517737}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwV1QtcTFkcB/BT2kw7qcmrIjVhLXnksZVHuVfWSDamVh4rzCbbQyr0ksVk
+bJtYOxLVpp1BqNg1KjVKGonQO6/S0EgyUUxEg1b7O/fzmc/9fO8595zf/3/P
+5zP2/uE+mwwJITvwo3fSNIDLgiU6erdnSfaDtGYt3OXdOuMiLP9pv+gSrD+f
+u2ETzLnmFf8L3N4yU2YH8+9WJn3hsSTCv6aojc+S2Hx/Xjw8PM7/iwKW82Qx
+z81ZUl/n7nIQrg8NsM8zY4nfiaV7omBhzTHPyCEsCVoc77YF1umiz842Zcm9
+zEdjtsPEPL+Oy2WJKEc8IgGW2h3I+GjCkqx1SyOyYE3a6SRTeEpxdUcVPF0m
+dPXiYFxRXfIR5h02IeWDWZLIUbY6IO/0qJeSMLgi2cXKj9Y3Z9TpH2GrkDeT
+kmDFtNMB4bDGw9MwD9bYeBmUwqHHv2utpx43yMkJ669uvrGtHY7w7kmuhaev
+4hq8gkV+vga7kUffsj36GV2v3HiJy9eYJyyOqoGFY0Lyu+HzLRl+OTBvb9O/
+KahPKLZhYmE2Z+pWPupf7Z7aPA9WbRRIE2B1gVfcB9oPl+LEq3DKubRnuXAE
+l0wph7ts5k30o/1esln3B7VjlmQI7c+rXlt7WLXle9E+O+TL363eRfu5XBD3
+yRbPn1ma5SCPXORWtxfme+Ra5yI/J3ZFtz0dj1mYkIT6dHpD15YxqOddg9gX
+/eBYGdYrYE1A8lJLY5Y0KUXCU7C0/FeZ2gjf+cDQ1xdhXdOlwXmD8H3PBIY9
+goVOK5lThhi/377YGusrApXpxQYsUbYZ1wfDZF3frwSu/yCLuQmLqta8jyM4
+l+JrQychv7hyfOBUmCj/nHgAJvtv+lvBqhfvBR2w5sKhzDmwKJpMHkX7tcrb
+/CB8fKzvOxdY/CBqFgfrTyk66OpJ+/VgYkgWLO0JXLucOvROpC/yGTlqlwlg
+ha33YHPkVxp71kyj5y9laWAFfMW1bLEJLOLG8YJRr6Yo/PY/2F938sLKHli3
+ntM2E1YV1vT7fIV5n20Pn0E94kMul3+DtQaqcDO4Pot7QgLLHasvRKA/vHOX
+IpfAJFddddcG5+qz/vYDrCffETtrPix28rGYBscaP+y7NBrjecHRK5BHfiBg
+FwuLjR0zvZFfJyDObaPwXDMw3xH1CZN2Bv4Ns2UFa3oGGCJd7m4QA4scdDsi
+/2OIttBbEkrnm21bafCZIUE5qr5dMHHQaBV6higWTBvIpvOdK4P/+sAQj5rI
+N510fLfv+MZevH902CBX7C9/3Bce9I4hwh86j6XDmrGWj4Pe4v1au+39NN+p
+TFlzD/YPSx+9HvXwF9bOL4G1/LpxSmpJ9CEO5nu8a4s3Qj/4bGNPIRz7sEDt
+BhN/VXsh1g8q4DRsoA72q+jF/ppQ1iGQ2vBJ9Rrk00yo4fpQS98wNX0MkWew
+JnxYZX4iy+kjQ6zSKic3Yj/R2npe3CeG6G7dbA+BWdOAzRLUr/td8LobeUWG
+Fqlu/QxJFNwYJYLZ+dLoNFhb8GRkJern29mUJsK3jLrtJsHi8GwxB54Yvjr/
+oDXeHx6WYIn10sZkz9VbYVzWuagE+8tNkpVbYXnq+JNfkG92+9ydXyzhLLVf
+z3uG8NelPDwJa45ne55Fvdkin56fYTZxs48L+sXheCW7weSyXVJkN0NWL1k3
+zBlWuQ6Zc0SLvKaaVZ50PGN/QP8zhpAsa3UMLH6b2lfSyhDWpux+MXXqVUVZ
+E1w3EGCGPKS1NmrhXYbwTFPuhlL7HynvqMX39Jc/qaNuO9dcdYchqtkXB89A
+fWSHLNMJnq0v1O6ntnTqf1+N75VbkXCP2oyo1zSg3k0bZVx6XtQWUTH3UZ/7
+kS4H2q+utyWSR+i3L9fPkZ7PtEmeFhr00/aNsyWsmvDWVd+GevboXdqwnrjo
+2PXrz+Gh+kOHYRVzyssd9Yoidjd8S138YargJfohjGzORl6V9ljn2Vc4TyXC
+I9a0//owZ48uhogXRFzdQ/tlPl5qAcuTrp98OhL5qiTLPuJ9ftHRskWwKnG7
+I+nEeTu7LyZvBLxyo9fMDuTlvCydCotTSveeQT5RxdPbV4bDW3fu+6RmiJLf
+2LiROkTQUYp+3prc2vwNTFp6019cx361XIkRNb2kpURP/3+Hsf8DvRPe+Q==
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.3599813626326804, 8.076870967038232}, \
+{1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000007276`, 17.000000000005457`}, {
+          14.500000000007276`, 10.500000000007276`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           
+           9.996694214876033]& ], {18.003845503734127, 15.345156917263754}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwt2Hk8lGsbB/CJsmWZkC1lTXZDNU1JiFASKR1OKltO2ZoTMcm+nMaSo5LG
+UqFIjuRUMpyspxCVeEuWbKUsiSkSKt7f/X7e/uj+fD/3/dzPdV33Nc/zfKh4
+nHA8ykehUCSXUChkpAiR/9aYUf73z8CM8pTO5qTDI+aWB6ThUqOPm9YrmVFo
+MvWzq+A3ax5VvoBtRqYUZeCSLblzG5Rhe/F0PlhoR8+XMJidu/z1oL4ZJTne
+Z0k1mQ/0/XQfjmqO1Z+BGZHvgsLhIR29j2oqZhSmyIU4E1g7J1jVCm5qPpf+
+Tc+MUqCuZOUK29A/+5TAKdclnbzhzg/3hr1gxd6gHi+yfknzzGpYXX3zuDPM
+Kljp9UYX67dckLaEhTy5D/Ng5fRnOzXJ+tjthoGwQHRAuyCsHK4YZg/rf0nT
+eY/4Zrc7PWPAugrDH+tJvL/UPTSAdyXszb8Oy2WJWmyAk00WGxLgwlaJyh2w
+4+aRqBCY9uHokAecWbC9KIDslzPyPQGe76QUM+EXv/k2cOGA7b8wI0h9rOvv
+jMOUZhFnDrHa+2FV5FOdsJRO6ucm0RrrDBf3Ht47CVNLM64lwvdVX/prk3os
+7oh6AG9bptftD/NCb97rgsWVBeLKYZr/D90v8A9dAeoyVZzv8JDrAvxw4fjX
+fTBjSY7FT7jT8UZWLsyargibgBMly1kf4VRWnkU7bDX3Vt9ADfW6/pV5C166
+1bHQB7ZZd5l5Cu44EmqQDRdWSxky4GP9srH1sPOW5WLTyG/Dk66hN7Bb2F93
+/oL7/l2h+hGeNYv46k68lD/9E8yKn2mWh2Miy9a+h0vTLEU6dMwofGERG/8D
+18pTfs2APxys4FTAtAo9cW9YdcuJsEwSj7iI2Da4aMOwHQtmt7zmqsJyr22u
+OsG8dff7pWGGbvbSjXCOt/5d4i8f4hfl4NS91DoVOEZYpZOfxJ/yO58xXLlv
+19lvqAftUnfvYdjN4NLVr7DmtdFtSbDrym8bF0m9Bq7droKNQhb7pHF95w5j
+3yk4lG14lU5cZntBC/lpNDwb8yReTGYcgkuFxMuyYGrHXGoSbHUr6SSpl3Jk
+guhduNrUlKaubkYx85RnPYe/zFnfYsLcDHWZfrgkjeleA5dmKd57C4+t3Fov
+thbz4qfudcK8Ao3NLvCx3dUKdbBzKdfpGhyVeCYpm/we9oh+6CW+9MDUj6y3
+C6FKaSBPvsJ5Q9LPTnrHTWBu2arpSeQTzNfL5wrL9cdUF8K0ovjTATC1+q3m
+EThzteC3ILL+5eJqGZjpQDdkwkzPHTEvtHHOt8+5u8M5D76tOA/rFnXTd5H7
+WW01/xXmC0it04U1lf2V9GGv4fyDy2FWpICpOEy/LH9uBPEq/219/bsW+vGI
+60QDnFN76P4MbDT1Q/gWLKeQt2UR5qnPbDsP826pu0vj+tTS+RvRMKvbs2YD
+3DCxZPoM7MBfd/wwHNpqxCTzDNpnwT/hLRdley6QejK8eP/C40qNPqVk/SoP
+63k48YBvYxcspBiobIB8OzLMJcQR74hFcg6pR47K8IAtqVczUykBTtM57Xue
+5LOq3uoWvDD3NPYN3Enfp1cNe483VmmvQ37cSP8GmJ53h30aFlofvbEOvmu4
+zq4Brq3l31tC1leEJolr4hxuJuikwGZdHbP28IBOTIs7qb+GTCYb5qywa9Am
+9x8a634Au4mW631E/OljTjldcFRbY0g+rFh0wYkHy/3nh7srLG05+GUeVtYy
+b5Mk+Qb1/5yDKRvkS1tQ38KLfrETcKH/uacJcHCY2/JuEg/Xo9we3u+Z/0c1
+3KSmVKAEB2z8g3GVxHNks8t3MgoZZ58h++3OERzCuDA4Yu2C0ex+ggPZp7j8
+t+ebyf5Dehv6MGpUGOQqYWR+eyQ1iXHm59MpUYy8xcfc5dh/uksjjx+mRkt5
+GsHbqI0Ky+DSf070usE/WGv2SMLH+HddTiP9E514XQdOfVRe3wzH9WRNO8DO
+isanKMh3zYtXKdGwjVDnEyNYeUW78UOyvm2U7wjpDy8f+0VSb3W9ohi4hGLx
+jw32adJi386ChbLaNNLhYzzTkEI4J6JJ5D1MXYikEIta5T8n+/K0DvZmkH68
+KDwcpk3ePxXmERh9noRO1WIc8JpdcMK4cEW3+wdGjoJrqCrGedvzA/o410L+
+qmyyb0rnnzVOMFVn48NcWHoi8C4T5k60RrnABzgjkZFwqnfYYwl4Dd+lsBji
+uNvBjeScPm49Gwpz5PWZsfDumAsLx+BSNe5BK/gtn+Hf9vBA7avzpI77u840
+0UifOYYsjKIvmyNc7oiTvp+NEHkOq+Z9/kr6zC3bOqkGLn3DXd8Cj3QPc6vh
+A33rRktgM3aeTgvp+/uRHqQOtHt5A+/g3b687GS4drxlhyDulxh80CARZk9I
+714PK6yu23SRrHdJjzxKzrXNcA+pKytzg3oWPE95E/4EntVPd2qDS+6etZwh
+8y94msuQf4ntHxw9xOvAVm1dDz+MbJv2h5tE2GW/womGT33KSD3dqDdCYNra
+Du4SPBe50vqv2XDlSJGXA8wJCpY+Bze3/9J5lTzXE35yY+EP0cFRY/BsV0Ot
+H8zeuWuMhvckq2OqgfRJh67bwAk4Z+j2ghzs7OkRlw8zp9es7Ue8d1d/9noB
+O79S9L8Ce/dFpUzCqbqnjh6AHSROp/PhO2qkSqCH/A40B6k5wrBcxTLuv6hf
+Suvfvy6DmY9HB8PhsCVTczO4fkQgTXYbXFyctG4Apt1htAmQ89AenKwn899i
+1LrxXMrzlC7Khd3SLW9WwCkPCt5EwIzMp94F8C6lGaVDsMPlmrYcOCZ8dHEb
+yU9osbwQ1lAz6NMg+QX02FbBV6nHO2Rg5dQQnV7YpyQpnwpTd04yyf0zY1Mu
+rYTNDsU30eESftcAcj1336skX7jSp9TPglxf1TKQCzuccDT1gzmy37s7SL/E
+N4jkwJTWxiukXyzb9wb2ku+SsZ5wQzhtW2exKuqhaXVQ2ZE8Ny6/+dMfZvv6
+pv8GH869ffcfmDH/NJBJnj+zGfEi+M5t2hrR7wtnag4yf4HlLG5cIc+pxCr+
+qWsw85yV5BbYq1yiepB8RztWbSXPZarxzuNiNNRzULD4NeKrcQttUYdzci/6
+ceDgetlTdJg3asNzhKtokXLbYebHr5+F4WXvQkusYcrUUada1GvtRFow8YBm
+5rLTMD3MYNocTr1Z0k6HdSdiRzbBsxHzDj/wXnpg27pTG2ZXjFW2wAOHpBgK
+sGbUbEcBvFOENykEC/0+9jYFDvA+xJpE/Jpe++LjYA/pvc9ayXf+t2+Pz5L3
+7DGmYxnMuxkoxoFnZZ5tyyP1KFbRvU/em75TJznE/bO/dcN04+8eGbANf0Wq
+EOIT+CtpWQE8UhsuvxVWX81pqib14ibTT8KhX12S38GMaL6Fm7CBmHu7MOIr
+rBtIIP1Y8qqQpwG7uU/KC6I+Tx0j7WxI/A+G1uvA7aZ17/xgxnXXWks4g8th
+XyTr+2zVSH3VvqvMVcIs27Y9xOxXWqODpB47ElrJ+g4XF0lBQ/Qbp71Ni/jI
+agstuDO1UYkPlvTL8rOGR1r55FoRz+1c6h03uEko+8oF+K9pYa8gMj8ny2cP
+By5dWBsD81rtxgTgx9zJlwlkv7kIgyrURzvs3eUkOKpfpDoIjtaU6TkLUx5Z
+BNLg+vsitpGwpt709y/4zuMrLnx6Ei6kKJZVwyL1jSc9yXycY+olWGow73dH
+cn2LxE8W7B76mGpO1jd/eH0cFr4km02DnccD3Y7BZTvL96vCA7dO0YNg50sO
+HrLEKoaHk+FnV64+psJyHpO2d+DO8Xu7JWCGndhMNxx//EKCFEw1aRkXRbzM
+oaiW1WT9/obg7XC4vN8qfZgz+ryUBSckhRtbkvWyhXeKYWvdT7eOwOzFtXk9
+sOuKTwUk3xezq77woV7TW3xMrsOssxkeynCQ/dY9T2BanLS2EXyq1PwKj8zv
+3yO4CT748Hm/rBH68uGivT45j7DGFhPYOe/arCyxyj0Nd7izajRtGverGZJ7
+GQUPqCrtfQynMSLeZsHcdPuhJNh7fUD63zBn8+6wXbCZsnBgHXxMTf8GP+xG
+5Zq2wKyZTI1K1OPRkzqRVrJeVe0T+U43+Zmn+Yzs77GpTxv25hjSGmCmq8U/
+Y/jOf3aOO1UJy4WcptyDNV+7hhTDhZpNjfFwk8bW9ySezg+2pV6wtvmLyETY
+LcK1xQFuUKZfPE3yWy6Vugtmfljq7QOPmHa/2guL5h/VPgw7nLLpOEosqcBz
+glMn9ehk/6ObVnIcyf7X/VeWwI0T9Ob9MDV2WL0P9lqa98mV5OcVVCeJ+Kfi
+BdR9iY9zJXfCIY6yNpEk3yZP3QjSj2ImkxyY4nuIRvpFoeFkQDlZv2DN7IIZ
+NVJvu8j5nO9Knocf25gyFuEcg8vnqain+EkXE4316Aex0uUKsFaUTJEd7Pxx
+XEEGTl/ibxQEdwZ/OrOU1P9BTRqHzA8bJ73HfvuHzhVWwIyXkubkPEQNF3w7
+YLkmAY042C4qX2ICZlnIme8gvyfyd5AN//97iLrZfwF22yVu
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.246230799468776, 14.874866310565288}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwdlAs0lGkYx79hxp2WqFhKS0p2SMbmkvXKJU1FozK10s6gclQutUesar46
+JZeSUHKfqNYlVMqti1mxbZKEOqodjZI75RabxT5Pc87Md37n+b/P7f9+s9Qv
+xGuPHEVRIfDFJ82AH4pNqG8fNUI/KJoOcQWW6TaP1gH7+picTQaWJN4x9VAn
+lH562Wg36itODSapE7q2LuyzvTno4zpzEiC+VuVuVQKwYEhLzQni957eu/oW
+mPpRIChRI9RLY2W/JRaEEkfdHO1QJXRgM8+CDywJ9qrpUCH08IEBxglgoiW+
+eV+Z0JqOltczgA3nUqpilQglHJt+cR1YFmD4gq9I6DgLTdM8PL9OKrVRIHT/
+u/VWScC0fEOuA4vQ6d99dQkHFmyPefAbk1B5sRY+XphPnFPfJ0+oirr8IdNv
+cZJ+FThl+GwVhfnN7fvygdlew2feYP8moV8mgAUrLo9VA5MAvT+imYS+n5Rn
+eQ3nLd/YzIN6DqMmsgxgSUPnIy70o+kxIRUDiz1F8/2g31fF7ey7eD6p7Vg0
+zFO1Ra6nHdl+avIazKs9J7ZShfrUSVltCeyje/cdXy7uo5J3NFGVUHG2O/uS
+sb+ut3oOsE/dZdPVXTjPodr6AuBE98Q8/VXAx1qjnqOfUxFdbsAyxnJREfCC
+nXo/hwBT4RtFjsATF7MHkpEfeosuqBIyk1MsKAOmW4Iii1SIZGujg7ARuc6h
+Pl2ZUAZ2idodwALyjhsC/Z+f5Wj1AkuaNBPsFAllbOEZ2I/5JgbEGjB/61Bl
++kfUl35Wn4H9T7vpZLxBvQKvQYdJSOY+bnUDxllxZK88kWT0OqdUfDuvd3JK
+jhDjNM5kLjKv/EaLHKHsjdseJwATns3ZL3KE9lR37jqK/TGVREI4b2qwTRHn
+E0fGZ6uBP5m248V7sV6Mk+kQ8CH2BmoPntc1WjHBgj1RPTVBWD9+t6u2IiEH
+YthrIzDfaMxjGyVCz/x+YvM5jF+2yN0C/hSPF/ILMF4YFM9VIRTrhvXWp5j/
+30esheCPt5GzdATrux3xKIB9ynW93fS9JdQxr146BffdaeZIoyswreG4YRb0
+DTLr8BBgQbhwsBr4iYN62CXU66/MslQlEqs1a9WrkA39lgbBfSizsu14CSz7
+SX46BPy41p7WPAAsWWZdwYN+d5hl231F/eujGoaKRLIrTthNrYZ+5l34MMgi
+xMRYRweZHnFf1cAkEmGbVtSUJfZrNvI33G86gGWN+QwX2hrC/iW9oc/KX2O9
+3XlN/uBHtOfKu/XY/xHH/doQz449rnoL9blSogF+9Go452ShfjGXwwO/+Lff
+rTsHTLqH69tBH1OWn3YC49oz3pnyhDY6Uzobhf2fniw+D/dj4dO+kGOon1d4
+Ow/80e0ePh6N/MTF+7ECoULN1rinYr38orRemK8zwT+sFDnFNncC7mPL53zz
+Jsw/7t0oVSaSEmc1z1FgSjOgKEmFkMrXZR56MD9hXOpRAj/GhZxgF2CJaeig
+DbA7+/Cz4NV4H319l4B/x8dEManAlNh/wwPwu/Gfgrb7yB+leovAj8Pj8/Sl
+qM9a6WKrTIhWEnPBJLAs3reEDf3wtza+UbaCfXELR5nQ743+mBFtYDIVGdQM
+fnAmI/mLgAU6qca5MD+7xZjGuFgn4nk8+NF/WuihgvE4fkEW7L/Tr1JhGvIb
+xgRHf2QQemzze/terF+/5b+DDCLJbE0tb8V5EsxrHBjgV+8Pv9TgvIF/2vEZ
+hDJ5vkOxGP23n3+wEuJmQ1WibJxHbRfLB/zJVDnMvYj3ZbF+PQfqu+V2ZCah
+vjTbwAben1bPT+txH7QslNoO/c+ZXSnKw/Nf3F9Fgj+bRFa3KnD+wLhzKfB/
+p2lwqrEF9b8uv5msRIiSUQRzHOMf2KH74P4W7Rxh6OE+CqTpcrDP2tggY2dg
+mUWhvw/se/PATPpBnH/5xNf9wE5XttGpwBQnrGc18F+cF5MPUe/6TL8M3k+X
+T1bc95ivcGPTGLwPs3PwwTg+Fcn/B32cLQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.04629457140433, 1.614040285447666}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwt1n04lOkeB/DntITlYvIWhYQJa0ajRByrx9shsY2SiIPEQaeikzphGlbe
+s5ntsirEbN6mjW1qy0ursxMrytsQ0clqLuqE2po08tbhfO+9zh8812ee+75/
+39/veua5ZmNUwp6YVRRFCfBHrhSD/NOmKVVyNaMpmch1YXANTYnu+QbshqWh
+afs74YLY9mvfw8KFYukzOPMryU8fiJl7wrWw/9eyNmN3c5oyze9yPQhH+53q
+zIMT2S0avXAuX/q+A5Zrn3zL1aGpeWWP0EWY++PcyATs0toWt8GCpgS7CybS
+dGlK/B+GowPMuRZQa6xHU0oGc7WuxO6l1Xdgbo/8kBMsfl58g9anqclVav2W
+sLylYmcTLFpJW1GHTQvGldaupSkjkes3k6gnSUx9FAxzxiq/lpC82pRuKixa
+EJpfhGU34zTPwJG/xHUnwNRnp6ojYOku82Z/kpf+eIoJW1VvGtsKi10v/ziA
+ep18k39ZkPNXe3cfgVle+73NYOkZveBF5BX0qDezYUbHXE4GXJCx6YI3qV+m
+MqoBK/Ki80k9gW1XgxD9C62ci6vgSE3tOU+Yw/aYfUHqq7y9tIJ5bU8+7WtL
+5jU5HTUEh5WMtpyBhcvLlQ9hluWoiZT0L3mgPAb7FbutM2Pi/u6sk9o4T14R
+Fp4ISzhWzBg4/cRYTyOcqEVXDRA/fXdtFhbfKdIKQj6fUlaT5SZ8fvB+4BSc
+ZHfqoB8s5dtlZ6Ffnw8zHVFwYtQHZ3PMxyJK7fFhcn/71tm78Av1W5wYWFg3
+mOdlQFPB7pp+e4lbL5xtgTNzHjg5woL6Xbx1hpjnDF2qA8vO18SGwmEHXFNe
+I4+0Tb2LB8teDJm0wulZ08/PwC4s3fEScv/IP8ojYA365sppWF7NElvA88Z/
+jY8g6wfYu/pRz0dHo5xL+p8enTsMJ1mezPkK5sac8JxH3jCLiogDZL9o/+F0
+uOr6VEUSTF11mP4c5s3zFstgU6GbRQX6NzqSGj4AMxJsZjxgQd7Pq0l+xlis
+zwrmFcfbcSGM9DPaPTEEd+YbMOtg2lNNtYs8zxx54TJZn8/bI4ONInR5XEt8
+Xiir1MN5RdXVl8thTvvixnh4xCyu5yUcafxlwDBcsNASam6F/f0fPEORz8Dm
+uOY+WPgseuLtWjLvoL3JMGWwxfkc+mWw/xtQCEuZx8asMJ/cor/NFRPf2bJX
+Ahu5qMwJiP3Zx33X4fs8on2fD0fezn8ogQuCi45FkfPLp5aN12NO9bFVrrA8
+PkcrHLbfVHtMH5Yp1xTwYZe8bP3fSV4Ju4V4++S4oh2Whty9GgFbOC15VMF0
+Su6sOfzGrn8mH5Y/Up7tQ703zSU8Hum/VXVLPHxaN+lBCtlvPEp/RF5JPks5
+hzjaK5wPK0ov1n0Pm/YkqKvBTYd3xj+CKSfzmivo3y9ej0mRfGXjqzxg6t4a
+fTdipxOaK5iX5Ax3OJ/0o3iV+gT2rF3I+zecaFFxtht2+frTJ5Y11nc0NIzD
+cdKtT/nE4xFTBjjPiC7p64YFql9uOwqPXtDq0PkC+TnXdUbhN+/sVQJg+a+5
+5yORz+qBZngGLM4ezlTAYuNDrjVwuunZFQH6ZT3fPPQzLLNu/NYW8xHqM/Ta
+YPp24S/tsGf3TEMLzNC4FLPbCO/ztes4PxBXpK9vh31O/37lGzixsLFgozHe
+lyGNonhY8t361kiY9Wk83I3Ue9cbnA77XWr83ACOXLSvTIOjQ54qvUc/9L09
+tyJgWkc5uw9mtDO8zWHBUlZKA7k/bl3Xi3rBFd0hItI/fzAlFs79Yp9SLSz3
+OuCvQN5o6va1n2DOza5DPFhht7mpF+YG3duhAkuvdzyZI/O0SHYpQ/9ShdI0
+m/TrsMPaHQ7uczNPgKUSvdfL5Pv+tsawGRae32EzDPutTn2taoP8mff1e2F7
+g08xobBk5MSWlzBLt9SuHhY4rngZ4bxJZQdqCTatnww/Drf8qf+uGwvrdTNe
+y8jzNhhYx4epyZ1vYkj+zM9qb8DyDk2nRThXUWr2GBaXGT4pRr91YecCJmFa
+1BZoj/lY7FdhvSPrHWjnLlhs989Ecp/zZ43YQBOs32d5eQiOLD+a/BCWyYc6
+msh5EjGTuQHPW7K9qIi4MTLtEExf/Oh7hOT5IXtzBhzcenTJHeb+tuq7dJia
+WFpjBMsu0z0RcGD1QPsi+uOWdVeZkfWFfGrchryPrib2oJ5wsnLbICw38B2I
+gcvSDd0eE/Pn42eQl8fb5i8j8/GYTUmBFR43Wsm8hInWOcpwWdqsOxP10rP9
+XpWgf93f/lIfCjN6fGLc4Pk2b9srJI/avrFlzKvF2TXkFSz9+OT9MDzYcnGn
+Ixv7HY/f74M1FFOP8mCh2q32V3BBkFfWM+L4u80bcB7j2yQba1vML2iu/CTc
+eUskSoC555pHXsLidsNddbAslx3+d+SryvKfGoX/+L1j8v/rZvp/iCs6Xg==
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.1974629540243, 12.294740175065709}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwV1AtUU3UcB/AbI0EZMd4okMMItnAwjoWTwCYCEfFSTB4J0RJd1kGcr2FH
+JFDP1JQpoOMhrCAeKTRFEljiOrOBrzYwaB5TlsgOosHFI7RDjfX9cw7ndz7n
+3vv7f/+/+78LEO3cmG9HUVQ2/kmlaBv+2EKKReAnpIS7B0ovwarDrQVGXyHF
+XBcjzYPz9rKL9LDfW9y1LJhd97jBDDs6ziTLluP5Z9eb/fG8Jl5/buF19CkP
+UEhgmdSqlcEsBs/0Fyw9FsoNgWnthuJt/kJKXtfw2wQqv+F04jyqShsco0VV
+xmsTz+K+zJErpb0wdSncfRXWUYznUndhoTaHdxPWrGdd/ofcX9t2nYNc9FDl
+exF4TrzMOiKCOe0D0WWwqvB4pBwu2ddYZITzetwtHbBpByslDH0M/ryJazD1
+4ZStBC4RRPT9DMt/j/bth4XjxcyLsOXbvXf+hS3BuVEnYSOj0scZVXyk9QBZ
+z2LSJ7uQPrMV1aGoEwKziIFq6Eu/9xTP8Q/20YOocrPOW4Iq3bgwRdaTd40U
+W5FLyQlb6gVTjdKPK2Aqo5pXhWqwDe+MRDXxt/gxUPmeneUW7FsR7a7NJ/Mp
+6U0dIvPkK2u1mDMd66S7BRc2HhS9AauYRZ+MwbKv9/ScwHszcPW3fdGHc1dz
+2w6mbcF2Eljq1GA5uQw5yvxyHsNG+zFZOGyYj727neRva9hNL8X1gZTl/8FK
+rdc7d+DM539zkrBPfgG39wZsuh/zVQ05J6fzPzXCYp4oaRxW3Fe62qOfdLrC
+jRuAeV00b11P+g+3fC+CaU7+uBzmjLTtKIfFAmaWGaZmXuxvh2V6nXc08mpS
+G39Uw5z4pu2nYMshb30PbHp37v49WG5XJmmFpfrsJgdyLlOLmcdgSjdGB8IK
+Z+tgDlk/elEAB56Q/1JL8mRu6rK9BltCXvZNI+9A1YtR8h2IS2yPOsn+ZlY2
+HyX+iK8uIu+785l6GXHC0Hws3Gq/c0qBvD5/npv3Id9VgVvkIpi9zTNqBvNi
+n0k4IsY82G+7pd6BBVWTKTof5OubC9fBpsm4TUEwa9d4tAl2jNStKvdGjqB0
+B3LOLC0Jrg6w4NfFNwQkX5LLugovrP+grWgXOc/OtHU1TDsFVV+BlVl9oRZP
+XKfWMch3Xrjgu3YYdtx8a1Uy9ptmeLhIDyta0iS1ZF4r3UfG4LTA5lfNcPea
+ilIW+rFjC7ZzV2D99AFFGmw0T+4RwcaLWYp6OOFAfs0puJWxRfgSLjz6YO4C
+XHjh6Xgi8irffGVfD0yrJYZaWHwhfPQncr+u/6zJm5yLQ8YmmDP9x3537L87
+Sv3wMJzmkfFDGEwPmkOyYNXlhfpwOG066rtAmB83HO4NG61f1kwir/Hzof5R
+9PNxW9PbAQvj4jK+gbs/mNXsgRVMWfZymF7SlC6ES8qvttchb57q4C0PmDX1
+ftZimK+ut5vFvGSqzKQvMA9BZm7EGPmen59YctMD+Z9IHpnI+e4Y3MCFNTz5
++Snyvicdr51xR7VWr2ain3ysTOwECyafVApgjcvW8wo3zCsjc3AXOe9un8nW
+wsKrDZu7yHXye+yK/OT3eIXwf6LyDKI=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {6.411618926975065, 7.21843785395013}, \
+{1, 1}], LineBox[{{14.5, 10.500000000002307`}, {14.5, 3.499999999998608}}], 
+        PolygonBox[{{14.5, 7.6}, {14.1, 6.4}, {14.9, 6.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.4452, 7.}, {-1, 0}], 
+        LineBox[{{14.500000000007276`, 10.500000000003638`}, {
+         8.500000000005457, 7.}}], 
+        PolygonBox[{{10.98173265946094, 8.447677384685548}, {
+         11.816718930329426`, 9.397834175673825}, {12.219815750748694`, 
+         8.706811054955079}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.323799910437668, 9.484057296392571}, \
+{1, -1}], 
+        LineBox[{{14.5, 3.499999999996362}, {8.500000000001819, 
+         6.999999999996362}}], 
+        PolygonBox[{{12.01826734053906, 4.947677384685548}, {
+         11.183281069670574`, 5.897834175673825}, {10.780184249251306`, 
+         5.206811054955079}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.323799910437668, 4.515942703607428}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{7.5, 15.5}], PointBox[{4.5, 9.}], 
+         PointBox[{14.5, 10.5}], PointBox[{14.5, 3.5}], PointBox[{8.5, 7.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T9", " ", "P1", " ", "N17"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdfei/fggjhihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdfei/fggjhihjij.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:eJwl1gs01GkfB/C/uxrKZdx2ZN1y2wbZVRTNX1FCkq1t3Daly3RlX/ZNN0Qb
+YuWSxjrE6YZyqbPjTSWXUkwSXqphrEpu8+besEPS+33ed85x5nzO8/x/z+/5
+/f7PM0z2hPvvk6coio8/8k0Nf8VnGU3JyLctTd1uOPkuFb5j5HFKCGd5lMWp
+wFzG25J8+Eav2C7KEOP7Cwti4MqM6yNvWBifK289CvubsC2c4OLmTXOHYV5F
+0/Hcb2gqYt0WsxOw+S+/7FGEuda6mZdgn9g0lVMGNGW8Ka67Gq71OTosD4d2
+dYyNwypNuWUF+jRFB/Kdv7PD/Ef9sh/hdM6SmsOwUaSHuwls/EnoWg4HlnJb
+VWCN8Kjd43Cs/vo8ZTiq6uCkjj1NHZq2Oc2CufOzgfbw/foqmw1wNaea7wHz
+xk2Pn4AjHJlZ22FxdV/0fTg6Vj0xGBaoHGj5Ag87M5VD4I65BjGNfAXHf6J+
+IuZrs87AnqyUhk1wcsbCzjL40mbmvAOs+dJi5gWcp1p+VZ/kY8uyEcEaWmbS
+T8g34YuGNRnXF/tJ78B1dxV8imDeD+wzZL8r8s6aH4SLzZUGLOCuAaN4LThJ
+2/H4IOq1yWQz7wby8xt86FUGu7nOSc3hOkYoi/RLcW2Sc7Ye6rVqq2UQnLI0
+RuWzLp7nSLQ2wpM2coIguNDaoJMDtwXVdFbr4P0woW96wrLUW7NmsFW+l0oo
+vLuPceAyE/1wZ9acgy+ru3Tow1XezyUCuKRg33cV2uhnxgWDMfi3V8v3BBN7
+6x5mI//2Y7FeprDGZ52KcFi9bTxODpYds8i4S8bjn4bNaiEP9Xv1pJ9FtB5L
+FeM+Ua8uaqN+8atnKmzgaL4o3AYuUbi3MgTmOv+5cy0ssT49lAv3568/SPrr
+vj4rpRfOywwy9IRdFz383RT55jie9NgARylqBeyG1Wb69VbDW/mc3Gw4WGZp
+Zg7/Frs//gEsjVP1YcBdj/gKL+A2SUa8GPnt3fJSoRGm2dldf8AhEVMJJST+
+tYtPtsONEbNV/4B579Uyl8If+/p1zOBC/2l+C+pzKMF0YzXy4+U9/poBH9uc
+qe8GF4srru2CXWKcgytRj6SYbokTzPX7+c4yeHhB9+a38AfD/V6xmui3wbS8
+DvzmyzbBWw3Mr2VGGsCpYVqJ7nBO8LnbK+AVE66e+5cifnB40RY470bmh9Al
+NDXBHxOchIMrXdaeVcfzYQEX7sLG3IetLWo0JVJkhJHz+dhy9bQXbBznYLoS
+++l+tix/joF8hDMnIuHqPbWuPTBXTkHnT7jN0ahrBG6zj6gbgY01c0wt8fze
+5wvCJajnrei0+gRYVeKbYgLPqT0rm1Uj5+FZORv2e/qpMAb5mI+uyiTn6bnx
+AF8F+Ubb5ozZwUYWo8HJcKFPsng5mT/XzJyFUwuWv2TCnlcsG32w3/SpZIvP
+JN9/fxCfgq2mRBceww5mDomxxIl/nYmHR/Yzvv0Rzhnq0FwHCxhvd0gRL11h
+6qKM3F8hl3aGwXS27tZK+GTnscaryE/W05x8HH53ZPTKPeRvpVTuuP5/9dww
+Xoz9R7d+36sHn485kxS7GPUWlJ2bY9PUntBbFzwWoX6mSxI/wsH8hEElVdy3
+7Ko0YiO31o5mZezDgJ1E5vtWe7hfVaIp+5Ny10m8S08lAVmK6M8H9d1ucK9P
+zlCRAuIPBBb8Stav15Yfksf6a7ofkH4q2y/c3AGH9uSVTpH7YdA4ZkaOpuJs
+++0dyfscyawSwtztdhO/wrTufxgtsOwIXULO54XUyY7PsJXfosABcj//bOe5
+FfE6i2ocVFBvxXXXOmpgwbZVgeT+rWtjx9HIR+QzeMAQpkaEkUK40zpjlgVn
+7pBG+yL/np1MBulXjEZGSgPcpp83owiPqOwLM8F+6fbD73qxXtosdzoIpqST
+s8XwP0vYA0fg4YcHXhyyI/ewWp8v7NQb528JX3fYJ1lAPI2oTOF78j5ve33k
+NMz7/U0S+X3jOvwQQPIJTQ9/EwJXae9ekCB/XprFk+XwVDurqx/7VR1Vn/sb
+9e8dCXd7TGG9yKbi13Cd7kUF/a8cKrRp5a4nsLk47d4f8xyqKfz+fA1cnK0k
+bzzHoXjZvBtC+JxiiFr93xxKv9awrg9eIXe2ImOaQ92pVl9QJed9c+nR6584
+lIYFfXgNsXFRsuoU4h/SSYyCJ8RDG4UTHErEbQgj9y1VJFfVPc6h6qxtm2fg
+QsVcl9ExDuVZSh9wwv6trs28egKr3pZ8JP2MqLTK98V8aiGFLoUNHZUOrkG8
+Cc3RmyJY9fv1ixiTyPfy3b9k5H2wEMuUsH6ONOiKEulvWPyoDvJ7tzC9l/Rb
+Nn/7krkU8VMar8rBhmXmpSzsJ44RwJaQ+M09BoNwjsj7X/XwRAt7OmIG6306
+/yiN/L5pXY4qhWXGXXf8YdHsOkEq3KS3OkIDLk1I9V4M+z24bN2M/YkWBd0y
+Rbw2nWn78+Q8xvs7i5BP9N0zr92JvxGsdUC+hd7vXRbDTkYGUS7Yn/3I0Mou
+1Fu/cZWJ+gie59gyBDBX6te8cQj96BQm5cHpmrvk/fo4lFWBR20WbP/FKfFW
+N4dKEjMW58KUJuO0cjviOw8rV8ChV+zOatXBk9257WScfDIe/f//Kzb9X7fX
+dwk=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.6003322263215085, 16.89021660517737}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwV1QtcTFkcB/BT2kw7qcmrIjVhLXnksZVHuVfWSDamVh4rzCbbQyr0ksVk
+bJtYOxLVpp1BqNg1KjVKGonQO6/S0EgyUUxEg1b7O/fzmc/9fO8595zf/3/P
+5zP2/uE+mwwJITvwo3fSNIDLgiU6erdnSfaDtGYt3OXdOuMiLP9pv+gSrD+f
+u2ETzLnmFf8L3N4yU2YH8+9WJn3hsSTCv6aojc+S2Hx/Xjw8PM7/iwKW82Qx
+z81ZUl/n7nIQrg8NsM8zY4nfiaV7omBhzTHPyCEsCVoc77YF1umiz842Zcm9
+zEdjtsPEPL+Oy2WJKEc8IgGW2h3I+GjCkqx1SyOyYE3a6SRTeEpxdUcVPF0m
+dPXiYFxRXfIR5h02IeWDWZLIUbY6IO/0qJeSMLgi2cXKj9Y3Z9TpH2GrkDeT
+kmDFtNMB4bDGw9MwD9bYeBmUwqHHv2utpx43yMkJ669uvrGtHY7w7kmuhaev
+4hq8gkV+vga7kUffsj36GV2v3HiJy9eYJyyOqoGFY0Lyu+HzLRl+OTBvb9O/
+KahPKLZhYmE2Z+pWPupf7Z7aPA9WbRRIE2B1gVfcB9oPl+LEq3DKubRnuXAE
+l0wph7ts5k30o/1esln3B7VjlmQI7c+rXlt7WLXle9E+O+TL363eRfu5XBD3
+yRbPn1ma5SCPXORWtxfme+Ra5yI/J3ZFtz0dj1mYkIT6dHpD15YxqOddg9gX
+/eBYGdYrYE1A8lJLY5Y0KUXCU7C0/FeZ2gjf+cDQ1xdhXdOlwXmD8H3PBIY9
+goVOK5lThhi/377YGusrApXpxQYsUbYZ1wfDZF3frwSu/yCLuQmLqta8jyM4
+l+JrQychv7hyfOBUmCj/nHgAJvtv+lvBqhfvBR2w5sKhzDmwKJpMHkX7tcrb
+/CB8fKzvOxdY/CBqFgfrTyk66OpJ+/VgYkgWLO0JXLucOvROpC/yGTlqlwlg
+ha33YHPkVxp71kyj5y9laWAFfMW1bLEJLOLG8YJRr6Yo/PY/2F938sLKHli3
+ntM2E1YV1vT7fIV5n20Pn0E94kMul3+DtQaqcDO4Pot7QgLLHasvRKA/vHOX
+IpfAJFddddcG5+qz/vYDrCffETtrPix28rGYBscaP+y7NBrjecHRK5BHfiBg
+FwuLjR0zvZFfJyDObaPwXDMw3xH1CZN2Bv4Ns2UFa3oGGCJd7m4QA4scdDsi
+/2OIttBbEkrnm21bafCZIUE5qr5dMHHQaBV6higWTBvIpvOdK4P/+sAQj5rI
+N510fLfv+MZevH902CBX7C9/3Bce9I4hwh86j6XDmrGWj4Pe4v1au+39NN+p
+TFlzD/YPSx+9HvXwF9bOL4G1/LpxSmpJ9CEO5nu8a4s3Qj/4bGNPIRz7sEDt
+BhN/VXsh1g8q4DRsoA72q+jF/ppQ1iGQ2vBJ9Rrk00yo4fpQS98wNX0MkWew
+JnxYZX4iy+kjQ6zSKic3Yj/R2npe3CeG6G7dbA+BWdOAzRLUr/td8LobeUWG
+Fqlu/QxJFNwYJYLZ+dLoNFhb8GRkJern29mUJsK3jLrtJsHi8GwxB54Yvjr/
+oDXeHx6WYIn10sZkz9VbYVzWuagE+8tNkpVbYXnq+JNfkG92+9ydXyzhLLVf
+z3uG8NelPDwJa45ne55Fvdkin56fYTZxs48L+sXheCW7weSyXVJkN0NWL1k3
+zBlWuQ6Zc0SLvKaaVZ50PGN/QP8zhpAsa3UMLH6b2lfSyhDWpux+MXXqVUVZ
+E1w3EGCGPKS1NmrhXYbwTFPuhlL7HynvqMX39Jc/qaNuO9dcdYchqtkXB89A
+fWSHLNMJnq0v1O6ntnTqf1+N75VbkXCP2oyo1zSg3k0bZVx6XtQWUTH3UZ/7
+kS4H2q+utyWSR+i3L9fPkZ7PtEmeFhr00/aNsyWsmvDWVd+GevboXdqwnrjo
+2PXrz+Gh+kOHYRVzyssd9Yoidjd8S138YargJfohjGzORl6V9ljn2Vc4TyXC
+I9a0//owZ48uhogXRFzdQ/tlPl5qAcuTrp98OhL5qiTLPuJ9ftHRskWwKnG7
+I+nEeTu7LyZvBLxyo9fMDuTlvCydCotTSveeQT5RxdPbV4bDW3fu+6RmiJLf
+2LiROkTQUYp+3prc2vwNTFp6019cx361XIkRNb2kpURP/3+Hsf8DvRPe+Q==
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.3599813626326804, 8.076870967038232}, \
+{1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000007276`, 17.000000000005457`}, {
+          14.500000000007276`, 10.500000000007276`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.003845503734127, 15.345156917263754}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwt2Hk8lGsbB/CJsmWZkC1lTXZDNU1JiFASKR1OKltO2ZoTMcm+nMaSo5LG
+UqFIjuRUMpyspxCVeEuWbKUsiSkSKt7f/X7e/uj+fD/3/dzPdV33Nc/zfKh4
+nHA8ykehUCSXUChkpAiR/9aYUf73z8CM8pTO5qTDI+aWB6ThUqOPm9YrmVFo
+MvWzq+A3ax5VvoBtRqYUZeCSLblzG5Rhe/F0PlhoR8+XMJidu/z1oL4ZJTne
+Z0k1mQ/0/XQfjmqO1Z+BGZHvgsLhIR29j2oqZhSmyIU4E1g7J1jVCm5qPpf+
+Tc+MUqCuZOUK29A/+5TAKdclnbzhzg/3hr1gxd6gHi+yfknzzGpYXX3zuDPM
+Kljp9UYX67dckLaEhTy5D/Ng5fRnOzXJ+tjthoGwQHRAuyCsHK4YZg/rf0nT
+eY/4Zrc7PWPAugrDH+tJvL/UPTSAdyXszb8Oy2WJWmyAk00WGxLgwlaJyh2w
+4+aRqBCY9uHokAecWbC9KIDslzPyPQGe76QUM+EXv/k2cOGA7b8wI0h9rOvv
+jMOUZhFnDrHa+2FV5FOdsJRO6ucm0RrrDBf3Ht47CVNLM64lwvdVX/prk3os
+7oh6AG9bptftD/NCb97rgsWVBeLKYZr/D90v8A9dAeoyVZzv8JDrAvxw4fjX
+fTBjSY7FT7jT8UZWLsyargibgBMly1kf4VRWnkU7bDX3Vt9ADfW6/pV5C166
+1bHQB7ZZd5l5Cu44EmqQDRdWSxky4GP9srH1sPOW5WLTyG/Dk66hN7Bb2F93
+/oL7/l2h+hGeNYv46k68lD/9E8yKn2mWh2Miy9a+h0vTLEU6dMwofGERG/8D
+18pTfs2APxys4FTAtAo9cW9YdcuJsEwSj7iI2Da4aMOwHQtmt7zmqsJyr22u
+OsG8dff7pWGGbvbSjXCOt/5d4i8f4hfl4NS91DoVOEZYpZOfxJ/yO58xXLlv
+19lvqAftUnfvYdjN4NLVr7DmtdFtSbDrym8bF0m9Bq7droKNQhb7pHF95w5j
+3yk4lG14lU5cZntBC/lpNDwb8yReTGYcgkuFxMuyYGrHXGoSbHUr6SSpl3Jk
+guhduNrUlKaubkYx85RnPYe/zFnfYsLcDHWZfrgkjeleA5dmKd57C4+t3Fov
+thbz4qfudcK8Ao3NLvCx3dUKdbBzKdfpGhyVeCYpm/we9oh+6CW+9MDUj6y3
+C6FKaSBPvsJ5Q9LPTnrHTWBu2arpSeQTzNfL5wrL9cdUF8K0ovjTATC1+q3m
+EThzteC3ILL+5eJqGZjpQDdkwkzPHTEvtHHOt8+5u8M5D76tOA/rFnXTd5H7
+WW01/xXmC0it04U1lf2V9GGv4fyDy2FWpICpOEy/LH9uBPEq/219/bsW+vGI
+60QDnFN76P4MbDT1Q/gWLKeQt2UR5qnPbDsP826pu0vj+tTS+RvRMKvbs2YD
+3DCxZPoM7MBfd/wwHNpqxCTzDNpnwT/hLRdley6QejK8eP/C40qNPqVk/SoP
+63k48YBvYxcspBiobIB8OzLMJcQR74hFcg6pR47K8IAtqVczUykBTtM57Xue
+5LOq3uoWvDD3NPYN3Enfp1cNe483VmmvQ37cSP8GmJ53h30aFlofvbEOvmu4
+zq4Brq3l31tC1leEJolr4hxuJuikwGZdHbP28IBOTIs7qb+GTCYb5qywa9Am
+9x8a634Au4mW631E/OljTjldcFRbY0g+rFh0wYkHy/3nh7srLG05+GUeVtYy
+b5Mk+Qb1/5yDKRvkS1tQ38KLfrETcKH/uacJcHCY2/JuEg/Xo9we3u+Z/0c1
+3KSmVKAEB2z8g3GVxHNks8t3MgoZZ58h++3OERzCuDA4Yu2C0ex+ggPZp7j8
+t+ebyf5Dehv6MGpUGOQqYWR+eyQ1iXHm59MpUYy8xcfc5dh/uksjjx+mRkt5
+GsHbqI0Ky+DSf070usE/WGv2SMLH+HddTiP9E514XQdOfVRe3wzH9WRNO8DO
+isanKMh3zYtXKdGwjVDnEyNYeUW78UOyvm2U7wjpDy8f+0VSb3W9ohi4hGLx
+jw32adJi386ChbLaNNLhYzzTkEI4J6JJ5D1MXYikEIta5T8n+/K0DvZmkH68
+KDwcpk3ePxXmERh9noRO1WIc8JpdcMK4cEW3+wdGjoJrqCrGedvzA/o410L+
+qmyyb0rnnzVOMFVn48NcWHoi8C4T5k60RrnABzgjkZFwqnfYYwl4Dd+lsBji
+uNvBjeScPm49Gwpz5PWZsfDumAsLx+BSNe5BK/gtn+Hf9vBA7avzpI77u840
+0UifOYYsjKIvmyNc7oiTvp+NEHkOq+Z9/kr6zC3bOqkGLn3DXd8Cj3QPc6vh
+A33rRktgM3aeTgvp+/uRHqQOtHt5A+/g3b687GS4drxlhyDulxh80CARZk9I
+714PK6yu23SRrHdJjzxKzrXNcA+pKytzg3oWPE95E/4EntVPd2qDS+6etZwh
+8y94msuQf4ntHxw9xOvAVm1dDz+MbJv2h5tE2GW/womGT33KSD3dqDdCYNra
+Du4SPBe50vqv2XDlSJGXA8wJCpY+Bze3/9J5lTzXE35yY+EP0cFRY/BsV0Ot
+H8zeuWuMhvckq2OqgfRJh67bwAk4Z+j2ghzs7OkRlw8zp9es7Ue8d1d/9noB
+O79S9L8Ce/dFpUzCqbqnjh6AHSROp/PhO2qkSqCH/A40B6k5wrBcxTLuv6hf
+Suvfvy6DmY9HB8PhsCVTczO4fkQgTXYbXFyctG4Apt1htAmQ89AenKwn899i
+1LrxXMrzlC7Khd3SLW9WwCkPCt5EwIzMp94F8C6lGaVDsMPlmrYcOCZ8dHEb
+yU9osbwQ1lAz6NMg+QX02FbBV6nHO2Rg5dQQnV7YpyQpnwpTd04yyf0zY1Mu
+rYTNDsU30eESftcAcj1336skX7jSp9TPglxf1TKQCzuccDT1gzmy37s7SL/E
+N4jkwJTWxiukXyzb9wb2ku+SsZ5wQzhtW2exKuqhaXVQ2ZE8Ny6/+dMfZvv6
+pv8GH869ffcfmDH/NJBJnj+zGfEi+M5t2hrR7wtnag4yf4HlLG5cIc+pxCr+
+qWsw85yV5BbYq1yiepB8RztWbSXPZarxzuNiNNRzULD4NeKrcQttUYdzci/6
+ceDgetlTdJg3asNzhKtokXLbYebHr5+F4WXvQkusYcrUUada1GvtRFow8YBm
+5rLTMD3MYNocTr1Z0k6HdSdiRzbBsxHzDj/wXnpg27pTG2ZXjFW2wAOHpBgK
+sGbUbEcBvFOENykEC/0+9jYFDvA+xJpE/Jpe++LjYA/pvc9ayXf+t2+Pz5L3
+7DGmYxnMuxkoxoFnZZ5tyyP1KFbRvU/em75TJznE/bO/dcN04+8eGbANf0Wq
+EOIT+CtpWQE8UhsuvxVWX81pqib14ibTT8KhX12S38GMaL6Fm7CBmHu7MOIr
+rBtIIP1Y8qqQpwG7uU/KC6I+Tx0j7WxI/A+G1uvA7aZ17/xgxnXXWks4g8th
+XyTr+2zVSH3VvqvMVcIs27Y9xOxXWqODpB47ElrJ+g4XF0lBQ/Qbp71Ni/jI
+agstuDO1UYkPlvTL8rOGR1r55FoRz+1c6h03uEko+8oF+K9pYa8gMj8ny2cP
+By5dWBsD81rtxgTgx9zJlwlkv7kIgyrURzvs3eUkOKpfpDoIjtaU6TkLUx5Z
+BNLg+vsitpGwpt709y/4zuMrLnx6Ei6kKJZVwyL1jSc9yXycY+olWGow73dH
+cn2LxE8W7B76mGpO1jd/eH0cFr4km02DnccD3Y7BZTvL96vCA7dO0YNg50sO
+HrLEKoaHk+FnV64+psJyHpO2d+DO8Xu7JWCGndhMNxx//EKCFEw1aRkXRbzM
+oaiW1WT9/obg7XC4vN8qfZgz+ryUBSckhRtbkvWyhXeKYWvdT7eOwOzFtXk9
+sOuKTwUk3xezq77woV7TW3xMrsOssxkeynCQ/dY9T2BanLS2EXyq1PwKj8zv
+3yO4CT748Hm/rBH68uGivT45j7DGFhPYOe/arCyxyj0Nd7izajRtGverGZJ7
+GQUPqCrtfQynMSLeZsHcdPuhJNh7fUD63zBn8+6wXbCZsnBgHXxMTf8GP+xG
+5Zq2wKyZTI1K1OPRkzqRVrJeVe0T+U43+Zmn+Yzs77GpTxv25hjSGmCmq8U/
+Y/jOf3aOO1UJy4WcptyDNV+7hhTDhZpNjfFwk8bW9ySezg+2pV6wtvmLyETY
+LcK1xQFuUKZfPE3yWy6Vugtmfljq7QOPmHa/2guL5h/VPgw7nLLpOEosqcBz
+glMn9ehk/6ObVnIcyf7X/VeWwI0T9Ob9MDV2WL0P9lqa98mV5OcVVCeJ+Kfi
+BdR9iY9zJXfCIY6yNpEk3yZP3QjSj2ImkxyY4nuIRvpFoeFkQDlZv2DN7IIZ
+NVJvu8j5nO9Knocf25gyFuEcg8vnqain+EkXE4316Aex0uUKsFaUTJEd7Pxx
+XEEGTl/ibxQEdwZ/OrOU1P9BTRqHzA8bJ73HfvuHzhVWwIyXkubkPEQNF3w7
+YLkmAY042C4qX2ICZlnIme8gvyfyd5AN//97iLrZfwF22yVu
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.246230799468776, 14.874866310565288}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwdlAs0lGkYx79hxp2WqFhKS0p2SMbmkvXKJU1FozK10s6gclQutUesar46
+JZeSUHKfqNYlVMqti1mxbZKEOqodjZI75RabxT5Pc87Md37n+b/P7f9+s9Qv
+xGuPHEVRIfDFJ82AH4pNqG8fNUI/KJoOcQWW6TaP1gH7+picTQaWJN4x9VAn
+lH562Wg36itODSapE7q2LuyzvTno4zpzEiC+VuVuVQKwYEhLzQni957eu/oW
+mPpRIChRI9RLY2W/JRaEEkfdHO1QJXRgM8+CDywJ9qrpUCH08IEBxglgoiW+
+eV+Z0JqOltczgA3nUqpilQglHJt+cR1YFmD4gq9I6DgLTdM8PL9OKrVRIHT/
+u/VWScC0fEOuA4vQ6d99dQkHFmyPefAbk1B5sRY+XphPnFPfJ0+oirr8IdNv
+cZJ+FThl+GwVhfnN7fvygdlew2feYP8moV8mgAUrLo9VA5MAvT+imYS+n5Rn
+eQ3nLd/YzIN6DqMmsgxgSUPnIy70o+kxIRUDiz1F8/2g31fF7ey7eD6p7Vg0
+zFO1Ra6nHdl+avIazKs9J7ZShfrUSVltCeyje/cdXy7uo5J3NFGVUHG2O/uS
+sb+ut3oOsE/dZdPVXTjPodr6AuBE98Q8/VXAx1qjnqOfUxFdbsAyxnJREfCC
+nXo/hwBT4RtFjsATF7MHkpEfeosuqBIyk1MsKAOmW4Iii1SIZGujg7ARuc6h
+Pl2ZUAZ2idodwALyjhsC/Z+f5Wj1AkuaNBPsFAllbOEZ2I/5JgbEGjB/61Bl
++kfUl35Wn4H9T7vpZLxBvQKvQYdJSOY+bnUDxllxZK88kWT0OqdUfDuvd3JK
+jhDjNM5kLjKv/EaLHKHsjdseJwATns3ZL3KE9lR37jqK/TGVREI4b2qwTRHn
+E0fGZ6uBP5m248V7sV6Mk+kQ8CH2BmoPntc1WjHBgj1RPTVBWD9+t6u2IiEH
+YthrIzDfaMxjGyVCz/x+YvM5jF+2yN0C/hSPF/ILMF4YFM9VIRTrhvXWp5j/
+30esheCPt5GzdATrux3xKIB9ynW93fS9JdQxr146BffdaeZIoyswreG4YRb0
+DTLr8BBgQbhwsBr4iYN62CXU66/MslQlEqs1a9WrkA39lgbBfSizsu14CSz7
+SX46BPy41p7WPAAsWWZdwYN+d5hl231F/eujGoaKRLIrTthNrYZ+5l34MMgi
+xMRYRweZHnFf1cAkEmGbVtSUJfZrNvI33G86gGWN+QwX2hrC/iW9oc/KX2O9
+3XlN/uBHtOfKu/XY/xHH/doQz449rnoL9blSogF+9Go452ShfjGXwwO/+Lff
+rTsHTLqH69tBH1OWn3YC49oz3pnyhDY6Uzobhf2fniw+D/dj4dO+kGOon1d4
+Ow/80e0ePh6N/MTF+7ECoULN1rinYr38orRemK8zwT+sFDnFNncC7mPL53zz
+Jsw/7t0oVSaSEmc1z1FgSjOgKEmFkMrXZR56MD9hXOpRAj/GhZxgF2CJaeig
+DbA7+/Cz4NV4H319l4B/x8dEManAlNh/wwPwu/Gfgrb7yB+leovAj8Pj8/Sl
+qM9a6WKrTIhWEnPBJLAs3reEDf3wtza+UbaCfXELR5nQ743+mBFtYDIVGdQM
+fnAmI/mLgAU6qca5MD+7xZjGuFgn4nk8+NF/WuihgvE4fkEW7L/Tr1JhGvIb
+xgRHf2QQemzze/terF+/5b+DDCLJbE0tb8V5EsxrHBjgV+8Pv9TgvIF/2vEZ
+hDJ5vkOxGP23n3+wEuJmQ1WibJxHbRfLB/zJVDnMvYj3ZbF+PQfqu+V2ZCah
+vjTbwAben1bPT+txH7QslNoO/c+ZXSnKw/Nf3F9Fgj+bRFa3KnD+wLhzKfB/
+p2lwqrEF9b8uv5msRIiSUQRzHOMf2KH74P4W7Rxh6OE+CqTpcrDP2tggY2dg
+mUWhvw/se/PATPpBnH/5xNf9wE5XttGpwBQnrGc18F+cF5MPUe/6TL8M3k+X
+T1bc95ivcGPTGLwPs3PwwTg+Fcn/B32cLQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.04629457140433, 1.614040285447666}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwt1n04lOkeB/DntITlYvIWhYQJa0ajRByrx9shsY2SiIPEQaeikzphGlbe
+s5ntsirEbN6mjW1qy0ursxMrytsQ0clqLuqE2po08tbhfO+9zh8812ee+75/
+39/veua5ZmNUwp6YVRRFCfBHrhSD/NOmKVVyNaMpmch1YXANTYnu+QbshqWh
+afs74YLY9mvfw8KFYukzOPMryU8fiJl7wrWw/9eyNmN3c5oyze9yPQhH+53q
+zIMT2S0avXAuX/q+A5Zrn3zL1aGpeWWP0EWY++PcyATs0toWt8GCpgS7CybS
+dGlK/B+GowPMuRZQa6xHU0oGc7WuxO6l1Xdgbo/8kBMsfl58g9anqclVav2W
+sLylYmcTLFpJW1GHTQvGldaupSkjkes3k6gnSUx9FAxzxiq/lpC82pRuKixa
+EJpfhGU34zTPwJG/xHUnwNRnp6ojYOku82Z/kpf+eIoJW1VvGtsKi10v/ziA
+ep18k39ZkPNXe3cfgVle+73NYOkZveBF5BX0qDezYUbHXE4GXJCx6YI3qV+m
+MqoBK/Ki80k9gW1XgxD9C62ci6vgSE3tOU+Yw/aYfUHqq7y9tIJ5bU8+7WtL
+5jU5HTUEh5WMtpyBhcvLlQ9hluWoiZT0L3mgPAb7FbutM2Pi/u6sk9o4T14R
+Fp4ISzhWzBg4/cRYTyOcqEVXDRA/fXdtFhbfKdIKQj6fUlaT5SZ8fvB+4BSc
+ZHfqoB8s5dtlZ6Ffnw8zHVFwYtQHZ3PMxyJK7fFhcn/71tm78Av1W5wYWFg3
+mOdlQFPB7pp+e4lbL5xtgTNzHjg5woL6Xbx1hpjnDF2qA8vO18SGwmEHXFNe
+I4+0Tb2LB8teDJm0wulZ08/PwC4s3fEScv/IP8ojYA365sppWF7NElvA88Z/
+jY8g6wfYu/pRz0dHo5xL+p8enTsMJ1mezPkK5sac8JxH3jCLiogDZL9o/+F0
+uOr6VEUSTF11mP4c5s3zFstgU6GbRQX6NzqSGj4AMxJsZjxgQd7Pq0l+xlis
+zwrmFcfbcSGM9DPaPTEEd+YbMOtg2lNNtYs8zxx54TJZn8/bI4ONInR5XEt8
+Xiir1MN5RdXVl8thTvvixnh4xCyu5yUcafxlwDBcsNASam6F/f0fPEORz8Dm
+uOY+WPgseuLtWjLvoL3JMGWwxfkc+mWw/xtQCEuZx8asMJ/cor/NFRPf2bJX
+Ahu5qMwJiP3Zx33X4fs8on2fD0fezn8ogQuCi45FkfPLp5aN12NO9bFVrrA8
+PkcrHLbfVHtMH5Yp1xTwYZe8bP3fSV4Ju4V4++S4oh2Whty9GgFbOC15VMF0
+Su6sOfzGrn8mH5Y/Up7tQ703zSU8Hum/VXVLPHxaN+lBCtlvPEp/RF5JPks5
+hzjaK5wPK0ov1n0Pm/YkqKvBTYd3xj+CKSfzmivo3y9ej0mRfGXjqzxg6t4a
+fTdipxOaK5iX5Ax3OJ/0o3iV+gT2rF3I+zecaFFxtht2+frTJ5Y11nc0NIzD
+cdKtT/nE4xFTBjjPiC7p64YFql9uOwqPXtDq0PkC+TnXdUbhN+/sVQJg+a+5
+5yORz+qBZngGLM4ezlTAYuNDrjVwuunZFQH6ZT3fPPQzLLNu/NYW8xHqM/Ta
+YPp24S/tsGf3TEMLzNC4FLPbCO/ztes4PxBXpK9vh31O/37lGzixsLFgozHe
+lyGNonhY8t361kiY9Wk83I3Ue9cbnA77XWr83ACOXLSvTIOjQ54qvUc/9L09
+tyJgWkc5uw9mtDO8zWHBUlZKA7k/bl3Xi3rBFd0hItI/fzAlFs79Yp9SLSz3
+OuCvQN5o6va1n2DOza5DPFhht7mpF+YG3duhAkuvdzyZI/O0SHYpQ/9ShdI0
+m/TrsMPaHQ7uczNPgKUSvdfL5Pv+tsawGRae32EzDPutTn2taoP8mff1e2F7
+g08xobBk5MSWlzBLt9SuHhY4rngZ4bxJZQdqCTatnww/Drf8qf+uGwvrdTNe
+y8jzNhhYx4epyZ1vYkj+zM9qb8DyDk2nRThXUWr2GBaXGT4pRr91YecCJmFa
+1BZoj/lY7FdhvSPrHWjnLlhs989Ecp/zZ43YQBOs32d5eQiOLD+a/BCWyYc6
+msh5EjGTuQHPW7K9qIi4MTLtEExf/Oh7hOT5IXtzBhzcenTJHeb+tuq7dJia
+WFpjBMsu0z0RcGD1QPsi+uOWdVeZkfWFfGrchryPrib2oJ5wsnLbICw38B2I
+gcvSDd0eE/Pn42eQl8fb5i8j8/GYTUmBFR43Wsm8hInWOcpwWdqsOxP10rP9
+XpWgf93f/lIfCjN6fGLc4Pk2b9srJI/avrFlzKvF2TXkFSz9+OT9MDzYcnGn
+Ixv7HY/f74M1FFOP8mCh2q32V3BBkFfWM+L4u80bcB7j2yQba1vML2iu/CTc
+eUskSoC555pHXsLidsNddbAslx3+d+SryvKfGoX/+L1j8v/rZvp/iCs6Xg==
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.1974629540243, 12.294740175065709}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwV1AtUU3UcB/AbI0EZMd4okMMItnAwjoWTwCYCEfFSTB4J0RJd1kGcr2FH
+JFDP1JQpoOMhrCAeKTRFEljiOrOBrzYwaB5TlsgOosHFI7RDjfX9cw7ndz7n
+3vv7f/+/+78LEO3cmG9HUVQ2/kmlaBv+2EKKReAnpIS7B0ovwarDrQVGXyHF
+XBcjzYPz9rKL9LDfW9y1LJhd97jBDDs6ziTLluP5Z9eb/fG8Jl5/buF19CkP
+UEhgmdSqlcEsBs/0Fyw9FsoNgWnthuJt/kJKXtfw2wQqv+F04jyqShsco0VV
+xmsTz+K+zJErpb0wdSncfRXWUYznUndhoTaHdxPWrGdd/ofcX9t2nYNc9FDl
+exF4TrzMOiKCOe0D0WWwqvB4pBwu2ddYZITzetwtHbBpByslDH0M/ryJazD1
+4ZStBC4RRPT9DMt/j/bth4XjxcyLsOXbvXf+hS3BuVEnYSOj0scZVXyk9QBZ
+z2LSJ7uQPrMV1aGoEwKziIFq6Eu/9xTP8Q/20YOocrPOW4Iq3bgwRdaTd40U
+W5FLyQlb6gVTjdKPK2Aqo5pXhWqwDe+MRDXxt/gxUPmeneUW7FsR7a7NJ/Mp
+6U0dIvPkK2u1mDMd66S7BRc2HhS9AauYRZ+MwbKv9/ScwHszcPW3fdGHc1dz
+2w6mbcF2Eljq1GA5uQw5yvxyHsNG+zFZOGyYj727neRva9hNL8X1gZTl/8FK
+rdc7d+DM539zkrBPfgG39wZsuh/zVQ05J6fzPzXCYp4oaRxW3Fe62qOfdLrC
+jRuAeV00b11P+g+3fC+CaU7+uBzmjLTtKIfFAmaWGaZmXuxvh2V6nXc08mpS
+G39Uw5z4pu2nYMshb30PbHp37v49WG5XJmmFpfrsJgdyLlOLmcdgSjdGB8IK
+Z+tgDlk/elEAB56Q/1JL8mRu6rK9BltCXvZNI+9A1YtR8h2IS2yPOsn+ZlY2
+HyX+iK8uIu+785l6GXHC0Hws3Gq/c0qBvD5/npv3Id9VgVvkIpi9zTNqBvNi
+n0k4IsY82G+7pd6BBVWTKTof5OubC9fBpsm4TUEwa9d4tAl2jNStKvdGjqB0
+B3LOLC0Jrg6w4NfFNwQkX5LLugovrP+grWgXOc/OtHU1TDsFVV+BlVl9oRZP
+XKfWMch3Xrjgu3YYdtx8a1Uy9ptmeLhIDyta0iS1ZF4r3UfG4LTA5lfNcPea
+ilIW+rFjC7ZzV2D99AFFGmw0T+4RwcaLWYp6OOFAfs0puJWxRfgSLjz6YO4C
+XHjh6Xgi8irffGVfD0yrJYZaWHwhfPQncr+u/6zJm5yLQ8YmmDP9x3537L87
+Sv3wMJzmkfFDGEwPmkOyYNXlhfpwOG066rtAmB83HO4NG61f1kwir/Hzof5R
+9PNxW9PbAQvj4jK+gbs/mNXsgRVMWfZymF7SlC6ES8qvttchb57q4C0PmDX1
+ftZimK+ut5vFvGSqzKQvMA9BZm7EGPmen59YctMD+Z9IHpnI+e4Y3MCFNTz5
++Snyvicdr51xR7VWr2ain3ysTOwECyafVApgjcvW8wo3zCsjc3AXOe9un8nW
+wsKrDZu7yHXye+yK/OT3eIXwf6LyDKI=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {6.411618926975065, 7.21843785395013}, \
+{1, 1}], LineBox[{{14.5, 10.500000000002307`}, {14.5, 3.499999999998608}}], 
+        PolygonBox[{{14.5, 6.4}, {14.1, 7.6}, {14.9, 7.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.4452, 7.}, {-1, 0}], 
+        LineBox[{{14.500000000007276`, 10.500000000003638`}, {
+         8.500000000005457, 7.}}], 
+        PolygonBox[{{12.01826734053906, 9.052322615314452}, {
+         10.780184249251306`, 8.793188945044921}, {11.183281069670574`, 
+         8.102165824326175}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.323799910437668, 9.484057296392571}, \
+{1, -1}], 
+        LineBox[{{14.5, 3.499999999996362}, {8.500000000001819, 
+         6.999999999996362}}], 
+        PolygonBox[{{10.98173265946094, 5.552322615314452}, {
+         12.219815750748694`, 5.293188945044921}, {11.816718930329426`, 
+         4.602165824326175}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.323799910437668, 4.515942703607428}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{7.5, 15.5}], PointBox[{4.5, 9.}], 
+         PointBox[{14.5, 10.5}], PointBox[{14.5, 3.5}], PointBox[{8.5, 7.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T9", " ", "P2", " ", "N18"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdfei/fggjhihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdfei/fggjhihjij.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.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.77582152863533*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"306cbd09-abac-41ee-9f6d-4b5ec83cf29c"],
+
+Cell[BoxData[
+ GraphicsBox[{InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl2HlcjGsbB/BHG6JMReZENSlpc1qElGqoiLbRLi2jQiRGhYRMTjQSRvKW
+QYaOSuEkqUlxUlosaRzJSDItElFRjorq/d3vO3/U59vMc1/LfT/XM590Qnd6
+bpKhKEptEkWR35Qi+WHMpIYn8DJgUtIPPtxyIybVU3dY7Q0czWoz2wVPeT9R
+/gBWjDwdqAtzdu7wvAP/47Zib5Mhk+IerzhXAl/W052UDNPUR+7UwF7q9Vtt
+4WHHW0YdsEDv1eAIfmeanZUq4u8ax8SC+yRuiY6FHbxs27RfqbDkYsX4PviI
+7ojDZpglt6m6HBZdTWa4wOxdr0sp5BEmZpbZwHFz2vucYIuOxBtLYeG1FXE8
+eMDzHd0O9vd7dbgG3pqbeNEN5vU7HByFg4UyseFwD7ds0Xz04YS3KpdL1nNL
+/ugA1/CGIi6R+H8xo3xgtvbdYpKv2D1dfz1sOTTaRfpkYLlI0wPOMa0+M0Ti
+5+8dXgrnNoefUkDelaONP2bCTMfewRlwfYtj1wfEHzk1dQWxwcbqn0Xw7ewj
+kbJwXrrGqzj4bLfPx16Sz5IWl+XwnoddpfUwcynHhdS/SdE8UADTfGUe1OG6
+7mWPWjfCdEP+zrNwnPmHOww4L6v7eSTp7/3F9ZIF6O+4ZMwVnrg/2SEVFh1T
+SrWG8w+MpdjCzLI9RxbDCcfttPr1kf8alh/Zn4qSlL3ZMD/F+Jk3qUMr+msg
+LIxxpMfBY/0yBZowO1yuMQfeaWC088N85KPsOPkdbB/7/lI57FxyaosW8i8v
+Wap/HpYuj3QIhau2CrYchfO81t/NhRvnbl5xkFx/1/Z1L7xSboviIbh+ekaF
+Mfo571mKIAUWKsoWhcOzLd39s2AGl+eXDhfNcncRwezvNqUi2GaX3qJmmM8f
+DxLDkV3Jl7+T66M9trfAxrcT1Gcif6v07cJm+NPuYE1TWFzstr4Gbvdy3uoI
+5z3xTcuF3e+96l8Hm70cfJVA1ot8RvmS/ihcWewGFzgXrPcg/chZojULrpq2
+xtIW5l7Y4/Ea9cxsavHQhuOMnYsuwOLlbYMkn7iqfivSj6t+0s8P4IhL7ypM
+YLkM6z+SYOak3Lfj6Oe+Iovt9jBNxO1ogb3qDUuG9PD5Qx2XquAb+ysLc2CW
+HjO0lJyHT3L/+MEi9ZG2Mrirrf2cIszjaJs8htuU5ux+oIt+9+39+wNMT1hw
+OQFmc+7HqiC+0zxzVUe4ckm3gNxvu2u2BKrBcV3lkw+TuXH55uUv83C/u8ub
+P4Tveu5LegEz1/9cM5XMmSgOowbm5deFucM7Wi2mVsH1806c4sN/D63weAT7
+MzhUAxz9pC3lNcyoVjOZZIJ8rAM+D8B0b7UeI3iJgsY6JcSXUvP+cIZDtEIC
+TWCu4IbEHy4+dCPNheT/FyN4A/xSJnNPBExba2TIgreuvnKVC7OSqvqWwifU
+Pg2ehiPW/hhVg9Uz/Y4I4EI/qU438llYZNaZCYskEfmFsEBmllIqWV/YtWgP
+3Fh3MSmG9GdVdsYy2IOj4eVB+qnWUTeGfvB+6k9lwHzDCzfIPMo6yhB1o57C
+GzUK6WTOHq5+/ydsVrNvVSTsJTkcHwhz2lLj3GDvgvCCGXCma4MhmQcnYzZJ
+K3WYFPVT3tcKLmhIyYyGmbrpgSvh766fXBfAEf+Z+Ws9PPRhyKudgX4/DvBJ
+gPWPe9degeOsTn2/Ab/UyNgcBTvvnejuhhOSH6SuhMWS1jp91NM6X6SuC5sF
+tb/fRubbAvPgGeR9JUEQ6cejvKuWk+G8I702Q/BWBc77qTDruotwEfqpnDBu
+qw4Lj+q2RcJlh+6eN4IHpC/PC2BNGdkJRxL/p0zfPdguKmheGMymNUQ1keu/
+N6YfJvF5c9a8hWNqFzULYakLw1UCHy5eEltO4r0u7KyB+Ssq9MUwX+JHz4U9
+DX0+tZLP+/kfPgjLlQpmS2HRpYVLXWCmccgeCUzRg2+pwolZTS41sOR02W0y
+D/6YrRCWAzN2swwFcI8tc8YBuHBrhiwbDl/nZrAa5q5n0sl80s3+iyL11+v4
+UOPo52eljOtHtXH+6lVGW+C4ovADA1q43rL1WTWs+PIr3RuOKE2+XwYnscOi
+SzQRX+8l5x68Y4KXPBeuH3j15RkcvaPd+PhcnI/0zItf4ED3s40KMHVg2J2O
++L/HDbqcmYNzFZnsRObRSruakkVwYf41txSYtT/R7pMG6h/Xa34KV34co4lg
+6k6vEqm/3vCh20WY2f9Ezg/u4+TJnYN7niY3ZMLTt99iXoPZTY8vkf0J7n6u
+9QQWZkcPT16Ic3o1sn8UzospLjGDh7TUN1oiPj+ywdINFvqKiqJhNld7QyDM
+rSn8VAhbOb+9HgSzRcdpn2Bpyy23dbCyc8Hm31Afw0iXsoKLHjtetoYHkh/M
+VYPjjy6hr4UliSmHu8h8oMd+dYSdaZaJN+HPWZorDeGe6g33Y+CA2gd6/2J9
+7nuxOrn/vw3VVRfAnHtBB3+iHxcWHPNzgVmepyXVcGi2Cf0V6uFfUG9Pg/3z
+e3U9YQOJtkwkLJrWHVD5G/aP721L5ptGpZGFPsz04KnZwZ5W44d4dMwBf+cY
+G7I/NSUOn2djfaVpN1fBJw3KI31h7smE2BBYouV04Yk69oOr05JE9ks5ccQD
+Zmv+CrkDpz498KN7FvpMG5Pvh6Vv1CzOwJxQs1BTsn+78919Yaq/qoLU+yte
+/aMZzJx3wrQM1gs6kzoPFrWU1P2CtWRVywzhyul9uTboJ08nZ8gBdjbLNoyB
+JV+ceqLgiP5HP4VwQMeJo9mw1fYy22rYzrfWWgpz9w6lS+DAtVO1tJEv3eTt
+cim8WZ5htkGdPC8uzmiBs3yOnD4FS22lybVwvtXn8lLYeaVdeQ5MvS8vaST1
+69x0OwDTZXWcmuBMh/jgNbD6tKxp1bCQfWUnDf59zpYCATwsX+1MzmNKuss/
+AbDB9JfNGbCiR6ydHDxFxUYxGHY2enwnk/TnTU6xIez7YstXDVJfVGjEGPpp
+ESuXcHIm6j4WF/AGztKoSfuhhvxnzl5Dvg/ER3lKA+CBR95bKmD+2m0B91Tx
+vqmTxwPyfAjfNK4LC7f9Gn0Bjya5njujAms2PRyE54Zp8WkqZF737dAm+Qoa
+rmfRcL90XzT3IefTe/U3Jjz8jSZOg5tKZQa/zcD7jauKXsKt3muL0uCBbCPZ
+Oahf1N1pvhGeYrnreQjZv55noYFwZeU988uwlL7PlAuzMxLZrfCBGuOCWpgR
+oNSh/DvW+TPCeCbisWawLy2BlcUjNu6wpH3T+DrYX2XS36k08n3vxFAIfKAz
+W/QYjnBvVWXDvy46LZJFPeLN/6Z4whZ7lPeZw+yQNhMreGbdybXrYOdMXpAq
+bJ0iTwuBaWtuKnQiH/EbZVl/2F//Avc6fMX+lbs1bNAxtmcXXPIzaL48nDep
+45ElbBbZWC9CfOn2oO0jZD9np/B8YYPKdSurYJOD0rAHqG84uXP8NGxguq23
+WBnOnS9Pnj/U1TtHTimRebXJ1QMW/jnXImA67puogDVMWPR7V57WNJy7Yru3
+dnBFz/ZP3VNxXYfAhTwvzFbPfVIxBXlzFi/dRPZjkUPitcnk/nHLOQ6zJ0yt
+7yigf5xeJfI8a/3XqbxbHvu9oyHsB1lfZ6uaAzysT1tC5plrmDu7QQ77dpxf
+R847v8I//yjMKrptWkX6M3ZVEiVHvncvOCCP/iXJNN07BEe4qLxwgHtSe5aX
+wvT6+enxcP2NG0lKWD9vmebeXFiSJw6OhyWtpjn1cMQmk1NDcOYfIS9aYfHj
+L3bRyFe6VLC6E67cU7rjI8yfptD7Bh5uOreNhfoM3s9aVQc/PXvJOgseKA/Y
+nwPzY5oVn8DDH/yt98PCVK2jYpg3f7RgNVmvIFs7H+aOJ6wn5y3d4vpqH5g9
+X3XGP6T+jf7HniPegKxX+Vm49faPUwyYI8tyI8+Hp2XFaquQL2fd/jQD+PPA
+7purUW/c0vnqY+gnbVW3wEQW9fG+y7bCko6z7LFJmE9f7yrXwZbfJjjVFPLJ
+Lg78m+z/SGeMyoQ9xfOxiSffF7jG58Nv/rKnCneFe70m50n1/lPOqD1lFvbR
+chT2l6iobhu2pwZ2Ozfpk3mUm6l57V979LMymDyvmPwjN5d9t6e44v0nz8Nx
+Tl+e6w7ZU/5TvzxsI/tZvfFI5CDWW2dlqIf6DZRu82gw3cPmUQScJ9/LVoZZ
+cyvKr8FTOMGpgbA/Zbayi3hezPs+mHcorWeWKc7F+izTEqwv3PHm8nLYucmy
+Xoj4jIlH73xhbuKUmPPIj9E58GcYTNM/uSzthz2V52rBD4V5ShzPXaiHfUW/
+3QuurFWZrD+CeqTWu62It15OvQRPmZJ3TwWmZnXWNsLid6U328l5qO3qLfjf
++79dy4fNtplNWghLTdcE74RZvc9MWFifs8HnlgXMfrmjWR3xB64FnP1Bnv8p
+RhlHka+VnWtvJexskDuch/oYscfZp+E8jX0Kx79ife1mj0gyv0YvRu3rs6dE
+hwavskg/Z8eHCj9ivyyDnqyEOUlzhm91IV7ahzPE3JH/bL7+DtebLFhMPs+U
+mZYY0WxPGcyUdSTrVWbI3Kl6Yk8Ny/HL0sjzhmUzFlRmT9XL/Bp/SExeqbb/
+///IQuZ/Af+ePk8=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.82330080216169, 15.930190164263845}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1AtMW1UYB/BDwY1HxjoQChOEMhM6XE2XgDJfPc4h4yFUxmubKYUI81FG
+EwJ0Gy6dDALZBgVxRfagVg0D0UGN2i28JY4hSosZdAisbCyjMKCAIEJh/o/e
+pLn55dzvfI9ze/kZOQmZHEJIJH7sTuxPcLlRYmN3L0oKE5aKKLPAv7YKbnWq
+flvqSgnhJe99kZlfr0tzocQ405A/9zQlgpyxzRhnSlTXp/a1w52ZCd3Pb6VE
+dtkzph4O/eKdoa1b4Oi6rEb4rCIi1uqE+NnjwluwfNq2ZnakROtlEdjh/hMh
+z97jYL/hmyNvIZ/fAdEGB7YZUs1fwj7vH7sU7YA8x0fm3b0pCfd7mH+TUKJY
+GUoqgvuny1KSYG5k1d112PBut8gP7uz5xD+XR8mr3mE8d7Y+1GZ6ACtjf4sW
+wCLpwOxBH0qes+oTs2Dt4ZJHV2CfQOtL3bB6Z8bkOFzTckYfivzql0seOPti
+X27d+R9gVZd83BdumrcuvIJ6tf2L41xYEPmtqR2mYwMuc4gv7Sp6Iwz9ytaf
+uqKHLcWZ4xeZvz96X8by6VeCR+HA7bnedtTX6x42uMnmU3E+ohTuaXFzXYON
+5/ICXGFjzkRDH4tXnekpQb+2PyaP5sCKuhsXHGFy5+q1KZb/Bd1gMebH3bVn
+IZzVp9t+3QN2ungk6T3Ub5s5++t3mL/5859LFGxed5QhUjh1TuN1e1NMiOAb
++y7YmJ46qraLCU3MPM2BRR8Xj0StiUnnEf69NU/kCTbv3rIqJqJYbeg2rPc+
+/rNjeFlMmndvnAhn7ws3oXFgCfERv9SeZOvleUkbC7DwqzIjrPJ3nsy2If6g
+Jp29b5aVWpoyJyaSiXR1Pau/wNPn1GPsVyhxDkB/xq5SQdwM6vPYX6CBZZ08
+88C0mAQaalRumI/sQE3AKixpu/R3Hiyq49//iT2fN8AbZPNTNlT+g/0s0jHD
+M5g/Xb3hq0M+kX74VDw7Dw3fMQr1qFtn5j9k5+9Isg+hXu3gUpMc1r62sF+6
+iOd7b2UksvjkPmUK+pNIvx4NgpUf7O0W/iUmqsvnVu8iH/1oLs4EK/iPqgph
+4s0rCMV8aKX8mDuscOiJj4VVT3KnPkU/XNE6fwesrqxw94BL9R3tpxGvFcqD
+yjEPUW1zUzXyWWKiirbBxuo3hcmopzn8pPwzzNMgT/PtQ/2qH7NbQ2DJYqNw
+eRb5cq91mHBenUG9h6xWMeFOLjmUw1yNNa7ioRj/347gDFjh8bqfywT6Wzts
+ioct/D2hy2bE/76vLIU5P43DNWJ/r53tSlilzDLp2vE8R3C7Bf7v0rX9/33x
+pP8CT+Wxpw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.9692031021678298, 4.320378284825192}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.99999999999727, 16.999999999996362`}, {7., 
+          11.499999999996362`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.754949725219685, 15.745496856246135}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwt1gs0lHkfB/DHTLm/uWwiShhF2Iz0jsva3ifeiuhlXWokl2jQIhLOMCXV
+1nHLLVrRa2ULq2RWuWyFWbVWUTuxnR1yGbdcs6jWaNn2+3/PO+c85zmf81z+
+39/3PPOcxzA42pPHoCgqExvZU8sf8TOjKRnZm9KU848lIe7mNMVmxMbqbaWp
+dU+M35TBjcOqTBPYwCxcZRHmt1XlGsIL/Q3GzhY0NfdaeVEZNm7I6siDnbvV
+FEZxv75c0Vw3rHj7+ld3YM4lR3WlT2nKY3pMIQqu3fCXDxtOjd8jMYKDBJcb
+nWGRcdzDbhOaimk6r+gJSy6xHp2HVw2OLrjBXGa1gg089Ya/aA+HP30XP7+F
+ptTt73vqwzkNyrn18EKTfv8S1g+KbP9XGtyWEzskJnkv+5dFwHc+uzVTDgt/
+5rwNgJMH3l09Q/zD6vgQeI1kzj8ALnWfP86H2fpbvffA/ITNNtfgWKpYwx6u
+DDR17YSdS+eTP4PZqblxq5Gv2arwoSus060kc4KlfAfNCFiWMNZB5plTuTtV
+CHON7LpF8LYNSX2kL3pGSXcRNjUKbF6PeRQdTNRY6KfdUffnMNLf48DGXTDj
+gUb9fbh9k9aAByx2nWeobcP8r2rM3eGJf/trHIFT83WcHGB7h05eNezxRqdV
+B+a6nZXMwdxvfOxeY70dvz94ZGqJvqZ4WhWw822+mRfcrsAVBMCHetJfHodl
+IVW66rDInccTwDE3/RZbMH+KfNbBRFjHwsQyFhaGRH08Bpuu39dkBssOj8S6
+w+wtjvSbzTS173xLhAXxsd7HD+H0vFebVsEiv8yrxXCSxECzF/kq03+0yIDt
+P5gMfg+zbUcWiW3PBStmw6bKX/L/C8eVd4nitpG+vGyaYVXRzmYeuT40a2Aa
+nvXO1DhK5q0182Mhj/3Gi4on4MZBd+Uj8MxKm+4lWOfrE7OlMOPA0HADLJmq
+nRyAn/uZGJO+CiWsD+sw/5onoj5r5OXah8XthjPN5UNSSH8VoXZh8E5WfGYX
+XPlebjQRvqPCOP4JG3ldN84I4NxnX/c6wDJX1aZIOFI9oj0EnmNqNrvBdqNR
+hRfJ8bWJbhvhth7x+LewWFRUIUWehltuN+6T808u/XIVniwX6z2FSxs8/Nzg
+JDOhfBfsLK9PL2P+g4fuZxC3V5UVV8NFwdTOTpg6XxN/FE7dG7FWBHMLbl0w
+hu9Jr/nVkPM/3bE8Z0xTnZrTZcVwSv0J70742nDGzf/lq+iwbIQfn6OtYmHb
+HWt21sF94/MqQSTP4QDrR7Dm96KeL+CJg9mdUlj1NHO1C+zBKBpSwXqKgrzv
+9pA8p0wv7IJbn2d95QqnDoRbJsNXZvMmD5J5f7833wQPbJ9qioCFoXpCMt96
+sVYSydOoftafg/lHwtKsKkhff05ywuCMhG2lZF7pbxc/ZMChnpMO7+GgjCDt
+MlikpuGxyQrzDo53VcCrS3JVXWCJgVMw+b8X2jlXxcA5quPvz8Dlhjop+TBt
+/6LeC67m2224CweVZ9ath5c3Bfh2wOqfL3X8iny1LQnRfXChXu7JVFjma/Rx
+DBbWZ+XZkvxqhtoTVuT90uc4iX5OZiVZj8CKWhpXSuBABR5HAstkr30Pw4wF
+b7922ENQIN0MJyW+Na4jXmUvXmFhnl+Ye0thcaL28hhcwBBcyoCptGGXQZiq
+5bTyYTbr+o1JuEWuO+8YXKndv8LE/Ry36/MDYZGvjr8FrFGSU+oH6xhdXw6E
+77UyBwNIX5kGscWwHvNmCble1pYn7YWL437tE5D11J+zdTHfi6suWwtIX0L/
+/T6wkeep2/fgCa3dAaSPiap31j2wwVFaTgi/HXrmJLcdz+P4PsETOPpupIU5
+LNx+RdoFM0PNWT5waVYluwPmn8o7fBo27ZHn1ZLnV6NkSxmconn5RBpMM7Pl
+WmHx50UcT/jQ3r66V/DEe3+eGqw9yQidhRVVb3MfI//Th5bFS7CU99NIHOwZ
+reS2AgephuiSvp1abfrJ8coJVa0e9FecX6o3B6e6mdflw9wzNewh2ECLjvSD
+bSnv3Odk/ZcXlNjwN9E1Ez/A6vUvc9bCBrNVH2/AOdMWG5Xh1pTeslySryVF
+rA572ZinnoUbM5+9MIGn1vb/MwGm9E/77ocPRHJmYuDw/0R3JMMjWZzLsbAs
+0LS/EY7y9KoWkD5e//HTIpwUxPTIhJ05XyTYYB5u8Tkjsn7hRbr7JJz253Aw
+6YsbEbdQCbfYGcyPwZKwbK9ueFdVfuA/rJG/jfcJeT/Y9g8o2MCV++l1K7BP
+jDzrCCycatiyBM+IkkfS4JjdoQqj8IEb6dk1sJQdntAMGxYkF4lhWUGyUTr8
+h0P0g2nYwyoqzwWWIx8tO/7/vcKi/wZ+uCyP
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.306417572928748, 12.091885689614742}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt0QtUzHkUB/B/Yaep6SWO5PQWopgeK4/kl5BnpJFtt9lGr+khpTgbtVt6
+KCLTS8VKtoNaKyOnmmjHtKtkW0mkKU4Ny+koKW1rnWW138v+z5nzO59z7+/e
++7tjHRy7LUyb47gQ/Oj89C1in85pjHv66IJ4HawpS7hkD+cOLqosgJngfPoy
+WBntHNJPDh39RwiX9J05NE3IuA5m2iCA7a56WrjBcRP+Re0mjIvWOIr94fLm
+xtxEWOoh8tkDy7eLa/XhQsduxyxYM7yRlz+VcT13fttTDEs0b1bpwsVJ4o6z
+MOMPy5OMGfd2vq3XeaofsH9gyIhxh3S/5p2DZVq3jkjgX309T5XBqsAOU6Uh
+4441bFYU0P21rFdtwLhpa3Q2ZlK/zt08M/gLj6iIvRR3aj+Rrc+4FZ7pnsHU
+v8Um0R5WN/ZO30p2mxU4IWDcSI6D3Uq6/2VBkS7iabm2Z4V0X+fJ9PXwhGvt
+GTvyjO0ZdXBgXYOBJZwa9Cx2E/qty/apMqf4H00l2pjv7urkEWvYqu+sz11Y
+9FWKlQPNX6UY8cN79DTjbu7w6I3WbBVc9FDvlS/VExl3zsU+8gYV13bBW407
+pRmw4cLWRzmUX1AkuQffupolroa5zh2ZtE+JXaXdfVi4qvagA9xk0z3xlu4X
+v+N/DhdEpV+0cEJ+TsRfNrBblOPgKvLuqI1vUG/4QPmxUFil2eAlh3UN4jPT
+YKN878V+8GVfh6FTsGyBIuMp5vUzKBXIYblib2wwvHy8LkEJSyS72i/jvQe2
+fBhqofrnllXKsB+zYUXGbTg1su1yPPYnTdkmo7iVieGsndi/OLWq/OP9n7fk
+h+sxLqv/SGoN5VeE1x3VZdyy+RXzK2B2q7bmEZ9xFk82KfMoP6q9PwCW8Rrj
+U6jftlcH9GC9kpmHY6i+/Pi+MR3GhZY4eogpXu8aZIB4Subyxi303pBdUYHw
+0oM1+mspf1P30W74kst6Y0/KF9xQJKJ/iql+HFn1otrRDfO1yx8WedN8afse
+62B+ZWviT35wefjM3qdwTt+T0jBYk3XmcQPeW2m7RutbqnfTuDEN+9CaWOFd
+Svn92mPO2FfcG2VJA9myz7gJVvyZPP6Y+gX4npyK/TZJoxdrOyMecLrKAU6z
+bpk9DzYyq2km+3ebfLeZ4pMEcyg/y+kgbw8smREvvYZ6gxajJ/NgTaEP3xK+
+KDNzrSbv5hXswDxXvJ3fN8OqOa/F0Zh3SVWin5riz/2lIXjPhwcS9TPYyrD+
+xXq8vypiMHoITq3vHrDHfgJcJrm8pHz+y2ra74MFmsIBmPOP3D4J+zdRSBb3
+UX3+VvepPMaFCa+MddC8QbKS1Z9hzg+p91Tkwi7+D1MYNy/I/R3Np7KN9BLC
+cfEdF7+neLVR29hkxtWoZbNzqP/S9o5BOOl9/+kksruP9Qzkq++sWBpL8x4u
+c9kLd5kGjofTfLl5vu/hgZG20yEwM9TquYD+peHNbWG0r5W8ghjMV9EX3xVD
+92M2mHth/nNpgrsf6+dXSszxvuffjGYfp3rz/jZ8DYvYL3mVNK96of1V7MNm
+yf7lLZQv80gIwL5uF8+uoH2Uhw6M9cJvIwXX9VxQ//cIXyH2yx5e93eCJa3h
+QhHs4ha9ZAesMd8g9YIzLggtkyl/Z+Dcf3H/pkrUVQararSnpMPRxXM9lHD5
++UvP1eif8GN9cA/ZZvP9ybDIsyd5BGbT19bT//Pxc/3/1GH/AexNIgg=
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.77471462238284, 4.811607900361398}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwd1gs01GkfB/A/IS1ZSWNclnGJURRFDaZMXoVdMaZYlcvQxoQyyi0p7BES
+XpFWKLQqly5zrFRsmWpdqgndhIg0Gwpp69XkUu/3Wec4zuc8zzy/y3MxhsGR
+vF3yFEWV4Jf8pWTf8LOCQ1kQaHIo2dM45m24TdhpuR3ublaNyIRTTXxp92D6
+52cLAmDlqoAqtyUcijPzpWUdrFBxVKkbthp40rMMdp9RromkcSjh7uoXS+Ex
+9VvnVbSw/lz57RVwJTO86zzsGsjud4YjzrMZbDqHYuzjS0PgZOuhKy2wzPcY
+lQ8zVu5f6aTNoQofxklb4Cxa8nQ1LBKyh0n+XMvPrl9hcWi5scNKzHv52tNe
+B5+fcSiKgd3r030C4Latt7ZehE0Ez26FwQLui4w+2ObdWyoITm053idnhXVE
+4lP/IfN9LEa/h3P9e8eXwOKOiXIt+E8ez7AP8ShDjaN0eNaTNlwED94ziNKA
+ZdI8t59hPeMFSYqwJMs3kkbmZ45wpYinfCE6oB/1cbTP+dXCnPcut0Vw5WuK
+GQdL7+ZdOQFTzpdNbeHJbesPZ8HqhfF671Fvp5xuYRHcZlI3ewGWJgQHieHk
+c4dag+HJVg+zrzD9TnCIERzflK63BfG5tYszRy0x3zMv+CYsYNdmNsBlU48N
+SL8Yqavdf4NtYhjlzXD3Kh1mCvyJtePIDl3kmfPf/njYPWH+hylYLPdbxmE4
+Puloa54e8n11t+w4XDHEHzb/Aft7NvmbiMSLKwm5Bk/mnB7vhUWKtyRr9GHN
+9LULkV908k6XCjg+0tZlI6wa5/Z8Fr7+9nenZFgoPbF/vQHqEQksG2FZeLOh
+AGY5vlL5SM5f3xq5BDjD2ltpKfrlvK3GLQZOjozK9IApu0m2HywsOL57D9xm
+5qK6Cq6U7fsnCWbIJLXTiCfuNFI8AvtdK2xpgGWzbEYiTC9pcIoj4zkDIbvI
++dI66W4LC3QXlm6AE6Wun7+gvsGXuUwNuFNxZP59mJJ2jHWT8z2Pd7MKZpzb
+6FpI7kPP8jMlsEzn6gSP1N/v7XkOFmR7P1CBy4LuRDfDyp1RL5vRL7aS/pk5
+mNmgppMKW4Sv4GxGfMZqO0c3WOK2prEWds05cVML7gvR3Lsc9fHTLpz8YMGh
+NJPZz/6ArXTsN3XDq2rVeo0Z8HCvSAJf1EwzjoL5etu1O+BY6R/rmohp9T8M
+wPoHrxSoGKKuD6cbZ+C0gp8ubYE5Y1v9jBGPehHNKoBFEWHDW2Bf6w2sdthX
+IexFJhy8OEpjDo7n88NJPb2WHhUMI/TfsaeUQr3THgu4LFhQ+uiAHexzbnqe
+M8wKlaftIe+Tf6QDMfXydTvpn8WJGZkd7OrXs6OBvDfP8xtMYWVH2lgH/DV2
+OlQV5mZ+cyD9byjxZI8jPr9EreIxPGIqqXkAV0qOMJpglnffpmr4Oq/E6wzJ
+x3yi+BgZjzeIjoLz6n2098GFzwd49jCnQDQZCNMZJ61nUI9TqcKcD0w9XVtb
+D5e4jl/0hXN7/nc1EqZtq/+wC1Yf8XIwh/OWcWyS4EFmr/0b9JPeas6tgCd3
+LUutgvu4Bwueks8rdpTEwBoJNzvVUA+fyj3rDjOm9Ld5wSPvU1ZZwZVcOZMi
+0k/DeT6G8K0bSv1vYFl3aiyD7KfuETlbY9TXKvK1hP+6pvM1BWbNMzFwgXN3
+zt/8AM51K90aAfsclOarmWC/EmzmiuCJtf5NbjBTfP5SJxm/W6Z7EBZ0jV74
+DvUY2ewVlJuQ9004sxHm5LcPN8KDdQ8vJMEhgx0h92Fh3ffiOtivrtfxISzu
+ts0eIo5N92mGR2bNLyuhv9tzTBbWkfjtzasN4E0mu22K4cl3p66R/y8N4ZpT
+iTD9flgEk8xXi2ncAXf7l5vRYVGAwiJ7uPIQZ+c01lf13JmhQ/zZhdVJzqO9
+TtE31CuIaPUqht/sT8p4B6ur2/X4w/amuhsH4bJUFX8dWH/s9rYBmH8wrfYJ
+6qdR0V2j8GBaxNMsC/LudTlTWJ8/N9TkCjuF9JcbkXxt13l9B3ftG/Xnwm3P
+3IyeLkefTUJ2ZsDKrCvhlfBhKtv4HsxQFL/NgP9pbapUX4r7GTMriYXra89c
+8oNdX1mf3QcrP7p/rRoWuvR5J8KXZXRbGTzYpWWVDz9+1HfKyRT7Fab18ir8
+6503h9NhoeWfKUPwiN6Tm3/BlcUnW2nIL/qjX6YMHgzfLM+FhT9nphua4XxE
+mv14jNz3ruvP18OiGufSZviXvIemXDhj/0fVWbg9dNFlb5hyTJEsR7+yDLOs
+ybjYYXwXD05kf53iwFZ5M5I9cFjj63pzWFl7y4FEcl/KrTJUyXjF0fhD8MTx
+q63vkE939o8HhPD2JR6z92Ard80Ob7J/zQY3qmCKHrR3Bazs65qUDfP7Q1+R
+92lkc2BZHKz+6IutGN7+i6lxGKlvCe/vQzAnvLomBKYbfapfC4e1j4fuhTs7
+3pdOoj+DPZT8r2T9RNWyGtL/j8sLy+H4oJgz4TDtWEajBGb9lO6yGs6q1Y6R
+R/65KbxxBfjtJabXBlh9kXPE0DLc9zuBwnQ4uZq15CEsFvecfgzHl8ycboZ9
+mEa7GUzUe32ELoGlTh+d9sKT3Ys/DcAR5oHFN+B/v6/BGuT7mjnn/wREgU0=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.069228614102805, 9.329740963760747}, \
+{-1, 0}], LineBox[CompressedData["
+1:eJwt1Qs0VHkcB/Brle0lgyGdmpjN0ANZUx7V6GZqdlWkySZ7sOMxoZLphV7b
+VSqVMiWsZ8Oi51pjaaWsYeymUqP2OLamh9Eg9FAUStnvf886x5nzOd///c/v
+cS7csFix9AuKoqT4JZ8MRX549H8flCVNFd8YjhDATFjp6rWWNOO/KXJRIuzs
+4nPrFPKbnfpDN2HJRd3pKtgnjmfJtoO/yGz+E+f/Du4sCoHbthqpSa73HOgp
+gZmWePI8wx6YV91DcpEqXIy8R7/fYpY9TdHsF1M+WdBMuKJEFAw350VK0i1o
+qvz65DfJsLPRA8YauXtSjc1FmNL6rFewaeabkEZ/FVw2oXYuh01TE8UPk26T
+59NcN+eY01SH+AS3CWZczPbYmNOMly7NRA33dbzdojSjqdhdz/OUxDk6rdiM
+ZnRtW+KzSD2jxgXj4C5RsXwvLL/r+0eLKU2phE5mpD7WyAL+dfiEm/VSAckr
+uN3Ei7stN1jDkq6FF1pNaeZoimPFWFhlrJkxEd9X0d/s/Bb9y7b3dvjjfreM
+9LxOWHUnqxj1MHHlryP0MEuSP5+D+r3HnT/2ArbJt71xGn7eckUxSnJn6Uxj
+9F+eO6rikP5yDbWH4elqlxQR7Df8y+EPmMetqzrHXWQeljKDcMzz2aIsaQWZ
+l9qp4Bp8jJV/5j3p59GTaIrs57dKjWAWTSkyl3s4YT/xV90GjsDyraHdXvDW
+TKb2PkzlGEQJ4DNWDV3TZmM/quR6Dp7fe81pQSgsfx7I68D93ueXZitI3vju
+Ltmn9e7gFf/AfjbrBl3gcKukO0ZzUP9I+mUV6o9PTWDNhfs4m0qEqH9j+3HZ
+MtimOtCsDv2fik2vF8OSBO33nvDv5275r4Ppge5eFeZX4RHWu3oO2f+uQR/M
+O27Evoom943ftriH7CsixGcOXBaZcT8LPtS4L2UyyQN++vQD9jXh3clTr1Gf
+SiocvwSmLhnmamBWkLezO87njJ34voz0M6/h5Erkq3xl2nRYJjPgJiA3rpsS
+ysCS5KK71+DNo7yQbXBfYXGiOeqbUdkUEEPuZ3/97R7U12SULSM5Vdq//xUc
+OmIQdABufjc0Lgr93dReXJcHt3Ff7muHS4T3ZqrJ/CSBsesxnwJDnUk/Oc/3
+O9uA+cnldkNkfrLKDwu/wvtSM7gsYDPsV3XSJAb+uaHru3LS79SoqgJYXzr8
+5CPJW1Y01GAfNpwDV0RzYWZ+cy3sKXI6LYcVyRkZ53CeK0pwaSVuW/N2J7yy
+OGCPlQPqC1jb4oDzgR2bjothqsWNr0E9hbGFzQdhBe9ZmwT1ehnunHoJZh2O
+2diJfmqXGxbegP3YrroIvJ9GdfHTH5Dz2Z5FOsyrMSyo4ilM1/J5YbCvqHrS
+I3Le5MLlXsz/R9VUDw3MDFnZHISXtv+qrHYg7ymvyQHzd9u/SKggzz+WLnjB
+wvs3RvgxES4rvf1GzaKZJKMU0zBy3nZJSiVybpVa4wXLlcrtdcjPCMMT7BzI
+37eg953IR0TPHE1IfzOCvW1x/6RAX+1nMo+WDblx8LIdfOtBmGk86/4Q3u3y
+1GMYpjyiLqzAfiWv8kfHkvt3eL2sh8XKIg2H1Of412UB+lfM7kul4b6rwp2V
+cKs+ujQGbs5MG7DF/Aa+5NkXkfkdTeQfwXxD+AdT20l999Y0tcKRKSqevSO+
+r378NHPsZzBSoI+Fy/jRUlfs53GrMrMabqt9PLQEeaF7wOAYJ8zzvJ1gHnIv
+1881q2BZ9qPqMcj7kz7VpxKnpVvU4/4187tMm2DVqo7haHiU/Dj9//+DTf8L
+sFdb8w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.776116632202752, 3.615966322027525}, \
+{0, 1}], LineBox[{{3.499999999996362, 5.499999999998181}, {6.999999999996362, 
+         11.500000000001819`}}], 
+        PolygonBox[{{4.947677384685548, 7.98173265946094}, {5.897834175673825,
+          8.816718930329426}, {5.206811054955079, 9.219815750748694}}], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.515942703607427, 8.676200089562332}, \
+{1, -1}], LineBox[{{3.499999999997692, 5.5}, {10.49999999999251, 5.5}}], 
+        PolygonBox[{{7.6, 5.5}, {6.4, 5.1}, {6.4, 5.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7., 4.5548}, {0, 1}], 
+        LineBox[{{6.999999999996362, 11.500000000005457`}, {10.5, 
+         5.500000000003638}}], 
+        PolygonBox[{{8.447677384685548, 9.01826734053906}, {8.706811054955079,
+          7.780184249251306}, {9.397834175673825, 8.183281069670574}}], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.484057296392571, 8.676200089562332}, \
+{-1, -1}], 
+        {PointSize[0.04], PointBox[{13.5, 12.5}], PointBox[{3.5, 5.5}], 
+         PointBox[{7., 11.5}], PointBox[{15.5, 5.}], PointBox[{10.5, 5.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T10", " ", "P1", " ", "N19"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdfei/fiijghgjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdfei/fiijghgjhj.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:eJwl2HlcjGsbB/BHG6JMReZENSlpc1qElGqoiLbRLi2jQiRGhYRMTjQSRvKW
+QYaOSuEkqUlxUlosaRzJSDItElFRjorq/d3vO3/U59vMc1/LfT/XM590Qnd6
+bpKhKEptEkWR35Qi+WHMpIYn8DJgUtIPPtxyIybVU3dY7Q0czWoz2wVPeT9R
+/gBWjDwdqAtzdu7wvAP/47Zib5Mhk+IerzhXAl/W052UDNPUR+7UwF7q9Vtt
+4WHHW0YdsEDv1eAIfmeanZUq4u8ax8SC+yRuiY6FHbxs27RfqbDkYsX4PviI
+7ojDZpglt6m6HBZdTWa4wOxdr0sp5BEmZpbZwHFz2vucYIuOxBtLYeG1FXE8
+eMDzHd0O9vd7dbgG3pqbeNEN5vU7HByFg4UyseFwD7ds0Xz04YS3KpdL1nNL
+/ugA1/CGIi6R+H8xo3xgtvbdYpKv2D1dfz1sOTTaRfpkYLlI0wPOMa0+M0Ti
+5+8dXgrnNoefUkDelaONP2bCTMfewRlwfYtj1wfEHzk1dQWxwcbqn0Xw7ewj
+kbJwXrrGqzj4bLfPx16Sz5IWl+XwnoddpfUwcynHhdS/SdE8UADTfGUe1OG6
+7mWPWjfCdEP+zrNwnPmHOww4L6v7eSTp7/3F9ZIF6O+4ZMwVnrg/2SEVFh1T
+SrWG8w+MpdjCzLI9RxbDCcfttPr1kf8alh/Zn4qSlL3ZMD/F+Jk3qUMr+msg
+LIxxpMfBY/0yBZowO1yuMQfeaWC088N85KPsOPkdbB/7/lI57FxyaosW8i8v
+Wap/HpYuj3QIhau2CrYchfO81t/NhRvnbl5xkFx/1/Z1L7xSboviIbh+ekaF
+Mfo571mKIAUWKsoWhcOzLd39s2AGl+eXDhfNcncRwezvNqUi2GaX3qJmmM8f
+DxLDkV3Jl7+T66M9trfAxrcT1Gcif6v07cJm+NPuYE1TWFzstr4Gbvdy3uoI
+5z3xTcuF3e+96l8Hm70cfJVA1ot8RvmS/ihcWewGFzgXrPcg/chZojULrpq2
+xtIW5l7Y4/Ea9cxsavHQhuOMnYsuwOLlbYMkn7iqfivSj6t+0s8P4IhL7ypM
+YLkM6z+SYOak3Lfj6Oe+Iovt9jBNxO1ogb3qDUuG9PD5Qx2XquAb+ysLc2CW
+HjO0lJyHT3L/+MEi9ZG2Mrirrf2cIszjaJs8htuU5ux+oIt+9+39+wNMT1hw
+OQFmc+7HqiC+0zxzVUe4ckm3gNxvu2u2BKrBcV3lkw+TuXH55uUv83C/u8ub
+P4Tveu5LegEz1/9cM5XMmSgOowbm5deFucM7Wi2mVsH1806c4sN/D63weAT7
+MzhUAxz9pC3lNcyoVjOZZIJ8rAM+D8B0b7UeI3iJgsY6JcSXUvP+cIZDtEIC
+TWCu4IbEHy4+dCPNheT/FyN4A/xSJnNPBExba2TIgreuvnKVC7OSqvqWwifU
+Pg2ehiPW/hhVg9Uz/Y4I4EI/qU438llYZNaZCYskEfmFsEBmllIqWV/YtWgP
+3Fh3MSmG9GdVdsYy2IOj4eVB+qnWUTeGfvB+6k9lwHzDCzfIPMo6yhB1o57C
+GzUK6WTOHq5+/ydsVrNvVSTsJTkcHwhz2lLj3GDvgvCCGXCma4MhmQcnYzZJ
+K3WYFPVT3tcKLmhIyYyGmbrpgSvh766fXBfAEf+Z+Ws9PPRhyKudgX4/DvBJ
+gPWPe9degeOsTn2/Ab/UyNgcBTvvnejuhhOSH6SuhMWS1jp91NM6X6SuC5sF
+tb/fRubbAvPgGeR9JUEQ6cejvKuWk+G8I702Q/BWBc77qTDruotwEfqpnDBu
+qw4Lj+q2RcJlh+6eN4IHpC/PC2BNGdkJRxL/p0zfPdguKmheGMymNUQ1keu/
+N6YfJvF5c9a8hWNqFzULYakLw1UCHy5eEltO4r0u7KyB+Ssq9MUwX+JHz4U9
+DX0+tZLP+/kfPgjLlQpmS2HRpYVLXWCmccgeCUzRg2+pwolZTS41sOR02W0y
+D/6YrRCWAzN2swwFcI8tc8YBuHBrhiwbDl/nZrAa5q5n0sl80s3+iyL11+v4
+UOPo52eljOtHtXH+6lVGW+C4ovADA1q43rL1WTWs+PIr3RuOKE2+XwYnscOi
+SzQRX+8l5x68Y4KXPBeuH3j15RkcvaPd+PhcnI/0zItf4ED3s40KMHVg2J2O
++L/HDbqcmYNzFZnsRObRSruakkVwYf41txSYtT/R7pMG6h/Xa34KV34co4lg
+6k6vEqm/3vCh20WY2f9Ezg/u4+TJnYN7niY3ZMLTt99iXoPZTY8vkf0J7n6u
+9QQWZkcPT16Ic3o1sn8UzospLjGDh7TUN1oiPj+ywdINFvqKiqJhNld7QyDM
+rSn8VAhbOb+9HgSzRcdpn2Bpyy23dbCyc8Hm31Afw0iXsoKLHjtetoYHkh/M
+VYPjjy6hr4UliSmHu8h8oMd+dYSdaZaJN+HPWZorDeGe6g33Y+CA2gd6/2J9
+7nuxOrn/vw3VVRfAnHtBB3+iHxcWHPNzgVmepyXVcGi2Cf0V6uFfUG9Pg/3z
+e3U9YQOJtkwkLJrWHVD5G/aP721L5ptGpZGFPsz04KnZwZ5W44d4dMwBf+cY
+G7I/NSUOn2djfaVpN1fBJw3KI31h7smE2BBYouV04Yk69oOr05JE9ks5ccQD
+Zmv+CrkDpz498KN7FvpMG5Pvh6Vv1CzOwJxQs1BTsn+78919Yaq/qoLU+yte
+/aMZzJx3wrQM1gs6kzoPFrWU1P2CtWRVywzhyul9uTboJ08nZ8gBdjbLNoyB
+JV+ceqLgiP5HP4VwQMeJo9mw1fYy22rYzrfWWgpz9w6lS+DAtVO1tJEv3eTt
+cim8WZ5htkGdPC8uzmiBs3yOnD4FS22lybVwvtXn8lLYeaVdeQ5MvS8vaST1
+69x0OwDTZXWcmuBMh/jgNbD6tKxp1bCQfWUnDf59zpYCATwsX+1MzmNKuss/
+AbDB9JfNGbCiR6ydHDxFxUYxGHY2enwnk/TnTU6xIez7YstXDVJfVGjEGPpp
+ESuXcHIm6j4WF/AGztKoSfuhhvxnzl5Dvg/ER3lKA+CBR95bKmD+2m0B91Tx
+vqmTxwPyfAjfNK4LC7f9Gn0Bjya5njujAms2PRyE54Zp8WkqZF737dAm+Qoa
+rmfRcL90XzT3IefTe/U3Jjz8jSZOg5tKZQa/zcD7jauKXsKt3muL0uCBbCPZ
+Oahf1N1pvhGeYrnreQjZv55noYFwZeU988uwlL7PlAuzMxLZrfCBGuOCWpgR
+oNSh/DvW+TPCeCbisWawLy2BlcUjNu6wpH3T+DrYX2XS36k08n3vxFAIfKAz
+W/QYjnBvVWXDvy46LZJFPeLN/6Z4whZ7lPeZw+yQNhMreGbdybXrYOdMXpAq
+bJ0iTwuBaWtuKnQiH/EbZVl/2F//Avc6fMX+lbs1bNAxtmcXXPIzaL48nDep
+45ElbBbZWC9CfOn2oO0jZD9np/B8YYPKdSurYJOD0rAHqG84uXP8NGxguq23
+WBnOnS9Pnj/U1TtHTimRebXJ1QMW/jnXImA67puogDVMWPR7V57WNJy7Yru3
+dnBFz/ZP3VNxXYfAhTwvzFbPfVIxBXlzFi/dRPZjkUPitcnk/nHLOQ6zJ0yt
+7yigf5xeJfI8a/3XqbxbHvu9oyHsB1lfZ6uaAzysT1tC5plrmDu7QQ77dpxf
+R847v8I//yjMKrptWkX6M3ZVEiVHvncvOCCP/iXJNN07BEe4qLxwgHtSe5aX
+wvT6+enxcP2NG0lKWD9vmebeXFiSJw6OhyWtpjn1cMQmk1NDcOYfIS9aYfHj
+L3bRyFe6VLC6E67cU7rjI8yfptD7Bh5uOreNhfoM3s9aVQc/PXvJOgseKA/Y
+nwPzY5oVn8DDH/yt98PCVK2jYpg3f7RgNVmvIFs7H+aOJ6wn5y3d4vpqH5g9
+X3XGP6T+jf7HniPegKxX+Vm49faPUwyYI8tyI8+Hp2XFaquQL2fd/jQD+PPA
+7purUW/c0vnqY+gnbVW3wEQW9fG+y7bCko6z7LFJmE9f7yrXwZbfJjjVFPLJ
+Lg78m+z/SGeMyoQ9xfOxiSffF7jG58Nv/rKnCneFe70m50n1/lPOqD1lFvbR
+chT2l6iobhu2pwZ2Ozfpk3mUm6l57V979LMymDyvmPwjN5d9t6e44v0nz8Nx
+Tl+e6w7ZU/5TvzxsI/tZvfFI5CDWW2dlqIf6DZRu82gw3cPmUQScJ9/LVoZZ
+cyvKr8FTOMGpgbA/Zbayi3hezPs+mHcorWeWKc7F+izTEqwv3PHm8nLYucmy
+Xoj4jIlH73xhbuKUmPPIj9E58GcYTNM/uSzthz2V52rBD4V5ShzPXaiHfUW/
+3QuurFWZrD+CeqTWu62It15OvQRPmZJ3TwWmZnXWNsLid6U328l5qO3qLfjf
++79dy4fNtplNWghLTdcE74RZvc9MWFifs8HnlgXMfrmjWR3xB64FnP1Bnv8p
+RhlHka+VnWtvJexskDuch/oYscfZp+E8jX0Kx79ife1mj0gyv0YvRu3rs6dE
+hwavskg/Z8eHCj9ivyyDnqyEOUlzhm91IV7ahzPE3JH/bL7+DtebLFhMPs+U
+mZYY0WxPGcyUdSTrVWbI3Kl6Yk8Ny/HL0sjzhmUzFlRmT9XL/Bp/SExeqbb/
+///IQuZ/Af+ePk8=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.82330080216169, 15.930190164263845}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1AtMW1UYB/BDwY1HxjoQChOEMhM6XE2XgDJfPc4h4yFUxmubKYUI81FG
+EwJ0Gy6dDALZBgVxRfagVg0D0UGN2i28JY4hSosZdAisbCyjMKCAIEJh/o/e
+pLn55dzvfI9ze/kZOQmZHEJIJH7sTuxPcLlRYmN3L0oKE5aKKLPAv7YKbnWq
+flvqSgnhJe99kZlfr0tzocQ405A/9zQlgpyxzRhnSlTXp/a1w52ZCd3Pb6VE
+dtkzph4O/eKdoa1b4Oi6rEb4rCIi1uqE+NnjwluwfNq2ZnakROtlEdjh/hMh
+z97jYL/hmyNvIZ/fAdEGB7YZUs1fwj7vH7sU7YA8x0fm3b0pCfd7mH+TUKJY
+GUoqgvuny1KSYG5k1d112PBut8gP7uz5xD+XR8mr3mE8d7Y+1GZ6ACtjf4sW
+wCLpwOxBH0qes+oTs2Dt4ZJHV2CfQOtL3bB6Z8bkOFzTckYfivzql0seOPti
+X27d+R9gVZd83BdumrcuvIJ6tf2L41xYEPmtqR2mYwMuc4gv7Sp6Iwz9ytaf
+uqKHLcWZ4xeZvz96X8by6VeCR+HA7bnedtTX6x42uMnmU3E+ohTuaXFzXYON
+5/ICXGFjzkRDH4tXnekpQb+2PyaP5sCKuhsXHGFy5+q1KZb/Bd1gMebH3bVn
+IZzVp9t+3QN2ungk6T3Ub5s5++t3mL/5859LFGxed5QhUjh1TuN1e1NMiOAb
++y7YmJ46qraLCU3MPM2BRR8Xj0StiUnnEf69NU/kCTbv3rIqJqJYbeg2rPc+
+/rNjeFlMmndvnAhn7ws3oXFgCfERv9SeZOvleUkbC7DwqzIjrPJ3nsy2If6g
+Jp29b5aVWpoyJyaSiXR1Pau/wNPn1GPsVyhxDkB/xq5SQdwM6vPYX6CBZZ08
+88C0mAQaalRumI/sQE3AKixpu/R3Hiyq49//iT2fN8AbZPNTNlT+g/0s0jHD
+M5g/Xb3hq0M+kX74VDw7Dw3fMQr1qFtn5j9k5+9Isg+hXu3gUpMc1r62sF+6
+iOd7b2UksvjkPmUK+pNIvx4NgpUf7O0W/iUmqsvnVu8iH/1oLs4EK/iPqgph
+4s0rCMV8aKX8mDuscOiJj4VVT3KnPkU/XNE6fwesrqxw94BL9R3tpxGvFcqD
+yjEPUW1zUzXyWWKiirbBxuo3hcmopzn8pPwzzNMgT/PtQ/2qH7NbQ2DJYqNw
+eRb5cq91mHBenUG9h6xWMeFOLjmUw1yNNa7ioRj/347gDFjh8bqfywT6Wzts
+ioct/D2hy2bE/76vLIU5P43DNWJ/r53tSlilzDLp2vE8R3C7Bf7v0rX9/33x
+pP8CT+Wxpw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.9692031021678298, 4.320378284825192}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.99999999999727, 16.999999999996362`}, {7., 
+          11.499999999996362`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.754949725219685, 15.745496856246135}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwt1gs0lHkfB/DHTLm/uWwiShhF2Iz0jsva3ifeiuhlXWokl2jQIhLOMCXV
+1nHLLVrRa2ULq2RWuWyFWbVWUTuxnR1yGbdcs6jWaNn2+3/PO+c85zmf81z+
+39/3PPOcxzA42pPHoCgqExvZU8sf8TOjKRnZm9KU848lIe7mNMVmxMbqbaWp
+dU+M35TBjcOqTBPYwCxcZRHmt1XlGsIL/Q3GzhY0NfdaeVEZNm7I6siDnbvV
+FEZxv75c0Vw3rHj7+ld3YM4lR3WlT2nKY3pMIQqu3fCXDxtOjd8jMYKDBJcb
+nWGRcdzDbhOaimk6r+gJSy6xHp2HVw2OLrjBXGa1gg089Ya/aA+HP30XP7+F
+ptTt73vqwzkNyrn18EKTfv8S1g+KbP9XGtyWEzskJnkv+5dFwHc+uzVTDgt/
+5rwNgJMH3l09Q/zD6vgQeI1kzj8ALnWfP86H2fpbvffA/ITNNtfgWKpYwx6u
+DDR17YSdS+eTP4PZqblxq5Gv2arwoSus060kc4KlfAfNCFiWMNZB5plTuTtV
+CHON7LpF8LYNSX2kL3pGSXcRNjUKbF6PeRQdTNRY6KfdUffnMNLf48DGXTDj
+gUb9fbh9k9aAByx2nWeobcP8r2rM3eGJf/trHIFT83WcHGB7h05eNezxRqdV
+B+a6nZXMwdxvfOxeY70dvz94ZGqJvqZ4WhWw822+mRfcrsAVBMCHetJfHodl
+IVW66rDInccTwDE3/RZbMH+KfNbBRFjHwsQyFhaGRH08Bpuu39dkBssOj8S6
+w+wtjvSbzTS173xLhAXxsd7HD+H0vFebVsEiv8yrxXCSxECzF/kq03+0yIDt
+P5gMfg+zbUcWiW3PBStmw6bKX/L/C8eVd4nitpG+vGyaYVXRzmYeuT40a2Aa
+nvXO1DhK5q0182Mhj/3Gi4on4MZBd+Uj8MxKm+4lWOfrE7OlMOPA0HADLJmq
+nRyAn/uZGJO+CiWsD+sw/5onoj5r5OXah8XthjPN5UNSSH8VoXZh8E5WfGYX
+XPlebjQRvqPCOP4JG3ldN84I4NxnX/c6wDJX1aZIOFI9oj0EnmNqNrvBdqNR
+hRfJ8bWJbhvhth7x+LewWFRUIUWehltuN+6T808u/XIVniwX6z2FSxs8/Nzg
+JDOhfBfsLK9PL2P+g4fuZxC3V5UVV8NFwdTOTpg6XxN/FE7dG7FWBHMLbl0w
+hu9Jr/nVkPM/3bE8Z0xTnZrTZcVwSv0J70742nDGzf/lq+iwbIQfn6OtYmHb
+HWt21sF94/MqQSTP4QDrR7Dm96KeL+CJg9mdUlj1NHO1C+zBKBpSwXqKgrzv
+9pA8p0wv7IJbn2d95QqnDoRbJsNXZvMmD5J5f7833wQPbJ9qioCFoXpCMt96
+sVYSydOoftafg/lHwtKsKkhff05ywuCMhG2lZF7pbxc/ZMChnpMO7+GgjCDt
+MlikpuGxyQrzDo53VcCrS3JVXWCJgVMw+b8X2jlXxcA5quPvz8Dlhjop+TBt
+/6LeC67m2224CweVZ9ath5c3Bfh2wOqfL3X8iny1LQnRfXChXu7JVFjma/Rx
+DBbWZ+XZkvxqhtoTVuT90uc4iX5OZiVZj8CKWhpXSuBABR5HAstkr30Pw4wF
+b7922ENQIN0MJyW+Na4jXmUvXmFhnl+Ye0thcaL28hhcwBBcyoCptGGXQZiq
+5bTyYTbr+o1JuEWuO+8YXKndv8LE/Ry36/MDYZGvjr8FrFGSU+oH6xhdXw6E
+77UyBwNIX5kGscWwHvNmCble1pYn7YWL437tE5D11J+zdTHfi6suWwtIX0L/
+/T6wkeep2/fgCa3dAaSPiap31j2wwVFaTgi/HXrmJLcdz+P4PsETOPpupIU5
+LNx+RdoFM0PNWT5waVYluwPmn8o7fBo27ZHn1ZLnV6NkSxmconn5RBpMM7Pl
+WmHx50UcT/jQ3r66V/DEe3+eGqw9yQidhRVVb3MfI//Th5bFS7CU99NIHOwZ
+reS2AgephuiSvp1abfrJ8coJVa0e9FecX6o3B6e6mdflw9wzNewh2ECLjvSD
+bSnv3Odk/ZcXlNjwN9E1Ez/A6vUvc9bCBrNVH2/AOdMWG5Xh1pTeslySryVF
+rA572ZinnoUbM5+9MIGn1vb/MwGm9E/77ocPRHJmYuDw/0R3JMMjWZzLsbAs
+0LS/EY7y9KoWkD5e//HTIpwUxPTIhJ05XyTYYB5u8Tkjsn7hRbr7JJz253Aw
+6YsbEbdQCbfYGcyPwZKwbK9ueFdVfuA/rJG/jfcJeT/Y9g8o2MCV++l1K7BP
+jDzrCCycatiyBM+IkkfS4JjdoQqj8IEb6dk1sJQdntAMGxYkF4lhWUGyUTr8
+h0P0g2nYwyoqzwWWIx8tO/7/vcKi/wZ+uCyP
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.306417572928748, 12.091885689614742}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt0QtUzHkUB/B/Yaep6SWO5PQWopgeK4/kl5BnpJFtt9lGr+khpTgbtVt6
+KCLTS8VKtoNaKyOnmmjHtKtkW0mkKU4Ny+koKW1rnWW138v+z5nzO59z7+/e
++7tjHRy7LUyb47gQ/Oj89C1in85pjHv66IJ4HawpS7hkD+cOLqosgJngfPoy
+WBntHNJPDh39RwiX9J05NE3IuA5m2iCA7a56WrjBcRP+Re0mjIvWOIr94fLm
+xtxEWOoh8tkDy7eLa/XhQsduxyxYM7yRlz+VcT13fttTDEs0b1bpwsVJ4o6z
+MOMPy5OMGfd2vq3XeaofsH9gyIhxh3S/5p2DZVq3jkjgX309T5XBqsAOU6Uh
+4441bFYU0P21rFdtwLhpa3Q2ZlK/zt08M/gLj6iIvRR3aj+Rrc+4FZ7pnsHU
+v8Um0R5WN/ZO30p2mxU4IWDcSI6D3Uq6/2VBkS7iabm2Z4V0X+fJ9PXwhGvt
+GTvyjO0ZdXBgXYOBJZwa9Cx2E/qty/apMqf4H00l2pjv7urkEWvYqu+sz11Y
+9FWKlQPNX6UY8cN79DTjbu7w6I3WbBVc9FDvlS/VExl3zsU+8gYV13bBW407
+pRmw4cLWRzmUX1AkuQffupolroa5zh2ZtE+JXaXdfVi4qvagA9xk0z3xlu4X
+v+N/DhdEpV+0cEJ+TsRfNrBblOPgKvLuqI1vUG/4QPmxUFil2eAlh3UN4jPT
+YKN878V+8GVfh6FTsGyBIuMp5vUzKBXIYblib2wwvHy8LkEJSyS72i/jvQe2
+fBhqofrnllXKsB+zYUXGbTg1su1yPPYnTdkmo7iVieGsndi/OLWq/OP9n7fk
+h+sxLqv/SGoN5VeE1x3VZdyy+RXzK2B2q7bmEZ9xFk82KfMoP6q9PwCW8Rrj
+U6jftlcH9GC9kpmHY6i+/Pi+MR3GhZY4eogpXu8aZIB4Subyxi303pBdUYHw
+0oM1+mspf1P30W74kst6Y0/KF9xQJKJ/iql+HFn1otrRDfO1yx8WedN8afse
+62B+ZWviT35wefjM3qdwTt+T0jBYk3XmcQPeW2m7RutbqnfTuDEN+9CaWOFd
+Svn92mPO2FfcG2VJA9myz7gJVvyZPP6Y+gX4npyK/TZJoxdrOyMecLrKAU6z
+bpk9DzYyq2km+3ebfLeZ4pMEcyg/y+kgbw8smREvvYZ6gxajJ/NgTaEP3xK+
+KDNzrSbv5hXswDxXvJ3fN8OqOa/F0Zh3SVWin5riz/2lIXjPhwcS9TPYyrD+
+xXq8vypiMHoITq3vHrDHfgJcJrm8pHz+y2ra74MFmsIBmPOP3D4J+zdRSBb3
+UX3+VvepPMaFCa+MddC8QbKS1Z9hzg+p91Tkwi7+D1MYNy/I/R3Np7KN9BLC
+cfEdF7+neLVR29hkxtWoZbNzqP/S9o5BOOl9/+kksruP9Qzkq++sWBpL8x4u
+c9kLd5kGjofTfLl5vu/hgZG20yEwM9TquYD+peHNbWG0r5W8ghjMV9EX3xVD
+92M2mHth/nNpgrsf6+dXSszxvuffjGYfp3rz/jZ8DYvYL3mVNK96of1V7MNm
+yf7lLZQv80gIwL5uF8+uoH2Uhw6M9cJvIwXX9VxQ//cIXyH2yx5e93eCJa3h
+QhHs4ha9ZAesMd8g9YIzLggtkyl/Z+Dcf3H/pkrUVQararSnpMPRxXM9lHD5
++UvP1eif8GN9cA/ZZvP9ybDIsyd5BGbT19bT//Pxc/3/1GH/AexNIgg=
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.77471462238284, 4.811607900361398}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwd1gs01GkfB/A/IS1ZSWNclnGJURRFDaZMXoVdMaZYlcvQxoQyyi0p7BES
+XpFWKLQqly5zrFRsmWpdqgndhIg0Gwpp69XkUu/3Wec4zuc8zzy/y3MxhsGR
+vF3yFEWV4Jf8pWTf8LOCQ1kQaHIo2dM45m24TdhpuR3ublaNyIRTTXxp92D6
+52cLAmDlqoAqtyUcijPzpWUdrFBxVKkbthp40rMMdp9RromkcSjh7uoXS+Ex
+9VvnVbSw/lz57RVwJTO86zzsGsjud4YjzrMZbDqHYuzjS0PgZOuhKy2wzPcY
+lQ8zVu5f6aTNoQofxklb4Cxa8nQ1LBKyh0n+XMvPrl9hcWi5scNKzHv52tNe
+B5+fcSiKgd3r030C4Latt7ZehE0Ez26FwQLui4w+2ObdWyoITm053idnhXVE
+4lP/IfN9LEa/h3P9e8eXwOKOiXIt+E8ez7AP8ShDjaN0eNaTNlwED94ziNKA
+ZdI8t59hPeMFSYqwJMs3kkbmZ45wpYinfCE6oB/1cbTP+dXCnPcut0Vw5WuK
+GQdL7+ZdOQFTzpdNbeHJbesPZ8HqhfF671Fvp5xuYRHcZlI3ewGWJgQHieHk
+c4dag+HJVg+zrzD9TnCIERzflK63BfG5tYszRy0x3zMv+CYsYNdmNsBlU48N
+SL8Yqavdf4NtYhjlzXD3Kh1mCvyJtePIDl3kmfPf/njYPWH+hylYLPdbxmE4
+Puloa54e8n11t+w4XDHEHzb/Aft7NvmbiMSLKwm5Bk/mnB7vhUWKtyRr9GHN
+9LULkV908k6XCjg+0tZlI6wa5/Z8Fr7+9nenZFgoPbF/vQHqEQksG2FZeLOh
+AGY5vlL5SM5f3xq5BDjD2ltpKfrlvK3GLQZOjozK9IApu0m2HywsOL57D9xm
+5qK6Cq6U7fsnCWbIJLXTiCfuNFI8AvtdK2xpgGWzbEYiTC9pcIoj4zkDIbvI
++dI66W4LC3QXlm6AE6Wun7+gvsGXuUwNuFNxZP59mJJ2jHWT8z2Pd7MKZpzb
+6FpI7kPP8jMlsEzn6gSP1N/v7XkOFmR7P1CBy4LuRDfDyp1RL5vRL7aS/pk5
+mNmgppMKW4Sv4GxGfMZqO0c3WOK2prEWds05cVML7gvR3Lsc9fHTLpz8YMGh
+NJPZz/6ArXTsN3XDq2rVeo0Z8HCvSAJf1EwzjoL5etu1O+BY6R/rmohp9T8M
+wPoHrxSoGKKuD6cbZ+C0gp8ubYE5Y1v9jBGPehHNKoBFEWHDW2Bf6w2sdthX
+IexFJhy8OEpjDo7n88NJPb2WHhUMI/TfsaeUQr3THgu4LFhQ+uiAHexzbnqe
+M8wKlaftIe+Tf6QDMfXydTvpn8WJGZkd7OrXs6OBvDfP8xtMYWVH2lgH/DV2
+OlQV5mZ+cyD9byjxZI8jPr9EreIxPGIqqXkAV0qOMJpglnffpmr4Oq/E6wzJ
+x3yi+BgZjzeIjoLz6n2098GFzwd49jCnQDQZCNMZJ61nUI9TqcKcD0w9XVtb
+D5e4jl/0hXN7/nc1EqZtq/+wC1Yf8XIwh/OWcWyS4EFmr/0b9JPeas6tgCd3
+LUutgvu4Bwueks8rdpTEwBoJNzvVUA+fyj3rDjOm9Ld5wSPvU1ZZwZVcOZMi
+0k/DeT6G8K0bSv1vYFl3aiyD7KfuETlbY9TXKvK1hP+6pvM1BWbNMzFwgXN3
+zt/8AM51K90aAfsclOarmWC/EmzmiuCJtf5NbjBTfP5SJxm/W6Z7EBZ0jV74
+DvUY2ewVlJuQ9004sxHm5LcPN8KDdQ8vJMEhgx0h92Fh3ffiOtivrtfxISzu
+ts0eIo5N92mGR2bNLyuhv9tzTBbWkfjtzasN4E0mu22K4cl3p66R/y8N4ZpT
+iTD9flgEk8xXi2ncAXf7l5vRYVGAwiJ7uPIQZ+c01lf13JmhQ/zZhdVJzqO9
+TtE31CuIaPUqht/sT8p4B6ur2/X4w/amuhsH4bJUFX8dWH/s9rYBmH8wrfYJ
+6qdR0V2j8GBaxNMsC/LudTlTWJ8/N9TkCjuF9JcbkXxt13l9B3ftG/Xnwm3P
+3IyeLkefTUJ2ZsDKrCvhlfBhKtv4HsxQFL/NgP9pbapUX4r7GTMriYXra89c
+8oNdX1mf3QcrP7p/rRoWuvR5J8KXZXRbGTzYpWWVDz9+1HfKyRT7Fab18ir8
+6503h9NhoeWfKUPwiN6Tm3/BlcUnW2nIL/qjX6YMHgzfLM+FhT9nphua4XxE
+mv14jNz3ruvP18OiGufSZviXvIemXDhj/0fVWbg9dNFlb5hyTJEsR7+yDLOs
+ybjYYXwXD05kf53iwFZ5M5I9cFjj63pzWFl7y4FEcl/KrTJUyXjF0fhD8MTx
+q63vkE939o8HhPD2JR6z92Ard80Ob7J/zQY3qmCKHrR3Bazs65qUDfP7Q1+R
+92lkc2BZHKz+6IutGN7+i6lxGKlvCe/vQzAnvLomBKYbfapfC4e1j4fuhTs7
+3pdOoj+DPZT8r2T9RNWyGtL/j8sLy+H4oJgz4TDtWEajBGb9lO6yGs6q1Y6R
+R/65KbxxBfjtJabXBlh9kXPE0DLc9zuBwnQ4uZq15CEsFvecfgzHl8ycboZ9
+mEa7GUzUe32ELoGlTh+d9sKT3Ys/DcAR5oHFN+B/v6/BGuT7mjnn/wREgU0=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.069228614102805, 9.329740963760747}, \
+{-1, 0}], LineBox[CompressedData["
+1:eJwt1Qs0VHkcB/Brle0lgyGdmpjN0ANZUx7V6GZqdlWkySZ7sOMxoZLphV7b
+VSqVMiWsZ8Oi51pjaaWsYeymUqP2OLamh9Eg9FAUStnvf886x5nzOd///c/v
+cS7csFix9AuKoqT4JZ8MRX549H8flCVNFd8YjhDATFjp6rWWNOO/KXJRIuzs
+4nPrFPKbnfpDN2HJRd3pKtgnjmfJtoO/yGz+E+f/Du4sCoHbthqpSa73HOgp
+gZmWePI8wx6YV91DcpEqXIy8R7/fYpY9TdHsF1M+WdBMuKJEFAw350VK0i1o
+qvz65DfJsLPRA8YauXtSjc1FmNL6rFewaeabkEZ/FVw2oXYuh01TE8UPk26T
+59NcN+eY01SH+AS3CWZczPbYmNOMly7NRA33dbzdojSjqdhdz/OUxDk6rdiM
+ZnRtW+KzSD2jxgXj4C5RsXwvLL/r+0eLKU2phE5mpD7WyAL+dfiEm/VSAckr
+uN3Ei7stN1jDkq6FF1pNaeZoimPFWFhlrJkxEd9X0d/s/Bb9y7b3dvjjfreM
+9LxOWHUnqxj1MHHlryP0MEuSP5+D+r3HnT/2ArbJt71xGn7eckUxSnJn6Uxj
+9F+eO6rikP5yDbWH4elqlxQR7Df8y+EPmMetqzrHXWQeljKDcMzz2aIsaQWZ
+l9qp4Bp8jJV/5j3p59GTaIrs57dKjWAWTSkyl3s4YT/xV90GjsDyraHdXvDW
+TKb2PkzlGEQJ4DNWDV3TZmM/quR6Dp7fe81pQSgsfx7I68D93ueXZitI3vju
+Ltmn9e7gFf/AfjbrBl3gcKukO0ZzUP9I+mUV6o9PTWDNhfs4m0qEqH9j+3HZ
+MtimOtCsDv2fik2vF8OSBO33nvDv5275r4Ppge5eFeZX4RHWu3oO2f+uQR/M
+O27Evoom943ftriH7CsixGcOXBaZcT8LPtS4L2UyyQN++vQD9jXh3clTr1Gf
+SiocvwSmLhnmamBWkLezO87njJ34voz0M6/h5Erkq3xl2nRYJjPgJiA3rpsS
+ysCS5KK71+DNo7yQbXBfYXGiOeqbUdkUEEPuZ3/97R7U12SULSM5Vdq//xUc
+OmIQdABufjc0Lgr93dReXJcHt3Ff7muHS4T3ZqrJ/CSBsesxnwJDnUk/Oc/3
+O9uA+cnldkNkfrLKDwu/wvtSM7gsYDPsV3XSJAb+uaHru3LS79SoqgJYXzr8
+5CPJW1Y01GAfNpwDV0RzYWZ+cy3sKXI6LYcVyRkZ53CeK0pwaSVuW/N2J7yy
+OGCPlQPqC1jb4oDzgR2bjothqsWNr0E9hbGFzQdhBe9ZmwT1ehnunHoJZh2O
+2diJfmqXGxbegP3YrroIvJ9GdfHTH5Dz2Z5FOsyrMSyo4ilM1/J5YbCvqHrS
+I3Le5MLlXsz/R9VUDw3MDFnZHISXtv+qrHYg7ymvyQHzd9u/SKggzz+WLnjB
+wvs3RvgxES4rvf1GzaKZJKMU0zBy3nZJSiVybpVa4wXLlcrtdcjPCMMT7BzI
+37eg953IR0TPHE1IfzOCvW1x/6RAX+1nMo+WDblx8LIdfOtBmGk86/4Q3u3y
+1GMYpjyiLqzAfiWv8kfHkvt3eL2sh8XKIg2H1Of412UB+lfM7kul4b6rwp2V
+cKs+ujQGbs5MG7DF/Aa+5NkXkfkdTeQfwXxD+AdT20l999Y0tcKRKSqevSO+
+r378NHPsZzBSoI+Fy/jRUlfs53GrMrMabqt9PLQEeaF7wOAYJ8zzvJ1gHnIv
+1881q2BZ9qPqMcj7kz7VpxKnpVvU4/4187tMm2DVqo7haHiU/Dj9//+DTf8L
+sFdb8w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.776116632202752, 3.615966322027525}, \
+{0, 1}], LineBox[{{3.499999999996362, 5.499999999998181}, {6.999999999996362, 
+         11.500000000001819`}}], 
+        PolygonBox[{{5.552322615314452, 9.01826734053906}, {5.293188945044921,
+          7.780184249251306}, {4.602165824326175, 8.183281069670574}}], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.515942703607427, 8.676200089562332}, \
+{1, -1}], LineBox[{{3.499999999997692, 5.5}, {10.49999999999251, 5.5}}], 
+        PolygonBox[{{6.4, 5.5}, {7.6, 5.1}, {7.6, 5.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7., 4.5548}, {0, 1}], 
+        LineBox[{{6.999999999996362, 11.500000000005457`}, {10.5, 
+         5.500000000003638}}], 
+        PolygonBox[{{9.052322615314452, 7.98173265946094}, {8.102165824326175,
+          8.816718930329426}, {8.793188945044921, 9.219815750748694}}], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.484057296392571, 8.676200089562332}, \
+{-1, -1}], 
+        {PointSize[0.04], PointBox[{13.5, 12.5}], PointBox[{3.5, 5.5}], 
+         PointBox[{7., 11.5}], PointBox[{15.5, 5.}], PointBox[{10.5, 5.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T10", " ", "P2", " ", "N20"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdfei/fiijghgjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdfei/fiijghgjhj.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:eJwl1gs4lGkbB/DHKYfEVDZp7WdyihxLRKkZLR2wOWxpiiL0RSSKbSqHWacU
+orZCSbPSSZlmk5o+rGlTCWVWLEUMivbLYUixTn3/5/rmulxz/a73eZ77vv/z
+vjMWBx7w3iNPCLmKP/pOxr/iNZ9N1CkWs4lkt/8fB+DoogyHuTC3dij2/Tw2
+EettrbeARU2rHuyB+7u63bbCacvdTo7OZRMT34rWVNi+5njMOVhRds70ERxQ
+0+ngBlsHvM2V12cTqayuQhv2bGHYbYJDkn1GJxlsEvt+6Zsz8MakqfYxWPQv
+97Vv4eyXjUfUsF4rr3S+sQHOuz7QsQyOfqqqGwbbv8x3CYNFXdPsYljcf820
+FA4IWFPcBYv0PSOU0G+Td4dE0xDnp189sROWnIjMsoFzc13u3afXr6lbusMy
+DcG36pifu787dDss+TqttR1OUxs77AsvzPlmcx7Myf0i/yM83q0xWQNX91kZ
+OsH225bNvIOJryJnCWzypVzlI1wR6BKhTL3fovQ1nP/J4HAPnadPLUMIK/of
+Lamk/W46qRsJG/65xT8XvvFksFsHDvn+TnMMnXemcZ0Q/ZJvQhw5sOyFUrgd
+bH4wON2J7pfKOQgxf4VdS5QNnFsYMEsf9stPdraCGYMjydnIN7mwcsgW5noH
+phG4WuH6wAaY2VN9Y0AD67yXO+2BrY/Oax6ag3N8ZmIy4eyIijJNuEaXebUK
+lj42Wb5FHX24FsZPwJELg4R/zEafd322OWJeqZpz+y7YPDJkVRLMLKzhLYXb
+Qz9P18P8FctijOB+5b+2axthfbOg4AeYYXrlqz/smZo56zI8xZq+WwRLAocV
+tFAvbVJrdw9s/Tzi8FV4xbM4u0XG6GO16gI39Gd/LvjuBpiIE8WTcHhfwP19
+MK89qKcE823sdjiTCItlNW3bNOl9ajA7Cw4oaPCTwda9pruyqSMqQlbSvG7f
+WnMcth6NbdsD+/2kXBsNcxf0xPBg6SJxyg445KTqeDKc/SHPZRUsfJqjdhCW
+Kfl8twC2l3S4b4Cnqv/aJEP/aRWNHCV6XXRGpw7m20Yc8UV99bWbm27Awqif
+m1M06POy6Eo6zD7629pszDOlkHckhs5voxefiPlFs8LlQmDmeTffPTT/haK0
+YFjmf5e1Tg3Py8mg0TDqVw9f6avieWu6dT+eelo1j6HCJs59UbX5tP6JI6la
+yrivYw+UPqH1xktu2s1Cbpt+TBqHxWyvxjglNtFdd6rHhubttMN1SBHzCvYZ
+/ETzkfgWnILFia2bKmHmXiPuTlgYaLNUeQnmOMTK9IVHA5cc84J5jZO/psIr
+3B4P5sESown+GzhS8h/XDpgxueSpF+qZc14n6Jrg/NDDbe/g2ARBlTfMs6pP
+Tkd/yUHZWQmwxOFrjiP65zSYtf4KC/22xw3C1o9mZCLYc3Xm2RzMe/uh8/Vq
+mHirXrBEHgFW6uwnMLvtsMotWH2Xf0w5rde476AS8ssIKoi4QfdPJktWwoqL
+fO9l0vP1/iteA3/wtmPuhxn5vmVacPickOcbqX/R1ajAeTyPqkF9mKmbxLSF
+s0dI5zTms/YdNklCP2kfLknbqJufm9xCvzWJYp0qWPZ79W+lmE9Ud/vITZj9
+ooFfhPkdLQKL8mGy2qOO5hc9taWL5sc3My4MUsA7+TKnkO7ncF46y7OJu/L5
+s2Ww+P6OOhs5NlG5pRTSBEf+2ynJgSDPLD3FGXre+vqu8hkWyeWuPLQM/Ur9
+nuV4TLPwfNpy6HxszQdJ9lMsolg0NHWHOqMjIW6SReqtVgSP0fXPOJcWw625
+93c5mcKxLxQMYU7KvMJ0mK/GmUiA28UfpK+ozdbpWOA8aei3PdpL8Tnophbq
+0Xqlppe2wkTp0PRG9MMNK3NJpz7g55n7lUUYLR4hD+BsPsmLQ/9M95rRVphf
+IbC1wnxNF31dh2DGoy8BLXL092rz2oml9PdHpSsceYTvFX5HbS3gs/tgrqt5
+MV3P/kHZhIX8zD0WzGuHeT9ziiPgqfNTPWJaj7QnRcHSTpeZy7Cs9916F1gc
+f/zYMdr/av+Yv3Fe0/Pd+bR/xthMij/cX153xxoWqrxpKkY/XL1nExpw5FxN
+ngT9v+uO5Y/QPC60BgkwX79KZfpbmJjllWUij/YlDTv+hJki7XJP5HebGbK5
+gea7QyFY7R8WiSzhOrbC7Nml8i+/sMi9fv/j/TDP6zFPMMoi6pIOHXWaz8B0
+TuUIi5isGdtrR+edU6E9e5hFomtKovfRfFO7YjcOsUjT/qj2a7A4OszPeIBF
+JPnlPX/T9VlWipUf8flGbT6xzAzXzRhz58HhDZ4Xj8E8nwI3A7i+M/TlEzP6
+fXWwqheuSPnQPMcctpUzdMN5C33Gj3nBvHcXztijXuvq96JTsDRz9qMaGYuY
+f+LWPKbXb/fN6KBf54LTjkMwUTyVEvcJ/cyyVGdYoL6ch7YU8/HCvAqMYH7K
+DZ4l5o+Md5dYwSTTP9BnjEUcC03HLGFmZNvI+nHcT6ct2g1gnkAiGIb9XE7f
+06Re8c+wK/JU0a/XGqX9Jp6NolaXH+1spPXbrv/yEevze7psBHAAN/SyBez8
+6aN3GsysfV09H/XuGetlBMH856smiz4jn5gR/XV0vvwnDz6i/7M7D600hsUC
+fsJn5J8R33tnLp0327a0CHn0v39mOIv6oZKbCfKTPppuUKT1g7XEF3tZRJQ7
+mKBB999sKTPqRr62ClkGdH2C09OWNhYxHB7o/J4600zNoIlF2MUdHRF0/+Na
+YUst+peeP36F+vfis3lVyKP3u0gpNT/sTGMJ5gkoaqH5ECG7g5GNenoTojBq
+tlVV/v4q4v70VWcZNX3xKv///6Ml+3/dxt1U
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.87623281688787, 11.409748320682976}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl13s8VNv7B/AdDhIZUiRlCFFolCOKZgip3NPlUJpCHZdKyLU0SnKUTDoi
+lEEkurhGUUYSR9F0QblOkooIqVTo+1m/n3/W622tvdbzPGvvtfeo7Tno7CVC
+UZTJDIoiLfX2N/70WdQIaRegbazvbYTZZedcE+F+VY/F8TCnt2iuEVzNUtll
+AzO+j70ZVmZR7WxnzrQeixLmp8VWw2cD/K8VwXT12U3XYAuJIws9YX6Xz183
+4fjvZkuUYP91luVP4PeDcymBLtabLnYRxfy6cfHl8cS+55McYP2icpXN8AhP
+f+QGPO3ukq8Gc7QUFJRVWNQim/PBP5exKBYnbH4CXGu5ZEk37LhQsVxiIdY1
+0Rt4AvMkVx6JhDNnGgY9IuOH3aSH4dDn4aKN8Ei2pavTIhblEGX+dytMzV3d
+kw1vWyuQG4D9+54/eQOnxOaqimJ9x7hyI0lVFrX7wNxgVZgRX7FiLpzQt6fF
+FKZ1Ph+SgF+cCB3bDlMNa8qEuL5NXpZ7COZ6y33hwXJdFsnRsH/ji0Wb4NgN
+J/S5pF/TKasX8T2T6G1KJLbSL/WFXfp6HU6T/Gfl6gwi36aYOdOhpP/fCPO9
+sCBNmOIGF67w8ulFva5LO7uuJPMb/S3hBe/vTvhCwQLrUsMvqL/B5Y0n65Cf
+4PqphHMwPcT1/HGY0xAtagmX3VMZN4GFJjkZMrDyZeuqoaUYdyc7aGQ+iwrL
+ldLmEd+0ixyCqzzOHN8M8x+XpYhh/LFvt6Sl4JH996MMlUndXPvqdBDP84H+
+cPjv0pVDsTDbtSfyJaxDf1/pAhdeDtUzQ7xXHBujlxI3fmIUwrQ3V2bPgmkH
+JbZqI9/6Rbr537SxnpiFAQ82003QH4JZCtau8qiXkGHyi5h3dtPVMFLP4bLp
+78QX672ewa3Nfg9mYj4qbyp+LurvHVQUrgYLpkw/W8Bqx8OUzch6a985b4MH
+nHu8XWFGZ9G/5H7pEIQvCiGeNL9lAIsfPjnOhbkum6smMP+M5rL6HNKfdOND
+Htw3WpNfQvJps9hhBb/+FjNZAdOn4hSfI/7frKGwUtIvcqF+M/xkYd0mcv2I
+eXniU+TvYilKOw3z30z2bIQzw753eZHrB3oWPEb9rO7aWxmR9WgVR7bA9/0G
+108hX9rMqP+GsT+zhlvtq+CRDi/NNHh1SZ3yYZizx7l3J3xmxqtCHVgoF7nD
+BHYr87HsXIJ9u8YR6sPPPg8uSoBHLspcWgvf9bgXYwkzpsd4++Ddu4xzp7Uw
+n27Au6uwwKQ/sBrmmnA8J8l6fmPpsTCj/4fJbsRXN782wA2ma7k3P4MPT0Z1
+GhM/MZm5Afld3WpopwbzIpT/qYGTtzffV4BH3LO6/0R9kq6GFMvD1PuVDWT/
+e+9P/akM+4fk+k7BEdLGwzow/9+40+tR76kzg5osmCZeVhYBz9sbJ3Ql86+R
+906GbZtmjISQ+EQWG1yEUxWvSifBjuJfyzjw7Qyz4VtwIfWh2h4O0xL1ekTy
+WzVv+R9w+4zCQ61kvZT7/blYX7nTw62bjDdLvLEKrtp99kEnsay5WBXyyVsr
+ViiA2Y7S48bk/LuUmnEHZu082laCegj3vjyZTOb3y1BdAS9J3CPwIfXxMle6
+g3oGXz602xAW3H16ww6Oj/5+8qsm8n9tuWpcCefDdr/3t2D62yjrQniMHRfm
+BXPMF0RFw5RMt6cSGV+z/kQAvCZC7nOjBuqRZdAcDpsoTew+BgvGfR+kwxVV
+fmOrYNaK/3Jb4Ydn5uV9W4x6fVtfqYn1o94tWn8P9u+02hYD/1rRZBpP+suv
+y43Dd+K6EvbB7JvsUW/kk9Vi1mILC5gd2b3wzc7rOmbk+m1p5dtRjwf9HIYx
+zKv90PYIbhvPUiT93JeuEuT535KSyNtI5q/IaA2Bowxk9XfBjjuXJRXDpbGC
+llCYVVge1gIH2J45nET6O17zu+Gh7t2NxeT6OTv5TfB0fsE/zWR8wdnhLPho
+l2Z4Pxm/f1nXLnhF3dYzEzBfqKktAc9X1RsVQT2oYJG/0hHfZa1OPTHiWlH+
+Yjh1xwLdXySfeoFlFvJjBCtav4c5/HTGQlhx3jm7BuKDquMXyfNV0x5/GS6s
+aR9cCMe2ZzT4kPXOmGneRL0PZCXr6cPUfZ0lDvBv42N2A+owk8kXg+UDP0pm
+woVpMl3PFNG/LTPCBRbe+b6vAn7QHPVOHGYdWWp4B14lXXPurhqepxPx4y/g
+OM/qe4dgQZ4cUwLzzfE7wNEnbjVOd4R76t1LxuiIt0A36zqcyffvroZZy1Yr
+KyLemEviS5KJb89bfhqeVD20LgwWfBrNFCXvl8+qgXthR66MWAR81G0wwp1Y
+uGdsEE7v+fc6G+adeuTohPo1nt3T50vm65xxPBfuLIjKiCTzVYWlvoc9tuVJ
+kPVGjFedlsN+RFczJUtIf3fYOnXYJs/ESwBz93vUKxELL7z4RPotHq7+iusv
+1p6TF0d+DOXEngqY175dTJmYUpbcC2t6bKzTIvn3R0/9Rnxa74r4S0m/16OO
+OPL9oq7xQAOm20d5zoI/3b4rogALRZ81kvs/4PklgwkSf6RhuAg8LRUZ8ozE
+y5HpOIH6SRe0BfFIPQ3NFWnwx7Xya0h96JIxbwqwH4OX6lka5HpOk7kb3P3N
+K7sC3xX+SZS3Gpz3YeQrHS78Mh5PwepH13w8ifdQobpKy495LCrcbpv8J5xL
+9Jbv62TQb8yR/LENZlh08U1gsR6xfnLfs/WkVI/CRic+lDjBjq9jjF7CpdS7
+K/2oAzesWXwN4psU/FqbAPOda3rJ/vdF2jLsSH/FVLYG8qOZ5ZqqwY49vm/T
+YZtYrT9nwf6BCYY01Kdbk/VzJnmPp83ZHQZvDZ0Tu4DU/Ypo1gvyPbmAK03e
++1x705fKaAvD/cR9SavdmrMJrbVHhm8mme/BhbseaI2OlbV0oGUJX9XtRlt6
+RKV4LuKncZ+mWME2fs5BG2Fh6SkNGiyu8KL+MOw/O/FgLdbrrcyoPg9Ti+uP
+7YF30LbPyIR5o0omo4ifozprIJV8V/l1rwgiz6OsbsExmGW1/+QI8k+18nO3
+h/lSyxJ9YR9Xniw5FxwjIhoGSH3DLaryST77FHwCYX7fBZs1MMfJ2kkKjl74
+0aeSPBdJJZUl2K8dB+vi9WHOzuoFgbB72uH8FKzr+KNkbCM83LJj4TTWcfRn
+lZnCD+/IB3vA7IKIShtY/v4mqybM69+vYnYAVugvG2AST8u7FsC2T0c8q9Hy
+jVSWT6FtnSjUdEBLX37k6y6MU/r9eXB0Lup9MVD3KZz+viHnGsxXLG60wjqR
+oxvdQmCafPbh+3Bi69LFbjBXy6hqJeK072lSc4F51y4582BLbkUim1xvHWj7
+G170cKLjKCw89dDZFnmaXi3Lz4M5SrdfnIDzhgoUu4hlS3Sy4dS3fzyfh/go
+dnhFHhwacsfeCabVPp4+Dw/0eP48BftbjKV5wQ+Wn/K9DQuyP9uowikaw4mv
+YG7O+bparN870/rDAHG4/d2tsPB6L/f/nDiT20nu5+OKx1pIPRjVTFc49/Sj
+2Hwy39e3C1pQjyc5ekHeMCfoR5IzrKDo9VMeLpz9WISsc2BBYDXJh7H+3S4f
++OybjSw9YrNGldmwhc6R8mwF5KNpNvAI/w9yqP4hC7MbKs8lw+rL3m4KnoP8
+HN62RsHTyoMrO+TRn0vzjIEr8tnr18H+AXK1V+BQ6tdEsRzi7/tzTwecfrpu
+nz5MqzudswTrxbZ0G9yhwTtPisbA6ml8260w3/vZsjFY2bSuTwJmON4x2od8
+uLxLcZdlsd6KqfYecl6sXpr0F1y4sfvqVtSjiu5byYQFWu2sR/CRo7u+2ZHx
+gzEpOqhn9KT0qWOw/xEp7SNwusmlpc0wvfEx/S6s//HM8vlYT/DL9IIQvu01
+0O4ECye/XCK/H4qv/kw+A/u7FnmSfiORi4KHpP/FgVXke0eJyZT6BrPt5fGL
+D+NG9BRVkC9j38eyxeR6602WK0k9upItKsnzqFQTZQyzajN3WMIvzdOjdch4
+H93XtchP/uOvHjHYMWT021ryfsypVGgk9bHI16hEffTbBi+E0cj561tnBi91
+72hQgDnDx74+Rr1ZEs/a1siS83GTsw9cGhMpy5iNfOUz6lXgFB2dRBkZ7Per
+a5792OcJqZTizlnIP5e9+j9YwShmd64U8ljeZPkI/lR56HHgTMw7ZcbugnWr
+2r/YSZLfy80bZTBf1WcrZzMJxJ9jWLyZPGfPLQ5vEEe7ztzuBvzwR8Ct0D8w
+/8jY77mIVztb7flTMfJ9kyz5Dyyt7zXhBFNhYoYzkG/FaxkvCqazS+aFwS//
+aQ1qF8V6+UybQdglaX9OF8x/Un/ZGfXrlJUo+gPjHUvS9+XDprU292zFyPn2
+MnUYfqV5Jq2ArHfqHwkV7Efoz1JFZcQjnNMbzIBfZa5xTiDx7dz5cCm5X14m
+qIkgflqo+4AUeX98vhrsDXNueIs8J/fXXwf4VcTu8ibHyfdmcuOGcZh7a+Ht
+RXDsybVnZ0qQ+6MnjLwvqyaCo76Lk99DDgZ65P11496ju+R6u1KRa8jfdGig
+xUmc/B5T3qIB5wmZ0vcQz8gNiSTyPPHVD+ZNI36exuCEPsxOmSpSJvUKeLu+
+AfuR1ynZNA/1EAjW5wTBVfO3T/6YgXFtqzxWwZ6eu1yeUKiflEa3PExvFrfS
++82kBIrCPZJk/wNeKz2cZCI/N7oSbBy/eNvBn0yK3nFZ0xy2sUxwZk0wKbY2
+3S8KFghtqq2/MSnaU5HhFtixkyvOHcf1N23qVyM+yi6qROsLk/JffZpdQOJl
+bv0tN8akGGJ7M9XJOTVT//iWUVwv5a2dRs6Dz1dmjY5gPRfdGFny/ZD144oQ
+phZPhoaT95MBr0oF47kJZ7Xa4L8v7QlLhUe0Njipod7GKkcNbDE/ra8pZgus
+PTuVUsf6hbUCq0MwTYsVLIX4GH0X5geS+yHfZMsXWJA8eo2cp/7rH7g1fkX8
+S8SrtWHh1Q+zIpEfvbXCmJw33LizvtMk303zf3JgwdamErPviGdh8X9y8Pad
+qz8wYLqqovYF8h4oincQYDxHKWzRHJi3+WiDIsyy2ClxltTjltZ3cbKefttm
+aXj7PdqGTMTLs2p0OE/q/SP56RDyc6x58H4JOYe9qvqGPiPeu30BzTiHGefo
+P88PYj76uhNxc8hz+FR5qB/xqOffdyf9q7Y+XdALD52usYWF3gZ9se3Yj2UO
+MluIcdMqPmNS/MYakRCYcj2c6sxnUkL5oQ+FxOTvwr3/bxVY/wOFNAsU
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.181526323287266, 4.607704332175082}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.00000000000182, 17.000000000003638`}, {
+          14.000000000003183`, 16.500000000003638`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.892040876190137, 17.440709485718344}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwV1Qs4lFkYB/BPJmliWS1qd8o1t4hRK7n1RbVSi25yazGW1LhtbJEupEzr
+UYaIooxmSHSZaptUSHTdSkpKmUqiZhImhHLb/5nnmfme35wz5/zf9zvfMwac
+mDVhkyiKisKbXCkG+bCmKU1yZdFUpKrHcl1Y/3mIZSmcIXd1XQwrsjSCFs+i
+qcZiKm8bLC7MOVgPx3Jv912D6c3i0bmzaUp6njrGsMH3k6sr4uAMF9GjeXCj
+fYooD/4hLVPZH1Z4x1kQD55X/LwP5lck3iHzPf2bGRWwDR01jw3PqJ/oeAjX
+hndObcZ+jPEsaxncljWeFw4/XyK5OQJ7v6ly7EFefsr1fhU28gTSg/FwAyNN
+OBXW3GX4QpnUp3zOjgHzXRVc4S80tfSxRc4QyatetzAAZhX2aneSPKdiHNmw
+iVVQXANZ/3JzrjmsVdZdcpnsf8nAdTlclSK6X0jq0XEcToN9zXaP7Cd5S2m2
+HP5+4sLCODhY+NQrAvsP75niEA6LqTL5GFxaweYEk3qFr6xOop4I27fHOXCy
+OCNkFeoXSz75RZE8fsbcftjDmZ+UTLxoa+ghPZpqsdblFMC+h1uzmPo05brk
+uaKK5Dn9IpSGg8O+CN7DVGq9eji8fJ/kqDrqT8iLHkqEB+5Nb7CHZ/zUJEyC
+P1GrZ4XC7q1tlVzYN1Pp73Q4/+ycryvhUvaPfWfYpB9D0/Vgnz+l4/dIv01r
+3J4gD7M4PvI16S+rm+cH13Xv2i+H25qOdL1F/vgtiTO74eCaK6lRsMjr/h4Z
+LNBZ08eE7UQu2VJijRvSG+jHzhJe0X+wzcbav7JhM/0NPv/C+uvlKjyYauCX
+F5D7G723qQim1Uwke2Hx2PxHUngS43Ael8wfKi9zxPqBgVrevnBjjNX4FZjJ
+OSn0IPnXt2SuRF671pejbqS+JNOzPbBooafPMtiM9cBnFemXxYCFF8kzI8BZ
+ANsmxkeHkPqCsvg9pP+3ew8mwbIckfV8A5pKj5mTWAgnX8jM2QLrp3Iv1cGq
+2SvUsmFpZQT3M8nPfPHuFFyYq52va4v+lPISK+Btm36d6QoLVMr9j8N9J+mX
+m+HhuyzTPXCat7AnA5ZVu6ashdvtna+dhvMPfH83Cw5Od1a6AUe8tA9pR76O
+kWrqIawqvxpfQu6ne2diI0zvl5aR+x0+pfEyGZe90fZdBA93KqXcJOPWqWFa
+cJ1e2WwxrOnXMtaP/ghcEhYcgxWHjZ91wPynXHEKTD2T1X6Dt/BGTkfAjXb3
+kmbi9zaP6+nVsJlB8ILfYHFV6Q5nOPafvC+pcLQGz8gaFvMWVzyELzoXiU1J
+/q6ho6Sez6PO5maw99ytcVvh7I4AHTbMf//63B1YcUxzB+mX6jSnR9qGeP5/
+j30cQMZDdYsD4FUfm7R2kn5KzbNyYHHHlKfFJI/13SfVMCMsyO0B2W90e1Yz
+bNvmwBkk+X8Y026FPbocNAzm4/n27LrbALM+smxXwPaDJpYX4dhZc1oj4TLT
+0gc8uNZBiZMOBxuMM9fC6yR2yQK4UnPJgC6sUE4IO0fWe58x+Ar5RxsLb12C
+za57FQngDxPRLWLY+0T56ij4jQOOBpxwKoFaRvpRW5edCyvcfXot4EgLI/Vk
+2H19zm4Dct5sWiSbyLjhuslk3KkkReRJ9t9oVrUUlhTtGLQj638+dDUWDuT3
+SgxhTbWd1Bn41sS6q9PJegwNQT/c9nXZrmlwcsz2djfk/8As0CGu/KZ3IB8+
+omrPIvNbKmKmdcMuk4QnjGDfYrnMyYim1JJHTJxIf7otP6bCloc4NQEk38QG
+/xrYP3fjGMk/PF7whxwe9nQxLIdlXb4qysY4TwPmVs1kvbntCUx4fAIvWJX8
+fxnT/wPf+3c5
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.393275441506763, 7.232686837739852}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwd2Hk8VPv/B/BRXGsMWcuuLCUmylWUkSxJGpW0iOmGuiWmhTYydbWTpULS
+NAqlyNKmkhC5FE24KGubEL6TRGnxe71//jmPp/M5720+58zB4K/QFYETGAwG
+W4LBoCNjeBw/k9mMb3TUZzOEmwYEp1XZDFZHZrSGAZvhyxjgTFNjM5iM3E4j
+OOfRkZfFcHxwwJ/TYM11D0pWqrMZPS89WJpwo0it6j2s+fSVmOIVdco1b9NA
+vLR2vTaKv7/a6QPcEpLfngvzLlV9XqaJ/JvXFYXDItstYVfg4w8XXLCFK/K2
+mL+HOXNawj7p4fc9ssuVtLBu9ugPLtwWxf42DeZoXqxq0mUzSs8mTTOG2Rk3
+G71gc+6zq6qw2Kn5Y5MO4lkJtL4gHj96t+9W2Nwm7kEFzNRpHFGC7W/c9oqF
+Gf0ZxTXabIZbh7yUF53XmP9fGtxf0T1LFY73Hdh5DI5+4TCzFf3k98Q+PQm/
+92iwvg7HJ/r/yoQ1xzvNjsDCmMdLmuF4ef+doXT+w+SRqcinOsn/Jc2HOdfh
+EA9+P/+bRwTM79v+RAT/DJfTvAxzJB5q2aKf4OiMI+0wb+xNUjr1K06RsqD6
+6n7byGAe9hKBMxJpXj72qpth8TzzImn0z61zTb0PxzycWXwKZuYF3/0B59/J
+uzFlCvLds5RQw7xjzF1O5MPM5LEv+vDiU9cUl0xFPJ5pB3lO8ZVXnfAardtb
+VOGcWuNUHvoqHTKJHEU8bucZh1E4X9yvlgfHl4YbUV+isPD3XrDbcKdlCyw0
+65Z/h/p354jGzXHkVVdvCcKxpfqvb8E4drme2NKFdab7MtYmw9zn7157w7tD
+w11yqO+ggMfPkMc0fMoTcvzRN0xXeHjg0PVUur7IIuE56jw+rzZ1L60fnZ7M
+hVuiq18tgfMN1d78Acf4n7ZSofgSIdvL0bcwN6P2P+Rh/O29/hxsnrRW6jys
+v2d9Ix8uVpKx5cKlN10YR+C0ZttUS5ijvHNiOhxgvF9Onq73fyHdAPdvKOn5
+SvOYaMnRRL4tnZ+GhmBW8ETv7bBtvbKpJNZzR3b01sKL5Xm3ZlD8veab52Jd
+13KLriCYpebaKaD9N3exehHlS5D1lMKRHV/YpY362b8uvNgEtyXX/kykeSwP
+bLgDdzWN7tDA3BkWDI9RWGz4X34WXNpZ+2oa1t2e5eOrS/dh5+ZBO7i8oES4
+FY7feuDjfJhZv2v4DpyfPaxnAItmmrB+w6zBipFBxNM2llnmiPueL/pZkwnv
+jWPuj4TZ8zcNuNIcxqZYFsCcQf3jLah/UOmHfSvMCOFHrodnpA++GoNFTXoO
+/6F/yaz32UqGqDvb8ZI7/JvjVK4Fc/RNBKWY58hdqWwyd/bxufbwwZT5y5kw
+X8NrWjn2dXewrvQ45TOuKV4N13y1Df8I85zm3vuF++LnTmb0M5i5/ZHcA7pP
+1pq65MLipSvq6L7vuK/TdxrWv3TXcD89l1hVgp3UX9VV4yhYMcwtch1cWp76
+9QK8Sk5ulxv12z61oA62mh8xa6EB7deQs/TccUndJ7OA+vNMV94K8/4nwXCh
+/p07R2rgJst3mWth1kF+qhX6UXV4NHUv1VcpoZAGB/lfUk6n/CPdrhMwjxJt
+z+oGuMs2MJj2c3iqki7Ni6WS018AZ13LifeC2XsKS4fg1fWmPudhES8hTg/z
+zoqICX0Pi6fk1dP+Olj/4zbLCJ+vk5vYGm4T248cgIWXHD204KRzpQoVcHxl
+nGc34on07L78MQ31pQ75pcHX/+x6vQjO15zdtAAOqti4MBwuFfE+1KJ+xYC+
+z5fIm3J2c+DnG7ZZPiZnZn+vRv+sR8WCBnKl7hIH2Hjp/LXtcHz30KY7NN8L
+93raKL5f3qLZ8NuQJkdaz8xbkn4Pz8GxuT/ul8HCqK21HnBh1JLv2TAv127f
+ML6H8mvtemPhrvrkswVwSU2sMJTiX7eyOAp39yxd5kX5v/zasAv+o2JQZy4s
+Tsidtw+2its5Q4fyb29oSIIf9Kzzk4c5+9Kca2D7OycCJGBu0b/lTHouHyg+
+x6B4zxXuBcEZXzf3ydL5kmufquDixUfFFI8ZmX3LEv0MvyqvtIf5JyR1zlO/
+IY7qQbC+wclp43Cd5iT983R+XUyfL+3nB/IPG6k+JZXuXNg3zjBQYzrynj+g
+OghnJSms8IeZFzKM6LmuUGR/8DosGq86awn/9pGqGIE5XveazOGc6SZDjsb4
+HJ54rVaGfaVfvz0Bs5tjo9sRr1y8IfE5rD+t6WUibONpPEfGBP0w+wTW9D2y
+pszZDuYnvDF6gnrr99wWBMDCwnWezrDFaFbEP+TIOSkl6D9Va/2pZDh+yokW
+a1hGbNAjhPW9/2Nexzwb6zL1yZySTbbG8HNfzVlJcOljI5lcvHeUX5cIiqZ4
+XGb1Itg8b2p4MJy/z9LkE95b6sV1bhyK91hCPhvmRsmMzIa7Vn/bfxBWYC7I
+mUz1HmAdDYY7dPjnR6l/71XzdsF9/EuNnbCoXE2QAPtdt3atg/MT3Cor4ZsZ
+J89XkFlWrQrIr36QbUBmPJvnvAleeNeuodaY3jfKqirgsSfCeW8pfuf5QnP0
+M+RgHCJB8/vgqEL76XSQlNZMmGff/e4HXLMscbcfzHgs5b4W85mwZrV3Kq1f
+Gfs4G9ZUXWPTTr630rUXntKotGS6KdYPSiTRe0namY3HeTC/Mm+OGbzlS2Nt
+McxK/Dd1OvzUz7xH2gyfW5vJQln4bu/2wuUwO6UipRHxsm5tm5FoRvstz+gE
+vbe97DhSC4tnp7ia0XvMIxtnxgzU+/ugUxHdP/t9nMxgRnCK3Hz4aKOwzBVm
+z6ybcgv9p24oDV0Pcy+fXmZKn9/knyEBcKlEW4aA5unYwNkE638tUJ8K8z0k
+ldfCzAN9ay7jvXRdtI08xWNNrsyzhVOab/dbUP4bGmVvVDC/uBeXVeD4rPHt
+QrhmqcBlmPqRy7wdDqt+GPmjifqdtuxCIGyazFd+QP2xU6Zvh9vkGg9chlkb
+1q+KgRc6pcxKoH53aLDK4LcTDz8/BjPihO0yyC86LH2DXGqoXewPt3VFPqD1
+3Pypp8pgd0OrQ1mwSGFxshn6Gcz9oPqU4vnlfEqERb49WmK6PmLwyDf4csWr
+p0aonyOqPOmN+YjO9fX7U7/fJu/LhA2zXCWv0HxkrNe+h39HmNt/onkzM7oV
+Me/6suFYm5no/+GmQkN4bHVA/WGYpxNhrwsLYl1aamH9mqcTJeD918MPqJnj
++nPzTj1DvIyT/g99YNaCo6uiYJsqKVEizL3kLNKFBdKP7SvhrqFVi3NRr+Dq
+y84BWJS9M9sCVtyy5rf8LPQTFX3oKvoPsRlYqgeLvBdc04Y7ztYMmMCcCFX9
+M5jnjIFF+4xh/sWsdiVYyBIMTIXZE7PPJCuzGSqHBdmycFddwiEL+DlnyobP
+yMdh/XBpYeLo7zTaSO4+9ygZdpf0TrwLMwPnt4bAd6dGbUih+stXXPSDx/75
+eiQCjt8W9jsIdvmoqh8Il5ZdHDkKb70Uo7yK+lvBOFoMl1bs/OUO5+vI1kgi
+/wTuZOuldP3lq1N9YcMplkJvit9yfW4JzK2eV7WV1genbjSm/bZ6/P5JOs+3
+yY6D1X0/at4h6ybJfYX/iuxU76V4UmU5XpjPSPyTQ9PRr3hGmko6PD/vU90W
+mlezsnsnvJfvO7OAXHJETZaeX8P/O/2T5uX+ZpI2zLTJfelmgfNG9Q/VYfWr
+oeVn4Pgjs69+w/WFxYMLWmE+b2h9Oe1XwRxnHUt8/m/+CgiD/3VIVlkDd536
+aasKu6zwMT8Js31CjS+jXqaTwe5COP70yAwj+JtFrZUIFi8PfH4B/c/xfav3
+DuaZX+lhwtq+cQGf6HrPmMPHME/1xtHzvXCpi2esJHx4Yl95B+VvbuRpKeHz
+/3uh43OYyxuPcFPE+1C4V9UtmF9atuPiJDyPNFguyRTvWMIXHdg90urVXorX
+sau9VgHfv4Gteevo/HS+Zh4cMuf9yEJYP+fFsTLYvCaozITylebITsT1Y5dV
+v6hTvtvDsaHwBJG/uSIstCxnSyB/ypvA+2SGtrAqHx77sTxai9arPjkdhno7
+NO7JW8KigDhlI9pf/js2LKf5NNe7x8DxgeNq+8lBoh2f4b2hlwJuUrx3n/KW
+YT5v/dom03zizbRj0mCGu95SDRbyR/dovYatP3icsoMZtemGEzHvjduznDeS
+h6a7qsFxlxsDj8Hi/hpNun8KXnIacmCm3jZTMa4/7tETIYLj3w/L3YdXMb9s
++kwOWbZyG3wguypLcTZsV3VIFh7f+PuEyWx633jdm4R6eZ6GfDuY7zw7TgN+
+vCbK0h1m9Pwc0UP/Q26isJXkeWk6cpiPm0XW3z6w8Gt6yijm/eeh/WtXw129
+W5cOybMZt96F/cshh+w6PRHe/M+kv11hdpllrbUcnmeNeWqUjzsmmHVSls3Q
+vV9bZU7rm22dFeBEZ0GsDq1nuXc8kmEzlhfJRFH9XTwTkRB++920kEHnRU2f
+bsNnWR8tv6JfttGvX6PwoOqU3n5Y3+b7h0DEC56QldPDovvdruwbnBPA0OuF
+uXYqZtmo58ZJ3q1BmK8dyA9Bva35q65+p+tvzfB0QH/uw2njsjSf/o9CZewf
+p6Kk43o0D1eDPa3wcIVcyzya53CY6RnMR1k6xWsNzeeo6jNLzO/TWp1Z+8my
+/gnZcKXB/w4K6Hq8XY/BVxIPO1bApUst/RSZ9H8JM24f9dcWtFIaVnDYVq5k
+hfhRA4ovsL7B75SPNdz1TyzLH+6/cs9gFcx3SVtUjvytzDD2DpgtzfX+hfr2
+uDR9PwELMxfpaMCPpHXKL1I8SW6OBvoLdAx3zIHxhaIjg/7TV5z1uQOXzkmZ
+O4R5lVRL6NynfD87xzox35Knum/vUfxFL5e1SuPv1ycNMwsp/l0n/sAf2D/n
+tG9eo/OxT7/owr4mmYvTKF7QhbJwKeQ7V9kbS/n7zHhjkmzGAN8+5yCt3zZW
+lAsvDpucEUrnI1M2JsLhkoYfN1J9H0ZNr8EFZtciV1O/c/Vq+uEJ0Xt8PCn+
+zJ+TfRH/iLbOIneqt3Ozmhi2+7iz6/89HrM+HfWYhH2+wqF4ngbszai/elT6
+3/V0fsOCxbboz/zQjeXBVvS+prlbDv07zP1T6jDFX3P2RQMc+UoQQf1wG51v
+ncT+0W5o03hI9RTcX2CM+fHnbJ/UTvWXl+QI4OqeBJ6ENXyx9+YAbOQoa2cC
+M1RGMhUxf8Vukc8ya/p+8Wj+jfOOU6Nv7oT5nLzjj+AJze0WSdb093urtAd8
+N/tD6124S/g6LRf5xX1eTQ2w8MzhzR9RX9aXgsB+yjeabsaA6d9847SejtLs
+/wPOwiIH
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.674112975512006, 3.0634133525730736}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl1Qs0VHkcB/DLlNcqtSFFDCaPpjx6EuWaipIyGyNKIdbamEVovdolW06t
+avSiDU2xslI5JfTS3ZoSWTsSZpVM7WyNHsxSjYpmv//2njPnns/5v76/3733
+jPWWhHVfa1MUJcSP3P+/2DQ1qsHlSFM092maASxRBm6ogqUvQ3RYsLwka3kQ
+zIwtun7fiqYqZ139oAXLNedrs+BYi9tZ9Q5Y/zC0TRc2o9Rr0uBsXkd7uiVN
+xY/zWeILJ67vM+2ZQVOGkxPd7Mj8Ya9JrvA1k4VzTGHV4wFJngX88ucPxBF6
+lvRzc5rK0vy2zR5mm41QIXAru0+4AhbJZiQ/mY79vd6+EsL8q/y0PXCKH2tV
+CcysqDQIgl0iaoR/kvEqhzEe3BDkM50i9RRUPxbArTm7ZnJJPWv/pfbCTCrF
++MMiT0FZD3xX01sTCU/afmKpN86XnXTf8w3Mb5r2+hIs1VW1hBFb71Q6I391
+vJDyJv3jjZpUwKJUbYkx6W+Af6ER6lUs9qv7i+R5tSYkGnZoc48+SPpT0nWg
+BC7qSrXkkf7N+MCtg4OYVMkre5oSjwzanCHrmxt3H4XpzfvLMuGIZqPyZTD/
+cqCNI1zZdnrmiB3qbnLi1ZM8x+Wl9bDcJO0XLty6wPrNT7DqztVN+5B/XHP9
+7C1wRLDimYL0533mOj4s6hqc5wEvz1waGUDGjX4MPjYN6ywn+m6GpV86/60L
+h6WveZsB83lM7H4zPI/SvJxTcLZQpJ4LSyeqA9vJ/A4l834q+vhrdwQLeZlD
+nAcKeP4OVex8WBUiGxuGE734SyLgxM069zhY/+YeSzsXrrnOrdn2eT9x3DFS
+v8Hlr7rh2QUtw2JY2p7c74c85epMrSKy/4WkmxKYMc7U/gFmT357i9QjScpI
+CSTjmbu0T8OGJ316p8HyA+5rP8GKFTkXOpCXPSHo0mL0R9W2dS7pV7a/0XAw
+bMblujiTceNztwLg2qT2LtlMrLc9ZMaB2TrdMbtg1RYrx07sZ9znN+QGSx1X
+hcfAh/f2mas56O8NG+te5OMPKR/dhGmXugwaVgiUglLYxe3o2SLU55lQXL2X
+ONP+7AD6E1J38X0esUB2YDVsJlnuewRmEuZ8qjfF99PAEdfAlLqq0gNW6do5
+d8PisXl/PDLB92TmHz8eeajvdnacgMcVWwsWEQv6dfJgT/pcdSzssolJOgiP
++Bl5HYHFRjce3YCzV+7gXIZFpuuGDLD/yhMHNVKYbqzPFcKyB0Nze8j8jqMv
+++Dohx8NOmC+xeu8UOR9490vu0Lm2zcua4cb7jaMFcCJWwftl5J6o2wUoeT8
+jatfFMKMJeuFMdmv7vck8rzlWqcW30E9bIcKXzWsLLAvToLlTr0Dw3C+nnCe
+OSwdn2feCotbnno32eL9CTzflA2n7Kx+kg6L7OptTeDicCfJQljsvi1qP/KU
+Z7DVFJwYyokbRn5/YefFHhvkr8mP9IeZ6EaP27BLWc+cU+iH//ooCQOLqcr+
+MWPUp5mY0grTZfcDYmHFkqiEZ2S8gnbtn4I7f/TdF9ifMfUY2Q3HslYdcoel
+F615PrAD/+HqOJh9qfOII+y5ofFZMcl7OsHDlditj9tC8k24uWgjXFQqcBgk
+4zxVXBms1AkT6qF+VZZNNwvn5+sb+k6BJ4XR71JgivX98wmkf4+veQzAxbnx
+uWpSf8GnwhjUo/xoGy4l+WL+0e+E6d2a5mMwRQudXFF/fm2VfjCcfSb9TjJ5
+v8KfLNAj+fnJswphC0Mr3VrUy7jllBMb71h5fBPp3/jrZ8j88nCt+fqkf9/W
+jHLhiLjbQ1escX7x4X23cJ70JFW4HZYXGIV7wfn9PJ4XrOqMnF2BvCF6fj5T
+4c8XPEL+v9j0f1GRbYk=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.232686837739852, 11.393275441506766}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwl03dM00EUB/CDggFRmUorUttaIsqwhqkQPRUVUbQoYg2CFSHgQBC0SlCm
+CARHNdoUQ1JkRMCRigsHAsFiURPRpIZ/BDEgDZUhQqg4vxd/yeXyyV3ee/fu
+fsKEtO1JloSQEAw2//+8KbFi8yJKzNm25m3wi5K0qkERJYI6wxM1XJlTQ1pg
+4xWPvR/g1t0nqophblPnTWsfSrzrBT/WwSk8bYQYDtWWBk8JKal7OzAsgZ/d
+UoprYaX9mkQvtn9lkiEK7uIernCB5Ql3FBZw92OBagTx1TTHuklAyadLOWuf
+MWuWOGbBlJexMx82XzcVbITDhfZ2a2HvHe/SPOCSNXn9lvCeDt2UM+zZfFeu
+96JEJn/px9xVJXyggslEvL8ItpGElh2FXSLTHVazdcH+jlg4LDWLkwwb5wXE
+7ILPTe4rV7F81OiaBPcPeQx0snzdFfozMI39+fwXq+9Fru0DOG/EbYYXziPt
+yT7+HRZnCz9L4bFR0ctQ1Bc2PvT3IKzWKWadhwl/fYcC1gbuHeiFj11wyc1g
+/Xszpmf9m2jPzIiDU86ERGbDMkvX8SC46YYk9SkszqXRHFiv3KIfho0xV3ra
+WP2XnLvtfSk5Ve1WpYCly524Argk6G4E61dd0Rd3PvOx+53VCxG3xKCZCZOE
+TSEWsHG08MAg4oVb2Voc4uPeE4tWP2L3df/8EaM7JemWRfdOs3ynxZW5cJfv
+c9Mq5iyn+QFwysP1+/7iPFJPXr4dbE7yL2+Hg2XV6RxY7TD340W4q8H3qBuz
+H2cqGQ7/VmwvhbtVtya3wtyRA84VsHGR6ecGWLuC/97M1vMm+FHsPZZaq+NR
+n8QzcGcqi1dWINLB2j9fFdfYfl6LSIzzSKzSpOz9pvcGtmXCylFrnTvqpXsG
+eLdheb4fSYWbLqfUv4KlYdGNLT7sHmNq9HCrrC/aEf2pM8T71cKCaW5GHGx8
+rVDKYbOvxqSBaftmzm/kH5t+FGKAPfmLm3NgetXx9jQsbzyrMqH+k4kNRXOW
+IW5PYWMEPFa9VOQAV/bpZtcsoP//T9iGzQvoP3WPQ9g=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.47431403485444, 8.442668420912664}, \
+{-1, -1}], 
+        LineBox[{{14.000000000007276`, 16.500000000003638`}, {
+         8.000000000005457, 13.}}], 
+        PolygonBox[{{11.51826734053906, 15.052322615314452`}, {
+         10.280184249251306`, 14.793188945044921`}, {10.683281069670574`, 
+         14.102165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10.823799910437668, 15.484057296392571}, \
+{1, -1}], LineBox[{{14., 16.50000000000231}, {14., 9.499999999998607}}], 
+        PolygonBox[{{14., 12.4}, {13.6, 13.6}, {14.4, 13.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.9452, 13.}, {-1, 0}], 
+        LineBox[{{8., 13.000000000003638`}, {14.000000000003638`, 
+         9.500000000003638}}], 
+        PolygonBox[{{10.48173265946094, 11.552322615314452`}, {
+         11.316718930329426`, 10.602165824326175`}, {11.719815750748694`, 
+         11.293188945044921`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10.823799910437668, 10.515942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{5., 8.5}], PointBox[{15.5, 7.}], 
+         PointBox[{14., 16.5}], PointBox[{8., 13.}], PointBox[{14., 9.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T11", " ", "P1", " ", "N21"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdgef/figjhihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdgef/figjhihjij.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:eJwl1gs4lGkbB/DHKYfEVDZp7WdyihxLRKkZLR2wOWxpiiL0RSSKbSqHWacU
+orZCSbPSSZlmk5o+rGlTCWVWLEUMivbLYUixTn3/5/rmulxz/a73eZ77vv/z
+vjMWBx7w3iNPCLmKP/pOxr/iNZ9N1CkWs4lkt/8fB+DoogyHuTC3dij2/Tw2
+EettrbeARU2rHuyB+7u63bbCacvdTo7OZRMT34rWVNi+5njMOVhRds70ERxQ
+0+ngBlsHvM2V12cTqayuQhv2bGHYbYJDkn1GJxlsEvt+6Zsz8MakqfYxWPQv
+97Vv4eyXjUfUsF4rr3S+sQHOuz7QsQyOfqqqGwbbv8x3CYNFXdPsYljcf820
+FA4IWFPcBYv0PSOU0G+Td4dE0xDnp189sROWnIjMsoFzc13u3afXr6lbusMy
+DcG36pifu787dDss+TqttR1OUxs77AsvzPlmcx7Myf0i/yM83q0xWQNX91kZ
+OsH225bNvIOJryJnCWzypVzlI1wR6BKhTL3fovQ1nP/J4HAPnadPLUMIK/of
+Lamk/W46qRsJG/65xT8XvvFksFsHDvn+TnMMnXemcZ0Q/ZJvQhw5sOyFUrgd
+bH4wON2J7pfKOQgxf4VdS5QNnFsYMEsf9stPdraCGYMjydnIN7mwcsgW5noH
+phG4WuH6wAaY2VN9Y0AD67yXO+2BrY/Oax6ag3N8ZmIy4eyIijJNuEaXebUK
+lj42Wb5FHX24FsZPwJELg4R/zEafd322OWJeqZpz+y7YPDJkVRLMLKzhLYXb
+Qz9P18P8FctijOB+5b+2axthfbOg4AeYYXrlqz/smZo56zI8xZq+WwRLAocV
+tFAvbVJrdw9s/Tzi8FV4xbM4u0XG6GO16gI39Gd/LvjuBpiIE8WTcHhfwP19
+MK89qKcE823sdjiTCItlNW3bNOl9ajA7Cw4oaPCTwda9pruyqSMqQlbSvG7f
+WnMcth6NbdsD+/2kXBsNcxf0xPBg6SJxyg445KTqeDKc/SHPZRUsfJqjdhCW
+Kfl8twC2l3S4b4Cnqv/aJEP/aRWNHCV6XXRGpw7m20Yc8UV99bWbm27Awqif
+m1M06POy6Eo6zD7629pszDOlkHckhs5voxefiPlFs8LlQmDmeTffPTT/haK0
+YFjmf5e1Tg3Py8mg0TDqVw9f6avieWu6dT+eelo1j6HCJs59UbX5tP6JI6la
+yrivYw+UPqH1xktu2s1Cbpt+TBqHxWyvxjglNtFdd6rHhubttMN1SBHzCvYZ
+/ETzkfgWnILFia2bKmHmXiPuTlgYaLNUeQnmOMTK9IVHA5cc84J5jZO/psIr
+3B4P5sESown+GzhS8h/XDpgxueSpF+qZc14n6Jrg/NDDbe/g2ARBlTfMs6pP
+Tkd/yUHZWQmwxOFrjiP65zSYtf4KC/22xw3C1o9mZCLYc3Xm2RzMe/uh8/Vq
+mHirXrBEHgFW6uwnMLvtsMotWH2Xf0w5rde476AS8ssIKoi4QfdPJktWwoqL
+fO9l0vP1/iteA3/wtmPuhxn5vmVacPickOcbqX/R1ajAeTyPqkF9mKmbxLSF
+s0dI5zTms/YdNklCP2kfLknbqJufm9xCvzWJYp0qWPZ79W+lmE9Ud/vITZj9
+ooFfhPkdLQKL8mGy2qOO5hc9taWL5sc3My4MUsA7+TKnkO7ncF46y7OJu/L5
+s2Ww+P6OOhs5NlG5pRTSBEf+2ynJgSDPLD3FGXre+vqu8hkWyeWuPLQM/Ur9
+nuV4TLPwfNpy6HxszQdJ9lMsolg0NHWHOqMjIW6SReqtVgSP0fXPOJcWw625
+93c5mcKxLxQMYU7KvMJ0mK/GmUiA28UfpK+ozdbpWOA8aei3PdpL8Tnophbq
+0Xqlppe2wkTp0PRG9MMNK3NJpz7g55n7lUUYLR4hD+BsPsmLQ/9M95rRVphf
+IbC1wnxNF31dh2DGoy8BLXL092rz2oml9PdHpSsceYTvFX5HbS3gs/tgrqt5
+MV3P/kHZhIX8zD0WzGuHeT9ziiPgqfNTPWJaj7QnRcHSTpeZy7Cs9916F1gc
+f/zYMdr/av+Yv3Fe0/Pd+bR/xthMij/cX153xxoWqrxpKkY/XL1nExpw5FxN
+ngT9v+uO5Y/QPC60BgkwX79KZfpbmJjllWUij/YlDTv+hJki7XJP5HebGbK5
+gea7QyFY7R8WiSzhOrbC7Nml8i+/sMi9fv/j/TDP6zFPMMoi6pIOHXWaz8B0
+TuUIi5isGdtrR+edU6E9e5hFomtKovfRfFO7YjcOsUjT/qj2a7A4OszPeIBF
+JPnlPX/T9VlWipUf8flGbT6xzAzXzRhz58HhDZ4Xj8E8nwI3A7i+M/TlEzP6
+fXWwqheuSPnQPMcctpUzdMN5C33Gj3nBvHcXztijXuvq96JTsDRz9qMaGYuY
+f+LWPKbXb/fN6KBf54LTjkMwUTyVEvcJ/cyyVGdYoL6ch7YU8/HCvAqMYH7K
+DZ4l5o+Md5dYwSTTP9BnjEUcC03HLGFmZNvI+nHcT6ct2g1gnkAiGIb9XE7f
+06Re8c+wK/JU0a/XGqX9Jp6NolaXH+1spPXbrv/yEevze7psBHAAN/SyBez8
+6aN3GsysfV09H/XuGetlBMH856smiz4jn5gR/XV0vvwnDz6i/7M7D600hsUC
+fsJn5J8R33tnLp0327a0CHn0v39mOIv6oZKbCfKTPppuUKT1g7XEF3tZRJQ7
+mKBB999sKTPqRr62ClkGdH2C09OWNhYxHB7o/J4600zNoIlF2MUdHRF0/+Na
+YUst+peeP36F+vfis3lVyKP3u0gpNT/sTGMJ5gkoaqH5ECG7g5GNenoTojBq
+tlVV/v4q4v70VWcZNX3xKv///6Ml+3/dxt1U
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.87623281688787, 11.409748320682976}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl13s8VNv7B/AdDhIZUiRlCFFolCOKZgip3NPlUJpCHZdKyLU0SnKUTDoi
+lEEkurhGUUYSR9F0QblOkooIqVTo+1m/n3/W622tvdbzPGvvtfeo7Tno7CVC
+UZTJDIoiLfX2N/70WdQIaRegbazvbYTZZedcE+F+VY/F8TCnt2iuEVzNUtll
+AzO+j70ZVmZR7WxnzrQeixLmp8VWw2cD/K8VwXT12U3XYAuJIws9YX6Xz183
+4fjvZkuUYP91luVP4PeDcymBLtabLnYRxfy6cfHl8cS+55McYP2icpXN8AhP
+f+QGPO3ukq8Gc7QUFJRVWNQim/PBP5exKBYnbH4CXGu5ZEk37LhQsVxiIdY1
+0Rt4AvMkVx6JhDNnGgY9IuOH3aSH4dDn4aKN8Ei2pavTIhblEGX+dytMzV3d
+kw1vWyuQG4D9+54/eQOnxOaqimJ9x7hyI0lVFrX7wNxgVZgRX7FiLpzQt6fF
+FKZ1Ph+SgF+cCB3bDlMNa8qEuL5NXpZ7COZ6y33hwXJdFsnRsH/ji0Wb4NgN
+J/S5pF/TKasX8T2T6G1KJLbSL/WFXfp6HU6T/Gfl6gwi36aYOdOhpP/fCPO9
+sCBNmOIGF67w8ulFva5LO7uuJPMb/S3hBe/vTvhCwQLrUsMvqL/B5Y0n65Cf
+4PqphHMwPcT1/HGY0xAtagmX3VMZN4GFJjkZMrDyZeuqoaUYdyc7aGQ+iwrL
+ldLmEd+0ixyCqzzOHN8M8x+XpYhh/LFvt6Sl4JH996MMlUndXPvqdBDP84H+
+cPjv0pVDsTDbtSfyJaxDf1/pAhdeDtUzQ7xXHBujlxI3fmIUwrQ3V2bPgmkH
+JbZqI9/6Rbr537SxnpiFAQ82003QH4JZCtau8qiXkGHyi5h3dtPVMFLP4bLp
+78QX672ewa3Nfg9mYj4qbyp+LurvHVQUrgYLpkw/W8Bqx8OUzch6a985b4MH
+nHu8XWFGZ9G/5H7pEIQvCiGeNL9lAIsfPjnOhbkum6smMP+M5rL6HNKfdOND
+Htw3WpNfQvJps9hhBb/+FjNZAdOn4hSfI/7frKGwUtIvcqF+M/xkYd0mcv2I
+eXniU+TvYilKOw3z30z2bIQzw753eZHrB3oWPEb9rO7aWxmR9WgVR7bA9/0G
+108hX9rMqP+GsT+zhlvtq+CRDi/NNHh1SZ3yYZizx7l3J3xmxqtCHVgoF7nD
+BHYr87HsXIJ9u8YR6sPPPg8uSoBHLspcWgvf9bgXYwkzpsd4++Ddu4xzp7Uw
+n27Au6uwwKQ/sBrmmnA8J8l6fmPpsTCj/4fJbsRXN782wA2ma7k3P4MPT0Z1
+GhM/MZm5Afld3WpopwbzIpT/qYGTtzffV4BH3LO6/0R9kq6GFMvD1PuVDWT/
+e+9P/akM+4fk+k7BEdLGwzow/9+40+tR76kzg5osmCZeVhYBz9sbJ3Ql86+R
+906GbZtmjISQ+EQWG1yEUxWvSifBjuJfyzjw7Qyz4VtwIfWh2h4O0xL1ekTy
+WzVv+R9w+4zCQ61kvZT7/blYX7nTw62bjDdLvLEKrtp99kEnsay5WBXyyVsr
+ViiA2Y7S48bk/LuUmnEHZu082laCegj3vjyZTOb3y1BdAS9J3CPwIfXxMle6
+g3oGXz602xAW3H16ww6Oj/5+8qsm8n9tuWpcCefDdr/3t2D62yjrQniMHRfm
+BXPMF0RFw5RMt6cSGV+z/kQAvCZC7nOjBuqRZdAcDpsoTew+BgvGfR+kwxVV
+fmOrYNaK/3Jb4Ydn5uV9W4x6fVtfqYn1o94tWn8P9u+02hYD/1rRZBpP+suv
+y43Dd+K6EvbB7JvsUW/kk9Vi1mILC5gd2b3wzc7rOmbk+m1p5dtRjwf9HIYx
+zKv90PYIbhvPUiT93JeuEuT535KSyNtI5q/IaA2Bowxk9XfBjjuXJRXDpbGC
+llCYVVge1gIH2J45nET6O17zu+Gh7t2NxeT6OTv5TfB0fsE/zWR8wdnhLPho
+l2Z4Pxm/f1nXLnhF3dYzEzBfqKktAc9X1RsVQT2oYJG/0hHfZa1OPTHiWlH+
+Yjh1xwLdXySfeoFlFvJjBCtav4c5/HTGQlhx3jm7BuKDquMXyfNV0x5/GS6s
+aR9cCMe2ZzT4kPXOmGneRL0PZCXr6cPUfZ0lDvBv42N2A+owk8kXg+UDP0pm
+woVpMl3PFNG/LTPCBRbe+b6vAn7QHPVOHGYdWWp4B14lXXPurhqepxPx4y/g
+OM/qe4dgQZ4cUwLzzfE7wNEnbjVOd4R76t1LxuiIt0A36zqcyffvroZZy1Yr
+KyLemEviS5KJb89bfhqeVD20LgwWfBrNFCXvl8+qgXthR66MWAR81G0wwp1Y
+uGdsEE7v+fc6G+adeuTohPo1nt3T50vm65xxPBfuLIjKiCTzVYWlvoc9tuVJ
+kPVGjFedlsN+RFczJUtIf3fYOnXYJs/ESwBz93vUKxELL7z4RPotHq7+iusv
+1p6TF0d+DOXEngqY175dTJmYUpbcC2t6bKzTIvn3R0/9Rnxa74r4S0m/16OO
+OPL9oq7xQAOm20d5zoI/3b4rogALRZ81kvs/4PklgwkSf6RhuAg8LRUZ8ozE
+y5HpOIH6SRe0BfFIPQ3NFWnwx7Xya0h96JIxbwqwH4OX6lka5HpOk7kb3P3N
+K7sC3xX+SZS3Gpz3YeQrHS78Mh5PwepH13w8ifdQobpKy495LCrcbpv8J5xL
+9Jbv62TQb8yR/LENZlh08U1gsR6xfnLfs/WkVI/CRic+lDjBjq9jjF7CpdS7
+K/2oAzesWXwN4psU/FqbAPOda3rJ/vdF2jLsSH/FVLYG8qOZ5ZqqwY49vm/T
+YZtYrT9nwf6BCYY01Kdbk/VzJnmPp83ZHQZvDZ0Tu4DU/Ypo1gvyPbmAK03e
++1x705fKaAvD/cR9SavdmrMJrbVHhm8mme/BhbseaI2OlbV0oGUJX9XtRlt6
+RKV4LuKncZ+mWME2fs5BG2Fh6SkNGiyu8KL+MOw/O/FgLdbrrcyoPg9Ti+uP
+7YF30LbPyIR5o0omo4ifozprIJV8V/l1rwgiz6OsbsExmGW1/+QI8k+18nO3
+h/lSyxJ9YR9Xniw5FxwjIhoGSH3DLaryST77FHwCYX7fBZs1MMfJ2kkKjl74
+0aeSPBdJJZUl2K8dB+vi9WHOzuoFgbB72uH8FKzr+KNkbCM83LJj4TTWcfRn
+lZnCD+/IB3vA7IKIShtY/v4mqybM69+vYnYAVugvG2AST8u7FsC2T0c8q9Hy
+jVSWT6FtnSjUdEBLX37k6y6MU/r9eXB0Lup9MVD3KZz+viHnGsxXLG60wjqR
+oxvdQmCafPbh+3Bi69LFbjBXy6hqJeK072lSc4F51y4582BLbkUim1xvHWj7
+G170cKLjKCw89dDZFnmaXi3Lz4M5SrdfnIDzhgoUu4hlS3Sy4dS3fzyfh/go
+dnhFHhwacsfeCabVPp4+Dw/0eP48BftbjKV5wQ+Wn/K9DQuyP9uowikaw4mv
+YG7O+bparN870/rDAHG4/d2tsPB6L/f/nDiT20nu5+OKx1pIPRjVTFc49/Sj
+2Hwy39e3C1pQjyc5ekHeMCfoR5IzrKDo9VMeLpz9WISsc2BBYDXJh7H+3S4f
++OybjSw9YrNGldmwhc6R8mwF5KNpNvAI/w9yqP4hC7MbKs8lw+rL3m4KnoP8
+HN62RsHTyoMrO+TRn0vzjIEr8tnr18H+AXK1V+BQ6tdEsRzi7/tzTwecfrpu
+nz5MqzudswTrxbZ0G9yhwTtPisbA6ml8260w3/vZsjFY2bSuTwJmON4x2od8
+uLxLcZdlsd6KqfYecl6sXpr0F1y4sfvqVtSjiu5byYQFWu2sR/CRo7u+2ZHx
+gzEpOqhn9KT0qWOw/xEp7SNwusmlpc0wvfEx/S6s//HM8vlYT/DL9IIQvu01
+0O4ECye/XCK/H4qv/kw+A/u7FnmSfiORi4KHpP/FgVXke0eJyZT6BrPt5fGL
+D+NG9BRVkC9j38eyxeR6602WK0k9upItKsnzqFQTZQyzajN3WMIvzdOjdch4
+H93XtchP/uOvHjHYMWT021ryfsypVGgk9bHI16hEffTbBi+E0cj561tnBi91
+72hQgDnDx74+Rr1ZEs/a1siS83GTsw9cGhMpy5iNfOUz6lXgFB2dRBkZ7Per
+a5792OcJqZTizlnIP5e9+j9YwShmd64U8ljeZPkI/lR56HHgTMw7ZcbugnWr
+2r/YSZLfy80bZTBf1WcrZzMJxJ9jWLyZPGfPLQ5vEEe7ztzuBvzwR8Ct0D8w
+/8jY77mIVztb7flTMfJ9kyz5Dyyt7zXhBFNhYoYzkG/FaxkvCqazS+aFwS//
+aQ1qF8V6+UybQdglaX9OF8x/Un/ZGfXrlJUo+gPjHUvS9+XDprU292zFyPn2
+MnUYfqV5Jq2ArHfqHwkV7Efoz1JFZcQjnNMbzIBfZa5xTiDx7dz5cCm5X14m
+qIkgflqo+4AUeX98vhrsDXNueIs8J/fXXwf4VcTu8ibHyfdmcuOGcZh7a+Ht
+RXDsybVnZ0qQ+6MnjLwvqyaCo76Lk99DDgZ65P11496ju+R6u1KRa8jfdGig
+xUmc/B5T3qIB5wmZ0vcQz8gNiSTyPPHVD+ZNI36exuCEPsxOmSpSJvUKeLu+
+AfuR1ynZNA/1EAjW5wTBVfO3T/6YgXFtqzxWwZ6eu1yeUKiflEa3PExvFrfS
++82kBIrCPZJk/wNeKz2cZCI/N7oSbBy/eNvBn0yK3nFZ0xy2sUxwZk0wKbY2
+3S8KFghtqq2/MSnaU5HhFtixkyvOHcf1N23qVyM+yi6qROsLk/JffZpdQOJl
+bv0tN8akGGJ7M9XJOTVT//iWUVwv5a2dRs6Dz1dmjY5gPRfdGFny/ZD144oQ
+phZPhoaT95MBr0oF47kJZ7Xa4L8v7QlLhUe0Njipod7GKkcNbDE/ra8pZgus
+PTuVUsf6hbUCq0MwTYsVLIX4GH0X5geS+yHfZMsXWJA8eo2cp/7rH7g1fkX8
+S8SrtWHh1Q+zIpEfvbXCmJw33LizvtMk303zf3JgwdamErPviGdh8X9y8Pad
+qz8wYLqqovYF8h4oincQYDxHKWzRHJi3+WiDIsyy2ClxltTjltZ3cbKefttm
+aXj7PdqGTMTLs2p0OE/q/SP56RDyc6x58H4JOYe9qvqGPiPeu30BzTiHGefo
+P88PYj76uhNxc8hz+FR5qB/xqOffdyf9q7Y+XdALD52usYWF3gZ9se3Yj2UO
+MluIcdMqPmNS/MYakRCYcj2c6sxnUkL5oQ+FxOTvwr3/bxVY/wOFNAsU
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.181526323287266, 4.607704332175082}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.00000000000182, 17.000000000003638`}, {
+          14.000000000003183`, 16.500000000003638`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.892040876190137, 17.440709485718344}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwV1Qs4lFkYB/BPJmliWS1qd8o1t4hRK7n1RbVSi25yazGW1LhtbJEupEzr
+UYaIooxmSHSZaptUSHTdSkpKmUqiZhImhHLb/5nnmfme35wz5/zf9zvfMwac
+mDVhkyiKisKbXCkG+bCmKU1yZdFUpKrHcl1Y/3mIZSmcIXd1XQwrsjSCFs+i
+qcZiKm8bLC7MOVgPx3Jv912D6c3i0bmzaUp6njrGsMH3k6sr4uAMF9GjeXCj
+fYooD/4hLVPZH1Z4x1kQD55X/LwP5lck3iHzPf2bGRWwDR01jw3PqJ/oeAjX
+hndObcZ+jPEsaxncljWeFw4/XyK5OQJ7v6ly7EFefsr1fhU28gTSg/FwAyNN
+OBXW3GX4QpnUp3zOjgHzXRVc4S80tfSxRc4QyatetzAAZhX2aneSPKdiHNmw
+iVVQXANZ/3JzrjmsVdZdcpnsf8nAdTlclSK6X0jq0XEcToN9zXaP7Cd5S2m2
+HP5+4sLCODhY+NQrAvsP75niEA6LqTL5GFxaweYEk3qFr6xOop4I27fHOXCy
+OCNkFeoXSz75RZE8fsbcftjDmZ+UTLxoa+ghPZpqsdblFMC+h1uzmPo05brk
+uaKK5Dn9IpSGg8O+CN7DVGq9eji8fJ/kqDrqT8iLHkqEB+5Nb7CHZ/zUJEyC
+P1GrZ4XC7q1tlVzYN1Pp73Q4/+ycryvhUvaPfWfYpB9D0/Vgnz+l4/dIv01r
+3J4gD7M4PvI16S+rm+cH13Xv2i+H25qOdL1F/vgtiTO74eCaK6lRsMjr/h4Z
+LNBZ08eE7UQu2VJijRvSG+jHzhJe0X+wzcbav7JhM/0NPv/C+uvlKjyYauCX
+F5D7G723qQim1Uwke2Hx2PxHUngS43Ael8wfKi9zxPqBgVrevnBjjNX4FZjJ
+OSn0IPnXt2SuRF671pejbqS+JNOzPbBooafPMtiM9cBnFemXxYCFF8kzI8BZ
+ANsmxkeHkPqCsvg9pP+3ew8mwbIckfV8A5pKj5mTWAgnX8jM2QLrp3Iv1cGq
+2SvUsmFpZQT3M8nPfPHuFFyYq52va4v+lPISK+Btm36d6QoLVMr9j8N9J+mX
+m+HhuyzTPXCat7AnA5ZVu6ashdvtna+dhvMPfH83Cw5Od1a6AUe8tA9pR76O
+kWrqIawqvxpfQu6ne2diI0zvl5aR+x0+pfEyGZe90fZdBA93KqXcJOPWqWFa
+cJ1e2WwxrOnXMtaP/ghcEhYcgxWHjZ91wPynXHEKTD2T1X6Dt/BGTkfAjXb3
+kmbi9zaP6+nVsJlB8ILfYHFV6Q5nOPafvC+pcLQGz8gaFvMWVzyELzoXiU1J
+/q6ho6Sez6PO5maw99ytcVvh7I4AHTbMf//63B1YcUxzB+mX6jSnR9qGeP5/
+j30cQMZDdYsD4FUfm7R2kn5KzbNyYHHHlKfFJI/13SfVMCMsyO0B2W90e1Yz
+bNvmwBkk+X8Y026FPbocNAzm4/n27LrbALM+smxXwPaDJpYX4dhZc1oj4TLT
+0gc8uNZBiZMOBxuMM9fC6yR2yQK4UnPJgC6sUE4IO0fWe58x+Ar5RxsLb12C
+za57FQngDxPRLWLY+0T56ij4jQOOBpxwKoFaRvpRW5edCyvcfXot4EgLI/Vk
+2H19zm4Dct5sWiSbyLjhuslk3KkkReRJ9t9oVrUUlhTtGLQj638+dDUWDuT3
+SgxhTbWd1Bn41sS6q9PJegwNQT/c9nXZrmlwcsz2djfk/8As0CGu/KZ3IB8+
+omrPIvNbKmKmdcMuk4QnjGDfYrnMyYim1JJHTJxIf7otP6bCloc4NQEk38QG
+/xrYP3fjGMk/PF7whxwe9nQxLIdlXb4qysY4TwPmVs1kvbntCUx4fAIvWJX8
+fxnT/wPf+3c5
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.393275441506763, 7.232686837739852}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwd2Hk8VPv/B/BRXGsMWcuuLCUmylWUkSxJGpW0iOmGuiWmhTYydbWTpULS
+NAqlyNKmkhC5FE24KGubEL6TRGnxe71//jmPp/M5720+58zB4K/QFYETGAwG
+W4LBoCNjeBw/k9mMb3TUZzOEmwYEp1XZDFZHZrSGAZvhyxjgTFNjM5iM3E4j
+OOfRkZfFcHxwwJ/TYM11D0pWqrMZPS89WJpwo0it6j2s+fSVmOIVdco1b9NA
+vLR2vTaKv7/a6QPcEpLfngvzLlV9XqaJ/JvXFYXDItstYVfg4w8XXLCFK/K2
+mL+HOXNawj7p4fc9ssuVtLBu9ugPLtwWxf42DeZoXqxq0mUzSs8mTTOG2Rk3
+G71gc+6zq6qw2Kn5Y5MO4lkJtL4gHj96t+9W2Nwm7kEFzNRpHFGC7W/c9oqF
+Gf0ZxTXabIZbh7yUF53XmP9fGtxf0T1LFY73Hdh5DI5+4TCzFf3k98Q+PQm/
+92iwvg7HJ/r/yoQ1xzvNjsDCmMdLmuF4ef+doXT+w+SRqcinOsn/Jc2HOdfh
+EA9+P/+bRwTM79v+RAT/DJfTvAxzJB5q2aKf4OiMI+0wb+xNUjr1K06RsqD6
+6n7byGAe9hKBMxJpXj72qpth8TzzImn0z61zTb0PxzycWXwKZuYF3/0B59/J
+uzFlCvLds5RQw7xjzF1O5MPM5LEv+vDiU9cUl0xFPJ5pB3lO8ZVXnfAardtb
+VOGcWuNUHvoqHTKJHEU8bucZh1E4X9yvlgfHl4YbUV+isPD3XrDbcKdlCyw0
+65Z/h/p354jGzXHkVVdvCcKxpfqvb8E4drme2NKFdab7MtYmw9zn7157w7tD
+w11yqO+ggMfPkMc0fMoTcvzRN0xXeHjg0PVUur7IIuE56jw+rzZ1L60fnZ7M
+hVuiq18tgfMN1d78Acf4n7ZSofgSIdvL0bcwN6P2P+Rh/O29/hxsnrRW6jys
+v2d9Ix8uVpKx5cKlN10YR+C0ZttUS5ijvHNiOhxgvF9Onq73fyHdAPdvKOn5
+SvOYaMnRRL4tnZ+GhmBW8ETv7bBtvbKpJNZzR3b01sKL5Xm3ZlD8veab52Jd
+13KLriCYpebaKaD9N3exehHlS5D1lMKRHV/YpY362b8uvNgEtyXX/kykeSwP
+bLgDdzWN7tDA3BkWDI9RWGz4X34WXNpZ+2oa1t2e5eOrS/dh5+ZBO7i8oES4
+FY7feuDjfJhZv2v4DpyfPaxnAItmmrB+w6zBipFBxNM2llnmiPueL/pZkwnv
+jWPuj4TZ8zcNuNIcxqZYFsCcQf3jLah/UOmHfSvMCOFHrodnpA++GoNFTXoO
+/6F/yaz32UqGqDvb8ZI7/JvjVK4Fc/RNBKWY58hdqWwyd/bxufbwwZT5y5kw
+X8NrWjn2dXewrvQ45TOuKV4N13y1Df8I85zm3vuF++LnTmb0M5i5/ZHcA7pP
+1pq65MLipSvq6L7vuK/TdxrWv3TXcD89l1hVgp3UX9VV4yhYMcwtch1cWp76
+9QK8Sk5ulxv12z61oA62mh8xa6EB7deQs/TccUndJ7OA+vNMV94K8/4nwXCh
+/p07R2rgJst3mWth1kF+qhX6UXV4NHUv1VcpoZAGB/lfUk6n/CPdrhMwjxJt
+z+oGuMs2MJj2c3iqki7Ni6WS018AZ13LifeC2XsKS4fg1fWmPudhES8hTg/z
+zoqICX0Pi6fk1dP+Olj/4zbLCJ+vk5vYGm4T248cgIWXHD204KRzpQoVcHxl
+nGc34on07L78MQ31pQ75pcHX/+x6vQjO15zdtAAOqti4MBwuFfE+1KJ+xYC+
+z5fIm3J2c+DnG7ZZPiZnZn+vRv+sR8WCBnKl7hIH2Hjp/LXtcHz30KY7NN8L
+93raKL5f3qLZ8NuQJkdaz8xbkn4Pz8GxuT/ul8HCqK21HnBh1JLv2TAv127f
+ML6H8mvtemPhrvrkswVwSU2sMJTiX7eyOAp39yxd5kX5v/zasAv+o2JQZy4s
+Tsidtw+2its5Q4fyb29oSIIf9Kzzk4c5+9Kca2D7OycCJGBu0b/lTHouHyg+
+x6B4zxXuBcEZXzf3ydL5kmufquDixUfFFI8ZmX3LEv0MvyqvtIf5JyR1zlO/
+IY7qQbC+wclp43Cd5iT983R+XUyfL+3nB/IPG6k+JZXuXNg3zjBQYzrynj+g
+OghnJSms8IeZFzKM6LmuUGR/8DosGq86awn/9pGqGIE5XveazOGc6SZDjsb4
+HJ54rVaGfaVfvz0Bs5tjo9sRr1y8IfE5rD+t6WUibONpPEfGBP0w+wTW9D2y
+pszZDuYnvDF6gnrr99wWBMDCwnWezrDFaFbEP+TIOSkl6D9Va/2pZDh+yokW
+a1hGbNAjhPW9/2Nexzwb6zL1yZySTbbG8HNfzVlJcOljI5lcvHeUX5cIiqZ4
+XGb1Itg8b2p4MJy/z9LkE95b6sV1bhyK91hCPhvmRsmMzIa7Vn/bfxBWYC7I
+mUz1HmAdDYY7dPjnR6l/71XzdsF9/EuNnbCoXE2QAPtdt3atg/MT3Cor4ZsZ
+J89XkFlWrQrIr36QbUBmPJvnvAleeNeuodaY3jfKqirgsSfCeW8pfuf5QnP0
+M+RgHCJB8/vgqEL76XSQlNZMmGff/e4HXLMscbcfzHgs5b4W85mwZrV3Kq1f
+Gfs4G9ZUXWPTTr630rUXntKotGS6KdYPSiTRe0namY3HeTC/Mm+OGbzlS2Nt
+McxK/Dd1OvzUz7xH2gyfW5vJQln4bu/2wuUwO6UipRHxsm5tm5FoRvstz+gE
+vbe97DhSC4tnp7ia0XvMIxtnxgzU+/ugUxHdP/t9nMxgRnCK3Hz4aKOwzBVm
+z6ybcgv9p24oDV0Pcy+fXmZKn9/knyEBcKlEW4aA5unYwNkE638tUJ8K8z0k
+ldfCzAN9ay7jvXRdtI08xWNNrsyzhVOab/dbUP4bGmVvVDC/uBeXVeD4rPHt
+QrhmqcBlmPqRy7wdDqt+GPmjifqdtuxCIGyazFd+QP2xU6Zvh9vkGg9chlkb
+1q+KgRc6pcxKoH53aLDK4LcTDz8/BjPihO0yyC86LH2DXGqoXewPt3VFPqD1
+3Pypp8pgd0OrQ1mwSGFxshn6Gcz9oPqU4vnlfEqERb49WmK6PmLwyDf4csWr
+p0aonyOqPOmN+YjO9fX7U7/fJu/LhA2zXCWv0HxkrNe+h39HmNt/onkzM7oV
+Me/6suFYm5no/+GmQkN4bHVA/WGYpxNhrwsLYl1aamH9mqcTJeD918MPqJnj
++nPzTj1DvIyT/g99YNaCo6uiYJsqKVEizL3kLNKFBdKP7SvhrqFVi3NRr+Dq
+y84BWJS9M9sCVtyy5rf8LPQTFX3oKvoPsRlYqgeLvBdc04Y7ztYMmMCcCFX9
+M5jnjIFF+4xh/sWsdiVYyBIMTIXZE7PPJCuzGSqHBdmycFddwiEL+DlnyobP
+yMdh/XBpYeLo7zTaSO4+9ygZdpf0TrwLMwPnt4bAd6dGbUih+stXXPSDx/75
+eiQCjt8W9jsIdvmoqh8Il5ZdHDkKb70Uo7yK+lvBOFoMl1bs/OUO5+vI1kgi
+/wTuZOuldP3lq1N9YcMplkJvit9yfW4JzK2eV7WV1genbjSm/bZ6/P5JOs+3
+yY6D1X0/at4h6ybJfYX/iuxU76V4UmU5XpjPSPyTQ9PRr3hGmko6PD/vU90W
+mlezsnsnvJfvO7OAXHJETZaeX8P/O/2T5uX+ZpI2zLTJfelmgfNG9Q/VYfWr
+oeVn4Pgjs69+w/WFxYMLWmE+b2h9Oe1XwRxnHUt8/m/+CgiD/3VIVlkDd536
+aasKu6zwMT8Js31CjS+jXqaTwe5COP70yAwj+JtFrZUIFi8PfH4B/c/xfav3
+DuaZX+lhwtq+cQGf6HrPmMPHME/1xtHzvXCpi2esJHx4Yl95B+VvbuRpKeHz
+/3uh43OYyxuPcFPE+1C4V9UtmF9atuPiJDyPNFguyRTvWMIXHdg90urVXorX
+sau9VgHfv4Gteevo/HS+Zh4cMuf9yEJYP+fFsTLYvCaozITylebITsT1Y5dV
+v6hTvtvDsaHwBJG/uSIstCxnSyB/ypvA+2SGtrAqHx77sTxai9arPjkdhno7
+NO7JW8KigDhlI9pf/js2LKf5NNe7x8DxgeNq+8lBoh2f4b2hlwJuUrx3n/KW
+YT5v/dom03zizbRj0mCGu95SDRbyR/dovYatP3icsoMZtemGEzHvjduznDeS
+h6a7qsFxlxsDj8Hi/hpNun8KXnIacmCm3jZTMa4/7tETIYLj3w/L3YdXMb9s
++kwOWbZyG3wguypLcTZsV3VIFh7f+PuEyWx633jdm4R6eZ6GfDuY7zw7TgN+
+vCbK0h1m9Pwc0UP/Q26isJXkeWk6cpiPm0XW3z6w8Gt6yijm/eeh/WtXw129
+W5cOybMZt96F/cshh+w6PRHe/M+kv11hdpllrbUcnmeNeWqUjzsmmHVSls3Q
+vV9bZU7rm22dFeBEZ0GsDq1nuXc8kmEzlhfJRFH9XTwTkRB++920kEHnRU2f
+bsNnWR8tv6JfttGvX6PwoOqU3n5Y3+b7h0DEC56QldPDovvdruwbnBPA0OuF
+uXYqZtmo58ZJ3q1BmK8dyA9Bva35q65+p+tvzfB0QH/uw2njsjSf/o9CZewf
+p6Kk43o0D1eDPa3wcIVcyzya53CY6RnMR1k6xWsNzeeo6jNLzO/TWp1Z+8my
+/gnZcKXB/w4K6Hq8XY/BVxIPO1bApUst/RSZ9H8JM24f9dcWtFIaVnDYVq5k
+hfhRA4ovsL7B75SPNdz1TyzLH+6/cs9gFcx3SVtUjvytzDD2DpgtzfX+hfr2
+uDR9PwELMxfpaMCPpHXKL1I8SW6OBvoLdAx3zIHxhaIjg/7TV5z1uQOXzkmZ
+O4R5lVRL6NynfD87xzox35Knum/vUfxFL5e1SuPv1ycNMwsp/l0n/sAf2D/n
+tG9eo/OxT7/owr4mmYvTKF7QhbJwKeQ7V9kbS/n7zHhjkmzGAN8+5yCt3zZW
+lAsvDpucEUrnI1M2JsLhkoYfN1J9H0ZNr8EFZtciV1O/c/Vq+uEJ0Xt8PCn+
+zJ+TfRH/iLbOIneqt3Ozmhi2+7iz6/89HrM+HfWYhH2+wqF4ngbszai/elT6
+3/V0fsOCxbboz/zQjeXBVvS+prlbDv07zP1T6jDFX3P2RQMc+UoQQf1wG51v
+ncT+0W5o03hI9RTcX2CM+fHnbJ/UTvWXl+QI4OqeBJ6ENXyx9+YAbOQoa2cC
+M1RGMhUxf8Vukc8ya/p+8Wj+jfOOU6Nv7oT5nLzjj+AJze0WSdb093urtAd8
+N/tD6124S/g6LRf5xX1eTQ2w8MzhzR9RX9aXgsB+yjeabsaA6d9847SejtLs
+/wPOwiIH
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.674112975512006, 3.0634133525730736}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl1Qs0VHkcB/DLlNcqtSFFDCaPpjx6EuWaipIyGyNKIdbamEVovdolW06t
+avSiDU2xslI5JfTS3ZoSWTsSZpVM7WyNHsxSjYpmv//2njPnns/5v76/3733
+jPWWhHVfa1MUJcSP3P+/2DQ1qsHlSFM092maASxRBm6ogqUvQ3RYsLwka3kQ
+zIwtun7fiqYqZ139oAXLNedrs+BYi9tZ9Q5Y/zC0TRc2o9Rr0uBsXkd7uiVN
+xY/zWeILJ67vM+2ZQVOGkxPd7Mj8Ya9JrvA1k4VzTGHV4wFJngX88ucPxBF6
+lvRzc5rK0vy2zR5mm41QIXAru0+4AhbJZiQ/mY79vd6+EsL8q/y0PXCKH2tV
+CcysqDQIgl0iaoR/kvEqhzEe3BDkM50i9RRUPxbArTm7ZnJJPWv/pfbCTCrF
++MMiT0FZD3xX01sTCU/afmKpN86XnXTf8w3Mb5r2+hIs1VW1hBFb71Q6I391
+vJDyJv3jjZpUwKJUbYkx6W+Af6ER6lUs9qv7i+R5tSYkGnZoc48+SPpT0nWg
+BC7qSrXkkf7N+MCtg4OYVMkre5oSjwzanCHrmxt3H4XpzfvLMuGIZqPyZTD/
+cqCNI1zZdnrmiB3qbnLi1ZM8x+Wl9bDcJO0XLty6wPrNT7DqztVN+5B/XHP9
+7C1wRLDimYL0533mOj4s6hqc5wEvz1waGUDGjX4MPjYN6ywn+m6GpV86/60L
+h6WveZsB83lM7H4zPI/SvJxTcLZQpJ4LSyeqA9vJ/A4l834q+vhrdwQLeZlD
+nAcKeP4OVex8WBUiGxuGE734SyLgxM069zhY/+YeSzsXrrnOrdn2eT9x3DFS
+v8Hlr7rh2QUtw2JY2p7c74c85epMrSKy/4WkmxKYMc7U/gFmT357i9QjScpI
+CSTjmbu0T8OGJ316p8HyA+5rP8GKFTkXOpCXPSHo0mL0R9W2dS7pV7a/0XAw
+bMblujiTceNztwLg2qT2LtlMrLc9ZMaB2TrdMbtg1RYrx07sZ9znN+QGSx1X
+hcfAh/f2mas56O8NG+te5OMPKR/dhGmXugwaVgiUglLYxe3o2SLU55lQXL2X
+ONP+7AD6E1J38X0esUB2YDVsJlnuewRmEuZ8qjfF99PAEdfAlLqq0gNW6do5
+d8PisXl/PDLB92TmHz8eeajvdnacgMcVWwsWEQv6dfJgT/pcdSzssolJOgiP
++Bl5HYHFRjce3YCzV+7gXIZFpuuGDLD/yhMHNVKYbqzPFcKyB0Nze8j8jqMv
+++Dohx8NOmC+xeu8UOR9490vu0Lm2zcua4cb7jaMFcCJWwftl5J6o2wUoeT8
+jatfFMKMJeuFMdmv7vck8rzlWqcW30E9bIcKXzWsLLAvToLlTr0Dw3C+nnCe
+OSwdn2feCotbnno32eL9CTzflA2n7Kx+kg6L7OptTeDicCfJQljsvi1qP/KU
+Z7DVFJwYyokbRn5/YefFHhvkr8mP9IeZ6EaP27BLWc+cU+iH//ooCQOLqcr+
+MWPUp5mY0grTZfcDYmHFkqiEZ2S8gnbtn4I7f/TdF9ifMfUY2Q3HslYdcoel
+F615PrAD/+HqOJh9qfOII+y5ofFZMcl7OsHDlditj9tC8k24uWgjXFQqcBgk
+4zxVXBms1AkT6qF+VZZNNwvn5+sb+k6BJ4XR71JgivX98wmkf4+veQzAxbnx
+uWpSf8GnwhjUo/xoGy4l+WL+0e+E6d2a5mMwRQudXFF/fm2VfjCcfSb9TjJ5
+v8KfLNAj+fnJswphC0Mr3VrUy7jllBMb71h5fBPp3/jrZ8j88nCt+fqkf9/W
+jHLhiLjbQ1escX7x4X23cJ70JFW4HZYXGIV7wfn9PJ4XrOqMnF2BvCF6fj5T
+4c8XPEL+v9j0f1GRbYk=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.232686837739852, 11.393275441506766}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwl03dM00EUB/CDggFRmUorUttaIsqwhqkQPRUVUbQoYg2CFSHgQBC0SlCm
+CARHNdoUQ1JkRMCRigsHAsFiURPRpIZ/BDEgDZUhQqg4vxd/yeXyyV3ee/fu
+fsKEtO1JloSQEAw2//+8KbFi8yJKzNm25m3wi5K0qkERJYI6wxM1XJlTQ1pg
+4xWPvR/g1t0nqophblPnTWsfSrzrBT/WwSk8bYQYDtWWBk8JKal7OzAsgZ/d
+UoprYaX9mkQvtn9lkiEK7uIernCB5Ql3FBZw92OBagTx1TTHuklAyadLOWuf
+MWuWOGbBlJexMx82XzcVbITDhfZ2a2HvHe/SPOCSNXn9lvCeDt2UM+zZfFeu
+96JEJn/px9xVJXyggslEvL8ItpGElh2FXSLTHVazdcH+jlg4LDWLkwwb5wXE
+7ILPTe4rV7F81OiaBPcPeQx0snzdFfozMI39+fwXq+9Fru0DOG/EbYYXziPt
+yT7+HRZnCz9L4bFR0ctQ1Bc2PvT3IKzWKWadhwl/fYcC1gbuHeiFj11wyc1g
+/Xszpmf9m2jPzIiDU86ERGbDMkvX8SC46YYk9SkszqXRHFiv3KIfho0xV3ra
+WP2XnLvtfSk5Ve1WpYCly524Argk6G4E61dd0Rd3PvOx+53VCxG3xKCZCZOE
+TSEWsHG08MAg4oVb2Voc4uPeE4tWP2L3df/8EaM7JemWRfdOs3ynxZW5cJfv
+c9Mq5iyn+QFwysP1+/7iPFJPXr4dbE7yL2+Hg2XV6RxY7TD340W4q8H3qBuz
+H2cqGQ7/VmwvhbtVtya3wtyRA84VsHGR6ecGWLuC/97M1vMm+FHsPZZaq+NR
+n8QzcGcqi1dWINLB2j9fFdfYfl6LSIzzSKzSpOz9pvcGtmXCylFrnTvqpXsG
+eLdheb4fSYWbLqfUv4KlYdGNLT7sHmNq9HCrrC/aEf2pM8T71cKCaW5GHGx8
+rVDKYbOvxqSBaftmzm/kH5t+FGKAPfmLm3NgetXx9jQsbzyrMqH+k4kNRXOW
+IW5PYWMEPFa9VOQAV/bpZtcsoP//T9iGzQvoP3WPQ9g=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.47431403485444, 8.442668420912664}, \
+{-1, -1}], 
+        LineBox[{{14.000000000007276`, 16.500000000003638`}, {
+         8.000000000005457, 13.}}], 
+        PolygonBox[{{10.48173265946094, 14.447677384685548`}, {
+         11.316718930329426`, 15.397834175673825`}, {11.719815750748694`, 
+         14.706811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10.823799910437668, 15.484057296392571}, \
+{1, -1}], LineBox[{{14., 16.50000000000231}, {14., 9.499999999998607}}], 
+        PolygonBox[{{14., 13.6}, {13.6, 12.4}, {14.4, 12.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.9452, 13.}, {-1, 0}], 
+        LineBox[{{8., 13.000000000003638`}, {14.000000000003638`, 
+         9.500000000003638}}], 
+        PolygonBox[{{11.51826734053906, 10.947677384685548`}, {
+         10.280184249251306`, 11.206811054955079`}, {10.683281069670574`, 
+         11.897834175673825`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10.823799910437668, 10.515942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{5., 8.5}], PointBox[{15.5, 7.}], 
+         PointBox[{14., 16.5}], PointBox[{8., 13.}], PointBox[{14., 9.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T11", " ", "P2", " ", "N22"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdgef/figjhihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdgef/figjhihjij.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:eJwl1AlQE2cUB/APCHcCEQ+CF0FaRQckUEhpPXaFiigKVqmg9SAKFB2O4IgX
+kaYanKBSDqHGTgQUqyjaIIOAghiptkQQqSgGSjEIIjKEQwRBMtL/2p3J7Pzm
+7fe+9963G6ed8RsijQkhkfgxd9I8iWsqTT5d7jRJim5wVsD5mzkmdYtpcsZy
+IsURpoXeI7mwd4wh6awdTdQlmReOwLMTfu+3hLVFMaJo+KJql3viFJpw+Zkm
+4XDr48O1L7g0cYkKfBQBS3k/BQbBY3OT9u5n4vXs5SdsaRJg/9whm4k7Zisz
+bGhycAkVVQV7nb58q4xDE55XWYoeFlxSU8awhfP2lZ+j3tH7WcsPsGkS9ka5
+UARb3Er6aA9XPNiemgt/ppG87rJG3s7AolZY3PhI0ga3cbQJlgKahER8FTsB
+K9Z0h82Dp81OK1+K9dKKQr0QbuWkdZyFIyajff3hMJ0NZY39laenFgTDageB
+vxxuFA4qN8DJdmy9OeoPmZZmwsS1Bj37J7hYfuntNzAr9e6fvTBXNVrvBY8a
+/dC1FP3r7o1/6QgreW88xbBr1bNpprDsRMLfyXA4P0rfgPpDTF4kRMCFJTq3
+dNhnBkc+F9aORKSvg105TyOvIf/YUs1DNny8OtXXFhbE/pz+GPPzyVG5rUG9
+0ukRUQq4LHu7XoT+LEI25eyGa+w7NFsxj2Lb52YrYTbvVoCvFVxZ6uUKb9pn
+0TrTEvvdfWXPh6Mru5MGzDGXnNY5TvAMu7xQjRnep+E6Z3dY0j512w1TPF/g
+c3A1/HDFrzoVC+f929GXcbCCI6PqTTCP7tDic7C/zcp0NqwN3ljbBF+NK9qS
+aIx4vOU9G/TTM2gutoR5KccmAmHWrOgajRH2W2imlsOlTZ47bsL5ia+/r2Ge
+N5w5yMSli92oUTiMtUNmhPU9/25iT8F8dT73YkPhroK7751geoar9g/Y613Q
+bDe4pMhGvBz1GAr1wx4CJv8S/2o4Y75qmQC+7/Te42v0w+o9S1zguMxD3ldg
+btSWkw5w81Cezhj9y450ipnzHO2WX6dgntCP1YJ6InIXbdwM60ytT+TBvOrv
+rALhRr+sJ+Fwcqp7zRR4cF7Tfkf41LKXK64hv0XCQ9d2zEcr4gpnwWqjm1fy
+4PU9iQtFzPwGQmRR8Id8s91HmX5npfC84Vr97acyzKPCemMsh/n+RNy8eIJ4
+XuXcITeaZN9mGXI+UkTqORnYAa+tv3OeMlDEZ1XwyXa4T3H9SP84RQRe2zp7
+4OJjgxdL31NkLJNbNwm7tGtcC0Yows+Ndp+H/NxHnHjNMEUU71b9GASH2P8i
+8npLkTCTK1VH4fwug3n/IEUqPJKzmO+duyPW+sMARUj0urhx5v9AJr1a20+R
+weJYpRD9hy+YCPKHxx4XRybARLS5ZTfMd/jC7TKs9rHlOGM97W+V9gxm74o5
+74b8vEMK8Qe4L6BcMAG7+N+YbsWcX+W4Re8QRdqyyh9wYfacvZk9qM8g9Rxm
+rBAuSulC/VvXxmQwz8tMD1TWvUP95JBqgsmn8Rs4hX6Jp21WM7OfVZ6EN0oR
+i7TjAUw94jN72CJY3b2/Jp55XzOezN8K88q6VnvCiiHfS8Zw4WH+niH0y3fq
+M/0W+aR2LU0q5jy7EuWrsF+P5DQlZr4nY2/vXtTH86gPZs5z7YLJIhr160Ys
+9xkx86QnLxRhHhltjg3NOI/wPj9VXC/mMf3+zHJ4/T+RQb2vUN9fktwCWL4r
+dOeKDoo0Jpfan4MFT5VVghZ4UXoZExfv0ccsaMT+US2f1tO1nZKSavTT4BLG
+5P90Xbzz/30x/R8h+kp5
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.2761166322027524, 16.884033677972475}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1Qs01FkcB/DbZJnFMgyKoxojPeWV7anmrweKCoW2nWrSU1o7JVJLHq3X
+JKaIHtLUqdSUkkUhNdFmNctO6JSIOdrooZo0FZrY7z075zj/83Hv/97v73fn
+/x+70F8DN7MIIXvxR6+kYxifUQzR0KslQy4V9r7KhMk/Hg1Z8IH9BgpDWGrm
+sP5H+Bbb5+MeK4a4jEsf9cmCIZdv6q634f/SNyP1m2Ar/p/n5sKykFBFA3z2
+uPD8KVyZHLvlL3EtWPlqlwGuxRYmk3iYF+l5but+LkNEI9h+u2B2QP50A1i1
+7O3Gp3DJTEvZeXPMr77+LRD7nrU6sk4I81obHz6Cp5XrdTvCKp9YCyFy+hZ1
+rR8Fy24cbeiAu59xL9jAaqdqt5DRDGm63BzgDhMnx+HbsNvG2qciev9Q7T2O
+NUN0M07eOwlr/Ba7+cCL6qa0dsLSnfa+oXDB3qrwicjH0+NnroWb+RFnd9C8
+d+rZc2BHkfruJeq1FcEDWF981WdPK+zi1ZZRQPdT+475AnOqM8yc4IKt5v1D
+MIms2FiEvGuycza/g/1vPGjmw4dPXBmuhRkVcTuKejXP3a/G0/ms4Ggj2F7r
+dZFP1z+8bksG+uUqSd90jfbH/495Y+FfmkP2Tqb9kK9cex99Vz0TRhw1w9XD
+XD8drnL6mtjPYYgiSGoXBq9URm9eDUvjpLbbYJMPp7ujTDH/VmpLMqzu5NT5
+miD/UuFxBcw+umLkvB+wv+nchZbYz4+zTxVojP22hf0cDwdHFUpyjJD3Hit4
+ALbqrw4ygF0ay1tjkb/dmdVWZIg+1feYjUS9c4wrJqTB6iyWQTIsEucWZsPF
+0cf7v8LmVt9WKKmrS0s3oH+KA+sfT8R6jPR9TzEcsyBytIzu9z4o9AWsVkam
+TkYesj19mQ4ur4+tvAn7D4kDtPBNvs03T+RXm5w43wDrBk/2VMCiL2EmErhm
+UkafJepNSFx03xFumdsy5AeLEhtXViJPTHypMgQmn7eumAUPHcpd5QqLRzTZ
+FKE+2486s8dYj9NZmDkOJiZeNktov6ofnclFPxhNHk+CPGLPFFNreFIaCTyN
+/OIzXFKE/h7TSsylqNc/NrQihD43bvJTm7/H+X66smYMzJ/RkDmFjfUqXQoJ
+rPvosPq1PsbH7OpiwfkTcq4Wf4e8HV137OHXMa59aXoYD1Zs2QA7pUw6GTcS
+6/d9Tr8J79bzKcljYbzp0ZHxyGN+f4qwYwTOvy6s/TSsfdIWGwy7ZMXr7FFP
+prUshkXHd+ZbyeHAUgvLLoJzaatyn4p+ROxwju2DZQNBZ2SwxPGLyAnzxdb2
+8/XQT8P2UYsyYenn2c3+8L7VrS1s7K9xkgQmwZVJ2WHZsP+tpca5sPC4JJ2P
+vJqe8of0fGy5gkQ5rFav1qPfh/LQsoFxqE8abnvYBp5xl3swBuasCXtMz8tG
+47zwMvXvqXFecFqXp/V12OV+vHst8qeYPPdJhsV6ByJmwheDFFkOMInJNJKj
+/nMHO5YewX6Kt0mED5fGaHc2Il/xMcdv59E/nxfcnZ2oh1jWWXrAL9dldf2N
++kUbhLtf4Tk1zvP7iRkWEIVzv2UJvEP1zPQvnYC46HPyjsH59d6vvAcFRDpU
+ZVYAewyX+D7+IiCabVGmNfS9Y7OgJeMT5r/gZtHzXTUtxS3uo4DwIqvGCuHx
+qje2lR8ERPYknP2APu91heEBGgFJyNNkeiHvxbJw5bF3AsI8sJ2lhGN6/z28
+7q2AqP2O8ALo93OwZEJfL+73frLqISxLDuR5Y1x0m5m6GP1SGUb5e+N+zSHz
+ExeoM7Rdze8FhFN/KlkDu5ctjH6O/Xj2S1jj0H8yJU0+iDy8GwtSnWGLoU1J
+o5GX2C82tYNFeaPzHbRwVr2DFvdrU5ZHGNH6puk65XCGSVJ4GSzzaLzrA+9u
+rzEy/4z+HUqUNiFfr0J8jQszL/stlsOxT/auuI75qoOvVXdRX3uAa1831i+W
+V8ndYYutzR1l2F96dVEOfb7ae60Oje9D/TziOp2eFzs/YD7yM8+nJSjpe3dq
+a64D+sFEeWb9Rt/Lht3Tt/cg32DKLG86fme2MqoL/VX6fXChDpWPfftUQPyv
+WMlnw4rsjXEzHiKPb3SNCE7QGdsuVKCfuyeYnaPvcfpJqP7/95fL/Ac/lbt5
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.128720493773297, 4.310154074720437}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.00000000000273, 17.000000000003638`}, {
+          17.00000000000182, 16.500000000003638`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.286281316503036, 17.427512100981787}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt2Hk81FsfB/CR1CiVaLHFyF6WocgWo5QlISkiTIVLISqlcpElQnJdSWWL
+7EtTIVLT2CJ1rcl6PVNJlKKypzyf87ye+cfr7Wzf7/d35syZkT560sZtEYVC
+UeChUMhfyvwCXusZlP+91jEoEjyqB+1EGBRasnBoBGwq+0K9HvYdLV2YgytW
+KQftFmVQGGmfwhwxTrDoiFYXbL33u0QWmSeoM+mUGIPClOVd0QInR+rYC4vj
+/4/VR/+FZVsaxx/CjO9tlaR9zSC721KCQYl/HNyfDZfSy5oHYEGZZsFjsLFv
+sojLBgYlZNFpk+Vwooww+yXceuevM1mIx1rzdqW0JOb7EWSjDgso129wgTNY
+E2JVaxkU16uCKmEw7b2krgkseJx6LA5mKukt9K1hUET2m/qEwr59aZbBcN5x
+lvhRuPX2R3stuHvuxRZ1mNXW48AHJ9KpFhMkHkk+zzFhBkVbRT6OBXOsysym
+4LozTgEn4IwcPhcx9J+Yjby5CR5fKZfpANOCTlv8QH4Zd/hYpWQ91XL/JpjW
+2Dski/ioXZompbBvz2xCDpy3fK8AcfzKH4pbkV9A0SqeVzDXeW10A6y/OFfr
+Fxm/ZJW1A+oTqC5x2QTrxfsslhiCWcqaCfmkXpoWH1zxHC2MLbtpyCdegde4
+DR60YrbkwxTFgYfyeI7DWqXCDCnUk7Pw8gjcaqSQOgCHFEp6hsCHD7F+G9Iw
+/tOPhkuwGPPivmsw0yI/zh0O4tl4rRem53TU0eHH/RYaUtKY57Pj4/dYjzNi
+stSROOzqQBhsbaptEguzDhpfWQcnV60quQ8zirkVdxD/2S+q0U3w+H31xs3w
+p7rJujcwM/2TVBXyN47ofk88fsX74wGY0TLK84qML2FX8MC3Ig1qHpH24T2O
+tajnspzreilwxpH/RKXBdTU5AxdJ/6KkZ9fJ/lj0xe4QHFK9TqYA1g+447MN
+pk0G+PTByU/+eCcCU26lTStg/mEPOzMKbK1SUxsLfx3jGx9D/ty1pkV8iHfr
+PfGnIzDlGDXhKjyQ0CFK2jP0k1Mkka/BuiguGc84GRH6AE58LmdD6sV8s7Rr
+B+oXzVgibE78zOPQC/gon6NaCPG8+Q4G3mdxo9/kOWS8nUhMJhw7XL2wdCPW
+15VWHoW16h2cD8CtBj6WYnjfqcbyZ2XDLMs+n83w/CfTZVMwZWWTrxRcLjPa
+vFMGz3d1ePo0xps+dbKIhVur9NLKYfsD5lL/wL7JfiZMmF0gs3OxLNaP3vfn
+LOJT1Fi1mQ77rjjwJRLe5CTQaQVbq61tWg2HOru/OQpniLKCUpHvJ6Vupic8
+vsvfRR1eck+G4QoLcoscO8j58qduqy1p/84ojSLnS57fqD7M9Wh/fACODo7v
+liTtxY4p22GxY52yvxBfyMcfOjvIeGHzuF4S76Ybq11hjsvX/krY2lBIO5P0
+73CoTiXtY4dd52D7lLCHUTAr881yT8RTYqH1OhDm5lLjRmDqqZftF2HB7jbv
+s8hH12Nf92XSP0nnOj/qMW+scT6N1C/obkYKXPR8SUkNTC9+oaKE+gaFjHV8
+h2nUm5vy4Yo/fEtVED/LeidtPd7HQp+9E/1gplfdWR9Y1TnB7Ampb3FRcSHs
+vl74wHI5rP/oeCQ5B44uXFl0GB4//Vu2FU5rcLtSCPseZAs+gsunbdSmYVp8
+/rYwmC084akvj/lbbrZtg53bTX4HwL6/Luj0IJ4kIx2JQpgh4f/IC17szOff
+BlvTMw1nkE/BvSN7PsPconOKoXD465TAGZhi5dcvCCc8Mg2dhWm19dEF5Pxw
+cvAagzlrZ3ttYR8d6us+uHXnr5w1cLInfyMHzqAynn1BfXcPKj3MIPHpRFe9
+g1c6exsEkXiuTfVOwNqX1emHyfq2MRMyGC+p/8FsO5l/keZ5H7ho6qecLMnH
+jD+yjZw/HdXrheGQe4MCZoiv/UXqSoH/9S+cb4EV98oFCcJ0MfYVJvKdcVOy
+kIYFg3N9J2DJqNv1BmT95mDjCNRL5GfHLQ8yf5gdWwDnKtvZ430qma/r5bII
++J3eMaV/SX5lVKER2H6zzUVZBax/8mn5VpyzFg57wv3gjNuzVDdy7hpU51XD
+46OBxwPgwYpn8kKK6F9RkelDzukyXm0mTP875q0p3G9vsjUftpa5zuIn7WFi
+Dz7BrLSujlKsNxF8/+5GJdR/0WZxK9g1TMffCrZ+Uy1PPleHdC+s84XpW9Ol
+PeDd29pXh5P+84f8fyDfW7u+xsbA8R19Fy7DOUmTJpHEV8c2K8BFj4wSA2DO
+YY+eXtRv1Hyt8RFimVMj2XBrg1jiTnhcQ+tODLxMoXoViac1//T8VVjozku/
+BRK/1e/EYtg4NDl0QJE8T5vbI/DX/c8mq+GMxGSuIdaL7ioxLSL5J6R/K4K5
+ch+z0mGaRqCRMuLXNbTgpMLMttojFWQ/T/W25ZJ6uOfv2oP8Y180BLAVSVyc
+2AE4cA2n8i2pb8irthOoXwC3+JcgqU944+woHH6PR3QPzG1lBh/G517NOUWH
+OJi5Tu1RGawqdzGtGw6JPs0/CeuX3vVS2IT9csFwlQDOdRuGtnAAHKX3+tdK
++Hfg/IsGmH60NJIXfhVv/Vp4M/ZP62LlToxn11GyDsHxP/n9YuBNt4d/JMGC
+yg9kVeGSHX1fXsD0gBXBNYjPNfP8tm8wdyzI0xJOpvUvFVBGvm4Fmt3IT7Fs
+B10M5nIcrNxJviK2khIwxUH+y2/Uh9LU+kYI5mjk1ObCnOc/hxcwH7Nhgu0G
+3yqydfwAZxzvq9eHGU5/JdTDNNvUK2qwpbDA1izSfuOhqyFswRXiu0RcsMbc
+i9zb+Isaj8CMts56cm/x6PTfYErakyVXrUM8v7VMnLRg1v34TbHwgLZ0iCrp
+73RRXAj5aHt282oQv70gnQlrHcrqMSL14o1Z0EQ9hlJOOTgTF0iaNcASQ5k7
+Ikl9RGu6FVBfj28GZVWwRwm3yBVmu+bvnoMbdRJib8BxfJtXGiH/+AfhzmxY
+0jD26VU4StQlrQt2X5L09F+Y5hZ68h2Zz0XUUlUF40Xv5w7AOVLfcgNhwQei
+ba/gRPFDUs9h5tUCmRLSf/SbMVUVdf3EczYcXibYw2sEJ+8olbeBi84fqfKB
+AyQXLYiS+L6p7o+HmX+00NjIJ0PziWk28V7mBjPYXT+7rBhurayx7kM9lL09
+LAvgEI0O9gW48WbJoRTYOmukQRlOfBqREUHGd3kOTaK+dK999h6w736fcz2w
+mNOlpSYkvl7tv4iHPzi7y5L+5Z4jU7CX96ntvDCdR/8VHfP9viW1cwj5sdZv
+kYsgz6eTNtcCc3/+kzwOU6khCTVwiC1viQ/i9ZWObX4Gc1oj+ObgiTzRL41w
+vK6w5W5S33TxWwMw7Xz8snhyb4zaP0TBejRx58Wk/uWDwbvVYMWeSiVyz4p6
+KHyLxE/98zPLGqbulNUpJPFyH+sGwXkGb6mTsPZc9VgarPXm5vWdajinbek3
+yD3SfNkK9UTY2nwou4zcmyavCg/CGUoquwrhkUm6oQgd5/6vCuu/4SO3u3z0
+4Pj7AhYnyT3QUfmMA2kvr7UygsMtJJ3PkPaKvLHl8KO/n1yIgkXaesTaET+H
+8colCebuC59Ognc8+ziWSif3o5kqJ1itc9gxHW7kTF1WguUnYmi36eT7AeMU
+qddl/eOUBJjDbs4sh/8sS5wLJ+t1nUkh58PB58YG/qRd46lSIPxzVEfCFaZ3
+uHGuwAL7zk/ZwNaBB0+WkvOrYZvaTpj1bvhfMr83vXq9FokvfZeqCtb/aEzn
+KsO0senQP+BaHk6UIpz89cZ0PjmvZLw6lWBTN5MH3+DZpvPG6nC33cwNPeRv
++KcT1ZC0SzWfCoelt5nz7SfzezaJvoC9ZyLbvUh8fX03luCeufrcpWcxZPzl
+E9a68N0U8/4SmGKXLXUUnvLS4usk46VHzwTCF3m/jM+T+LZquEfB5+z3M+TU
+kd/k7qoI+Nhk8DULmFZ3dfwM3FT/6bIfHHB8nm4HS7vxjibAIX6FJqqw5ism
+6x7MGCm4Mk/2T0nz7+ewPVelso48f7sbu7rhChm/91dgd6GY7e/hjOlFelbk
+e0C0z5ePsKKSwfh6OG4yO38IHp/j8n9Effg8pAW5sPZkjuEzsp8bnlA6iQse
+dmfCgYV+CWS9GT3va3/D5+K5fOUwVXtjYAIsdqur7K46qXfo0gx45M31JYkk
+nuC/PlTBHWk3bSNIflo2oh/gR1bN78+T/uLzFDHEo6A40nKK+KnccXt4w8Xy
+375w1ORIUSpcmk5Z60/mU6t8NQRvmbrpE0zaXYxS6ahPb+6oaDwx++7IOXjO
+yKQrh9T3H7GUSlhNeEy8Fk5uXz34Ha652C4yCHMuzNpL4177+EJUHVUD56MT
+VYR8j+hulx5Wg023xPYdhB01VFTtYe7Bu8sOw/OXt24Jgcc/ZHFs4Eavj0k5
+ME2Z81IPTt0nuaKJ9E8SzxKB9bjvvUfIfC55tp+xfpAvu5Z3C/n9ovZEOVw/
+E2UnsoXc49ltZP9YG5pVysPxdsP5RnD2/qR6VTjgNnsTFR7otsilw6wmvbMd
+5HnvC+xUhhUVpE7nwIW6uStkSX8rofwweJFEqvl6mGrgLu0NX49zqVgKN3JH
+9rrCqx/mZk8hPsqs4LQn2S9N7NMfYMWbJhrkvCq29IvoJPlmjTAz4Ev8YyqN
+cAjf520tcFX8iQw27LG+vYXEl+5v9rYSbv1g8MQcHjkdWfmY1KetXykBdt+8
+vLganqm24OmHlW8aTTTDHJb9CjkZct90Pf+O9I9L3ngcri6P6PlJ2vPSdufB
+spUHPcUQv7Zzw+t++LuP1/btcNT0YBofvneYi6RpHiP1zNtClYbf544ti4Fb
+zU1FVeGfzoddHsJ0Pd5YZXj3WnZzLzxz5kezBPyL/L605f+/L8ky/gt6ApWe
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10.791777955940793, 5.1492961558718795}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwt1ws0lVkbB/B3IpfI3ThyGYQicXRMufcOckvlkss0ZUjquOQ6RKmOiEMS
+M0juoRw5M6iJQo1KxSRDLp1vUDQ1kT5RCpG+//5mrGW967f23s9+nmfv913r
+aO4Ndw9cRlHUffyT5z9/6+h/njp4DolGOcKtmqd4b7Vpaui/ur9kwtwfTfT/
+hDm/fHWyG9591aujAWY+S5+RMKAptomfWRo8kv+txWY4uZKf6w63Z7VMsGEx
+C1MvBbhOoWk+Fc5ZXk53r6Yplx3Ddwth7V5FLy7MeZG9uhJuzx24aQ2rjr7a
+dR5eNDP/9b0WTVV23NbJIevvzAbVwose7ryjsN3u2tmDsGR4WuD3MD8325YF
+M+6eN7KAOec+T1JwnAdXUR6mH4xvEWjSVOe7wW3jqEfBM8+4CWa4e2u0wi5u
+XkZVMFeQ0XUOHtPjbi2FX78bTYiD26aUNcvh1rhfVX1Jf4qyhn+BOYtcHxf4
+mlyIUxscqieZZEfWJ5/qG4HFrHPSHODF6rUXl5F8TfmvPGE7/8raNXCRsHh9
+ODx3J/XWNjiZoRqdA8e1dJ2PgtsfOXjfIe4s1cqBR4bSVRdgV3uuaR1MWTuv
+MUd9nbK7pO+S/jxuzD5G+vWhX7UHdjUw3HwP5rYHMHuJ5VqmpdYj34FNx3+H
+n1cJ+3vBCZFB/AZYWCvdrQAO7azqPEvy+T2mRkDG7Q8EhsHcgpkz0oY05RN+
+5oAFbLlte6gVnKE2okP6nTDxTtwf9msMd7iJ+jXujBbEw2X1nQ2HSH9sB26l
+wDOlYZmGxH+I53FhRqW10AsNmpI59U35cdg1Tm57MdxWYf80FF5c+pzzLexS
+87HaDW5vjuhXgV1Dw64awezm6tIHX2G+X9q8GExfTZuIhIsW3pY8Rf7tsWca
+DODk1yvGr8JjZjzvT+q4NzY96pnw2huz9s/hH5QuRQfDvA/SyqOwT8f4lAvs
+yjdLegu3NEv5b4KZ68vZXyJeXWCC1TqY0fvyjRPcORpZqgd3X9MrS4MzzPpN
+WLBMalRyD8w8t8XMkcRrXHFJCvnzRJqj2XDye+YOEzh54IHpTzDbd+6IN+zX
+xom8T/KXfCIfC4/oRl0UQn38Iyp6mTBb/IaUPez4h6dMCTzVtqk8A467URVZ
+CWtzDQz7yXwhH68ymI65F6JmhHOzqduQTfqd76IUAMeVnpkg8ZNrrEQrYT89
+zmM3uKjbz+YJLNlt26wFL83MiIsxaUqwcy6pH/Vcno6UUoVldhx+5gX/fVSp
+Xh9u/VKc9RD9uihhU8OCx/4MSrWEnwVITG2EmcPlptVqNJW5uYtvAvskFzUp
+wfqm3g7rSbw19WEZqjSlntX/rSbZ77uFWAnYzuMqXxae6tHPyFfB/XGy3bOE
+/Oi20483wn03vhjoh8dEHj0aW4V6gs4u1cD539wzrIN/8PD5Kglmx6jePg3j
+9YvdAzs6D3MS4RYFGy0rWEP+r4R02C7JWVwb5hz1fnMRDk2x6pAn1ux17oMd
+1ZwurITr6P2e0tjfsiImXg5uDUt02gkLHx6t1yL5dIUtlsBxWlH21vC1zl6x
+CTj5Z93mfbDr57QFFuq7Ziemk0vq+Xt5YgwckZjC6oLnvBOya0j96lPqokyy
+r3DBI1hfTeySHux3X/r8Szil0LF6G8xb/2DfGDw0rrQYCdMOulG98P7Jk8dy
+4bIH51k8mK36RqGRmGU/ux+W/OTc2A9TS6kTMnD64OUjU+T8BkzlecjXUPFq
+qYgx6uugjI1glweKWUqwgGVcU41+rLr186QWnO8vG6QCd7HX5a2Fu78XreEq
+I9+2M4XEUwusp+8ZeD/+9t62GqblrH44ANfxv2Mqwz5X5PmjSuhLTeLHFbBY
+VVIEG3aPP3ZqnuTLdlj3+UuaMoga/+sFuU+8TRU8WCCxTKWHjGvMP90Pt5hk
+erTAI7ZOihbwpV22dTyYwWnJ04FVfZmOZ0l9PcF9xOrnS1TS4IjdfD9z+HD+
+oPhxOD+2ZsmPxP/o3h4PZ1Vvup4HO1ruHCRuXTlNCeCCpc4sMn+sJL9bA/ka
+rjf8lE76Hyc/EAqbsgs/FsJ1b46VNMLt0gf1L5P8tHPuLMImee/nOpnk/mUw
+TNGPxSsBFRMkPqOpLxCWyzy5eSX6cU1Gv+kErNWgdpcJM4saN2bAwS+CGZ6w
+Y6rLMQ6sLn9IMR42FTUv9oWH0psKC+E6velEXfiJXdG5ZnJeHxo+CbB/GWOX
+kgCOmHBpOQS3Bo/TU+R8Zp9tWA5zo0LChDbgfJhfpCaj3reNT/RlYV5hUNi8
+Ik1t2N9hqgxnGZuLs+Gye/wcFeKFnsY+BZrK+8/aGAZs6rlm0hZequxylCHx
+fLxFmuRpypnTWE/iz1lYK1jA6RFSx99h/7Ha4ebf5XAPyh9WjpB6Is0kQ+G8
+vcIbOmFOtbafJmzzTsy+8f/5Wtm/lsX7ekJ4eQVZXy8V+RBuM96ekQWXCb2p
+bYN3zki85MAMldmpbjjT6rRQDFmfOr51CtaW6Kw+CI9EVClqIL5ALiY6hNzP
+aPbCbtjXof1uGLn/N8u0K2AfpayHh2A/Jctdk3Bcos/RFHJ/h4qNzVFPstHc
+6QLY9Xqt2Qk4ds3+xCuwRhpr7W04bONvVd0wTzR9+QdYe9pBdxqWyTXyXIV+
+ffxrNaWA/jBL3cwM4Dn1IA1TmP21bJYenBmgF7gbdrzlIC4LtwdSNcfh9h1v
+WM8QT86yXlAGj1ldOFEM8yN3v7oJM8SUHexgny1DCwISvz23UoD8Q7cMu03C
+gudGh/eQ+vd4+S/BcS9jtgygP3xRhX4xFubP/LFkTzyjlr0Szn8+P3VFBt+T
+xL4rkjDn7denNeGb3KYcEdj1xOSRtdI01SAy17qAeGXyF6M1pGhqmcH196/h
+kWCx+g0rcb9jKxiDZJwX/jhQkqZ+HPjZ8D4Zt91n/psEvocR190uk3ED5yob
+uE/H80IxcWCB9dsVeL+r1bemE/exfLvgFaWbvOPhusHS4n44+Ce7uyFwd3TE
+kDDWX54KDNsLtxro7PWG97KyKV8y/tlN6j7snFw+S1znoXbWBfnY7DqYHwjT
+Ifm9T+GUkKX/RsJUyaJUHPIPG9XvSII1hhL8JVHf6+2RtwtgmRFNiRy4z1nZ
+uoHYRu6hCPrRUnsgqh/2C2i02gMvbeOFz5J6jfYpZMMJa5r1VEi/FeKDimGT
+x3dObGaR73nM2DF4lVGmVwCsYTQ/zYJ1+1gpJ+GsLR78Fuw3+emU0AXY79Xn
+L1RgfsHUYCvc6qSc6Y58vYZffSMg8QbSDrFRz5N9+3JfwXRTjGUA6tfeKh48
+C0covw93Rv9Knp07tUTiu7eF6or/+7vC5N+nGP0/GR1iig==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.93763702332162, 4.533080933367719}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl1wk4VekfB/DDRCjcsoy1e4vsImIU5Wgk0oIaJAol2cYyYynRjUTKuNeS
+FqNbphDDVamEQsUoyy1l61/dQQtJN0ZZ0sz37e95PO/z6X3P7/yWc46nxf7h
+bgHiFEW14Jes//9RoSkWWZWxfn4pOP49TV366HHwF9jlSdykMVz38qLsDCxS
+WL/kHdbcpEOMLPw7e29qZhPsG+C80BxxGOdPvGuAVS64q/XAgj4vi+fw7NjY
+1AFVmuLsvXZHGdelawadU1KjKUri1PoQuPlmQOAFmOMvzuqCJcfP7NNQp6mI
+tKIIV8SJ+4FXdYjY2+tIF6y4IJ/bAvvOSmjtRNzwjE85k7Do5uExIWynqF8/
+X4OmhCVGvR6Ia9DDj58L10fr+NTCm5V0Ut7hPMddb0YK64nRmAe1WF2WRkWs
+xGpfa27BxspLHxnfgHV7UcU+a3K+LGmHDVY1v30x/yBOxJvbhnKwREnJiUpS
+z75eTiPWCe/ywjisdG2unQ/WWNVc4y1Y2fejNw0gv+g+z7aV5Hz48x4vuPMQ
+T8UGFly+9uAB6ssPLQr0hE3busNXwZpz71dlkuvtTFQr0Z8fI1fl/A2zjmVW
+W8C86UmTjciDfTklrR393mWvFNyqTuodK2fDHT/wxHaifkFJp5gLzJCoap0h
+/fnwrH0N7Hnr9uw5TZyvO163CV6RtDXSfhHiigc3xcMHZjKpAZhKeUyTeZfm
+8TqjmTTFL+RJ6uP+109r8z/DnCvdpQVwjFkR04yFfPp9mlnIv1FVRtsbpk9O
+ORbD5mlm7+Nggb18jzHqf9KYuSINjujRs7ysSrN3Zd3Ylw6bjmvwlFGn/KO8
+IjY5T9/RC4M3bNlfEUrO/7NdqkSNZs8c+73ZBeYtbv5fE/bNPvHPm8DCwfau
+e9h/8WupxXyST1jwY/Kc1fZIrOhEvi4vLnn6w4ed06/lwlSz3HFJuPz50fwA
+mMUsn8pGfoOjr96sh339BgIYcGmxWD4NC+8sj05CPWFFV7lu5PrRRZ4fUX/r
+ataWQyR+WHPQHjirZ814E4n3o2VbP/rndEtVTZH0w75UFu8Ze9MeRyuSv+D7
+J01qsEr05qFcUk8dd/sLJZpSkhU29MMuxjaV9Uo02/pL1SfzxXje4+I07sLV
+lEzSUTjCssL6FXzPTXtjN8wrlZNcinj/9vRu01pCnueng4kw96+2Z4GwaDB2
+4D3yaTf0SrkAM1RUxvA+srVnTA48ggVHui3HkH/aRUn2OMzqrQnaj3rfOjNk
+pLTwvHzwsJyGhQXutDzsu0qtIAzze7yzYFYa5jurubfBs0dH707herohXl0R
+8yjO/KlYSOK5zkythu97f7FsgKmAf9iOcKrrrEsBybdGZdAM8/jTqUUiHuZc
+1ZL8ini6vzODvWDh26nQMsyjo+72z7Yk321PmGvJ+9T86aYRbLrBJvIe8ut3
+W3ZIG643K7uxEjYwtAjRI/H+4E4Wo74czfHklTBfSztdFb52uoDpSfKd/y8/
+C/1Jr1/xMpncz+bSGnX0b8I/4moNyV9lgWU1+v103tfhWRL/rWR8JNwuZ+Lk
+iPoZrUc562EH1xmtU7AwrTRoNeZpYngndRjm1CZv2QrbJj/daaON69NXP0+F
+v26cPpMOs9f2LuyB3c447XwMC/4NTLBFPop11xYvWIr7L7wVdRPWWT3UZQ/7
+Knv72GB+o53934XCwonXivfglv7rXSkw/6HYGkcVmu0cyjHNgk0rZf9sgKMn
+nIq4sEDCpUkf/dM8yUkg50XF3C7y3X7gMs0NhynpzF182Gp4bJ0bcazVtmbM
+I+9ch48pibfxrN1t7JufqXo2H6Yrt/jnYl9J1757mOR/Z+/ZzdjvG1+0rQ02
+1RPf/R7z2HUhWfUGce8QNwYe0pPKuAyzSjOWiJD/Cc/orBJyvWaf0BduLA+N
+qoIZjQvlBaif12bc0g7zN8TNWYf51DjsTpyARfzOB03onygyoEkP+TCm5ep3
+wJasAaNA0i+ldloa83Fv9isuJ/W2HPbtVKSpnleZVV9If6VvXamFx5gzcZt1
+8H6dzdVrUqTZB7kBr3gwx5Q55wMcz70xKILrk+36VyBeOLXvsLUu+jPb2pdN
+nof5JnKJsOiz8Jok8uP8Oup0HaaXTRmlwqyw9wn9MH/huKMcnr+8h49zxPQQ
+r6CwKgf1ypbp6yvA1IySvgLmxTpWnv49LDTadA/fH3Z30KJb8rCgIyj8Ofr3
+Wr5hxyzi+e7wNVyEfncZ7D7/Lf75yW12mIfBkrdGjbBpbs5Te+z/LPV1pIDk
+W2tqqwd/LmmdiIeFi3UfjyAe7Vnu4U3OFwaG5sK33dQ/rYUFEZK7dWBX1VFf
+s2/1aTleRP5DlXOvGMGsWiueCkxxWZHm5HxIeTrqpYI96UPr4Yjn2/2nvr0f
+IpkgXfL3scsrGvMZOd+ckUfuLy9iimO/ZCCq8xE5n6t98CLmcTK2V1qZ1N88
+KbMH/W+LTuv1g3kdujM09g8L1FOuwKLqjwOrsR/DpOQk9PH9FN6t8ML+6fRz
+3u6wSNnr91zs33Z4EVRInOzk8Q771jHVgUPkvEY1y4N8f8XevF5qAO//oNgJ
+e+1N+OwO09/5xXiiHvHk92vjYQFbVVqIecr9MKaZBbPf3/3FH/Mr+5DCPQuL
+Rldd6EE/rIr2ep2COdOx2jbon+8pk5fHyL7F2yOpsLP4b5pRsLDqPPc65vtk
+V0bmVri+vzCnCT5p6ieznNzPeHkc9qk5IUGnZMm+1I6nR+GGwJ9dRpA/y272
+HfneuTpbGglg05U5Rzpx/9PlBcIaWGCWVOcJD2u4VleS80khTR2ox39kcv9V
+cj7fLgPfG3bM/jyHRtIP8Z/8KjCP44Urcl6Q/a/OXB3YPK16iRTub9rDki5D
+PzXKHKk1MIO1YWId/Fvwm9xE0o+C4fApBZpy8OmobSY297V5ACvN2/BM2RDz
+XfVXzi0Fmu1TkT03COazmPMfwn73Rctq4PqNJ45O4zwjdmiNjBHyabVzdMC8
+oowPb94KR+joqV2GR+/Q97OJFwQnsTAvxrK5iS0wJTckW4h8rZraBsa+7Tdc
+MkC9cQovJOWNMU8Pt/EK1Ouc41OiCXNcum4aoj9mRalrmTAj6CebPMxTpBcy
+qQjz9gzlj5C/H/5sDkXOW2Ut0cV88n597TGI+IyrBxN+hA2lU+fcJR4JHrOF
+Q7/Ucc6R/KPeRWpgPtEjIQoJMMdQ73Qf4mcnpJ/cCQuZa/MTYINFYaMOsMjM
+W10G99PRE2RbwfX7cwZTkD/VeyXJAuaHG176jHqti28ybcn5xJGcvahX0zl2
+qTu5/8e0eX2Yh3Vl2ZkDxMsndLfDCtTfj0pJPvbjIcPo97OVB6LekniMhwHZ
+6Pe80L/Sl6E+QcbdAE/sR1eqXI6HTRXW2dvA8VsjxdrgiMQ/rWk4r8z2GHMZ
+9i91de/G9SFds/oRMH+L0Zc/YGpN+asamEH+34F5zSWrCf0fLfyUIA==
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.562492355174517, 10.345769235517452}, \
+{1, 0}], LineBox[CompressedData["
+1:eJwV1AlQE2cUB/AtxKMdhOIRznCUw9QjJCgKHrBIRJpBDXI5IzoUMNAWk6Dx
+YBgBL4gilSookgBB1ECNgkgLo4gWVDICagBrEBqUZhALgiBqihT7/zKT3fnN
+2/3ee9++Xdc4yZadZhRFifAnZ2oWObjT5Ehlcmkq+lm5SudGUxbfZkXEw68N
+xSuK4PrSXIUADmwL4G2DqYPrtCvgzunGMCY81epwng0nZggL279B3LX7lAuc
+El/COQJXN80ZdoK/vJ4u9IPXcGQVbrCyaWDZuCtNGbWeaRw4LtxprApmb7+l
+94clF7yTZSQ+5DwZTtbPVdKBsObXf43J8D+aiSobcr35kn1y2DVdkm9ywfU8
+pvgS3NNZE22Ej9aYpzfBLQbRyHO44YF/lAEW8Gr0PbBesbT2I5zKVSwcgGXs
+fskcHk3teTw/m6yn6johd4I3hglCrZEvwc7faxHM8snL5sDuk5rHXrAywc9u
+E7ymYweTeGaVVLsLVkmXTSyEtZMu23Lg2NYZpfbwTb+hqxfh0ANJp2bB9UfZ
+rXUkHpSfNop6Gt5SVDM8EXdncyds5V07cg8+qfZyr4VzOJuLG2ClZDfvDNnv
+Ka/MSpLP1q85BX7WPpBB8smDExeFwb5eyyfj4HyL19e84Xm/2DVy4WTR60M2
+cIm3p/kH9MtI/q+agoNGtsfUwoU6pY/BC+s9C1bvgk261NYHsMCv66MbnMlr
+HrsFM4osGTecaUpaKR69DZ+s3MVwhWNDVh1qg5uSJr8764T5SMzsHYAPdKv6
+mLAs39AzA/mKgjKjLrNoqqtvucYR/sqQXboBDmG2dZB503J0Q1OONPVCHuRM
+5kEfb1HQAqt8WAIpbNb9ybICVrYcNsuFOdFF/cXw8inxlBrOO+d8Qw3rpy9M
+34HHkzWhzfDgEd0o2d9H4VTDG7jtfUp/P7zPyk/shvyDGQ1Ow7CnITg6Fp59
+Ln4ReT6FTftZKvjkSF37ELzEuD7EAFec/byA3L9lOEVK+tM4vorogA1bEiR8
+mFs1l3UbfrtYn5MAs70nVpfDHWajZXvg2BPs68fgawnTfAl8b7q+fCdsYX2l
+OxL2DaiN5MN/BvqqPeGtqReZ5H2SLRb2vUT+rR4yH3PYxB5TyOGkqzXGVuw3
+J7yg0xGuD2jsL4SFufP4ZejXNLE6RgLHuLIi7eDC3k39QrioouCd3IGmaN3S
+U/5wBEuYOGGP5+a/ftIX9s4yucfCwh49j4ZFE/YlT+wQ//TDzXA460motQCO
+HRs8sxu2eJsW88QW81KQylfA3NObO0Ww9l3UIKnPaeM2h69hZdoCty9Q/xrb
+S1aPbFDXwYx3LGJptaYMNv7+ve1quPqhcUYOLN3DDoyG6d/u8o/D3ILnC8n8
+VxS8vF4E5z1oL8mGL+5Ib2mA9X9HFJ+HH5r9HDoM13JeCC7DWRl793uQ/GU2
+s6/C3HQtMwE2HczdS/xBJmosh+Vz/9hP5ul0ktXHPpihDPZVkO9Zr1Q8H/26
+P53lfhymxJc91sJ3zaoHSD2zGauUUSReJ4uPgm+Odb3fDucb5VdWknkPtrAL
+I/v1XjXOhA//OHWfAwv/mskYwv7Yc+6Wf0C+enlcZCU8ruDxK2FV6V7xTzCV
+08oKgfPu37i1DPZd+SbtKfqjPNpFDPjRS7YogvQfIQro4+B95KoztEzEN5xX
+34d7U6f7fGDTWutj9bDpjdsr1QLU7xO3kpghCbO0hNk68/x7sMvtnrpD81Gf
+i8NgLzzyGb95uI+cOfT/y9lRKw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.058738695939086, 17.601506520304568}, \
+{0, -1}], 
+        LineBox[{{17.000000000007276`, 16.500000000005457`}, {
+         13.500000000003638`, 10.500000000001819`}}], 
+        PolygonBox[{{15.552322615314452`, 14.01826734053906}, {
+         14.602165824326175`, 13.183281069670574`}, {15.293188945044921`, 
+         12.780184249251306`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.984057296392571, 13.323799910437668}, \
+{-1, 1}], LineBox[{{17.00000000000185, 16.5}, {10.000000000002592`, 16.5}}], 
+        PolygonBox[{{12.9, 16.5}, {14.1, 16.9}, {14.1, 16.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.5, 17.4452}, {0, -1}], 
+        LineBox[{{13.5, 10.5}, {10., 16.50000000000182}}], 
+        PolygonBox[{{12.052322615314452`, 12.98173265946094}, {
+         11.793188945044921`, 14.219815750748694`}, {11.102165824326175`, 
+         13.816718930329426`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.015942703607429, 13.323799910437668}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{5., 15.5}], PointBox[{6., 5.5}], 
+         PointBox[{17., 16.5}], PointBox[{13.5, 10.5}], 
+         PointBox[{10., 16.5}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T12", " ", "P1", " ", "N23"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdgei/fgfjhihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdgei/fgfjhihjij.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:eJwl1AlQE2cUB/APCHcCEQ+CF0FaRQckUEhpPXaFiigKVqmg9SAKFB2O4IgX
+kaYanKBSDqHGTgQUqyjaIIOAghiptkQQqSgGSjEIIjKEQwRBMtL/2p3J7Pzm
+7fe+9963G6ed8RsijQkhkfgxd9I8iWsqTT5d7jRJim5wVsD5mzkmdYtpcsZy
+IsURpoXeI7mwd4wh6awdTdQlmReOwLMTfu+3hLVFMaJo+KJql3viFJpw+Zkm
+4XDr48O1L7g0cYkKfBQBS3k/BQbBY3OT9u5n4vXs5SdsaRJg/9whm4k7Zisz
+bGhycAkVVQV7nb58q4xDE55XWYoeFlxSU8awhfP2lZ+j3tH7WcsPsGkS9ka5
+UARb3Er6aA9XPNiemgt/ppG87rJG3s7AolZY3PhI0ga3cbQJlgKahER8FTsB
+K9Z0h82Dp81OK1+K9dKKQr0QbuWkdZyFIyajff3hMJ0NZY39laenFgTDageB
+vxxuFA4qN8DJdmy9OeoPmZZmwsS1Bj37J7hYfuntNzAr9e6fvTBXNVrvBY8a
+/dC1FP3r7o1/6QgreW88xbBr1bNpprDsRMLfyXA4P0rfgPpDTF4kRMCFJTq3
+dNhnBkc+F9aORKSvg105TyOvIf/YUs1DNny8OtXXFhbE/pz+GPPzyVG5rUG9
+0ukRUQq4LHu7XoT+LEI25eyGa+w7NFsxj2Lb52YrYTbvVoCvFVxZ6uUKb9pn
+0TrTEvvdfWXPh6Mru5MGzDGXnNY5TvAMu7xQjRnep+E6Z3dY0j512w1TPF/g
+c3A1/HDFrzoVC+f929GXcbCCI6PqTTCP7tDic7C/zcp0NqwN3ljbBF+NK9qS
+aIx4vOU9G/TTM2gutoR5KccmAmHWrOgajRH2W2imlsOlTZ47bsL5ia+/r2Ge
+N5w5yMSli92oUTiMtUNmhPU9/25iT8F8dT73YkPhroK7751geoar9g/Y613Q
+bDe4pMhGvBz1GAr1wx4CJv8S/2o4Y75qmQC+7/Te42v0w+o9S1zguMxD3ldg
+btSWkw5w81Cezhj9y450ipnzHO2WX6dgntCP1YJ6InIXbdwM60ytT+TBvOrv
+rALhRr+sJ+Fwcqp7zRR4cF7Tfkf41LKXK64hv0XCQ9d2zEcr4gpnwWqjm1fy
+4PU9iQtFzPwGQmRR8Id8s91HmX5npfC84Vr97acyzKPCemMsh/n+RNy8eIJ4
+XuXcITeaZN9mGXI+UkTqORnYAa+tv3OeMlDEZ1XwyXa4T3H9SP84RQRe2zp7
+4OJjgxdL31NkLJNbNwm7tGtcC0Yows+Ndp+H/NxHnHjNMEUU71b9GASH2P8i
+8npLkTCTK1VH4fwug3n/IEUqPJKzmO+duyPW+sMARUj0urhx5v9AJr1a20+R
+weJYpRD9hy+YCPKHxx4XRybARLS5ZTfMd/jC7TKs9rHlOGM97W+V9gxm74o5
+74b8vEMK8Qe4L6BcMAG7+N+YbsWcX+W4Re8QRdqyyh9wYfacvZk9qM8g9Rxm
+rBAuSulC/VvXxmQwz8tMD1TWvUP95JBqgsmn8Rs4hX6Jp21WM7OfVZ6EN0oR
+i7TjAUw94jN72CJY3b2/Jp55XzOezN8K88q6VnvCiiHfS8Zw4WH+niH0y3fq
+M/0W+aR2LU0q5jy7EuWrsF+P5DQlZr4nY2/vXtTH86gPZs5z7YLJIhr160Ys
+9xkx86QnLxRhHhltjg3NOI/wPj9VXC/mMf3+zHJ4/T+RQb2vUN9fktwCWL4r
+dOeKDoo0Jpfan4MFT5VVghZ4UXoZExfv0ccsaMT+US2f1tO1nZKSavTT4BLG
+5P90Xbzz/30x/R8h+kp5
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.2761166322027524, 16.884033677972475}, 
+         {0, -1}], LineBox[CompressedData["
+1:eJwl1Qs01FkcB/DbZJnFMgyKoxojPeWV7anmrweKCoW2nWrSU1o7JVJLHq3X
+JKaIHtLUqdSUkkUhNdFmNctO6JSIOdrooZo0FZrY7z075zj/83Hv/97v73fn
+/x+70F8DN7MIIXvxR6+kYxifUQzR0KslQy4V9r7KhMk/Hg1Z8IH9BgpDWGrm
+sP5H+Bbb5+MeK4a4jEsf9cmCIZdv6q634f/SNyP1m2Ar/p/n5sKykFBFA3z2
+uPD8KVyZHLvlL3EtWPlqlwGuxRYmk3iYF+l5but+LkNEI9h+u2B2QP50A1i1
+7O3Gp3DJTEvZeXPMr77+LRD7nrU6sk4I81obHz6Cp5XrdTvCKp9YCyFy+hZ1
+rR8Fy24cbeiAu59xL9jAaqdqt5DRDGm63BzgDhMnx+HbsNvG2qciev9Q7T2O
+NUN0M07eOwlr/Ba7+cCL6qa0dsLSnfa+oXDB3qrwicjH0+NnroWb+RFnd9C8
+d+rZc2BHkfruJeq1FcEDWF981WdPK+zi1ZZRQPdT+475AnOqM8yc4IKt5v1D
+MIms2FiEvGuycza/g/1vPGjmw4dPXBmuhRkVcTuKejXP3a/G0/ms4Ggj2F7r
+dZFP1z+8bksG+uUqSd90jfbH/495Y+FfmkP2Tqb9kK9cex99Vz0TRhw1w9XD
+XD8drnL6mtjPYYgiSGoXBq9URm9eDUvjpLbbYJMPp7ujTDH/VmpLMqzu5NT5
+miD/UuFxBcw+umLkvB+wv+nchZbYz4+zTxVojP22hf0cDwdHFUpyjJD3Hit4
+ALbqrw4ygF0ay1tjkb/dmdVWZIg+1feYjUS9c4wrJqTB6iyWQTIsEucWZsPF
+0cf7v8LmVt9WKKmrS0s3oH+KA+sfT8R6jPR9TzEcsyBytIzu9z4o9AWsVkam
+TkYesj19mQ4ur4+tvAn7D4kDtPBNvs03T+RXm5w43wDrBk/2VMCiL2EmErhm
+UkafJepNSFx03xFumdsy5AeLEhtXViJPTHypMgQmn7eumAUPHcpd5QqLRzTZ
+FKE+2486s8dYj9NZmDkOJiZeNktov6ofnclFPxhNHk+CPGLPFFNreFIaCTyN
+/OIzXFKE/h7TSsylqNc/NrQihD43bvJTm7/H+X66smYMzJ/RkDmFjfUqXQoJ
+rPvosPq1PsbH7OpiwfkTcq4Wf4e8HV137OHXMa59aXoYD1Zs2QA7pUw6GTcS
+6/d9Tr8J79bzKcljYbzp0ZHxyGN+f4qwYwTOvy6s/TSsfdIWGwy7ZMXr7FFP
+prUshkXHd+ZbyeHAUgvLLoJzaatyn4p+ROxwju2DZQNBZ2SwxPGLyAnzxdb2
+8/XQT8P2UYsyYenn2c3+8L7VrS1s7K9xkgQmwZVJ2WHZsP+tpca5sPC4JJ2P
+vJqe8of0fGy5gkQ5rFav1qPfh/LQsoFxqE8abnvYBp5xl3swBuasCXtMz8tG
+47zwMvXvqXFecFqXp/V12OV+vHst8qeYPPdJhsV6ByJmwheDFFkOMInJNJKj
+/nMHO5YewX6Kt0mED5fGaHc2Il/xMcdv59E/nxfcnZ2oh1jWWXrAL9dldf2N
++kUbhLtf4Tk1zvP7iRkWEIVzv2UJvEP1zPQvnYC46HPyjsH59d6vvAcFRDpU
+ZVYAewyX+D7+IiCabVGmNfS9Y7OgJeMT5r/gZtHzXTUtxS3uo4DwIqvGCuHx
+qje2lR8ERPYknP2APu91heEBGgFJyNNkeiHvxbJw5bF3AsI8sJ2lhGN6/z28
+7q2AqP2O8ALo93OwZEJfL+73frLqISxLDuR5Y1x0m5m6GP1SGUb5e+N+zSHz
+ExeoM7Rdze8FhFN/KlkDu5ctjH6O/Xj2S1jj0H8yJU0+iDy8GwtSnWGLoU1J
+o5GX2C82tYNFeaPzHbRwVr2DFvdrU5ZHGNH6puk65XCGSVJ4GSzzaLzrA+9u
+rzEy/4z+HUqUNiFfr0J8jQszL/stlsOxT/auuI75qoOvVXdRX3uAa1831i+W
+V8ndYYutzR1l2F96dVEOfb7ae60Oje9D/TziOp2eFzs/YD7yM8+nJSjpe3dq
+a64D+sFEeWb9Rt/Lht3Tt/cg32DKLG86fme2MqoL/VX6fXChDpWPfftUQPyv
+WMlnw4rsjXEzHiKPb3SNCE7QGdsuVKCfuyeYnaPvcfpJqP7/95fL/Ac/lbt5
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.128720493773297, 4.310154074720437}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.00000000000273, 17.000000000003638`}, {
+          17.00000000000182, 16.500000000003638`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.286281316503036, 17.427512100981787}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt2Hk81FsfB/CR1CiVaLHFyF6WocgWo5QlISkiTIVLISqlcpElQnJdSWWL
+7EtTIVLT2CJ1rcl6PVNJlKKypzyf87ye+cfr7Wzf7/d35syZkT560sZtEYVC
+UeChUMhfyvwCXusZlP+91jEoEjyqB+1EGBRasnBoBGwq+0K9HvYdLV2YgytW
+KQftFmVQGGmfwhwxTrDoiFYXbL33u0QWmSeoM+mUGIPClOVd0QInR+rYC4vj
+/4/VR/+FZVsaxx/CjO9tlaR9zSC721KCQYl/HNyfDZfSy5oHYEGZZsFjsLFv
+sojLBgYlZNFpk+Vwooww+yXceuevM1mIx1rzdqW0JOb7EWSjDgso129wgTNY
+E2JVaxkU16uCKmEw7b2krgkseJx6LA5mKukt9K1hUET2m/qEwr59aZbBcN5x
+lvhRuPX2R3stuHvuxRZ1mNXW48AHJ9KpFhMkHkk+zzFhBkVbRT6OBXOsysym
+4LozTgEn4IwcPhcx9J+Yjby5CR5fKZfpANOCTlv8QH4Zd/hYpWQ91XL/JpjW
+2Dski/ioXZompbBvz2xCDpy3fK8AcfzKH4pbkV9A0SqeVzDXeW10A6y/OFfr
+Fxm/ZJW1A+oTqC5x2QTrxfsslhiCWcqaCfmkXpoWH1zxHC2MLbtpyCdegde4
+DR60YrbkwxTFgYfyeI7DWqXCDCnUk7Pw8gjcaqSQOgCHFEp6hsCHD7F+G9Iw
+/tOPhkuwGPPivmsw0yI/zh0O4tl4rRem53TU0eHH/RYaUtKY57Pj4/dYjzNi
+stSROOzqQBhsbaptEguzDhpfWQcnV60quQ8zirkVdxD/2S+q0U3w+H31xs3w
+p7rJujcwM/2TVBXyN47ofk88fsX74wGY0TLK84qML2FX8MC3Ig1qHpH24T2O
+tajnspzreilwxpH/RKXBdTU5AxdJ/6KkZ9fJ/lj0xe4QHFK9TqYA1g+447MN
+pk0G+PTByU/+eCcCU26lTStg/mEPOzMKbK1SUxsLfx3jGx9D/ty1pkV8iHfr
+PfGnIzDlGDXhKjyQ0CFK2jP0k1Mkka/BuiguGc84GRH6AE58LmdD6sV8s7Rr
+B+oXzVgibE78zOPQC/gon6NaCPG8+Q4G3mdxo9/kOWS8nUhMJhw7XL2wdCPW
+15VWHoW16h2cD8CtBj6WYnjfqcbyZ2XDLMs+n83w/CfTZVMwZWWTrxRcLjPa
+vFMGz3d1ePo0xps+dbKIhVur9NLKYfsD5lL/wL7JfiZMmF0gs3OxLNaP3vfn
+LOJT1Fi1mQ77rjjwJRLe5CTQaQVbq61tWg2HOru/OQpniLKCUpHvJ6Vupic8
+vsvfRR1eck+G4QoLcoscO8j58qduqy1p/84ojSLnS57fqD7M9Wh/fACODo7v
+liTtxY4p22GxY52yvxBfyMcfOjvIeGHzuF4S76Ybq11hjsvX/krY2lBIO5P0
+73CoTiXtY4dd52D7lLCHUTAr881yT8RTYqH1OhDm5lLjRmDqqZftF2HB7jbv
+s8hH12Nf92XSP0nnOj/qMW+scT6N1C/obkYKXPR8SUkNTC9+oaKE+gaFjHV8
+h2nUm5vy4Yo/fEtVED/LeidtPd7HQp+9E/1gplfdWR9Y1TnB7Ampb3FRcSHs
+vl74wHI5rP/oeCQ5B44uXFl0GB4//Vu2FU5rcLtSCPseZAs+gsunbdSmYVp8
+/rYwmC084akvj/lbbrZtg53bTX4HwL6/Luj0IJ4kIx2JQpgh4f/IC17szOff
+BlvTMw1nkE/BvSN7PsPconOKoXD465TAGZhi5dcvCCc8Mg2dhWm19dEF5Pxw
+cvAagzlrZ3ttYR8d6us+uHXnr5w1cLInfyMHzqAynn1BfXcPKj3MIPHpRFe9
+g1c6exsEkXiuTfVOwNqX1emHyfq2MRMyGC+p/8FsO5l/keZ5H7ho6qecLMnH
+jD+yjZw/HdXrheGQe4MCZoiv/UXqSoH/9S+cb4EV98oFCcJ0MfYVJvKdcVOy
+kIYFg3N9J2DJqNv1BmT95mDjCNRL5GfHLQ8yf5gdWwDnKtvZ430qma/r5bII
++J3eMaV/SX5lVKER2H6zzUVZBax/8mn5VpyzFg57wv3gjNuzVDdy7hpU51XD
+46OBxwPgwYpn8kKK6F9RkelDzukyXm0mTP875q0p3G9vsjUftpa5zuIn7WFi
+Dz7BrLSujlKsNxF8/+5GJdR/0WZxK9g1TMffCrZ+Uy1PPleHdC+s84XpW9Ol
+PeDd29pXh5P+84f8fyDfW7u+xsbA8R19Fy7DOUmTJpHEV8c2K8BFj4wSA2DO
+YY+eXtRv1Hyt8RFimVMj2XBrg1jiTnhcQ+tODLxMoXoViac1//T8VVjozku/
+BRK/1e/EYtg4NDl0QJE8T5vbI/DX/c8mq+GMxGSuIdaL7ioxLSL5J6R/K4K5
+ch+z0mGaRqCRMuLXNbTgpMLMttojFWQ/T/W25ZJ6uOfv2oP8Y180BLAVSVyc
+2AE4cA2n8i2pb8irthOoXwC3+JcgqU944+woHH6PR3QPzG1lBh/G517NOUWH
+OJi5Tu1RGawqdzGtGw6JPs0/CeuX3vVS2IT9csFwlQDOdRuGtnAAHKX3+tdK
++Hfg/IsGmH60NJIXfhVv/Vp4M/ZP62LlToxn11GyDsHxP/n9YuBNt4d/JMGC
+yg9kVeGSHX1fXsD0gBXBNYjPNfP8tm8wdyzI0xJOpvUvFVBGvm4Fmt3IT7Fs
+B10M5nIcrNxJviK2khIwxUH+y2/Uh9LU+kYI5mjk1ObCnOc/hxcwH7Nhgu0G
+3yqydfwAZxzvq9eHGU5/JdTDNNvUK2qwpbDA1izSfuOhqyFswRXiu0RcsMbc
+i9zb+Isaj8CMts56cm/x6PTfYErakyVXrUM8v7VMnLRg1v34TbHwgLZ0iCrp
+73RRXAj5aHt282oQv70gnQlrHcrqMSL14o1Z0EQ9hlJOOTgTF0iaNcASQ5k7
+Ikl9RGu6FVBfj28GZVWwRwm3yBVmu+bvnoMbdRJib8BxfJtXGiH/+AfhzmxY
+0jD26VU4StQlrQt2X5L09F+Y5hZ68h2Zz0XUUlUF40Xv5w7AOVLfcgNhwQei
+ba/gRPFDUs9h5tUCmRLSf/SbMVUVdf3EczYcXibYw2sEJ+8olbeBi84fqfKB
+AyQXLYiS+L6p7o+HmX+00NjIJ0PziWk28V7mBjPYXT+7rBhurayx7kM9lL09
+LAvgEI0O9gW48WbJoRTYOmukQRlOfBqREUHGd3kOTaK+dK999h6w736fcz2w
+mNOlpSYkvl7tv4iHPzi7y5L+5Z4jU7CX96ntvDCdR/8VHfP9viW1cwj5sdZv
+kYsgz6eTNtcCc3/+kzwOU6khCTVwiC1viQ/i9ZWObX4Gc1oj+ObgiTzRL41w
+vK6w5W5S33TxWwMw7Xz8snhyb4zaP0TBejRx58Wk/uWDwbvVYMWeSiVyz4p6
+KHyLxE/98zPLGqbulNUpJPFyH+sGwXkGb6mTsPZc9VgarPXm5vWdajinbek3
+yD3SfNkK9UTY2nwou4zcmyavCg/CGUoquwrhkUm6oQgd5/6vCuu/4SO3u3z0
+4Pj7AhYnyT3QUfmMA2kvr7UygsMtJJ3PkPaKvLHl8KO/n1yIgkXaesTaET+H
+8colCebuC59Ognc8+ziWSif3o5kqJ1itc9gxHW7kTF1WguUnYmi36eT7AeMU
+qddl/eOUBJjDbs4sh/8sS5wLJ+t1nUkh58PB58YG/qRd46lSIPxzVEfCFaZ3
+uHGuwAL7zk/ZwNaBB0+WkvOrYZvaTpj1bvhfMr83vXq9FokvfZeqCtb/aEzn
+KsO0senQP+BaHk6UIpz89cZ0PjmvZLw6lWBTN5MH3+DZpvPG6nC33cwNPeRv
++KcT1ZC0SzWfCoelt5nz7SfzezaJvoC9ZyLbvUh8fX03luCeufrcpWcxZPzl
+E9a68N0U8/4SmGKXLXUUnvLS4usk46VHzwTCF3m/jM+T+LZquEfB5+z3M+TU
+kd/k7qoI+Nhk8DULmFZ3dfwM3FT/6bIfHHB8nm4HS7vxjibAIX6FJqqw5ism
+6x7MGCm4Mk/2T0nz7+ewPVelso48f7sbu7rhChm/91dgd6GY7e/hjOlFelbk
+e0C0z5ePsKKSwfh6OG4yO38IHp/j8n9Effg8pAW5sPZkjuEzsp8bnlA6iQse
+dmfCgYV+CWS9GT3va3/D5+K5fOUwVXtjYAIsdqur7K46qXfo0gx45M31JYkk
+nuC/PlTBHWk3bSNIflo2oh/gR1bN78+T/uLzFDHEo6A40nKK+KnccXt4w8Xy
+375w1ORIUSpcmk5Z60/mU6t8NQRvmbrpE0zaXYxS6ahPb+6oaDwx++7IOXjO
+yKQrh9T3H7GUSlhNeEy8Fk5uXz34Ha652C4yCHMuzNpL4177+EJUHVUD56MT
+VYR8j+hulx5Wg023xPYdhB01VFTtYe7Bu8sOw/OXt24Jgcc/ZHFs4Eavj0k5
+ME2Z81IPTt0nuaKJ9E8SzxKB9bjvvUfIfC55tp+xfpAvu5Z3C/n9ovZEOVw/
+E2UnsoXc49ltZP9YG5pVysPxdsP5RnD2/qR6VTjgNnsTFR7otsilw6wmvbMd
+5HnvC+xUhhUVpE7nwIW6uStkSX8rofwweJFEqvl6mGrgLu0NX49zqVgKN3JH
+9rrCqx/mZk8hPsqs4LQn2S9N7NMfYMWbJhrkvCq29IvoJPlmjTAz4Ev8YyqN
+cAjf520tcFX8iQw27LG+vYXEl+5v9rYSbv1g8MQcHjkdWfmY1KetXykBdt+8
+vLganqm24OmHlW8aTTTDHJb9CjkZct90Pf+O9I9L3ngcri6P6PlJ2vPSdufB
+spUHPcUQv7Zzw+t++LuP1/btcNT0YBofvneYi6RpHiP1zNtClYbf544ti4Fb
+zU1FVeGfzoddHsJ0Pd5YZXj3WnZzLzxz5kezBPyL/L605f+/L8ky/gt6ApWe
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10.791777955940793, 5.1492961558718795}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwt1ws0lVkbB/B3IpfI3ThyGYQicXRMufcOckvlkss0ZUjquOQ6RKmOiEMS
+M0juoRw5M6iJQo1KxSRDLp1vUDQ1kT5RCpG+//5mrGW967f23s9+nmfv913r
+aO4Ndw9cRlHUffyT5z9/6+h/njp4DolGOcKtmqd4b7Vpaui/ur9kwtwfTfT/
+hDm/fHWyG9591aujAWY+S5+RMKAptomfWRo8kv+txWY4uZKf6w63Z7VMsGEx
+C1MvBbhOoWk+Fc5ZXk53r6Yplx3Ddwth7V5FLy7MeZG9uhJuzx24aQ2rjr7a
+dR5eNDP/9b0WTVV23NbJIevvzAbVwose7ryjsN3u2tmDsGR4WuD3MD8325YF
+M+6eN7KAOec+T1JwnAdXUR6mH4xvEWjSVOe7wW3jqEfBM8+4CWa4e2u0wi5u
+XkZVMFeQ0XUOHtPjbi2FX78bTYiD26aUNcvh1rhfVX1Jf4qyhn+BOYtcHxf4
+mlyIUxscqieZZEfWJ5/qG4HFrHPSHODF6rUXl5F8TfmvPGE7/8raNXCRsHh9
+ODx3J/XWNjiZoRqdA8e1dJ2PgtsfOXjfIe4s1cqBR4bSVRdgV3uuaR1MWTuv
+MUd9nbK7pO+S/jxuzD5G+vWhX7UHdjUw3HwP5rYHMHuJ5VqmpdYj34FNx3+H
+n1cJ+3vBCZFB/AZYWCvdrQAO7azqPEvy+T2mRkDG7Q8EhsHcgpkz0oY05RN+
+5oAFbLlte6gVnKE2okP6nTDxTtwf9msMd7iJ+jXujBbEw2X1nQ2HSH9sB26l
+wDOlYZmGxH+I53FhRqW10AsNmpI59U35cdg1Tm57MdxWYf80FF5c+pzzLexS
+87HaDW5vjuhXgV1Dw64awezm6tIHX2G+X9q8GExfTZuIhIsW3pY8Rf7tsWca
+DODk1yvGr8JjZjzvT+q4NzY96pnw2huz9s/hH5QuRQfDvA/SyqOwT8f4lAvs
+yjdLegu3NEv5b4KZ68vZXyJeXWCC1TqY0fvyjRPcORpZqgd3X9MrS4MzzPpN
+WLBMalRyD8w8t8XMkcRrXHFJCvnzRJqj2XDye+YOEzh54IHpTzDbd+6IN+zX
+xom8T/KXfCIfC4/oRl0UQn38Iyp6mTBb/IaUPez4h6dMCTzVtqk8A467URVZ
+CWtzDQz7yXwhH68ymI65F6JmhHOzqduQTfqd76IUAMeVnpkg8ZNrrEQrYT89
+zmM3uKjbz+YJLNlt26wFL83MiIsxaUqwcy6pH/Vcno6UUoVldhx+5gX/fVSp
+Xh9u/VKc9RD9uihhU8OCx/4MSrWEnwVITG2EmcPlptVqNJW5uYtvAvskFzUp
+wfqm3g7rSbw19WEZqjSlntX/rSbZ77uFWAnYzuMqXxae6tHPyFfB/XGy3bOE
+/Oi20483wn03vhjoh8dEHj0aW4V6gs4u1cD539wzrIN/8PD5Kglmx6jePg3j
+9YvdAzs6D3MS4RYFGy0rWEP+r4R02C7JWVwb5hz1fnMRDk2x6pAn1ux17oMd
+1ZwurITr6P2e0tjfsiImXg5uDUt02gkLHx6t1yL5dIUtlsBxWlH21vC1zl6x
+CTj5Z93mfbDr57QFFuq7Ziemk0vq+Xt5YgwckZjC6oLnvBOya0j96lPqokyy
+r3DBI1hfTeySHux3X/r8Szil0LF6G8xb/2DfGDw0rrQYCdMOulG98P7Jk8dy
+4bIH51k8mK36RqGRmGU/ux+W/OTc2A9TS6kTMnD64OUjU+T8BkzlecjXUPFq
+qYgx6uugjI1glweKWUqwgGVcU41+rLr186QWnO8vG6QCd7HX5a2Fu78XreEq
+I9+2M4XEUwusp+8ZeD/+9t62GqblrH44ANfxv2Mqwz5X5PmjSuhLTeLHFbBY
+VVIEG3aPP3ZqnuTLdlj3+UuaMoga/+sFuU+8TRU8WCCxTKWHjGvMP90Pt5hk
+erTAI7ZOihbwpV22dTyYwWnJ04FVfZmOZ0l9PcF9xOrnS1TS4IjdfD9z+HD+
+oPhxOD+2ZsmPxP/o3h4PZ1Vvup4HO1ruHCRuXTlNCeCCpc4sMn+sJL9bA/ka
+rjf8lE76Hyc/EAqbsgs/FsJ1b46VNMLt0gf1L5P8tHPuLMImee/nOpnk/mUw
+TNGPxSsBFRMkPqOpLxCWyzy5eSX6cU1Gv+kErNWgdpcJM4saN2bAwS+CGZ6w
+Y6rLMQ6sLn9IMR42FTUv9oWH0psKC+E6velEXfiJXdG5ZnJeHxo+CbB/GWOX
+kgCOmHBpOQS3Bo/TU+R8Zp9tWA5zo0LChDbgfJhfpCaj3reNT/RlYV5hUNi8
+Ik1t2N9hqgxnGZuLs+Gye/wcFeKFnsY+BZrK+8/aGAZs6rlm0hZequxylCHx
+fLxFmuRpypnTWE/iz1lYK1jA6RFSx99h/7Ha4ebf5XAPyh9WjpB6Is0kQ+G8
+vcIbOmFOtbafJmzzTsy+8f/5Wtm/lsX7ekJ4eQVZXy8V+RBuM96ekQWXCb2p
+bYN3zki85MAMldmpbjjT6rRQDFmfOr51CtaW6Kw+CI9EVClqIL5ALiY6hNzP
+aPbCbtjXof1uGLn/N8u0K2AfpayHh2A/Jctdk3Bcos/RFHJ/h4qNzVFPstHc
+6QLY9Xqt2Qk4ds3+xCuwRhpr7W04bONvVd0wTzR9+QdYe9pBdxqWyTXyXIV+
+ffxrNaWA/jBL3cwM4Dn1IA1TmP21bJYenBmgF7gbdrzlIC4LtwdSNcfh9h1v
+WM8QT86yXlAGj1ldOFEM8yN3v7oJM8SUHexgny1DCwISvz23UoD8Q7cMu03C
+gudGh/eQ+vd4+S/BcS9jtgygP3xRhX4xFubP/LFkTzyjlr0Szn8+P3VFBt+T
+xL4rkjDn7denNeGb3KYcEdj1xOSRtdI01SAy17qAeGXyF6M1pGhqmcH196/h
+kWCx+g0rcb9jKxiDZJwX/jhQkqZ+HPjZ8D4Zt91n/psEvocR190uk3ED5yob
+uE/H80IxcWCB9dsVeL+r1bemE/exfLvgFaWbvOPhusHS4n44+Ce7uyFwd3TE
+kDDWX54KDNsLtxro7PWG97KyKV8y/tlN6j7snFw+S1znoXbWBfnY7DqYHwjT
+Ifm9T+GUkKX/RsJUyaJUHPIPG9XvSII1hhL8JVHf6+2RtwtgmRFNiRy4z1nZ
+uoHYRu6hCPrRUnsgqh/2C2i02gMvbeOFz5J6jfYpZMMJa5r1VEi/FeKDimGT
+x3dObGaR73nM2DF4lVGmVwCsYTQ/zYJ1+1gpJ+GsLR78Fuw3+emU0AXY79Xn
+L1RgfsHUYCvc6qSc6Y58vYZffSMg8QbSDrFRz5N9+3JfwXRTjGUA6tfeKh48
+C0covw93Rv9Knp07tUTiu7eF6or/+7vC5N+nGP0/GR1iig==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.93763702332162, 4.533080933367719}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl1wk4VekfB/DDRCjcsoy1e4vsImIU5Wgk0oIaJAol2cYyYynRjUTKuNeS
+FqNbphDDVamEQsUoyy1l61/dQQtJN0ZZ0sz37e95PO/z6X3P7/yWc46nxf7h
+bgHiFEW14Jes//9RoSkWWZWxfn4pOP49TV366HHwF9jlSdykMVz38qLsDCxS
+WL/kHdbcpEOMLPw7e29qZhPsG+C80BxxGOdPvGuAVS64q/XAgj4vi+fw7NjY
+1AFVmuLsvXZHGdelawadU1KjKUri1PoQuPlmQOAFmOMvzuqCJcfP7NNQp6mI
+tKIIV8SJ+4FXdYjY2+tIF6y4IJ/bAvvOSmjtRNzwjE85k7Do5uExIWynqF8/
+X4OmhCVGvR6Ia9DDj58L10fr+NTCm5V0Ut7hPMddb0YK64nRmAe1WF2WRkWs
+xGpfa27BxspLHxnfgHV7UcU+a3K+LGmHDVY1v30x/yBOxJvbhnKwREnJiUpS
+z75eTiPWCe/ywjisdG2unQ/WWNVc4y1Y2fejNw0gv+g+z7aV5Hz48x4vuPMQ
+T8UGFly+9uAB6ssPLQr0hE3busNXwZpz71dlkuvtTFQr0Z8fI1fl/A2zjmVW
+W8C86UmTjciDfTklrR393mWvFNyqTuodK2fDHT/wxHaifkFJp5gLzJCoap0h
+/fnwrH0N7Hnr9uw5TZyvO163CV6RtDXSfhHiigc3xcMHZjKpAZhKeUyTeZfm
+8TqjmTTFL+RJ6uP+109r8z/DnCvdpQVwjFkR04yFfPp9mlnIv1FVRtsbpk9O
+ORbD5mlm7+Nggb18jzHqf9KYuSINjujRs7ysSrN3Zd3Ylw6bjmvwlFGn/KO8
+IjY5T9/RC4M3bNlfEUrO/7NdqkSNZs8c+73ZBeYtbv5fE/bNPvHPm8DCwfau
+e9h/8WupxXyST1jwY/Kc1fZIrOhEvi4vLnn6w4ed06/lwlSz3HFJuPz50fwA
+mMUsn8pGfoOjr96sh339BgIYcGmxWD4NC+8sj05CPWFFV7lu5PrRRZ4fUX/r
+ataWQyR+WHPQHjirZ814E4n3o2VbP/rndEtVTZH0w75UFu8Ze9MeRyuSv+D7
+J01qsEr05qFcUk8dd/sLJZpSkhU29MMuxjaV9Uo02/pL1SfzxXje4+I07sLV
+lEzSUTjCssL6FXzPTXtjN8wrlZNcinj/9vRu01pCnueng4kw96+2Z4GwaDB2
+4D3yaTf0SrkAM1RUxvA+srVnTA48ggVHui3HkH/aRUn2OMzqrQnaj3rfOjNk
+pLTwvHzwsJyGhQXutDzsu0qtIAzze7yzYFYa5jurubfBs0dH707herohXl0R
+8yjO/KlYSOK5zkythu97f7FsgKmAf9iOcKrrrEsBybdGZdAM8/jTqUUiHuZc
+1ZL8ini6vzODvWDh26nQMsyjo+72z7Yk321PmGvJ+9T86aYRbLrBJvIe8ut3
+W3ZIG643K7uxEjYwtAjRI/H+4E4Wo74czfHklTBfSztdFb52uoDpSfKd/y8/
+C/1Jr1/xMpncz+bSGnX0b8I/4moNyV9lgWU1+v103tfhWRL/rWR8JNwuZ+Lk
+iPoZrUc562EH1xmtU7AwrTRoNeZpYngndRjm1CZv2QrbJj/daaON69NXP0+F
+v26cPpMOs9f2LuyB3c447XwMC/4NTLBFPop11xYvWIr7L7wVdRPWWT3UZQ/7
+Knv72GB+o53934XCwonXivfglv7rXSkw/6HYGkcVmu0cyjHNgk0rZf9sgKMn
+nIq4sEDCpUkf/dM8yUkg50XF3C7y3X7gMs0NhynpzF182Gp4bJ0bcazVtmbM
+I+9ch48pibfxrN1t7JufqXo2H6Yrt/jnYl9J1757mOR/Z+/ZzdjvG1+0rQ02
+1RPf/R7z2HUhWfUGce8QNwYe0pPKuAyzSjOWiJD/Cc/orBJyvWaf0BduLA+N
+qoIZjQvlBaif12bc0g7zN8TNWYf51DjsTpyARfzOB03onygyoEkP+TCm5ep3
+wJasAaNA0i+ldloa83Fv9isuJ/W2HPbtVKSpnleZVV9If6VvXamFx5gzcZt1
+8H6dzdVrUqTZB7kBr3gwx5Q55wMcz70xKILrk+36VyBeOLXvsLUu+jPb2pdN
+nof5JnKJsOiz8Jok8uP8Oup0HaaXTRmlwqyw9wn9MH/huKMcnr+8h49zxPQQ
+r6CwKgf1ypbp6yvA1IySvgLmxTpWnv49LDTadA/fH3Z30KJb8rCgIyj8Ofr3
+Wr5hxyzi+e7wNVyEfncZ7D7/Lf75yW12mIfBkrdGjbBpbs5Te+z/LPV1pIDk
+W2tqqwd/LmmdiIeFi3UfjyAe7Vnu4U3OFwaG5sK33dQ/rYUFEZK7dWBX1VFf
+s2/1aTleRP5DlXOvGMGsWiueCkxxWZHm5HxIeTrqpYI96UPr4Yjn2/2nvr0f
+IpkgXfL3scsrGvMZOd+ckUfuLy9iimO/ZCCq8xE5n6t98CLmcTK2V1qZ1N88
+KbMH/W+LTuv1g3kdujM09g8L1FOuwKLqjwOrsR/DpOQk9PH9FN6t8ML+6fRz
+3u6wSNnr91zs33Z4EVRInOzk8Q771jHVgUPkvEY1y4N8f8XevF5qAO//oNgJ
+e+1N+OwO09/5xXiiHvHk92vjYQFbVVqIecr9MKaZBbPf3/3FH/Mr+5DCPQuL
+Rldd6EE/rIr2ep2COdOx2jbon+8pk5fHyL7F2yOpsLP4b5pRsLDqPPc65vtk
+V0bmVri+vzCnCT5p6ieznNzPeHkc9qk5IUGnZMm+1I6nR+GGwJ9dRpA/y272
+HfneuTpbGglg05U5Rzpx/9PlBcIaWGCWVOcJD2u4VleS80khTR2ox39kcv9V
+cj7fLgPfG3bM/jyHRtIP8Z/8KjCP44Urcl6Q/a/OXB3YPK16iRTub9rDki5D
+PzXKHKk1MIO1YWId/Fvwm9xE0o+C4fApBZpy8OmobSY297V5ACvN2/BM2RDz
+XfVXzi0Fmu1TkT03COazmPMfwn73Rctq4PqNJ45O4zwjdmiNjBHyabVzdMC8
+oowPb94KR+joqV2GR+/Q97OJFwQnsTAvxrK5iS0wJTckW4h8rZraBsa+7Tdc
+MkC9cQovJOWNMU8Pt/EK1Ouc41OiCXNcum4aoj9mRalrmTAj6CebPMxTpBcy
+qQjz9gzlj5C/H/5sDkXOW2Ut0cV88n597TGI+IyrBxN+hA2lU+fcJR4JHrOF
+Q7/Ucc6R/KPeRWpgPtEjIQoJMMdQ73Qf4mcnpJ/cCQuZa/MTYINFYaMOsMjM
+W10G99PRE2RbwfX7cwZTkD/VeyXJAuaHG176jHqti28ybcn5xJGcvahX0zl2
+qTu5/8e0eX2Yh3Vl2ZkDxMsndLfDCtTfj0pJPvbjIcPo97OVB6LekniMhwHZ
+6Pe80L/Sl6E+QcbdAE/sR1eqXI6HTRXW2dvA8VsjxdrgiMQ/rWk4r8z2GHMZ
+9i91de/G9SFds/oRMH+L0Zc/YGpN+asamEH+34F5zSWrCf0fLfyUIA==
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.562492355174517, 10.345769235517452}, \
+{1, 0}], LineBox[CompressedData["
+1:eJwV1AlQE2cUB/AtxKMdhOIRznCUw9QjJCgKHrBIRJpBDXI5IzoUMNAWk6Dx
+YBgBL4gilSookgBB1ECNgkgLo4gWVDICagBrEBqUZhALgiBqihT7/zKT3fnN
+2/3ee9++Xdc4yZadZhRFifAnZ2oWObjT5Ehlcmkq+lm5SudGUxbfZkXEw68N
+xSuK4PrSXIUADmwL4G2DqYPrtCvgzunGMCY81epwng0nZggL279B3LX7lAuc
+El/COQJXN80ZdoK/vJ4u9IPXcGQVbrCyaWDZuCtNGbWeaRw4LtxprApmb7+l
+94clF7yTZSQ+5DwZTtbPVdKBsObXf43J8D+aiSobcr35kn1y2DVdkm9ywfU8
+pvgS3NNZE22Ej9aYpzfBLQbRyHO44YF/lAEW8Gr0PbBesbT2I5zKVSwcgGXs
+fskcHk3teTw/m6yn6johd4I3hglCrZEvwc7faxHM8snL5sDuk5rHXrAywc9u
+E7ymYweTeGaVVLsLVkmXTSyEtZMu23Lg2NYZpfbwTb+hqxfh0ANJp2bB9UfZ
+rXUkHpSfNop6Gt5SVDM8EXdncyds5V07cg8+qfZyr4VzOJuLG2ClZDfvDNnv
+Ka/MSpLP1q85BX7WPpBB8smDExeFwb5eyyfj4HyL19e84Xm/2DVy4WTR60M2
+cIm3p/kH9MtI/q+agoNGtsfUwoU6pY/BC+s9C1bvgk261NYHsMCv66MbnMlr
+HrsFM4osGTecaUpaKR69DZ+s3MVwhWNDVh1qg5uSJr8764T5SMzsHYAPdKv6
+mLAs39AzA/mKgjKjLrNoqqtvucYR/sqQXboBDmG2dZB503J0Q1OONPVCHuRM
+5kEfb1HQAqt8WAIpbNb9ybICVrYcNsuFOdFF/cXw8inxlBrOO+d8Qw3rpy9M
+34HHkzWhzfDgEd0o2d9H4VTDG7jtfUp/P7zPyk/shvyDGQ1Ow7CnITg6Fp59
+Ln4ReT6FTftZKvjkSF37ELzEuD7EAFec/byA3L9lOEVK+tM4vorogA1bEiR8
+mFs1l3UbfrtYn5MAs70nVpfDHWajZXvg2BPs68fgawnTfAl8b7q+fCdsYX2l
+OxL2DaiN5MN/BvqqPeGtqReZ5H2SLRb2vUT+rR4yH3PYxB5TyOGkqzXGVuw3
+J7yg0xGuD2jsL4SFufP4ZejXNLE6RgLHuLIi7eDC3k39QrioouCd3IGmaN3S
+U/5wBEuYOGGP5+a/ftIX9s4yucfCwh49j4ZFE/YlT+wQ//TDzXA460motQCO
+HRs8sxu2eJsW88QW81KQylfA3NObO0Ww9l3UIKnPaeM2h69hZdoCty9Q/xrb
+S1aPbFDXwYx3LGJptaYMNv7+ve1quPqhcUYOLN3DDoyG6d/u8o/D3ILnC8n8
+VxS8vF4E5z1oL8mGL+5Ib2mA9X9HFJ+HH5r9HDoM13JeCC7DWRl793uQ/GU2
+s6/C3HQtMwE2HczdS/xBJmosh+Vz/9hP5ul0ktXHPpihDPZVkO9Zr1Q8H/26
+P53lfhymxJc91sJ3zaoHSD2zGauUUSReJ4uPgm+Odb3fDucb5VdWknkPtrAL
+I/v1XjXOhA//OHWfAwv/mskYwv7Yc+6Wf0C+enlcZCU8ruDxK2FV6V7xTzCV
+08oKgfPu37i1DPZd+SbtKfqjPNpFDPjRS7YogvQfIQro4+B95KoztEzEN5xX
+34d7U6f7fGDTWutj9bDpjdsr1QLU7xO3kpghCbO0hNk68/x7sMvtnrpD81Gf
+i8NgLzzyGb95uI+cOfT/y9lRKw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.058738695939086, 17.601506520304568}, \
+{0, -1}], 
+        LineBox[{{17.000000000007276`, 16.500000000005457`}, {
+         13.500000000003638`, 10.500000000001819`}}], 
+        PolygonBox[{{14.947677384685548`, 12.98173265946094}, {
+         15.206811054955079`, 14.219815750748694`}, {15.897834175673825`, 
+         13.816718930329426`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.984057296392571, 13.323799910437668}, \
+{-1, 1}], LineBox[{{17.00000000000185, 16.5}, {10.000000000002592`, 16.5}}], 
+        PolygonBox[{{14.1, 16.5}, {12.9, 16.9}, {12.9, 16.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.5, 17.4452}, {0, -1}], 
+        LineBox[{{13.5, 10.5}, {10., 16.50000000000182}}], 
+        PolygonBox[{{11.447677384685548`, 14.01826734053906}, {
+         12.397834175673825`, 13.183281069670574`}, {11.706811054955079`, 
+         12.780184249251306`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.015942703607429, 13.323799910437668}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{5., 15.5}], PointBox[{6., 5.5}], 
+         PointBox[{17., 16.5}], PointBox[{13.5, 10.5}], 
+         PointBox[{10., 16.5}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T12", " ", "P2", " ", "N24"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdgei/fgfjhihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdgei/fgfjhihjij.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:eJwt1gtQU1caB/AjtjwEIshDtlAQzAKuRUOX54rJpUKxksGAvCqMIiOIGiVF
+aYMiG4Uqsm4LiDa6FHkEDUIhIkKwyvAqRJYuEW1BsBApICLViFgDIuz/dDcz
+mczv5jz+35d77sQxPjksQY8QkoU3/STqRbz+xJA/XhyGjPyrNboQLu755pBq
+PUOazpZyXOBV9iuCLsDpaYrCMhuGmI2djjgMbw8uDbGCxS3EOAa2bKkVSlYy
+xMfqt/AQuIj11e4n1livwFlK/TDQ6/twWNpVVEXHd6RPDnZYMSTa1nKYrld7
+0XliE2x4t0onhVPO/pDTY8mQzdku/A446aqbWghry8xVc3C7p/e79rDqaZH+
+e8ivb+FZNGrBEGXUpnZvOH2fm0sLPH8hPigCtkv4beN1uPvFmN9nMCfV+3wj
+LCs5F58DW68aMuiFp+62FVyCB+Tul2dhxXeVAzUwd65l+AO6n2hBdBMeXWZX
+vgfWPF7b2wRLkoYKyuGCEya3bsE7/vPx2hHYJKvmwzo4x9rzpQ3q8xtbJymn
+eWe/rg+EZaoc9zy4UL5QuRtmX6w2E8MaG4PiFNqP2xrbGJh/rHflAZhzY/bI
+Bjjfz14YBgvu96XQ+rd87DHoCGt81tdMoz9TBi55g9hf/At/vha+qP69XAL7
+REljxLDcqc7cAm6W57ED4bkAh2/OoV7pgu8OW7j+TVW5MazOZVXMr0OOpV4e
+aSsY4toZ6zYJ9/ePnxsxx/2gqPlqFO41Dgjmw4rDw6NPYTud/92bZrh/uKzv
+F+H0rkzRh7Dg628tHbC+X8OV9w8uZ4jOffyLzTTvxiIjKQv7eXEX0mDxC/uX
+j02Rb6Qo6Roc+0vTP3bBYvYynylYZLqzWR9WcLeNWqD+OBlf1meC60LPBg5s
+Kf1C1AvLDpl/EgyrvDvPv4TnD6oS4+HmhMYJT8y/df62Xiqce1Lekw9rqgOZ
+E/CUJrxAD3lUU3rHTsMzaypq0+H2js4oer+0p7l56WAP3Y26LNjPiWsrRD18
+/QNN9Pdjm00oemB26obRRPiZvPSoKepvDk78aStdn7gdXQ1rHG6mecCiyEfv
+uMAmofWPrWCB9SLLGpYEHLk2iXpNGpQPh7CeujPPW077Me7ZkQA3PxOy9sCu
+se1ercgTPZRxfw2sjl6Ieo164pZkvp1G/038P18wok4bbGiHmRWbUgn6IRVq
+7hfDfJfLviPLcF4vOt7IhsXziooGI9wvXSLfY7BrxM6K04aYdzWqMQPWueh9
+tMuAIRMDcYtnYJsyKyZIH+OzYoOv0PkV393b9C7q6ju1vZuObz/lveMd9PMB
+N3UO5gxnxxcuxfWSsuPrkTdr65sOPVixVfTeXjj3QbBTgR7ytryRy+D+a4Kd
+obDP9sjjw/R5pIk54wt337z8d2P0K2Bf5tgnsMbrn6Fsen6Cq6ePwcrhj6x9
+YSHLQdkDF/ZXPtgMk0zha2/s90Gh/lAYnR/oklENy/6qK4uEmc6fM/6CvLGP
+pp9vg5PasrWlMP/Kre4tdH7NuJaF+nQBczn0PBZnVbATYYms7bYzrD4RsaIE
+5txL9DClz4eQhEONsKvwb7/S/HLDQ+KrsKKN7V8MC1qPvBXBZlF7zHbAhg1v
+K41hw09lc/Q8svn5Rkexv/hkjPwh+qfm+ae0IK/GykRWCscNPl0YQX1aq0Ku
+CBZtVEePLUG+Rc7nQXBSKCu9h2D8nRzNGjpfnN8XtsgjysruCzawoGFD/et5
+HlnVcNDHElYI/L+9NMcjuSGDHXaw9ssfD8fqeEQ+8bbVna7Xd9Kf9zuPKKY7
+V4fBqtr6/VEzPCL6OXl3Orzq15mVtdM8YvbkeUE1rIz+TPrpCx6JmzVPHocl
+4ifz4VqM73JKdkR9zVXLz2x9ziMaS//nsbDGoD+j7BmPiOMdAs5TlzxeWgRn
+7yUDXbBkIdyPg/Hq1dcFOtqvn1gHnLBedkLNFhb9/dtaMjVwVkzmPH0+KoI8
+f2jF/u2apBJH+vzPrTZWIp/4wJUhakY1FV/9kkcMD1pcsoWzS8z/fRb1qJbP
+WCyHlVqj+chXPMLZ358wi/3IvXWOE/DmU3O7aB7lubVf+qIfTOf1V/mw2d4h
+ZwYW2CkjIqgvj3BmMF6ZZz1nQfPPKkJCYfGf92Xepf3Krx+MxH7Ni6FFubSf
+jrsmDZBH2ZU4vo2ev21qp/3ILzk9ced9en7MXV9Zon5BTnSy1g3rSUzzxiZ5
+RMq1L/oR1rrXpSSO84i2xaOyHubcOR7R+Aj9Yl3fV+VG+z2gXjqA71d3O9dQ
+L6krUKmxnlZe2AQzxvf0Wc3oZyB38YHb//8nFN/+3+c65r9ilhyv
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.907871335428632, 17.11903631971389}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1gk8lPkfB/DHUe4rFIomWrRSE4VVmqeibJGhRLusiagkTSK5JyS5EjZX
+y0QUHTurclQ0VK5Ks6JW5yhHroxat/h/nv3P69Xreb37Hd9reCzzPOrkLU4Q
+RBP+UU+iaw4fPZL477OAJCTiUvbUwKKmYcc8FZKMysw+FAjz2pSqnFVI/kt9
+h3fLYdrnSN0fVUgizNXuUqsuSQjybca0VUgOXdKyiUPZUXF8DSz8FutlAguv
+jZh747zPz27M/mW4/6vQ8A7Wf6tZsvgaTF8rVaWN+EYvV/1zAqa925WcDdM0
+dGUcYDLfyVZXleS3hYTFr4V5vkkfeKok2RdgE2kAc/8Zn7RSI/kOyVPulFlK
+cU51aiTpdql7yAQW7CjQNFcniepFGS62sPBSPPOCOs5LRZDe1P1e1zTfqJMc
+pnVaXxzMjByZFFtIEj+Lqe0upfI94iUls5DkxMZXHXpK3W/RLi5SJ/mXZ9X0
+qXq4met+rYTHOqQeEKiXP+Ss5Q27GP/YrABzY1fen1IjOUuLVrsrwUzpW18j
+ke/AVKaBJLWufmbvBOobNXeKHcB9/HN22v6qJId46h39GOY8DMrtXUCSrkUr
+u9KoeOfD5g6jPwv7DNSdqXyiyj6KLSA55yfHFipS9TXXf7uJ+bjkHvXh09Cv
+dTGlwej/lk7Ga39YENQp5wGT6R3hS2B2Y/wpH8xD6rRdQ9ZS5Ofxuj4Z1m9w
+kJOACaWEwVbcZ/WTl0GEDvIbTgswQfz8D39clYNZYUbBVxD/eV2YbJk2zr/d
+PGGE/DcZG8UHwOwAjeVVqiRx5sXlWXuYkL99exv6IT2k07kF5uQcdxTAd5sD
+SSdY2HJ+ZAfmEaii0x0E0+3DLW9jfqflXUNLYV6mdLsE5vH1N6vGfpgMVrlj
+hnmN1PMn6chHMK/aYTvWW98J+09QJjKqrbB+VO17aDnMTb1UrwIfWPL9fR+V
+v8zkq0bcb79v9osc6uXOW/XJB/GPiwUf1oDp9wNWjCC/VeWrzeQpWy0bPaJG
+EguyNMK7cV5ZnGXThXodFBqeFcLCq3bsX+HV23b9YAvzZi/wX6M/Am2bjjaq
+vv5bqofgdtONEf/1Y0VjhDz8NFiyrHwJ4tvoTDSh/0bZR3vVYbamv04R+l8p
+Hqp6bDHytQqazYf7rG09W7So76PvzF2YVen6yRTmWdx/9i/8/YKpxRVNzKPV
+O2E75pWT8sHWGGYb97+oQLzXS1TEmzUQf+OIkjnyNSDiaRyYZLJv1cIDMW7y
+jrBgk38OE/WmqhnWb4C5j5oOvIVtoiR7N1HrHTO97uiXgj/rljvM6eIda4H1
+ta8xkmC+vRrDEPNIDOy/3EidV7a+54P+a9eGbFZAPtxz9x7EwZHJUTK7qfyY
+6TWUs90MWi7AwhjXV9jPKd3ikfOcsqJPO+4jNuk8/j5Bmd6+SIB4A40ZexRR
+v2iF7f59cKxpvZI8zLw2WPwR85s+pvX3MPbzeEqFvyD/17LpeZVwqvvhLAG+
+n2sCr3f7wIJXXzp3wArfrwbPIF9W26L0F+jfsI75sXCYKSWj6Q+PR1cqDyzC
+/uY9XTT0M8XXNcKe8g1Fmgj9X5o9eKoEeTLXPwt5j3n6rScZ82DRKcH3QVhG
+520HvmcEvaBPejHu27/9okEb8uKryjr64L7N0977nGDRk0mJJ3DwCs133chL
+MJE9tQXzaVrs++I8zLGUnG2GO2T+XOsKpxb2aO3Fuc60rpSfYPZA9WwP6vcN
+sp6/DuYqyf1yBP35ckDAsoUJDY/N3cjjZPva5WyYvkLrnC3yNPU89ugKtf+Q
++Mo09F/zSZuwj7ov38O9BuvrdbWS6IgjKJP92oz16m5hbhDMM29lVcCZVi7T
+ZTBXp/R5LOy1+uEM5kCQG7dK4ueVY1ZUXEQgLnN6aONzPAPI6BEpPIVGYWJ7
+kF84rVJqDPtZyzmP8fuBkGu/t6+Juu9pQNFWPB8kpHw4hSen5eD3GtTPDzje
+RKP6tclTehNcJvuo5irVj792RmF+nJXqTWnasDK7c2M4+t1Z4a8ZiydHa3iC
+gXVLo5ieTswt9dzx0WX4f6eaLnErWJif3KMH24Yl5uYqI59dD/62wX6Tghs3
+JWCB7mWlOKzbp/x5YlQR+2dpnp3U+TbWsCxM29y1dBfi/vvlrJ6DAvqdNxTQ
+TuVxmjVTL49+3n5ZvA95SymybgbCvOe10SLq+6nyKNcFFqpalIaiL1v/fu3m
+B6fe+zQ3AQ/dqR66DgvspyS9MQ+DPKk5ZdzP9HehV8HRGXbeKQrU+6LSYgTu
+CQu7pIl8+DlmO2XxPU0xmBdWDPN0phkS8N7IikJDJeRLWCS9xf6t1VVuGTDb
+N3FvFkzTlFb7ANPLDX+xhJP113ydg7lFtjkNyIe428cUwcSykA1b4ZcGm9Su
+w6wrLgbVqKc2pbFzDcyzm1diCpesbTCJofqjY6z+F/oxPR1LXlag/t6o8dwA
+a5vynuSiPtFsTMsb9PNLyIvaADnkMxF4JgMePZ312FQW+w/TD/nCb1O0uf3S
+iJ9j2egB79b5p6BQCv1SvecUBFfqMsUPz8d9EW5SpfBk928mdvPQv+7GzdNw
+0+Kzdo6SuC9R4dN+xC9mxMRHS2BdVS6qE8bfF8+6xTGPrzJ/+iL/g30HvSNh
+gUSR5yRcJ6Px1A7m+J1lxKH+M2fyb+yE2WVqkrLo14CyiUQUTGwv/hwBn5BV
+dXkJ8/5InHpDvY+SSwx3IB4n4+HhpZhHyKmRw60w76DfC2t4uv4PbRbyozuG
+/7od3mX5Y1cvzNrG6lgNv35z9I476kmdMxOM4b59O1VOlsO0lQluBfD9VPus
+zzD7zu+y5nBdj3/8IEyf2pF9F/mu9VqiXw2LWLY3TOEfMjfOuVD3yVYFl6A+
+zYcdAdVUfLF+Zz24m6Z7XUTl6xTlT/2cZe6WOTmOesh3CY4MeDsnbLxDDPmd
+i+UOob+t89xNCgj0y6auDu8fYixxZlnFLIMQTO8v5VLzsf0hbvkMg+Ctarte
+As+e97QommQQdFEHu5War0PPW+Y4g+A+d/imgfsvGlW82jDKIDhPtQtCYCed
+u8Zh37D/My1pGH7/kkjX/Ao7nygMRL6lx6Vu0UYYBDviL0Vx1Cf6nXM/XcQg
+SNV7salw7LdaMzbMTYu/qYH+lE3M17sJCwOSz6bDgbqPD5A4n9pR/XgKfpR3
+hKOO+5lOZlo/o/9ZMV4HNRCff1czKRRW/Pby9pp/GYRy4nBhEvxeUNdii3xF
+thUpkbDTwbwNNmMMgtY3augIjzVE9yuhPr7Yim/z4aSKLI8MWJBkKSpEvHi9
+PEEtrFxdftQYLq3QE0ui+lGTUV+C/BPky3sHcB/nk93UUtj1g7O8kIqXctMz
+E/W/f7jtoh/yIY/v37YIVj5pZJJL5T/sEFmMfqWMbnYORb10lw4l6v1nLbI5
+8tMgg2DtluiRofrdNOtH70W+u6MSeqh5XfSLkPmIeTWYj3+EpUtHpAY7cL/1
+s7A5+OSl6Vo7Ac4f8K2yxHnhuGDd+hrEC9W/Q723/vtkV///qUb+D6LOr4I=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.922596693736967, 3.8067338747393404}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000002274`, 17.}, {13.500000000002274`, 16.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.552325660469876, 17.180083206945802}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1ws0lOkfB/A3USpqcp0Q41YaYhKbrNa4i1wrUZRKKalmc881bOWSJImi
+HZJLWaTkkrYhogs7CSG1UymWpYmKJP7fZ89/znGcz3luv9/3eWfOeVX3HHXd
+J0JR1Hv8kf/U5Cw+6mzqv48Um5KJzjmppMGmhOpWM6dhz5bjVyxg/phKj7g0
+m/KOlU0KhAUfa7eEw+wr25ilsPP8Pff74NTBTdRHMj+1VJ4pw6aKksKsDTXZ
+FE0yQ3s3zO3Wn4mC+XsVymJg6oyJ2GPYe7x842m4fGuntswKzG/ozAqFqxMd
+7XfAfP413c3w7XNWnjmwoKYhRAHuN85K6oY5G1aUPMP5jFxzh0UrUY/KUFEE
+zPvm6G8Al7/e8UiF1PfbVvnNMCXzreY++uvX/mdwPxl/qGm7G059Wjp8FPZu
+OMtaANPtR7OOwOwo09G7S9HP57zuvXDMrFNyJKzl+MuoM/El7QgXWKkkImgd
+TCuZ/tUYZoQ/37QMFtjW2xJ7r9CIm0S97GnVj2S+aN1x8xdwufkzrxNwI/dW
+TRXpR+LFxWY4W+SjWDbsbdh0Ww31mLyqVToJO18/9PksHEHvrAqBGR/ZLxeh
+v8bPbhbHSD79Hm5p5L7URP4KJvOvRL5XRl6ZOTZzyXr+YN6jEpgzFqbAJU6c
+MFwni/GAX183knq6gk/UwM4TtdfHST2blmzTk2NT7iXGAdroh1+77206zAqf
+afODU/V8Jz7APov588rJ+FnaWnV5NpX8+OOKbySPXrqMLcy2M5O21MK64aiF
+W2HhH/ScFJjR5xFpBwdaNmd1EbeWPVwFd+ybmVy2Cn2oR2l+wf4dmqq9bjCr
+Mq6gDA7MLfo9CeZ8rRP1IvVUtM/eIeNS3bFzYI33o0u7YeFpvfu56EfmHG/b
+KOy8VyreHC73udDwDU5l2mQMIg//ZX23puCYLy1xmXDLfsNvn2Da3ruBbrDO
+0MpGAcx3CqdWwO6VT3NayHj8KfGFMK1y3O0GOU+Ld0mU5Juw90siGZ/D6pMj
++Zt9vXKQ9GNh/INNnu9wv7iNxFThulhYtLe1SYfMN8jr6ibPt/DgflkyPrPd
+ltRbUiKvK0b6XXvG6K4s+V60Xf6BvJwD31WYol+uAatzFo6ZbLN/At++ef2S
+BKk3VM/RA3kqxVaaasDlPePD/bDM75xCa5KH772jB+k4X7/NKgBmv4o//BY+
+YLxes5jked5OaL+MTaVLRQs/kPGz3/Ly4Gq3C5Q2E+c96Bp7B3vW/XE4AOZ7
+0pmLFXBf2gNqf8Ic6bQTDLj6IH9cXBvnFd/XUoT7nr+qcIFpu3otZrE+/ss/
+NhmwQEdS0Aa3eHU3dcCMB2avk+FkvfCoRTqYn7m70wSmvo1Ir4d5Rb+MkHr7
+qipOesKc4Ku34mDWiVnTIDJf23pEHS7ntsvHkfm6v/m0oH9BQYrbSZgyGqoK
+gjkTkhXRMFsigMmC3TU3WXPIfuXJId+Rp9KwMMEDZkWeKumFtWb0TTfA3E9L
+F/DhzBulu5eT+XGzA33kPi4PL51G/bx59jfnYD/+rE/0S1g43d+5gXwfBF+f
+3YP54mGdZ2HbhCzpa8RTow5fYEraRfE8ccx8mUOovyWXeTwBZsfJbRmhk3oW
+HSJ2DkuoCUEeEsemm8h8bl3uZTHka6ngP1FEzlO8sDqN5B3y7HsLnFqmXk5X
+xO/Z9tZd4//Nz8tLhwUu7ZYrSV6jJz7NUcJ9qDD89pJ+lvgxvGC61Z31BbBz
+t9mRq3AMr6p7BPZ2yv/UTsb9M4yNVqO+XXklQ7BRpelPcTBtw9yLxN25R7Of
+wsKkrCvP4UBHC0cpXdxLc3FOITkvWXWzKxzDbrI5CPdZyY8kwsKyvyWVyHyv
+zuu1cKoKb+oB6q32zAgWkPXdJgn74NtWrrnfYb7eWJAYTMm1/rNID+MXXVOK
+0H+m+7ropXqk/wXRm+HsF1azEjD1vOLqQpKXVcfRWaynXnX2PEOegpwtBkMw
+o2fKvQTmuYTOtpH6qjjnsmEZZmF9GSwQLJfOhzXaJtNTYG7kzsgHcERcdOFh
+Un9fRugUXLeyUcMJppnX1djgPEbbDhVDmJ1XtqQYFgZGhavCrJOCMEXUny8W
+8VKW7B/raHMZ7sjrSZEm9XkUm2ggD//+pnhFmLN+Hu8mrGPEMdcl+8/sFzdd
+zqY+Hyt8ZU/yOKPl1AzfPjjxPYDU1+cxx1oZfbxx7LpG+uH9GL0DG20QNyN5
+0n5yCpZTwe/NuznVqiSvVtvi3bCz9cYjB2CW7vChDFgYfMe7AhakLEi8BRc9
+rvL7Qcbzax9Uw5uMfi5VZyF/m5G/Csh4VJW4DcxVm7c1Gu5aZffAF2bVtL+w
+hNtlkyfi4RiD2Nwp1FNgfeJdDixk3MzJh3V0/D/dhCmrgTU28NvyF/d4MM2H
+SRtAf9c7shQfw+z48HkJMHXqmmwbOU/UoHUNnC+VNfqUzHez6HqPvA40SCo3
+w4x/LVWK4bSkRvt7MOe4rXg0/PbsG9tyMn/iC8uPPI92EfNzYT4jyMsf3h/4
+MjWVrFdg+ZyE0z3qp6LJfIvVmtWwu/w6Tw7pJ84jicL5JrvtGvbAzpWVF73g
+jqX6mu4knxfjQU/h9JKNO13I+bvKsjaiv2B3exUnOFVZ+h0f/rBYffi/8eRj
+j7yQV+yGa7TtZP9y5cRhOPHyrkKS54G0RyXGDHwfja+lHIer86PtwmGF+38f
+SSN5jMmGVcIxv9DvlcJGywe2DsCXdM7zSF6huqZblqiyKTs/q0ufSN6TOx10
+4DTrTge5Nfjdm78neQM87fz4yc9wkWJypzlsnh077Q2zzlUcMIEvKUU8iYeF
+D4tmmHDDr5H6BbDRqsf1ZH+5FqZlI8xf8NHsX5zfEpdl+Bo+3W3r0wCXdkXv
+H4e7C546pcOJT274ztXH+qCvbj5wgUr0rCTM037ytwHsftdMRxqm6y+1F4cH
+h/U1iJ23RVfVIx+DevfNi2GOhqXpCZi5XmObGCx8bn7bFbZeLz85ifOoZUr9
+RvCRt3+oDsG8H/YPDWH9m6+7e2DvXb2+duT59ju/5hHMvh8jCIYzAk5Z1MDc
+HZUutXBU2IzyDTimoj1kAerZP9hc/zvJo0ewwBQevUlJZpLxTUt0IuBQox93
+02F3pvWrP2GtLTWeGTBt7uxbUeQ1Vqpkl0PW924U2MPJnY5FxfCg1E9HzpF8
+Jcz23oVbFK4aPIczGJF67XB5eqjIEjU2pfaedWYE5uTZ95vDrhNurRLoP9Tu
+lNFhWMa3ma4HcxNseMnwL4YDoZthrftGJVxYpDX7TSjJ0+FrfhHMjFAzuULW
+d55ry4ftflgfa4Anzyg3XyD73y0M6yfj95y4EbDWA87OuWtxP57+HdthXbe1
+DspwqNrCdfpw7anDlw3gFuHqt6Jw5hu/NiuYX5XO6EQ/GurruC4we7eY2zXY
+WZUj4g6zQrkfQmDvph5lDzimSEfZCWbZlW7dCmuZ7qKvhm1ZdesdYEGa7A1p
+kqfI8UQzMl/TezPJl7nEQWctqUddfQUFZ9e6qqjDjHdDjfNhiYRFQVKweK7v
+NkWSt6+rlQicWv48wZh8H5ZLXR1Hv6dzt6T6wPRjq88NwLRIA71M2PK8xORr
+8vyZXmkm96Nb93N2L3n+Vmw/IIt+g+dHyL2Eu1VfvSH5uCdltgpgyqmvL5fc
+zwXTsWHYNiJ8bABOWbgocprkPaTUxMR7nO2ep7qkPmfJdvoB+PPaZed14MEK
+zlAOzJSeEbUn+dJ2xj+GJxmFlf6k3+tGqf/C6SE1t1NhXsB1jbl4j/u6eP5U
+JcnbsKNNEk6uM+K8JPnVCzMk4Bny/rj2/++PGuz/AQ7UGzs=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.684798798577102, 9.013741219420858}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwt1wk4lGsbB/C3UpbEILs0R3Yyk7R8LbxJxalsJUQaQguFEiqmkS2iMyFR
+YqIUCaeELDVKyqGTCi1UI3I6okYnS0W+//Odb67L5fq5n+d+7vue551r/OIT
+5Ow3laKoLvyQ3/++dOl/f2vTFHuZzLAd3GrvWaoPf40bupMBC9qdpRfBwfMd
+Rnvg4CduaUawwOC7KUsPznj1zzS4xX6ldBgscNIfaZiDPJcV/SpgR3ZC9D5Y
+69ZKn08w5+rXmGmw273FPC19mmL02jxJ0KIpKc54sRXxTaexSU2aKpeTd3KF
+6Yti+RC4+Chjyw6Y6fEtSqRBUzYZtQa+cHD5i+pN8JWoBaVbYdHbzbNb1bFu
+tMbWlqz/wdq/FdYNP1tuBnP8V80dVUNd497TGMQTAVmF8AZPEZfUx4tO2hMK
+i//m8ltIP/MlZd1hLSObgmIS1/LscIVtUvJUT8Gi7xYTQXCtu83MSBJ33paZ
+C9ue/eYVBAtzVG/1wFJr21MDSVzwKWkp6lkqs6MqlOz/eYqbBcdG/u5/nMS7
+30ROQT+GiRU3LsPivJdzA+B0ttvCpzBbU/NzK7whT3d8BupvXTDr/HzMh/Gf
+uN9tYLGBnXUkHJryPTUR5t/nplfBrUGVvz2DeSFRKm/h2vQ725gGmN/MNVaD
+cKRtQtpemGreldENt60fvlsFi6XiG2pg4dbM9EmYF6ZyhuRnR77ttjLEfL/t
+H9WDbZazHoXDgpGA9mrUJ9t2v+MSTEvsnGEFtxrGDj6EeUf3a1Si34hdbw+L
+YOE0tpEhnHnx4O4BmDH2JPMM5hXa9ENvEC4rKOqWgb8+Ony2B2YnDzkmqGKe
+txV0n5B87MBHCrBEQWlMJcyPTxWUqNCU6fXgPzJhcWz6Wm9YKv2wNamPn+q+
+zhS+4uzh4gKLPs/XUIBpP+mQRTDn0VZlBqymf2NAndQfw9ljCHddS/kkQawz
+YeYGsz8+2DSGeQiiz+7PhrVaS84Nw8wVFtuH4M0NHzsm4LL7a3ydUZ9NdeY5
+BbKfJ9pdDYfal/5kk/PdSqR10Z9aslaaBxwstaM5kfT7d8w+Pll/ZNS7D9ZN
+ilz4J6m/c8pfFmRe3A6mkhHmWnZKIQQeO7JSbxtxhpH/Gbg4eNtIIUzL1227
+BDsy4o1HYU78RDS5b77rSzZZG+PvfreiDpD7qFOokQgH3z7NJPnHxra6N5H4
+mzGX1zifLmkyn2KC/edPyO+Hk299M2DBIl9r3RH0Q4WWGDrDTLftevvg8nan
+3N0k7uJg8hbzcNvCDT9InJ+TbQ/7vurWDoNbNWKH6pVpynMyiBdI4kWXwyzh
+yB717+6wOPKJQtNsmrJ4x91Iw+xd6jP94fTJVcm/wJT4R5cabLhbRFHENYGz
+epWw/qCs8hvUL2zLUmiCVxgWL74NMyPOrXwIt3AKa/NgcXOjUARLXb/XkgLT
+t1pKGMi3K+f46miyf9BS2QWmn3FzuTA/KkmrCC6z2SuOJ/YfNZ+Jeg0NDzWf
+JfNTbbE6AAvv59pUw+xPbl1d8NfV7YO9sMhvL98a/TPin3aqk3nZpcrnwuXX
+PMtcSb8HPEIHyX07mVaYDTt2LQ03wjx71bJv9sECESfHAc589kfiQlPcf5ka
+321wm+X6Wh5MLVLd4gRbdOu+bSZ+HzrXBBZ5B51TnI/69lxM/Yj8A12xzc6w
+yED9fDo5/5lsWhLMGNxkbgSPLX16oAoWuj43vob6N8gc8eqExWlq6nqwSMf/
+9hcSF9urZGAeEn7GvJ8ws3x74nQ4Nnuf4iTM8fXrj8B86Q8M72GYdyI8blgR
+zz/d9sc7mDLhWPHg3hlSik2kPocOrzmwWNhuW0R8JM+zVQH3uUqh+jjcymqo
+PQfzzFIf+8O09PovPHhgo+noWlLPKm0H4kjVuAQT4i87qSxY1rLvkgo536xF
+tQmmEpebycCOXyUuzMJ5pr+syZGEBSFDd33gZPe/JBjk/I8F/ffgcr7zyDyY
+X3rhpwn6eXEzIW41mVfgyzOn4UDNY6v3kflYLrP8AZcvZtjkk/VFry+5kvvj
+rWfYTeYxfUv/JVh8aMF8fTPcI5/Q+93wB+oZHQwLgufdkST3KVxSrQ4W6ltt
+VobHUjpsZVjIJ1WhKA1LPXTzc4HL6qsK35H739Gvkg0La6wH80j+Ps+lXcRz
+2lrWw9WLx0ek2ahj4f2V5L6XnTB4zYSFZvoavrDZq9B15rBjQs5wJ/plyskN
+rIQpY1b/Bti8tbZ+NdnPVd5ei/nlDDlSNjC/w76FBV8sNdO2ggVR3lHFDHwe
+ujKbF8HMOLUtS2BB+KUPhjCPSltSKE9T/n8r89TJ+Q8ZJ+ThFyzJSimYs0FY
+VCCHzyOPgdjPqJ95MCYiRI58nidefwxTuY1pwbCj7tqN5TDH+LhzHtxgNHwo
+F6YXjD6binxjR0VKabBow0uTZDj9xJRMPszW2+2siXpetLrPziLrvTafiISX
+3tbVukbm6eRd0Atz3vvXt5D9nawV9ujvYbtO+uj/zm9quwGreeVsUkG9ZSUv
+dRmYj/WCgI2kX+rikK0XXDXxvN2VzNPLZjwL1hkN7okk89kV8vAOHJuU6JhP
+nGJn+ghu61T60ETymb+qFMKhr3UPfIYZi+K0zsJd51MaFRfgPv4TzN4KzwgY
+emwOCySN30+Fy7QbL9iTeN3bBWfI8yBbFeUHi5ezvmjAgXMmusJgTsJQdSp5
+fx78J+wYLHIVF0yDNw/cpI/DdClveR/mSdXXhRJzEqPNHs3C83reODEGFl5o
+rm2Upakvx1hmh8n5V4evds3E+1OTv2Yv2c/ti1GFG6R0Xm4jfuzB4srQ1Mk5
+AXIbyfqC6BJlWCcwRWMFiZuMvxFJ4/NWzcfClORPbvcgvsseideGeRcqwhSx
+nqcfoTsbZs6p+PUAzChe/n0WyWc88Nc4PPWLe6Ms2W/Xc/oyzndb4SOvAFOp
+k0Z7UG9SXbi2JonLquxbhn6Op2iPG5P9KVWps9Cv2bnOIJrEdZZceQFv/nh1
+qgepr0lW/RTuT0TlEgnSr6OvGV8F8wrbmZCaTfL3X9F0hi9u7M2vh/n9v1aH
+w9wbYYofyPx3vRqIhfuXzS2UM0e+9zFrImC36h9sC1gY8SrcCc40oI66wmXO
+LE8FOMliZnQ4zPFY3HIA52dM7bVLg0XX183JJvf92FnNIpIv771fPvqxXNgR
+VEP8ZN7TVPSbqVMx0WhOvm/qZYViHv37qLoWcp5JfdImzMuiIKqPmJYIz1iG
+efcaRg49gAWF0k4WUqiPf+bkbbL+Tznur5I0VVHzM/d3Es+9nBc3A8+P6W+s
+PJiK1S8YmI73I91ixylS3/OW2FjYsl4umEf2n6TUHOGup4PJwWR/xu4RBzi9
+rabXh8TjPPYeg+/eCUh0g5n27Wk98OJ/Jnc6k3z51mF7cZ7sz/mWTiT+Q9ld
+DfWk/qaU6kIc4CzfCT+1dS/eTuq5ttL7Kup/JTf9dBCZX2Adl4v+jHlzleLI
++as5EXbon5nPLs0l/Vc+uDUF81HRiagi/YrK1Xjn4bHnBRu6SX20zbrZmKeW
+9z3vGQvJ902O0XbYR6n5iSksaOgxOQQbr0rZuQlmXvQPJ3GdF+yBCJiTEhKu
+AJ/sa7HIJvHF4yI+8seWHmHVwqJSh9xu1ONzz+Xzc1hYOO+KNNz6+M+KT8S8
+d1UM6f//n2aB9ZN4SdL/BXHE1jc=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.51595498616782, 2.888880495006221}, \
+{1, 1}], LineBox[CompressedData["
+1:eJxTTMoPSmViYGCwBWIQDQEqDiEyIFrOgaGg63OSmYrDzO9z9v9uk3VgWLF5
+kku8ioPSsWuhi37JODBoaO52r1BxuLaBb/3LBCD/w0aDX/UqDvqbjmztPSDt
+wLBjCturUhWHfy805q1RAPI3eJmtiVJxUBZ+2RDbIeXAkPCA8Yq+ikNNZHC8
++z9JB4aK1Qtvf1d26H97fYldB5DPcX3a/63KDn84o2++0wLyG8QO8eUpO4jX
+1jVNfSnhwCAgx2KkouywPWWl0aWjQP6LFavW3VFyWLTIuKtvP5DfscJy+Wwl
+h/kz33T/vwLkB3ha3EtRcojcYaJ/gAlo3oH87jprJYcJ68uXMLsA+Qy/p7xR
+VHIQen0p6c4kIF/D6uwiSSWHdau+P5r8Asg30Hwkrazk8EG39iuvHdD9B/7P
+P22r5LDt2qvvhj1AfsAHbvUMJYfOV85Xg8+A/GdvuXu+kkPCzvcHp/0A8ndw
+tAc+VHKoWCL935kHGB4CG/TkNZUdXvAILhJgAfILGpP/Fik7+D+OC/O7B1Sv
+oXp02S5lBwab++4ss4H8iCnTv/1WdpDY/v7gO2uQ/Wck1IxVHCpY/NtTjwDd
+98IwgyVWxaF0ZnuMliWQ73HwsGq5ioOa/NH5SguA/r+QH8/eoOIw1QIUvxJw
++SfM1gl348Xh+qd0Viy+ekwMbv4kuY0Vs6zF4PYL7hKwEzwiCncf13OFHb9T
+ROHu32W/cOVGRVG4/xTF3se+/y0C9/+GM08Y9nwWgYfPykwBu0x2UXj4NVjs
+0VpjLAoP32AfUY5zxaLw8Ldwbub6dFAUHj/RFRyyOeJi8Pj7bq47VzlXDB6/
+lcUd0X92i8Hj/8KO0xfs/4rB00dWp3AJg7Y4PP1kNJwpLXQQh6ev4H1hZ3Wt
+xOHpT+hLY22WmDg8ffJJLlUTvCoGT79VphrRB8vF4Om79+SaBTsYxeDpny1O
+vH5RuSg8f/BYXU8Mvi8Czz+3Cqy9iuxF4Pkr+MDHALH5wvD8x7Fac1UsqzA8
+fxZoJzuwVAo5wPLvVjYQLeQAAACtaGA=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.354800000000001, 6.}, {1, 0}], 
+        LineBox[CompressedData["
+1:eJxTTMoPSmViYGAwBmIQDQEqDis4ITTDhdu3dtmrONz7tfe8025lBwYOlz9u
+2SoOf3P6puVlAvkvylXY6lUcDp5abPiQH8hf8TIwpFLF4c7e6gtztig5MDBU
+rVgVpeJwWHOR3IlYID8hIGGqqorD9Ss5KdqCQP6F+ZNq7yk7HEt+3Lj1sqID
+ww/VNO9uZQc9U+P/QiuBfI6qjBdGyg6rtsx6HT8ZyM9QbVtzR8nB9nYt++9J
+QP6EvTcP9is5bJyc/qF2GZD/wNKnJ0jJgf3JuY+3ToHUb1inqKXkoDhZ4e/c
+30B+xaxpdyWVHBY/iEr0Ngba/0L6u6SykoOR9oXkK9lAvsGGFCFXJYdPWkE8
+EvNB/NupX2qUHG50nC5JPQ7kW+iVSR9TcqiS8z3z5T7I/SEHiqWUHXbuCGPy
+fQrkT7gR87tI2WFrwoYVvVeB/AiFqPATyg4/OgWeT9sA5Guc1SkQVnE4oXFW
+m6cCFD4mnRx+Kg5ut1fEGOqD9O+QcSpWcZgx42PG0ltA9wbskGNtUHHwkgFG
+R4MiXP5tBd/0KFVFuH47s/DF5y4owM3f+8Loyud2Bbj9ve3vJTL9FeDuu7DB
+P7xISwHu/jMRK/9uklKA+4/78yZjbgUFuP/XdJh0z7JQgIfP5GdrPz9PUICH
+X/Az/TnaUxTg4fvIYOm8LWcU4OGfUnefKYkFET+1uoZ8qqaI+LtSO4O/KRIR
+v+5mTT9YchHxfzsmVWRBDiJ9hN85w/A2TBGefvavlanz0lGEp6+1NpNnX3mn
+AE9/B5/HPjRfpABPnyuCW/STvRXg6bejd8cc2wfy8PQt4Pn4kpKuPDz9++q2
+JFR1yjnA8scOfhAt5wAAXRMymg==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.354800000000001, 8.75}, {1, 0}], 
+        LineBox[{{6.4999999999976925`, 16.}, {13.49999999999251, 16.}}], 
+        PolygonBox[{{9.4, 16.}, {10.6, 15.6}, {10.6, 16.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 16.9452}, {0, -1}], 
+        LineBox[{{6.499999999996362, 16.000000000005457`}, {10., 
+         10.000000000003638`}}], 
+        PolygonBox[{{8.552322615314452, 12.48173265946094}, {
+         7.602165824326175, 13.316718930329426`}, {8.293188945044921, 
+         13.719815750748694`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 12.823799910437668}, \
+{1, 1}], LineBox[{{13.500000000007276`, 16.000000000005457`}, {
+         10.000000000003638`, 10.000000000001819`}}], 
+        PolygonBox[{{12.052322615314452`, 13.51826734053906}, {
+         11.102165824326175`, 12.683281069670574`}, {11.793188945044921`, 
+         12.280184249251306`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.484057296392571, 12.823799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 16.}], PointBox[{10., 4.5}], 
+         PointBox[{13.5, 16.}], PointBox[{10., 7.5}], PointBox[{10., 10.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T13", " ", "P1", " ", "N25"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdgei/giijfhfjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdgei/giijfhfjhj.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:eJwt1gtQU1caB/AjtjwEIshDtlAQzAKuRUOX54rJpUKxksGAvCqMIiOIGiVF
+aYMiG4Uqsm4LiDa6FHkEDUIhIkKwyvAqRJYuEW1BsBApICLViFgDIuz/dDcz
+mczv5jz+35d77sQxPjksQY8QkoU3/STqRbz+xJA/XhyGjPyrNboQLu755pBq
+PUOazpZyXOBV9iuCLsDpaYrCMhuGmI2djjgMbw8uDbGCxS3EOAa2bKkVSlYy
+xMfqt/AQuIj11e4n1livwFlK/TDQ6/twWNpVVEXHd6RPDnZYMSTa1nKYrld7
+0XliE2x4t0onhVPO/pDTY8mQzdku/A446aqbWghry8xVc3C7p/e79rDqaZH+
+e8ivb+FZNGrBEGXUpnZvOH2fm0sLPH8hPigCtkv4beN1uPvFmN9nMCfV+3wj
+LCs5F58DW68aMuiFp+62FVyCB+Tul2dhxXeVAzUwd65l+AO6n2hBdBMeXWZX
+vgfWPF7b2wRLkoYKyuGCEya3bsE7/vPx2hHYJKvmwzo4x9rzpQ3q8xtbJymn
+eWe/rg+EZaoc9zy4UL5QuRtmX6w2E8MaG4PiFNqP2xrbGJh/rHflAZhzY/bI
+Bjjfz14YBgvu96XQ+rd87DHoCGt81tdMoz9TBi55g9hf/At/vha+qP69XAL7
+REljxLDcqc7cAm6W57ED4bkAh2/OoV7pgu8OW7j+TVW5MazOZVXMr0OOpV4e
+aSsY4toZ6zYJ9/ePnxsxx/2gqPlqFO41Dgjmw4rDw6NPYTud/92bZrh/uKzv
+F+H0rkzRh7Dg628tHbC+X8OV9w8uZ4jOffyLzTTvxiIjKQv7eXEX0mDxC/uX
+j02Rb6Qo6Roc+0vTP3bBYvYynylYZLqzWR9WcLeNWqD+OBlf1meC60LPBg5s
+Kf1C1AvLDpl/EgyrvDvPv4TnD6oS4+HmhMYJT8y/df62Xiqce1Lekw9rqgOZ
+E/CUJrxAD3lUU3rHTsMzaypq0+H2js4oer+0p7l56WAP3Y26LNjPiWsrRD18
+/QNN9Pdjm00oemB26obRRPiZvPSoKepvDk78aStdn7gdXQ1rHG6mecCiyEfv
+uMAmofWPrWCB9SLLGpYEHLk2iXpNGpQPh7CeujPPW077Me7ZkQA3PxOy9sCu
+se1ercgTPZRxfw2sjl6Ieo164pZkvp1G/038P18wok4bbGiHmRWbUgn6IRVq
+7hfDfJfLviPLcF4vOt7IhsXziooGI9wvXSLfY7BrxM6K04aYdzWqMQPWueh9
+tMuAIRMDcYtnYJsyKyZIH+OzYoOv0PkV393b9C7q6ju1vZuObz/lveMd9PMB
+N3UO5gxnxxcuxfWSsuPrkTdr65sOPVixVfTeXjj3QbBTgR7ytryRy+D+a4Kd
+obDP9sjjw/R5pIk54wt337z8d2P0K2Bf5tgnsMbrn6Fsen6Cq6ePwcrhj6x9
+YSHLQdkDF/ZXPtgMk0zha2/s90Gh/lAYnR/oklENy/6qK4uEmc6fM/6CvLGP
+pp9vg5PasrWlMP/Kre4tdH7NuJaF+nQBczn0PBZnVbATYYms7bYzrD4RsaIE
+5txL9DClz4eQhEONsKvwb7/S/HLDQ+KrsKKN7V8MC1qPvBXBZlF7zHbAhg1v
+K41hw09lc/Q8svn5Rkexv/hkjPwh+qfm+ae0IK/GykRWCscNPl0YQX1aq0Ku
+CBZtVEePLUG+Rc7nQXBSKCu9h2D8nRzNGjpfnN8XtsgjysruCzawoGFD/et5
+HlnVcNDHElYI/L+9NMcjuSGDHXaw9ssfD8fqeEQ+8bbVna7Xd9Kf9zuPKKY7
+V4fBqtr6/VEzPCL6OXl3Orzq15mVtdM8YvbkeUE1rIz+TPrpCx6JmzVPHocl
+4ifz4VqM73JKdkR9zVXLz2x9ziMaS//nsbDGoD+j7BmPiOMdAs5TlzxeWgRn
+7yUDXbBkIdyPg/Hq1dcFOtqvn1gHnLBedkLNFhb9/dtaMjVwVkzmPH0+KoI8
+f2jF/u2apBJH+vzPrTZWIp/4wJUhakY1FV/9kkcMD1pcsoWzS8z/fRb1qJbP
+WCyHlVqj+chXPMLZ358wi/3IvXWOE/DmU3O7aB7lubVf+qIfTOf1V/mw2d4h
+ZwYW2CkjIqgvj3BmMF6ZZz1nQfPPKkJCYfGf92Xepf3Krx+MxH7Ni6FFubSf
+jrsmDZBH2ZU4vo2ev21qp/3ILzk9ced9en7MXV9Zon5BTnSy1g3rSUzzxiZ5
+RMq1L/oR1rrXpSSO84i2xaOyHubcOR7R+Aj9Yl3fV+VG+z2gXjqA71d3O9dQ
+L6krUKmxnlZe2AQzxvf0Wc3oZyB38YHb//8nFN/+3+c65r9ilhyv
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.907871335428632, 17.11903631971389}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1gk8lPkfB/DHUe4rFIomWrRSE4VVmqeibJGhRLusiagkTSK5JyS5EjZX
+y0QUHTurclQ0VK5Ks6JW5yhHroxat/h/nv3P69Xreb37Hd9reCzzPOrkLU4Q
+RBP+UU+iaw4fPZL477OAJCTiUvbUwKKmYcc8FZKMysw+FAjz2pSqnFVI/kt9
+h3fLYdrnSN0fVUgizNXuUqsuSQjybca0VUgOXdKyiUPZUXF8DSz8FutlAguv
+jZh747zPz27M/mW4/6vQ8A7Wf6tZsvgaTF8rVaWN+EYvV/1zAqa925WcDdM0
+dGUcYDLfyVZXleS3hYTFr4V5vkkfeKok2RdgE2kAc/8Zn7RSI/kOyVPulFlK
+cU51aiTpdql7yAQW7CjQNFcniepFGS62sPBSPPOCOs5LRZDe1P1e1zTfqJMc
+pnVaXxzMjByZFFtIEj+Lqe0upfI94iUls5DkxMZXHXpK3W/RLi5SJ/mXZ9X0
+qXq4met+rYTHOqQeEKiXP+Ss5Q27GP/YrABzY1fen1IjOUuLVrsrwUzpW18j
+ke/AVKaBJLWufmbvBOobNXeKHcB9/HN22v6qJId46h39GOY8DMrtXUCSrkUr
+u9KoeOfD5g6jPwv7DNSdqXyiyj6KLSA55yfHFipS9TXXf7uJ+bjkHvXh09Cv
+dTGlwej/lk7Ga39YENQp5wGT6R3hS2B2Y/wpH8xD6rRdQ9ZS5Ofxuj4Z1m9w
+kJOACaWEwVbcZ/WTl0GEDvIbTgswQfz8D39clYNZYUbBVxD/eV2YbJk2zr/d
+PGGE/DcZG8UHwOwAjeVVqiRx5sXlWXuYkL99exv6IT2k07kF5uQcdxTAd5sD
+SSdY2HJ+ZAfmEaii0x0E0+3DLW9jfqflXUNLYV6mdLsE5vH1N6vGfpgMVrlj
+hnmN1PMn6chHMK/aYTvWW98J+09QJjKqrbB+VO17aDnMTb1UrwIfWPL9fR+V
+v8zkq0bcb79v9osc6uXOW/XJB/GPiwUf1oDp9wNWjCC/VeWrzeQpWy0bPaJG
+EguyNMK7cV5ZnGXThXodFBqeFcLCq3bsX+HV23b9YAvzZi/wX6M/Am2bjjaq
+vv5bqofgdtONEf/1Y0VjhDz8NFiyrHwJ4tvoTDSh/0bZR3vVYbamv04R+l8p
+Hqp6bDHytQqazYf7rG09W7So76PvzF2YVen6yRTmWdx/9i/8/YKpxRVNzKPV
+O2E75pWT8sHWGGYb97+oQLzXS1TEmzUQf+OIkjnyNSDiaRyYZLJv1cIDMW7y
+jrBgk38OE/WmqhnWb4C5j5oOvIVtoiR7N1HrHTO97uiXgj/rljvM6eIda4H1
+ta8xkmC+vRrDEPNIDOy/3EidV7a+54P+a9eGbFZAPtxz9x7EwZHJUTK7qfyY
+6TWUs90MWi7AwhjXV9jPKd3ikfOcsqJPO+4jNuk8/j5Bmd6+SIB4A40ZexRR
+v2iF7f59cKxpvZI8zLw2WPwR85s+pvX3MPbzeEqFvyD/17LpeZVwqvvhLAG+
+n2sCr3f7wIJXXzp3wArfrwbPIF9W26L0F+jfsI75sXCYKSWj6Q+PR1cqDyzC
+/uY9XTT0M8XXNcKe8g1Fmgj9X5o9eKoEeTLXPwt5j3n6rScZ82DRKcH3QVhG
+520HvmcEvaBPejHu27/9okEb8uKryjr64L7N0977nGDRk0mJJ3DwCs133chL
+MJE9tQXzaVrs++I8zLGUnG2GO2T+XOsKpxb2aO3Fuc60rpSfYPZA9WwP6vcN
+sp6/DuYqyf1yBP35ckDAsoUJDY/N3cjjZPva5WyYvkLrnC3yNPU89ugKtf+Q
++Mo09F/zSZuwj7ov38O9BuvrdbWS6IgjKJP92oz16m5hbhDMM29lVcCZVi7T
+ZTBXp/R5LOy1+uEM5kCQG7dK4ueVY1ZUXEQgLnN6aONzPAPI6BEpPIVGYWJ7
+kF84rVJqDPtZyzmP8fuBkGu/t6+Juu9pQNFWPB8kpHw4hSen5eD3GtTPDzje
+RKP6tclTehNcJvuo5irVj792RmF+nJXqTWnasDK7c2M4+t1Z4a8ZiydHa3iC
+gXVLo5ieTswt9dzx0WX4f6eaLnErWJif3KMH24Yl5uYqI59dD/62wX6Tghs3
+JWCB7mWlOKzbp/x5YlQR+2dpnp3U+TbWsCxM29y1dBfi/vvlrJ6DAvqdNxTQ
+TuVxmjVTL49+3n5ZvA95SymybgbCvOe10SLq+6nyKNcFFqpalIaiL1v/fu3m
+B6fe+zQ3AQ/dqR66DgvspyS9MQ+DPKk5ZdzP9HehV8HRGXbeKQrU+6LSYgTu
+CQu7pIl8+DlmO2XxPU0xmBdWDPN0phkS8N7IikJDJeRLWCS9xf6t1VVuGTDb
+N3FvFkzTlFb7ANPLDX+xhJP113ydg7lFtjkNyIe428cUwcSykA1b4ZcGm9Su
+w6wrLgbVqKc2pbFzDcyzm1diCpesbTCJofqjY6z+F/oxPR1LXlag/t6o8dwA
+a5vynuSiPtFsTMsb9PNLyIvaADnkMxF4JgMePZ312FQW+w/TD/nCb1O0uf3S
+iJ9j2egB79b5p6BQCv1SvecUBFfqMsUPz8d9EW5SpfBk928mdvPQv+7GzdNw
+0+Kzdo6SuC9R4dN+xC9mxMRHS2BdVS6qE8bfF8+6xTGPrzJ/+iL/g30HvSNh
+gUSR5yRcJ6Px1A7m+J1lxKH+M2fyb+yE2WVqkrLo14CyiUQUTGwv/hwBn5BV
+dXkJ8/5InHpDvY+SSwx3IB4n4+HhpZhHyKmRw60w76DfC2t4uv4PbRbyozuG
+/7od3mX5Y1cvzNrG6lgNv35z9I476kmdMxOM4b59O1VOlsO0lQluBfD9VPus
+zzD7zu+y5nBdj3/8IEyf2pF9F/mu9VqiXw2LWLY3TOEfMjfOuVD3yVYFl6A+
+zYcdAdVUfLF+Zz24m6Z7XUTl6xTlT/2cZe6WOTmOesh3CY4MeDsnbLxDDPmd
+i+UOob+t89xNCgj0y6auDu8fYixxZlnFLIMQTO8v5VLzsf0hbvkMg+Ctarte
+As+e97QommQQdFEHu5War0PPW+Y4g+A+d/imgfsvGlW82jDKIDhPtQtCYCed
+u8Zh37D/My1pGH7/kkjX/Ao7nygMRL6lx6Vu0UYYBDviL0Vx1Cf6nXM/XcQg
+SNV7salw7LdaMzbMTYu/qYH+lE3M17sJCwOSz6bDgbqPD5A4n9pR/XgKfpR3
+hKOO+5lOZlo/o/9ZMV4HNRCff1czKRRW/Pby9pp/GYRy4nBhEvxeUNdii3xF
+thUpkbDTwbwNNmMMgtY3augIjzVE9yuhPr7Yim/z4aSKLI8MWJBkKSpEvHi9
+PEEtrFxdftQYLq3QE0ui+lGTUV+C/BPky3sHcB/nk93UUtj1g7O8kIqXctMz
+E/W/f7jtoh/yIY/v37YIVj5pZJJL5T/sEFmMfqWMbnYORb10lw4l6v1nLbI5
+8tMgg2DtluiRofrdNOtH70W+u6MSeqh5XfSLkPmIeTWYj3+EpUtHpAY7cL/1
+s7A5+OSl6Vo7Ac4f8K2yxHnhuGDd+hrEC9W/Q723/vtkV///qUb+D6LOr4I=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.922596693736967, 3.8067338747393404}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000002274`, 17.}, {13.500000000002274`, 16.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.552325660469876, 17.180083206945802}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1ws0lOkfB/A3USpqcp0Q41YaYhKbrNa4i1wrUZRKKalmc881bOWSJImi
+HZJLWaTkkrYhogs7CSG1UymWpYmKJP7fZ89/znGcz3luv9/3eWfOeVX3HHXd
+J0JR1Hv8kf/U5Cw+6mzqv48Um5KJzjmppMGmhOpWM6dhz5bjVyxg/phKj7g0
+m/KOlU0KhAUfa7eEw+wr25ilsPP8Pff74NTBTdRHMj+1VJ4pw6aKksKsDTXZ
+FE0yQ3s3zO3Wn4mC+XsVymJg6oyJ2GPYe7x842m4fGuntswKzG/ozAqFqxMd
+7XfAfP413c3w7XNWnjmwoKYhRAHuN85K6oY5G1aUPMP5jFxzh0UrUY/KUFEE
+zPvm6G8Al7/e8UiF1PfbVvnNMCXzreY++uvX/mdwPxl/qGm7G059Wjp8FPZu
+OMtaANPtR7OOwOwo09G7S9HP57zuvXDMrFNyJKzl+MuoM/El7QgXWKkkImgd
+TCuZ/tUYZoQ/37QMFtjW2xJ7r9CIm0S97GnVj2S+aN1x8xdwufkzrxNwI/dW
+TRXpR+LFxWY4W+SjWDbsbdh0Ww31mLyqVToJO18/9PksHEHvrAqBGR/ZLxeh
+v8bPbhbHSD79Hm5p5L7URP4KJvOvRL5XRl6ZOTZzyXr+YN6jEpgzFqbAJU6c
+MFwni/GAX183knq6gk/UwM4TtdfHST2blmzTk2NT7iXGAdroh1+77206zAqf
+afODU/V8Jz7APov588rJ+FnaWnV5NpX8+OOKbySPXrqMLcy2M5O21MK64aiF
+W2HhH/ScFJjR5xFpBwdaNmd1EbeWPVwFd+ybmVy2Cn2oR2l+wf4dmqq9bjCr
+Mq6gDA7MLfo9CeZ8rRP1IvVUtM/eIeNS3bFzYI33o0u7YeFpvfu56EfmHG/b
+KOy8VyreHC73udDwDU5l2mQMIg//ZX23puCYLy1xmXDLfsNvn2Da3ruBbrDO
+0MpGAcx3CqdWwO6VT3NayHj8KfGFMK1y3O0GOU+Ld0mU5Juw90siGZ/D6pMj
++Zt9vXKQ9GNh/INNnu9wv7iNxFThulhYtLe1SYfMN8jr6ibPt/DgflkyPrPd
+ltRbUiKvK0b6XXvG6K4s+V60Xf6BvJwD31WYol+uAatzFo6ZbLN/At++ef2S
+BKk3VM/RA3kqxVaaasDlPePD/bDM75xCa5KH772jB+k4X7/NKgBmv4o//BY+
+YLxes5jked5OaL+MTaVLRQs/kPGz3/Ly4Gq3C5Q2E+c96Bp7B3vW/XE4AOZ7
+0pmLFXBf2gNqf8Ic6bQTDLj6IH9cXBvnFd/XUoT7nr+qcIFpu3otZrE+/ss/
+NhmwQEdS0Aa3eHU3dcCMB2avk+FkvfCoRTqYn7m70wSmvo1Ir4d5Rb+MkHr7
+qipOesKc4Ku34mDWiVnTIDJf23pEHS7ntsvHkfm6v/m0oH9BQYrbSZgyGqoK
+gjkTkhXRMFsigMmC3TU3WXPIfuXJId+Rp9KwMMEDZkWeKumFtWb0TTfA3E9L
+F/DhzBulu5eT+XGzA33kPi4PL51G/bx59jfnYD/+rE/0S1g43d+5gXwfBF+f
+3YP54mGdZ2HbhCzpa8RTow5fYEraRfE8ccx8mUOovyWXeTwBZsfJbRmhk3oW
+HSJ2DkuoCUEeEsemm8h8bl3uZTHka6ngP1FEzlO8sDqN5B3y7HsLnFqmXk5X
+xO/Z9tZd4//Nz8tLhwUu7ZYrSV6jJz7NUcJ9qDD89pJ+lvgxvGC61Z31BbBz
+t9mRq3AMr6p7BPZ2yv/UTsb9M4yNVqO+XXklQ7BRpelPcTBtw9yLxN25R7Of
+wsKkrCvP4UBHC0cpXdxLc3FOITkvWXWzKxzDbrI5CPdZyY8kwsKyvyWVyHyv
+zuu1cKoKb+oB6q32zAgWkPXdJgn74NtWrrnfYb7eWJAYTMm1/rNID+MXXVOK
+0H+m+7ropXqk/wXRm+HsF1azEjD1vOLqQpKXVcfRWaynXnX2PEOegpwtBkMw
+o2fKvQTmuYTOtpH6qjjnsmEZZmF9GSwQLJfOhzXaJtNTYG7kzsgHcERcdOFh
+Un9fRugUXLeyUcMJppnX1djgPEbbDhVDmJ1XtqQYFgZGhavCrJOCMEXUny8W
+8VKW7B/raHMZ7sjrSZEm9XkUm2ggD//+pnhFmLN+Hu8mrGPEMdcl+8/sFzdd
+zqY+Hyt8ZU/yOKPl1AzfPjjxPYDU1+cxx1oZfbxx7LpG+uH9GL0DG20QNyN5
+0n5yCpZTwe/NuznVqiSvVtvi3bCz9cYjB2CW7vChDFgYfMe7AhakLEi8BRc9
+rvL7Qcbzax9Uw5uMfi5VZyF/m5G/Csh4VJW4DcxVm7c1Gu5aZffAF2bVtL+w
+hNtlkyfi4RiD2Nwp1FNgfeJdDixk3MzJh3V0/D/dhCmrgTU28NvyF/d4MM2H
+SRtAf9c7shQfw+z48HkJMHXqmmwbOU/UoHUNnC+VNfqUzHez6HqPvA40SCo3
+w4x/LVWK4bSkRvt7MOe4rXg0/PbsG9tyMn/iC8uPPI92EfNzYT4jyMsf3h/4
+MjWVrFdg+ZyE0z3qp6LJfIvVmtWwu/w6Tw7pJ84jicL5JrvtGvbAzpWVF73g
+jqX6mu4knxfjQU/h9JKNO13I+bvKsjaiv2B3exUnOFVZ+h0f/rBYffi/8eRj
+j7yQV+yGa7TtZP9y5cRhOPHyrkKS54G0RyXGDHwfja+lHIer86PtwmGF+38f
+SSN5jMmGVcIxv9DvlcJGywe2DsCXdM7zSF6huqZblqiyKTs/q0ufSN6TOx10
+4DTrTge5Nfjdm78neQM87fz4yc9wkWJypzlsnh077Q2zzlUcMIEvKUU8iYeF
+D4tmmHDDr5H6BbDRqsf1ZH+5FqZlI8xf8NHsX5zfEpdl+Bo+3W3r0wCXdkXv
+H4e7C546pcOJT274ztXH+qCvbj5wgUr0rCTM037ytwHsftdMRxqm6y+1F4cH
+h/U1iJ23RVfVIx+DevfNi2GOhqXpCZi5XmObGCx8bn7bFbZeLz85ifOoZUr9
+RvCRt3+oDsG8H/YPDWH9m6+7e2DvXb2+duT59ju/5hHMvh8jCIYzAk5Z1MDc
+HZUutXBU2IzyDTimoj1kAerZP9hc/zvJo0ewwBQevUlJZpLxTUt0IuBQox93
+02F3pvWrP2GtLTWeGTBt7uxbUeQ1Vqpkl0PW924U2MPJnY5FxfCg1E9HzpF8
+Jcz23oVbFK4aPIczGJF67XB5eqjIEjU2pfaedWYE5uTZ95vDrhNurRLoP9Tu
+lNFhWMa3ma4HcxNseMnwL4YDoZthrftGJVxYpDX7TSjJ0+FrfhHMjFAzuULW
+d55ry4ftflgfa4Anzyg3XyD73y0M6yfj95y4EbDWA87OuWtxP57+HdthXbe1
+DspwqNrCdfpw7anDlw3gFuHqt6Jw5hu/NiuYX5XO6EQ/GurruC4we7eY2zXY
+WZUj4g6zQrkfQmDvph5lDzimSEfZCWbZlW7dCmuZ7qKvhm1ZdesdYEGa7A1p
+kqfI8UQzMl/TezPJl7nEQWctqUddfQUFZ9e6qqjDjHdDjfNhiYRFQVKweK7v
+NkWSt6+rlQicWv48wZh8H5ZLXR1Hv6dzt6T6wPRjq88NwLRIA71M2PK8xORr
+8vyZXmkm96Nb93N2L3n+Vmw/IIt+g+dHyL2Eu1VfvSH5uCdltgpgyqmvL5fc
+zwXTsWHYNiJ8bABOWbgocprkPaTUxMR7nO2ep7qkPmfJdvoB+PPaZed14MEK
+zlAOzJSeEbUn+dJ2xj+GJxmFlf6k3+tGqf/C6SE1t1NhXsB1jbl4j/u6eP5U
+JcnbsKNNEk6uM+K8JPnVCzMk4Bny/rj2/++PGuz/AQ7UGzs=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.684798798577102, 9.013741219420858}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwt1wk4lGsbB/C3UpbEILs0R3Yyk7R8LbxJxalsJUQaQguFEiqmkS2iMyFR
+YqIUCaeELDVKyqGTCi1UI3I6okYnS0W+//Odb67L5fq5n+d+7vue551r/OIT
+5Ow3laKoLvyQ3/++dOl/f2vTFHuZzLAd3GrvWaoPf40bupMBC9qdpRfBwfMd
+Rnvg4CduaUawwOC7KUsPznj1zzS4xX6ldBgscNIfaZiDPJcV/SpgR3ZC9D5Y
+69ZKn08w5+rXmGmw273FPC19mmL02jxJ0KIpKc54sRXxTaexSU2aKpeTd3KF
+6Yti+RC4+Chjyw6Y6fEtSqRBUzYZtQa+cHD5i+pN8JWoBaVbYdHbzbNb1bFu
+tMbWlqz/wdq/FdYNP1tuBnP8V80dVUNd497TGMQTAVmF8AZPEZfUx4tO2hMK
+i//m8ltIP/MlZd1hLSObgmIS1/LscIVtUvJUT8Gi7xYTQXCtu83MSBJ33paZ
+C9ue/eYVBAtzVG/1wFJr21MDSVzwKWkp6lkqs6MqlOz/eYqbBcdG/u5/nMS7
+30ROQT+GiRU3LsPivJdzA+B0ttvCpzBbU/NzK7whT3d8BupvXTDr/HzMh/Gf
+uN9tYLGBnXUkHJryPTUR5t/nplfBrUGVvz2DeSFRKm/h2vQ725gGmN/MNVaD
+cKRtQtpemGreldENt60fvlsFi6XiG2pg4dbM9EmYF6ZyhuRnR77ttjLEfL/t
+H9WDbZazHoXDgpGA9mrUJ9t2v+MSTEvsnGEFtxrGDj6EeUf3a1Si34hdbw+L
+YOE0tpEhnHnx4O4BmDH2JPMM5hXa9ENvEC4rKOqWgb8+Ony2B2YnDzkmqGKe
+txV0n5B87MBHCrBEQWlMJcyPTxWUqNCU6fXgPzJhcWz6Wm9YKv2wNamPn+q+
+zhS+4uzh4gKLPs/XUIBpP+mQRTDn0VZlBqymf2NAndQfw9ljCHddS/kkQawz
+YeYGsz8+2DSGeQiiz+7PhrVaS84Nw8wVFtuH4M0NHzsm4LL7a3ydUZ9NdeY5
+BbKfJ9pdDYfal/5kk/PdSqR10Z9aslaaBxwstaM5kfT7d8w+Pll/ZNS7D9ZN
+ilz4J6m/c8pfFmRe3A6mkhHmWnZKIQQeO7JSbxtxhpH/Gbg4eNtIIUzL1227
+BDsy4o1HYU78RDS5b77rSzZZG+PvfreiDpD7qFOokQgH3z7NJPnHxra6N5H4
+mzGX1zifLmkyn2KC/edPyO+Hk299M2DBIl9r3RH0Q4WWGDrDTLftevvg8nan
+3N0k7uJg8hbzcNvCDT9InJ+TbQ/7vurWDoNbNWKH6pVpynMyiBdI4kWXwyzh
+yB717+6wOPKJQtNsmrJ4x91Iw+xd6jP94fTJVcm/wJT4R5cabLhbRFHENYGz
+epWw/qCs8hvUL2zLUmiCVxgWL74NMyPOrXwIt3AKa/NgcXOjUARLXb/XkgLT
+t1pKGMi3K+f46miyf9BS2QWmn3FzuTA/KkmrCC6z2SuOJ/YfNZ+Jeg0NDzWf
+JfNTbbE6AAvv59pUw+xPbl1d8NfV7YO9sMhvL98a/TPin3aqk3nZpcrnwuXX
+PMtcSb8HPEIHyX07mVaYDTt2LQ03wjx71bJv9sECESfHAc589kfiQlPcf5ka
+321wm+X6Wh5MLVLd4gRbdOu+bSZ+HzrXBBZ5B51TnI/69lxM/Yj8A12xzc6w
+yED9fDo5/5lsWhLMGNxkbgSPLX16oAoWuj43vob6N8gc8eqExWlq6nqwSMf/
+9hcSF9urZGAeEn7GvJ8ws3x74nQ4Nnuf4iTM8fXrj8B86Q8M72GYdyI8blgR
+zz/d9sc7mDLhWPHg3hlSik2kPocOrzmwWNhuW0R8JM+zVQH3uUqh+jjcymqo
+PQfzzFIf+8O09PovPHhgo+noWlLPKm0H4kjVuAQT4i87qSxY1rLvkgo536xF
+tQmmEpebycCOXyUuzMJ5pr+syZGEBSFDd33gZPe/JBjk/I8F/ffgcr7zyDyY
+X3rhpwn6eXEzIW41mVfgyzOn4UDNY6v3kflYLrP8AZcvZtjkk/VFry+5kvvj
+rWfYTeYxfUv/JVh8aMF8fTPcI5/Q+93wB+oZHQwLgufdkST3KVxSrQ4W6ltt
+VobHUjpsZVjIJ1WhKA1LPXTzc4HL6qsK35H739Gvkg0La6wH80j+Ps+lXcRz
+2lrWw9WLx0ek2ahj4f2V5L6XnTB4zYSFZvoavrDZq9B15rBjQs5wJ/plyskN
+rIQpY1b/Bti8tbZ+NdnPVd5ei/nlDDlSNjC/w76FBV8sNdO2ggVR3lHFDHwe
+ujKbF8HMOLUtS2BB+KUPhjCPSltSKE9T/n8r89TJ+Q8ZJ+ThFyzJSimYs0FY
+VCCHzyOPgdjPqJ95MCYiRI58nidefwxTuY1pwbCj7tqN5TDH+LhzHtxgNHwo
+F6YXjD6binxjR0VKabBow0uTZDj9xJRMPszW2+2siXpetLrPziLrvTafiISX
+3tbVukbm6eRd0Atz3vvXt5D9nawV9ujvYbtO+uj/zm9quwGreeVsUkG9ZSUv
+dRmYj/WCgI2kX+rikK0XXDXxvN2VzNPLZjwL1hkN7okk89kV8vAOHJuU6JhP
+nGJn+ghu61T60ETymb+qFMKhr3UPfIYZi+K0zsJd51MaFRfgPv4TzN4KzwgY
+emwOCySN30+Fy7QbL9iTeN3bBWfI8yBbFeUHi5ezvmjAgXMmusJgTsJQdSp5
+fx78J+wYLHIVF0yDNw/cpI/DdClveR/mSdXXhRJzEqPNHs3C83reODEGFl5o
+rm2Upakvx1hmh8n5V4evds3E+1OTv2Yv2c/ti1GFG6R0Xm4jfuzB4srQ1Mk5
+AXIbyfqC6BJlWCcwRWMFiZuMvxFJ4/NWzcfClORPbvcgvsseideGeRcqwhSx
+nqcfoTsbZs6p+PUAzChe/n0WyWc88Nc4PPWLe6Ms2W/Xc/oyzndb4SOvAFOp
+k0Z7UG9SXbi2JonLquxbhn6Op2iPG5P9KVWps9Cv2bnOIJrEdZZceQFv/nh1
+qgepr0lW/RTuT0TlEgnSr6OvGV8F8wrbmZCaTfL3X9F0hi9u7M2vh/n9v1aH
+w9wbYYofyPx3vRqIhfuXzS2UM0e+9zFrImC36h9sC1gY8SrcCc40oI66wmXO
+LE8FOMliZnQ4zPFY3HIA52dM7bVLg0XX183JJvf92FnNIpIv771fPvqxXNgR
+VEP8ZN7TVPSbqVMx0WhOvm/qZYViHv37qLoWcp5JfdImzMuiIKqPmJYIz1iG
+efcaRg49gAWF0k4WUqiPf+bkbbL+Tznur5I0VVHzM/d3Es+9nBc3A8+P6W+s
+PJiK1S8YmI73I91ixylS3/OW2FjYsl4umEf2n6TUHOGup4PJwWR/xu4RBzi9
+rabXh8TjPPYeg+/eCUh0g5n27Wk98OJ/Jnc6k3z51mF7cZ7sz/mWTiT+Q9ld
+DfWk/qaU6kIc4CzfCT+1dS/eTuq5ttL7Kup/JTf9dBCZX2Adl4v+jHlzleLI
++as5EXbon5nPLs0l/Vc+uDUF81HRiagi/YrK1Xjn4bHnBRu6SX20zbrZmKeW
+9z3vGQvJ902O0XbYR6n5iSksaOgxOQQbr0rZuQlmXvQPJ3GdF+yBCJiTEhKu
+AJ/sa7HIJvHF4yI+8seWHmHVwqJSh9xu1ONzz+Xzc1hYOO+KNNz6+M+KT8S8
+d1UM6f//n2aB9ZN4SdL/BXHE1jc=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.51595498616782, 2.888880495006221}, \
+{1, 1}], LineBox[CompressedData["
+1:eJxTTMoPSmViYGCwBWIQDQEqDiEyIFrOgaGg63OSmYrDzO9z9v9uk3VgWLF5
+kku8ioPSsWuhi37JODBoaO52r1BxuLaBb/3LBCD/w0aDX/UqDvqbjmztPSDt
+wLBjCturUhWHfy805q1RAPI3eJmtiVJxUBZ+2RDbIeXAkPCA8Yq+ikNNZHC8
++z9JB4aK1Qtvf1d26H97fYldB5DPcX3a/63KDn84o2++0wLyG8QO8eUpO4jX
+1jVNfSnhwCAgx2KkouywPWWl0aWjQP6LFavW3VFyWLTIuKtvP5DfscJy+Wwl
+h/kz33T/vwLkB3ha3EtRcojcYaJ/gAlo3oH87jprJYcJ68uXMLsA+Qy/p7xR
+VHIQen0p6c4kIF/D6uwiSSWHdau+P5r8Asg30Hwkrazk8EG39iuvHdD9B/7P
+P22r5LDt2qvvhj1AfsAHbvUMJYfOV85Xg8+A/GdvuXu+kkPCzvcHp/0A8ndw
+tAc+VHKoWCL935kHGB4CG/TkNZUdXvAILhJgAfILGpP/Fik7+D+OC/O7B1Sv
+oXp02S5lBwab++4ss4H8iCnTv/1WdpDY/v7gO2uQ/Wck1IxVHCpY/NtTjwDd
+98IwgyVWxaF0ZnuMliWQ73HwsGq5ioOa/NH5SguA/r+QH8/eoOIw1QIUvxJw
++SfM1gl348Xh+qd0Viy+ekwMbv4kuY0Vs6zF4PYL7hKwEzwiCncf13OFHb9T
+ROHu32W/cOVGRVG4/xTF3se+/y0C9/+GM08Y9nwWgYfPykwBu0x2UXj4NVjs
+0VpjLAoP32AfUY5zxaLw8Ldwbub6dFAUHj/RFRyyOeJi8Pj7bq47VzlXDB6/
+lcUd0X92i8Hj/8KO0xfs/4rB00dWp3AJg7Y4PP1kNJwpLXQQh6ev4H1hZ3Wt
+xOHpT+hLY22WmDg8ffJJLlUTvCoGT79VphrRB8vF4Om79+SaBTsYxeDpny1O
+vH5RuSg8f/BYXU8Mvi8Czz+3Cqy9iuxF4Pkr+MDHALH5wvD8x7Fac1UsqzA8
+fxZoJzuwVAo5wPLvVjYQLeQAAACtaGA=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.354800000000001, 6.}, {1, 0}], 
+        LineBox[CompressedData["
+1:eJxTTMoPSmViYGAwBmIQDQEqDis4ITTDhdu3dtmrONz7tfe8025lBwYOlz9u
+2SoOf3P6puVlAvkvylXY6lUcDp5abPiQH8hf8TIwpFLF4c7e6gtztig5MDBU
+rVgVpeJwWHOR3IlYID8hIGGqqorD9Ss5KdqCQP6F+ZNq7yk7HEt+3Lj1sqID
+ww/VNO9uZQc9U+P/QiuBfI6qjBdGyg6rtsx6HT8ZyM9QbVtzR8nB9nYt++9J
+QP6EvTcP9is5bJyc/qF2GZD/wNKnJ0jJgf3JuY+3ToHUb1inqKXkoDhZ4e/c
+30B+xaxpdyWVHBY/iEr0Ngba/0L6u6SykoOR9oXkK9lAvsGGFCFXJYdPWkE8
+EvNB/NupX2qUHG50nC5JPQ7kW+iVSR9TcqiS8z3z5T7I/SEHiqWUHXbuCGPy
+fQrkT7gR87tI2WFrwoYVvVeB/AiFqPATyg4/OgWeT9sA5Guc1SkQVnE4oXFW
+m6cCFD4mnRx+Kg5ut1fEGOqD9O+QcSpWcZgx42PG0ltA9wbskGNtUHHwkgFG
+R4MiXP5tBd/0KFVFuH47s/DF5y4owM3f+8Loyud2Bbj9ve3vJTL9FeDuu7DB
+P7xISwHu/jMRK/9uklKA+4/78yZjbgUFuP/XdJh0z7JQgIfP5GdrPz9PUICH
+X/Az/TnaUxTg4fvIYOm8LWcU4OGfUnefKYkFET+1uoZ8qqaI+LtSO4O/KRIR
+v+5mTT9YchHxfzsmVWRBDiJ9hN85w/A2TBGefvavlanz0lGEp6+1NpNnX3mn
+AE9/B5/HPjRfpABPnyuCW/STvRXg6bejd8cc2wfy8PQt4Pn4kpKuPDz9++q2
+JFR1yjnA8scOfhAt5wAAXRMymg==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.354800000000001, 8.75}, {1, 0}], 
+        LineBox[{{6.4999999999976925`, 16.}, {13.49999999999251, 16.}}], 
+        PolygonBox[{{10.6, 16.}, {9.4, 15.6}, {9.4, 16.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 16.9452}, {0, -1}], 
+        LineBox[{{6.499999999996362, 16.000000000005457`}, {10., 
+         10.000000000003638`}}], 
+        PolygonBox[{{7.947677384685548, 13.51826734053906}, {
+         8.206811054955079, 12.280184249251306`}, {8.897834175673825, 
+         12.683281069670574`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 12.823799910437668}, \
+{1, 1}], LineBox[{{13.500000000007276`, 16.000000000005457`}, {
+         10.000000000003638`, 10.000000000001819`}}], 
+        PolygonBox[{{11.447677384685548`, 12.48173265946094}, {
+         11.706811054955079`, 13.719815750748694`}, {12.397834175673825`, 
+         13.316718930329426`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.484057296392571, 12.823799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 16.}], PointBox[{10., 4.5}], 
+         PointBox[{13.5, 16.}], PointBox[{10., 7.5}], PointBox[{10., 10.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T13", " ", "P2", " ", "N26"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdgei/giijfhfjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdgei/giijfhfjhj.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:eJwd1gs0VGsbB/BNqiFFSVFoCA0mDVHqqBlS6WoqNJxC5dZ9KjoKoYhKRe66
+jVBKZahVyGU4XYg0J5RqymCKk2QizhTx/d/PWq1Zv9n7fd7n+e93k+H2/Rv9
+lCmKGsI/8kkpRvGjz6FoBFM5VM2O32p74GLbig4TuOUyv+GjHofiaXRm7YA1
+Fc8stsKRTu22xbCdIPtE90xcF4ZdNtTmUOJ3C2LOwnbPFvZegnUW/Tl2Bay4
+f+2o6TQOxX+u1zqN3H/Y7XsJXKOq30rB1KKnqRunY7+qwtIxcIvlp6BuWJBr
+pGUA07UWJEXooN7Jtuh1pJ7hGEs1XfT5Qav6HBwY6NR9EvaJXfHwA1k/Q67W
+B9ck3Cu2Rb/yVxcTnGdwqPRPRg8SYYZylm8cHMIzOfQVDrR32y2Ei30XVXEw
+v8LELVEES4c3lZyCI8d61pfArAfr+6phKZWoeQUWrG4t7IJ9Ar8s5sM6tj+1
+FbBz3obv82HN/Q02vTBnk+XRHvRD36tu/YLU39gbn0X6l+x0vgALz97Vd4MZ
+rJnP2LD8nZXpRF3Sx+oxLejPLiF/XwPmF2+3WuoFFyuu8i7DLRZDka8xb2T0
+krvh5PqX/v3LSR5uTiEHYcFhpelkrhazDRJy3VmeWTgTFmUoj82CRSYF/LPY
+p4uprC0h9TJGOCRXxt9RJpb4lEfvTE4l33sv5abAwlOJrAUwbWHG40moE9jY
+r/IVz4n7l+RzKpwXsE6tlDy3WdwQM/TR5XifmQXnzdv2tIo8xxc8B2KfnoaP
+npiDm7KNVgLbLct82gvTLtYv/kzqPXMtDCXnsPpRtgmZS2vngl8wpaXldIjM
+IVE/HmCA7wslx57D6ZnlESI4wTxmrSn6TE/hDyvPQv5XHxyMgrmrhirmEm/z
+r3hN5qvLTeHAfMeEJYbkuY5yefaw8wODw1tgmoZuqxGct/tKWjQsZkl6Bsl+
+Qym5ZE6pJE67DOaNv52eANs1x8YfhjVNmcEHSL6DilFzWPhL7raIrN9T6/0R
+/Wv6LN79L3muxh03Usi5iQ/rOUHOQXVznhuZ16dURZ08jx3er4xggVFYbgzm
+446aKiuRc2ja6TuAfAKb63j95Fwc+LDcB053mTN9GE5/5RFVh/eKW7EsRg/3
+c2kH19rD4qsGMldS/+XxKw/xXtboNO/KIefYivbLAaa7e7qoot/AdycXt+K9
+5jE2v4uEWcx7Oy+Q9/6HW8x45CENKLq8FdYJ7zbMgFn0njYHuOnM1GgdOvYp
+CbJgw5xuMxM/uIUK93CFmV/EAwUw7YTMIYKsz2s4MwjLHTm1ZXDQ3I78BYbI
+Y5P3WFXye6Th/PZ9cGDS00BvWN1cpHsJVpg6DJTC6WF+typgfsWmQ9Mwn/Ns
+h53NMDfX/PYeOOcs11IKF7MjsovJ/JFx7q1wnE1fwwD8+FJ9ZSMs/u+QM52c
+x0GXSlJPwY//aQMzT9VOuQbThFnlVnBOEv1FBLmeUnVEG46fG8D2hAW3PzOk
+qDfV36h1PiylsyQXYF+r3+Ya5P7dagXz4D1a2ue/YV5WZ11BCfqPVpm6ugkW
+JtWU28D8lY6u1TDPwc0rF3nkWeauKiX5tKWe1oRdVQ145bCga3VIqBbOhxbX
+uh6Wxvd4d0/Bfvat4zuJ2SJHP1iq53ViIvanL7a51zOZQ9VvVm5YSuYvNLoW
+B+stHUw/YkjqjJ+/CA60lFqUwaJ2wwwlmE8f+UvFCH00jx9t10ReMmoeF46b
+fOfIB1jYnye5BLNiwsbL4T1TacpdMD0q5qIO1v8YsLOaNxu5Wi6zcYVb/uEx
++DAVR/2+AsuS077kwdIzfiE/YKcdzq/fwF2prkUuZJ6Hvx8MwbzKnsP5sL1b
+1ystY3jINV4Z89t9lfXNguP4JV9d4GLHVl86HJmvO3IOZqbzFdowp8njySNY
+2PJxQAnu0gye0gjrnZRqfEZ9QUdr9itYxfZv7mNigyR2CVyW9WTMVdJ/+U3R
+SS3yd0VwMQTm3/ilYw8zhLy0TTA9+dKK9+hPJI71tybrnWqWBMBiscv66TCH
+M6mmA/NR7cZcFZiWv8bTDQ4LPak1hLyKT7E6RMhvy/srjcOwwCss2QLW2Zey
+QQ33i15kbbTVwFyuzPrZMCt7Ac90EurvGvfbGZbPsw6fPxHzOt+feQTWrK+v
+91XH++Dv/7kI5l7OFokmoP+GjoIfsPBZnWINvFbV/KA98pAbHqCpwny7Tlks
+rPnsDw+FGqnflNoEJ2SVmurgep77axrdBPc1jr3gC28ZflAbAEsTK+rfwHFW
+Tok3yXWzcx67sP9jea5HByz86e6thf6SbRuDtUzRT+zRCbWwYiUzxw4WH5CP
+RGIedds9ehthAedgFUuDnB/3dG84UlZm2wA7WTx230ac8k2FQfJqkenw4HQf
+V43NsHFou+5yUv9tv5wPC47YKJmTesbZaw7Ba4OXiWlwnPmhp1tgTSPTetKf
+IixHby4cFLXPtxymNi53eI798qhZOulkvge1fhPh+BP9HodhlszK0wz9tiis
+gj1hzZej0SaYh+/OClpB1r+7f0cN8/uOyVe1J3lEe15sR557UjvDiaXf+m88
+VMX5KggWOJN68vh1yTT8PySEWekDC161Fx4fjzz0aq9Fw5zyItv4cfh+eFPi
+PXK9PlG9ZCzO8Qxr96+waGNTmwacPvGUy1zMx5eFnEtR4VDDuT6RQSRf2fqO
+tXBgdvH1SpjuVXBqAfxDdslVfQ7OxcjsYS7MWGM4gQeL29alpcNOvrruApiu
+z60ej/qRA5s722HOsWFmGvy1dqVQnwFP0zBciv64N6sU62Eq6Ht7H5xHNzoY
+DAsmv9LPxzzy8LrlCbBI2dt9C+Z1/uOQwVWYft7Me5j4baPFNVh6+HptFPKJ
+35xJz4Q1s2XrZbCN33XzOFi+nW+hjzxDVvV/2gv7/Buwaw45r0Wlq9fB4oBI
+PQruOpGWxiD93coIuY71xlMv2imT+0cOy2bCNQ47b0swjzzL/tMO7H87Pyaw
+FBZkblWcQL/R4WMrLsORk/PdT2Ae2UhTZRzM6mDk7ML8ZffuWoSTvM7SE5Yh
+L7HmY/cwOOFG5k6dMcj37TeDWHLdvOt2vxLOa5dGG6lHrbI+30oh79RxwSJY
+WvjHjLpRNsV6uXfeN1h09L2y3gib4iZO+NeE5OOyL6FymE0ZswUT/Mk8/l6f
+KofYFOPP2OzbJE+9av3Z8HCuX/B/JP+F4RO6f7Ep9bP905zM0P9bVSNtXKe5
+iFUTYGlP7YVMeGrR/DctsM/n3HQ+6lMXV1vomaP+3YLeuN9squzWpN7NsMg7
+7dAr9OOqctT7NLESrVcP/X/9R9uwCBZq89c3wzn5ai4NML3X7H0s5r3fOyHm
+IyxfoOVhrow8rYUd7f9f77f0HhwoGqchIZ6aoT8DecnHHJ1TZ05+3/xU5sE2
+devKC2Gf5BdVAbCeiVNlIhyZVDt3BRy02sxvL9m/zHlpH+oFHbWZvpLsn/RU
+dy8slq7fZEj2b5yhWop+mL8DE0cwL+eGyqaP6DcwfTKjDRakWo+pRv7cy8es
+62A6i81IwfzDjowjFTA1FOywCnkpYn5tLYNFvYrGPgWbqmH+rH9C1pv3vL0+
+iHyWKFm/J/d7nX575AebkvfqBg2TfI8wlSL68Dy8Tw0ySH/H12x8JmdTa9Wz
+rnqTeeqsaqu+san4h4OyKySPO90Xbn9FPzlREhnxHIO5W7rZVI7Sxw3zLFCf
+tn9R8xc2JVR6/jEUjjT0uqSF6zbb6sfWEEd03lLDeuc5knWTmVi/cunD3B42
+Fe3xeqsbzGk/PljTy6a25CdMuwD7dJR5mn1nU3GPAm49gaWcvQHn0K/o+LLC
+bzCdE2o22o88fs63U5+LemrmN/wH2NQeuaJOH6ZPql4nxPzcA9Sx2bBP1Uhz
+zX/IKyqng1wXvZw+4yry4v0t1JhEnGjQZPyTTQna/jo5QPafzLd3gWt+DzNf
+k/1XeUVNJ67tnl9E/KRtSijWx511Hj1D7rdXrwxF/celnyb4k/mqqCuzsL9m
+xJNGR3K/r0sDH/lLXmcUGcPUpGsq4ZjHlZ9cNxEW/Ezrd0X+jzk3v48iL5Fl
+g/F05FV8ZU3SMMnPMS15VyebCmLE3lIheY3Uz2lox/u2w6RIh9QrDln0WoL3
+8RNPYAdHuvF3ipuQT5hZ5w5yPbRwmqAOz7/60tEM4kcdnfoivG8F7pI3xGWz
+ftTcwfPsYzFJPhRX4zTvLPZL1VwSQCwYtV8YVEnlWU+5c4+Y/CSUUyrk05Lz
+P4Clt9A=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.703763748652328, 13.714402573074395}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJw11nk81PkfB/BvIkdiqgmFbZyxkpFopjBTUiJHl2NTDZUjRKWaQsYqx65q
+ioqu36DVqN0MHWSpKdqMFULOkmxb5IhEztrX54/fPB58H0+f7/d9fb/f8dHz
+D9+0R46iqJf4IUeKRn79wKWUyNGUS6X7hY5/0uVSoZEV2gUmXKrDtT3xKbwm
+kD0vABa8VqbHEcvSJD/AXbp2qwxhQW/VsfZFXIrX1dqQr8OlrkhVb92Ak8Y5
+F8zh685cpWg4aOk1vSvaXIr1vKXeFxa+7JbIweLkF8XOcIVPyOuABVzKNib1
+uSNZH3rjWz0f8TNWxrrCzVPrSu3h35NMf+fBlOysfqkWl5JnX70RA2tVspTd
+4AbnB+5ZsODOPdqwJuIrThpXwfxA+9q7MM/92/5RmJnYUngapo3SvQ3Rj5K5
+zfefYbrMTcEVZrLp2ULY0JRdFQ4Xfdi2/x58Ylez4y+wcNcWg344QsVz3yWY
+VyA9YYP8th7qpddgfiItJxlOCn9ncwHW2u6m2Qkzn/YfFZD1ipmmK9BPb+/s
+J9thlrMjMwXevc3y/RLYQ29uZR28LNvMbRj1sgq/aSuT+Tye01lA5js1McsM
+FhwKHgqGRZUbo6zhUM1Derqwh6+JtzFczuhn1xhjXsWTsknEGzA8qRkPj3o0
+WD6AvSf+jl0J8y7eX7Qdvrt1gdyEEfoTZwX2oN4Bv7HmMtgj+Z0kEJYonqi5
+CIseeWQ0on+lBeNmfJh7McbTDu69myDaA1Mzk2MzNbhU9OtPq3kww3BzpZIG
+me+5XwPh9ALnZ/x5+HtL0bZjMH/axLUROu7foTEVEl/wz8GGBLgrUynqT2KL
+EHVzeNRLwfJfkt/90kDPXC5Voj3/4GzUL7bmfS6Hk/JmBNvBThm6XkWweFTf
+PoD0d0nX+CnctV3fIRlOirFY3g2rGi5Suw5XKAVu0EN8Vc65i3eJ/WtZwbCg
+xX7TA5j1fv2cElh0StE+H67dahlKR/2+B4qGLsPN4SbpoXCo4E3uUTjiW0/3
+Q7ihddVSF+L4uRMK6J+3hD5A6uWGCXts4YY/9j6rIfO2+Xh5J8zUyJmRCNOC
+Ytv3wlqDH51XwFqxx6/6wjpne3i9hqjjaO2QFUy5HDUQwRGNlcsHkU9LL9TH
+G5Z0m3w9D5eY8NM04fS46HeGsNNU9JwOAxyrhu5nop81+g+z7sDNHcNTNLgk
+YY0wFTaRiT8ewXwiC0POCeAI/97Zr+bgOYjZXH4MDuLnmTrAQTZXsuNg6cM/
+ywtmI+5QtEYaLNyyiMaEGfs/8iXk+pMJ5x/RuNS7FEtJA8wPfiS/B2beXrDm
+G0wTKygZwEGpwdE/ot7aRA2nEXU8jz3ecZ6kvyVlLm1w1c1TMbFwR2G5/RBs
+eL33URbstMvlsw6uX5bysK0Upu1OCt4CmzRkPa2Gk9bGvLkML5452lMPezsl
+hffDkTcurK+CmcfDJGtRb3Pbt/2FMOvp5y/X4A6boAvnYbFe7plBuEF0OD4Q
+NvEp1mCj/6qxvItLSHyVs9cj4IbvBnd6yTzKPOekwUWuynrXDcj3YYqpCJYP
++ynai8y7OrzyHKwjeSBUhkWhXgohsK+ROrtUH/07dhmZwlJ2uN0hYsOUvGrk
+1/F7a7kMHv1hh8sO+ERFqtekHvk+8xO3oR8pqzeuBuYpC9xdSL/sIioPpgKK
+W3djXkznOOFlWLBJzdRcDednSjeeJ35RPTyuivc1Y9szss58rRvSMhNzaDr2
+6g+4o1+rt04F7zv78KAMFma8SB9QxnVvV3zqg2mnfnrLhjd4OfA09cnzMLn4
+rhLiGX095QCLfinM8IfXvJ+TGQ5Lbqk2OcL8M+fL0mGhVb2uL/yl/urqErIu
+OuCYqUTe9+zbTTBPkjSshviGVr+OdsGMJ7mDV2Ctl7a/9MOCwLtRq1AfX/ec
+zweSb69BxSAcUSv9UgdT2Z+PZ6Gfct/cxHxy/jG6gxP6Lcn4uyUejtBZtKIZ
+Di0fW+MCc7Ppp51m4f4lsX5TJr50tlMIi11SVj8m8zo6VXQTFoSU3Isk824a
+Lz0LnwjYKDOGI7QXTjnAWyY43q0MnKfrPvoY8ZNsa8zOwbR2SaYa8YBHqwcs
+iTrGskB9oj62WIucP99BxYz0U6zZ2rgQ54eUac9Ev+mp4vE0WMSZX9qiiPtk
+KbQOgyM2XFDLmoF6FQ427iTrstaocAWSL7cvBK6lIqxc5THn4X3bzsAdWtxM
+x+k45jh2/wUzY4w++8nh/oWbsRSRX2i4Myd3Gt7HqwknmbBIKM/Sh3u5shu+
+sNT/t5ZqCvenbWVFEtxRv9BDAr/yXUUrgCPyIrvL4cnnK/9+Sa6vUTirhOuj
+3VoTBsn54a7UIXhxnRtzOnk+t8qU5ZA/aJm6uTJ5/jZeGf8NVt0xHiZHnr8C
+HzVP1EtfPBXVj+t5685/moF+PFxEMc9Jvio25w94Q6mttYjM19ZTxx79N2/t
+/RoIU1aqOXmwmJF11Zhcb3xm/xhxokdjCfr3mFnQT8f8mq/O7TeApfob709h
+nbHca14S9kmMf/se5sOshSpyZJ8kOKJ4yBIesFJdvwPmzVS9H4v8ouPx2m3Y
+99C2L7ydiXq9NZqU9sLSKPdL19CP2NS6Qg0WNiw4EIv+RQkWqlXYB4n+3Bjt
+hnkNCOL8s7VJfLHY/BuHotIFeueJ3Wsqn01wKIls3m4RzDt3szxujEMppYbT
+y2DGqR2xEV85lCi6V34c5v44GJYzzKGap9E1VpH8U9Pzl37hUBHCpsBUHfL/
+x9afMcShmDerU3tgRmqZ+uHPHKpi/v0+B/RDWSvvs4b5Vy2eXYClivsctsFO
+X9PvtBO/+ev0G7L+c22FBubTMbvv/T3E69rT2bICplZ2qVUjX21Ap3gdWY+v
+LKSPcKigyv/NWknWDZYHRpJ6JXvU6TBv1csjjaMcSlqbNlBH8g8WLzIc51BJ
+OilmR8m8Ny0Tr0P/td/k/ZRhBoutbz7JocSu91iJqF9QGJxdBg+0/W79lcyH
+Htc1BdOGDwt2kPn6VE7UwUrBP+c+wb6IYlqI7OEgbl6AKSx98iZ+FeJLD2u7
+p5N95+Ay1lvMt8hrezod5m02/7QI9XUErW/Owj5IYCSaZoh+tPLMqtfCopZG
+hw/o33vtdJvpMDVxmpkwyKFGs5tutGBfJEi+3WXej/lb3z5RCXPFQTJeN4cS
+ysl/biDr/fXtL96hvvXT3o3A1HNH3VsduN/tvdbmJF5aA9ugFfnvFdccJPkD
+npSua8A8ln9pfErW77udeFuDfFn5Xbqol2K8W3ugEvH5n3wOE4+ZlXhUYD6u
+nCgZcVjM3t0yxL9y69VsMg+9D8n7nqN+reunnYnftPJn1GF+z3p8w4nfGnvu
+bORQ3HoZFUP8nTcV2Yb8fGOn/TBXRbuDj3pF6Y8tXMi+NJEjtPsHz9MG508q
+ZH1ziHzbv8hv/WwkH/m5EYsTjLrQ7/J9r1eTeR8JtBvGPILkilY/Rj/cvWtV
+TXpQnyoj2xKWLq4wzoY9ctL0MzAfaeCHTVvgoh813KewDxIs2fVk6UfU89yv
+fRfM9ZyI4iC+UEEaXId9j3TEyv0k8os0jczcYO4Ky81anRyK1/nkYRv2PVRz
+QJ/pKw4l0B/pOU6sVe9tV8+hGAV6/BXEfZ2zjpYh37VUBbJP+v9n4Ds+c7n/
+AZXP1VY=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.2230354724127457, 6.228068696807429}, \
+{-1, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.999999999998018`, 17.}, {16.99999999999754, 17.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.5, 17.6952}, {0, -1}], 
+        LineBox[CompressedData["
+1:eJxTTMoPSmViYGCwBWIQ7fP3PxAYODCAgYrD9j0SAo5yhg4MBV2fk8xUHBLS
+urLCHYH8FZsnucSrOPDG2kw5mg7ka2judq8Aqr/TN+lOP5D/YaPBr3oVB/uj
+pTeubAfyd0xhe1Wq4lB15Oj8F3eB/A1eZmuiVBxW2Ghr5DEYOTAkPGC8oq/i
+cFDoVNgHWSC/YvXC29+VHeQsVnq6mAL5HNen/d+q7HA/L2H+LFcgv0HsEF+e
+soPohtDibj8gX0COxUhF2aFGtThWJgDIf7Fi1bo7Sg4/77LIHvAC8jtWWC6f
+reSge9voi789kB/gaXEvRcnBUemR2H89IP9AfnedtZLDLhfv5x7SQD7D7ylv
+FJUcpss5sd9mBfI1rM4uklRyWHloQVPNB6D7DTQfSSsrOUTGsjZ9vgPkH/g/
+/7StksN+zvVcr88A+QEfuNUzlBzUBVv8bx0E8hPsLXfPV3JgV7VkeL8HFB4c
+7YEPlRzOnq++/nsfkC+wQU9eU9khPyAjK+cEKLwbk/8WKTvM1eZ4Z3cTFL6q
+R5ftUnaYLdbiz/IRyI+YMv3bb2UHVQ+dec/4QO4/I6FmrOLAIncvY6shyP+G
+GSyxKg5bt/NFfA8H8j0OHlYtV3GQ+w2M3nog/0J+PHuDikOb3cflHCsQ8hY3
+FKd7nUPo/7npcqLkR4T5zU+qN/zmM4bb33D+u+BBNWO4+9atmj51srkx3P2B
+2i0aLI7GcP+JXzv2X8DZGO7/7y+rN6jaGcPDJ/5jwFcRY2N4+B2Z+6uWR9kY
+Hr6lFvG1zfzG8PBvu7P3h8ovRPwkb9sisf0JIv7u3pB9yXAREb8f5c9ybziA
+iH8V2d+P7Lci0sfCqz2LHq9HpB8O71U9JRsR6cuuZ35C6i5E+vt/KGzb7lOI
+9BnzwnQl/yNE+i3bd+X6xP+I9L3YzCpBXMkYnv7vmXapa3sYw/NHmlxhrnKB
+MTz/CMw7nG01wxiev/ZOKZ26Yp8xPP+l2z1/v++hMTx/XgLnX2N4/gUAffB9
+2A==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.5, 8.354800000000001}, {0, 1}], 
+        LineBox[CompressedData["
+1:eJwd1wk0lWsXB/A3c0kp0k1XppQxKQ0y9HI1oAFJhohriAwRN6XSQYpQSolS
+HSRz6SrciIMGoiIUF92jgQaVipNIvv/+WqvV+q3nefez9/857yHlP3fbegkx
+DPMLf+lf5tcE/iiwzP//yLKMq4vq9eh5LMNNOHbHEi4fSH81U5FlrDPFlnPg
+hKf3E/Ngfvr11ouw94pjV5WV8Ly5h3AmXK1R9iQAZj/fXZMARwxpTC6D+WWX
+9V1g98FAgzE4acmfB+XgBY9KDq1UZpnFe7433JZhmfxwA5MAOMmztmgjfNLg
+/OpUmL9PENo6k2We+KgVl8NKk7+MWsNbTXiLH8NsYWJo4wyWKbP70NEBM43F
+K9bDFRU1yzrh4nr/yCZplrF68POPZlhaZpmxC3zihbFXNe0vk7o8Pp1lJKtm
+2uRSfdPkJl94w3N7oURaN3ieIQKb1FZk7IbduG11LdNY5kyQe6At9cdRKX0K
+r715IHsF7e+OeyiG/ZzuqbuUqb8BL3U/+MaqyqIZVP9VxIdRuM+9bu4UOGh/
+bOE29POv6zOxqTR/mpssD44bfuj0G+Uj0P+sh3ne/HX+tC6tp+z7LRc2z9cs
+saHzjvQbKSAPu+tyVhE0n8Ea2QRYxjM87CbtN7ly/jOs3pzw8SudX9mw9g/k
+++t6hsRKFdQfdzWMhhUPj3ZFkvW6ggphQV/2usdw0jnXZ5VwhFb89LmqcJy8
+Twn8OCrnmxfM19+yKgn209tbXwgrnYveZwd3+4Sf+AhLyxU5CMHTbD8cWzAf
+9xG2Xfgi+nEaSbGyh5tjfILV4bJ5um0HYI7iCzYP83VMdYpPgbkLP0bNh/8O
+nW59FR5MGD5yGfn0XvsZVkD1AiXOKcLL43sbad3tRtqVLcj3U5TU4TSYbxtc
+F4P7SfjgqBIDs1nvLvVIoc7lRcl+dN5Tlb/d4SwPi/5N9Pz2+lQ52MpE1V6P
+zlf+vefXVJbZU/NWaRbMdPh3y2P9ROTk8J+Yj9VVqfOBMwN2BryDmbg47ms4
+pG/hwx7yvwmnYnG+5FO56V2Uj0gMsxH9vZ4f5PSSrHD7gCz6N02vdhmivMpT
+2Dg43tDJfgb1M5x9fAI2d62bYgAHWeiL7kEeOp/mPNoFS3t3HemC7RtCorIp
+n+hTq1cgz9D3z6/1w0kH05hI2Kt8a4yuGt5nYyX7W3C4RvxYOMzNSi1tgTUl
+7v/3AE5yYNPb4H6T5kGZBchHNOvsHXi0y1OwHV58zccyEV7yh3knF+ZJGYau
+gRtmv/ynB06Sn970Fv3kXSoVmbkQ99N6cSAcniS1LdoIdmvdoMXAMywu+G6H
+k3oW+R7CfAVpZq7BMJOlX/kZ+RSU/xNxgDy0gPeO8svrdCHzm/i235DvGfOi
+cdrPcdrC0n3leUXedYPZRYdMnXFfrSdLAyxof27HxQZJlln1ZkSgA3PXBnd7
+w8Nz849Lkz8Iji2HFfx3+nxD/+wuB4lVsN2jvKYOmt88JjkIVo+I7aiF3Z6N
+LXsOL7G9El5C3vDgqw/Om16+zKmQ9r88/WMe+lm+ReneNVrPjB0chHvcH2dU
+wAzbtakd8+RtDPBqhZUEandrMG+a//A0ASw9pNS2FXmU/b50oSrlZbdrxV36
+PCxquecIWwd0Tl2I/ExtF11IhQe1Lj/dT99/y5N/9dD8mrK3ymF2ry6jro77
+8TUo58NVjvIRoXCzi1zHZzgjI8SwBrYWPjvvDRxhnzciqYH7qP9UxIOfKXbF
+28LsfIPqaPiOje3IadgtS/nsYtiva/qRRpgb7OvxEP1tmHX04Si8+ICmNvWv
+uqykUVET886vUi/AfO7pIwIDmB8j7pGB+TOTDPQsYKVTH66cQz7VphPtG2FW
+rT4+FXmyM1NK1sOcOUdNryFvv8xNQoaa9D56T3s5hWXG7ptuW0D1E1yGDOFI
+7YXJU8lH1zjUTmaZFd0jjz6jH05WXOV+eKMnyz6F+SXmSZ5weaqwVin1n9gj
+Gw1/KtlafZHmLTV1boVLAs6KxdP6WJeDDeo/sXRsOkzrAg+Z73CX0Y/jhyiP
+NwW9leivySfWOYbqP7lWlYb+lRsG3p2j5785FURjPr//zgbcovX8IfkgzC9+
+QzmnB+a9CveyQz457ye/mo7+rXefV5BBfuWRRpOsYOkpZlMC4Y+NGyMTKZ/r
+l5pKYWtZ3ul2Wp9zZvwdnG5VrK6shfdttE9RFPczfmimdCDMrjaqEIMlmxLE
+b8PcF1P8P2F/sODjcyFtfH5MWvsr4cDeZf5rYZ534HAIbDFH620UzETVO8qR
+lWMrS2H+s+shm9HvtLg3ZXxa363T54B52tbmyTA6qG+9rcMW85Yo7T4oCys5
+xFavQx47NE/Omkduq15nRu+Tb3qYAswvfvffBuR52GogTwZ286taH4z8M/YF
+zBaiekqiWuUSLFOzft3h93R++41/1OGIlre9j2E3m06PenGW0Riy87tB1q9P
+Ow9X5aY4n4HZ0xU5XFjt/PZP+2HOwOOcTvjs6rtmntr0+0R5vBnquSY7mW+l
++df2Gz+Do3ZbpWyiepeyOxLRT4toRqQN1WO7Bt3Qr3jzln5Xmv+c3Zc1mIer
+WLs8jNav5kYtwby27QKf8zD3jNPYXOSRWP2Vqafzava2foeDe4alJ+j5qnty
+lchv8ORJcxOaN7WqeQfyHX8r8Tma8vgrO6AL3jKRoPAYbnbffpR+XrB/WRbK
+L8L7lj+yQwWeN57rshOWvmPtTPc182fK1xswL3u+TS+eN9jTbzYCu/Ebfvei
+79czZXYrdennlVo5nV8l+SI4iPxcwP2E/uKUD6y6DLt9530Ugi0C+CV15BYZ
+gRDmk962aEsPeanRxxHkcXy/vvAAzD90NeQz8ur12ao2SOuJWapfkGfvCc/E
+97QeHDxPAg6yLNjXTXb2vmSM+6gWDeM8gJUsX59OE8NclrWxRTB728ZSBU74
+drMgCeacrtDpFmWZWTWdKiEwlxE91QAfWcnobqPn7QrS3sM1s5onTGgeI11j
+YzzPvSeXrk39XNffdgfOP/qkUZnOf+P7zBPnf5RvE1Gi80Y3/dJCfy2G4s7q
+dF7irIrJmGforyuhhnRemqTIEHzBVD/akZ6/772eT98/Y0GmUXT+97beOnwe
+Il8tFdyk9fbvx84gr6G7lgcpD0a2v3q9FMsxaA/KmbMY91M7YdaBfDtVx5uM
+yaHZDkbTWE76NsUcD5hruFAR3xccscWFc4/D/PAbPPr+0MgamFwMM6NSp42x
+ziR32rfR/oOv56Aep+/1nB/DMGukw5ijfm8tKyKrh/5+xvYdRT9x31r+1oHZ
+JTpauZIspy3xcqAZzNcYSy3GPLVrFjy3gblmahL5k1nODPese860v9v/2yUJ
+luOhWL7JDeZ9ixDD+8bZOhJbs4PMX52fLcZy9v/55xUnev72QHIj7qPxpvh1
+qscTdDrLwjsm3tWugd2kzJWOibCcXNcLvStgzpDqSg0R/P7o2KesQf2mWf0Y
+F2Y50rETWfLU31HjM2LY3+luEyNF6wfWiZthf9Uu7zYhmLnqp1GE9Z6ToTFj
+lEdYZpMZzhN/KOozQvl+mCQYE2U510QXzRuFlYR3aTSj3+akolmTqJ/DUfdu
+4fNwKNoymurzfsz3z8TnQT4n2U2R6qc82BOPPErXqvkvp/lOqdl7Iy+uZoC2
+LT0fu1pbA/evOvhkKJieH30xvRH56v02MnCG+m2cFmk+leVkZU/MuU31JoJL
+T8LFP6R9+bRfWaw7F/czkSVZIbYE+/VzjU5g/Ur9tUEtmH8izY6Fv0jcE2yC
+mQeGTTWof/zeo5ZA2O2hkfNseOnc7NzjMEfb/+w69Df7femjDKon5JXlhP59
+ZBzvl9B62Mz3jrjPVXrjm3lUf9mTK5sx/95jkzwe0P7GoL1r8b703xVa2gCz
+0V+H1yNPFYsC7fu03zHT0B15x/fM/lIF814WhqTivhJ/CW++ST6ZHy4Qwu9r
+neKrcuj5uZ6xkfAlkXW8VJib7TtgDNc0TPyKo/7f2P+nI8Ry2n/ulTtIvl21
+ywa20a1TCCJL1vlcxf4FwWNyO8k7XS6oC6POWYvX7lTfZPu/LbCKg70JmX9U
+xf48+rNQDSv0onny7Af2of8A868Ru8nTPhz3wP2/qTvXGEH9MJsvYn5OcV+r
+fzLVX6l+eAnuv+3UGuEiWlf/5/MkvP9yxx78eEjzJUtH3oQdXvLiB2i/04Zf
+pshbk7PvkfRS5Ktw/m4WPGn2jNLlMO+TrmQ7XFFZo+lCnrF4dits/VvLlGgy
+19zxIvxKr8UwB+Y23QhZBitJnbtVT+td6eqXcX8Zc/0T+6i+83o9PvqbRP+P
+18c++leC/R8W37Y1
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.994885276715344, 4.925732979470893}, \
+{0, -1}], LineBox[CompressedData["
+1:eJxFlglUU9cWhgMij4AoS6bk5t4DqSKlokSDrDIIWwFBHoUUQStjRBDahwxP
+K4iCgNWWwcoghVgGtXVoFYkiiAhCUygoolTFIaAGEQGLNCo+UFTeues9T+5a
+WVnfusM+Z5+9/38LIxMCorU5HE4J/rH//7sQpExM4+tj4EjyxfOiEfw5l6s3
+rcCcMWBcW4Pg9YlCiSwNsyqw4d4QAvOjUT/xlmK2bN6nNY0g+C0UGw9YAydx
+KJk7iWB7s+ukbxFmyd6lq28icO2dLyzwxJzxfOL7QgSbOrVqC98uAE7+z116
+jgjKFy1p6GjA3J28l+5kgHNdp9Q/C7O6a4vIj4G0w+Lca4GYD/2aFtNBw6JB
+dV+kGLPcYHIN0PBbzo3+AoQ5w45ztFEAHfUOiSvNMFvqJ91wF4B/5xWLS3zM
+0pP7O3spMLB9sqLBGrNKvflUNgW6p2OEsa4s+1WlfU4B1zO2KTeEfV7doeVA
+QdtNpapkJ2ZOQFThpxTcOcZ1uFbBrk8cMGc9BVub3is2NLPr59moiilomrjM
+HOxl46d8rjdKwSrp/opXasyicwW+6wRQ4vOy3/sdyzTE3hDAhmI9I+V7dn+y
+dP91NPyxbDB/2zjLNW47HtJAyy4zWffZ+PHrnaMYSFmrk/T+Ars+xwr9hwxQ
+3uvFuTmYjTKVqtUIQj3BOlzCxv+lOr0SgZWd6qXYkP2eV2F1L4Im4U9+Tr9b
+4Xz5VKVPIbg02F08vhVzd7ZR6DsE7Veu29NWmA/1rBX1IxCYPIhIvz0fx1t2
+NewEAlCdvH03F7OlamZ1EIL03oIvz3thlmu1i58x0Hso7eWaWZhbmFHDrQy4
+pR4LSe2dh+PdeyhS0+AwZD+dVIdZtKLNLJaGkBWXKp6VY7Yc00l4JADPpmCZ
+diH7fNLyK9ECGAs0GLBm+ZBevdckBcWP+xUu7PPSoATvSgqilh+YUXIGMxxM
+WBhBQe/RygHzLszqzx6ZOVMQqJ/XtOoZZtWe5G57Ck60LeEnzsHr45Sg474U
+vB85U9kuwqy6bJWQSUEYt9Er1w+z6Pbz/G4KeMlJnAWbMEs8Dtg4CEAdcMBa
+8jW7X//jzlUC0DN2FtumsvmI447Z0bDSsmdB+BbMYBHVc56GvbN2nKKlbD5M
+H3m4MlCxWDzlBJjVSuZIIwOSwSWGC03Y9wds6m0RuHsc4072sfs5Vz4zG4HH
+3d+sHcswJ0bd0OpCsG9qc/W7Nez9DUNBr/B5bR+eW6OLuUVHocuxgOl67Rjd
+8x/hfG2Z2DeKoDVC3KCIwSwXx6guIoiRO7+oEmCWhIsjExHYnvz9aXSPEMe/
+V9VhiKAwzzzPrQRzvlHtX6UMZP4ckGKzUcjWa+d35gw0pw03FzlhNqoefLOf
+BheHmdfDEOaMN1lP9Wg4LK7f1jmbfb5e/fo7AVC+Pj9mGrDfX/woyUwAbb6P
+5TnGmKUjm1/UUTCrKKMr0gqzShJom0DB5ZDR8/pumCVP/nFsJQUWF8dnCMPZ
+eDah+8UUOL3CcrVLc3+tncHbB4c175/63tj7VYvm+7Hrdi0tV2riy8sF/l+P
+atYXUlEblT6uWf+tOq9s++ea/TmeeyM60q/Zf12cOcS1afIz7ln17e0yTf4G
+woa3tMQKSX5Xu7mYHvxESPI/26nVMOCxJTkfec5Vz+WlluT8ti15V/ra25Kc
+b2j/YqXshQU5/+778w7rfGFB6kM6f6d8Xzsi9bPRt2Z0zipE6stHv2zwlzsM
+qb/TyTJuzi6G1GffRe7xP9wYUr/RB4LOuvMZUt/K09my4wYMqX99uzvyCFOG
+9EfDE3q6RsyQ/rFTfJs4EsmQ/hrjlLUkVjCk/2Sry7os+hnSnytbhr75txUi
+/bssu+XTbuxDH/pbGHxn8s8yRPq/xcAldW8bIvowe+GIo7wXEf2QBvt0vWH5
+//piH7BbMb8VEf1J1/1Biy5CRJ/iVGe9DbBuftAv+yId/hdDDNG3UabPtiCR
+IfoXa3IiwG+YJvp49pQ7zFhDE/0MdZP+0F4rIPoazw2/ZYbr7oP+xhdciMzd
+ThF9rtzmxisd5BP9FvnsOuMewSf6XufxmWzkKY/o/5T1BDMjj0f84cyRuNYp
+Dx7xj/Avlz2Ya84j/vLxr2MP/6nNI/7T6MZ3iZ/JI/4UZtKvMEE84l+Jg/9q
+7fTmEX/TDtZOdcnkEf8L6Rkt2qjgEX+ULvJx7dblE/+862O3Z9ibT/z1QYqo
+yW43n/jvrZ3inblyPvHnr/K+atl9lU/8e/3GQosdN/nE3zc1B7v0KfjE//P1
+0SonGZ/MB+qC0pHItXwyP+jv+c916RSPzBfy7eW58Tk8Mn8wrm+Llbo8Mp/E
+o7qm+1vNyfwyGZQ1Z9M9MzLfrPskveeuoxmZfxpzHC5c+9GUzEcTWcrwLh1T
+Mj95Vz/7WyvVBD7MV5OD7HxlDP8FAmqi9g==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.4452, 8.75}, {-1, 0}], 
+        LineBox[CompressedData["
+1:eJwt1A1MU1cYBuCb6lxjO6tSsKKgUBjUggWalI6wcVEUbTKsyBiKUiIKjSgW
+A6HiLG0E7cAfhuAqq1BAYZMfgaqFQRCmzFIrOMewDFa0Okb8WyfbQFHZe81u
+cnPyJPd85zvvzTleO/fH7qYRBLERLzUSzlk8viQxTY2rSIJjSC+ywfdl1S03
+4LjAkKE6WKGQ8Yvh7p65rP2wM8x38y5YKW8wCWCOWt+4Br5vKih74kMSzfM3
+7gyAnaFRledhMu/RMm9YUtY+sR0ubkhn+MBBizJPuMHOV76PguGTppnyn7mY
+v6nDLoHFs9aZMnhaL+7ZB3vqNCkymNA0P9HBVzWJHwfDQb/+I7fA82vqzjHh
+O5PXaQSfJLxZNaIX3iSxoTY/IRSunRO72QEnDPdN7YMlzBLLKOxMUmVXwQS/
+gP0AJm9bjg7AywOiw5/D5qVNnH9hR2TrJA31tdzPd7sEkIRuU3+FB6zMT5n3
+IWxoTN4VDstnoucEws3uL8gd1PdrY0b8YNv6Y8tUsPSbnkI3+PyUaEQPm63s
+opeo33Xn2hcmar6Q6P8Jlpoj/Kxw26s+owG2e4ojhmH10eVv0uAML/ec32Dn
+pddtPGp/wtbRe7BNdlYwgTy+Hxx33KTyy++3XICr36amNcILXT59Q/2/Cc4H
+l7Vwd3sazx8mpv44tI3qp/OY9i8ecgqmD3Kp+lXr2ddhuy3Rfxx56Io4Bypg
+20eMwBpYfiXBkQ/HqZ9Zt8OKjlRhDhy2yOLqCgdlbW3PhhVeIdx+L4zP9BI1
+HFNipRfCbRkVkWfgrp7JTglslmQfuQrnVmrmLoaVD9cWjcFJruXJD1aiL8PI
+QRb6vSgQzLbDxGUaLwruXGNv0sN0blnkIfjxD9VDX8LdHue2tMIlL42ZGlis
+3fPnOJw7bGIdgZXxdV1uyO94/YbhE7D2dKo+AmYPVugMlJWiehl8Rvnej9R6
+WlWsPBseGjr79T2q3t+Cjjw4KsnoMg1/y+8lVHCWJNR3KfonopcsVsAHBua1
+iOHkdbfWxcOlefX1cdT+RRf3BsN7mCmr0+GVGeF9NLjpYUthLlz8/l2aFf3G
+C42JGpjuoWKfgkWMrFIVLG0zimPghYbewkxqflj8XQZ1XhYsebsV1gp5cRbk
+N9HLcn+3vlLvdxwuPTmQxYQNv0yd3gIzn/5Ot6F/9YLxWm949dgn/Hd5XpKu
+mPHHebiy9/A2WJeTmmiHb/iMjrJh6VcFktuwvDGisnwF6jWVp5hhcVXIGAN2
+fpZgGIDZqxq+03jinriQc9gBv6buHY//7x9/8j9sjKv1
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.6318774622309, 14.558628882191854}, \
+{0, -1}], LineBox[{{17., 17.00000000000231}, {17., 9.999999999998607}}], 
+        PolygonBox[{{17., 14.1}, {16.6, 12.9}, {17.4, 12.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.9452, 13.5}, {-1, 0}], 
+        LineBox[{{17.000000000007276`, 17.000000000003638`}, {
+         11.000000000005457`, 13.5}}], 
+        PolygonBox[{{13.48173265946094, 14.947677384685548`}, {
+         14.316718930329426`, 15.897834175673825`}, {14.719815750748694`, 
+         15.206811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.823799910437668, 15.984057296392571}, \
+{1, -1}], 
+        LineBox[{{17., 9.999999999996362}, {11.000000000001819`, 
+         13.499999999996362`}}], 
+        PolygonBox[{{14.51826734053906, 11.447677384685548`}, {
+         13.683281069670574`, 12.397834175673825`}, {13.280184249251306`, 
+         11.706811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.823799910437668, 11.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{7.5, 5.}], PointBox[{7.5, 12.5}], 
+         PointBox[{17., 17.}], PointBox[{17., 10.}], PointBox[{11., 13.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T14", " ", "P1", " ", "N27"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdief/fggjhihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdief/fggjhihjij.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.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821528902123*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"64b95aea-e735-45fc-9e2a-fb6bedc22350"],
+
+Cell[BoxData[
+ GraphicsBox[{InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwd1gs0VGsbB/BNqiFFSVFoCA0mDVHqqBlS6WoqNJxC5dZ9KjoKoYhKRe66
+jVBKZahVyGU4XYg0J5RqymCKk2QizhTx/d/PWq1Zv9n7fd7n+e93k+H2/Rv9
+lCmKGsI/8kkpRvGjz6FoBFM5VM2O32p74GLbig4TuOUyv+GjHofiaXRm7YA1
+Fc8stsKRTu22xbCdIPtE90xcF4ZdNtTmUOJ3C2LOwnbPFvZegnUW/Tl2Bay4
+f+2o6TQOxX+u1zqN3H/Y7XsJXKOq30rB1KKnqRunY7+qwtIxcIvlp6BuWJBr
+pGUA07UWJEXooN7Jtuh1pJ7hGEs1XfT5Qav6HBwY6NR9EvaJXfHwA1k/Q67W
+B9ck3Cu2Rb/yVxcTnGdwqPRPRg8SYYZylm8cHMIzOfQVDrR32y2Ei30XVXEw
+v8LELVEES4c3lZyCI8d61pfArAfr+6phKZWoeQUWrG4t7IJ9Ar8s5sM6tj+1
+FbBz3obv82HN/Q02vTBnk+XRHvRD36tu/YLU39gbn0X6l+x0vgALz97Vd4MZ
+rJnP2LD8nZXpRF3Sx+oxLejPLiF/XwPmF2+3WuoFFyuu8i7DLRZDka8xb2T0
+krvh5PqX/v3LSR5uTiEHYcFhpelkrhazDRJy3VmeWTgTFmUoj82CRSYF/LPY
+p4uprC0h9TJGOCRXxt9RJpb4lEfvTE4l33sv5abAwlOJrAUwbWHG40moE9jY
+r/IVz4n7l+RzKpwXsE6tlDy3WdwQM/TR5XifmQXnzdv2tIo8xxc8B2KfnoaP
+npiDm7KNVgLbLct82gvTLtYv/kzqPXMtDCXnsPpRtgmZS2vngl8wpaXldIjM
+IVE/HmCA7wslx57D6ZnlESI4wTxmrSn6TE/hDyvPQv5XHxyMgrmrhirmEm/z
+r3hN5qvLTeHAfMeEJYbkuY5yefaw8wODw1tgmoZuqxGct/tKWjQsZkl6Bsl+
+Qym5ZE6pJE67DOaNv52eANs1x8YfhjVNmcEHSL6DilFzWPhL7raIrN9T6/0R
+/Wv6LN79L3muxh03Usi5iQ/rOUHOQXVznhuZ16dURZ08jx3er4xggVFYbgzm
+446aKiuRc2ja6TuAfAKb63j95Fwc+LDcB053mTN9GE5/5RFVh/eKW7EsRg/3
+c2kH19rD4qsGMldS/+XxKw/xXtboNO/KIefYivbLAaa7e7qoot/AdycXt+K9
+5jE2v4uEWcx7Oy+Q9/6HW8x45CENKLq8FdYJ7zbMgFn0njYHuOnM1GgdOvYp
+CbJgw5xuMxM/uIUK93CFmV/EAwUw7YTMIYKsz2s4MwjLHTm1ZXDQ3I78BYbI
+Y5P3WFXye6Th/PZ9cGDS00BvWN1cpHsJVpg6DJTC6WF+typgfsWmQ9Mwn/Ns
+h53NMDfX/PYeOOcs11IKF7MjsovJ/JFx7q1wnE1fwwD8+FJ9ZSMs/u+QM52c
+x0GXSlJPwY//aQMzT9VOuQbThFnlVnBOEv1FBLmeUnVEG46fG8D2hAW3PzOk
+qDfV36h1PiylsyQXYF+r3+Ya5P7dagXz4D1a2ue/YV5WZ11BCfqPVpm6ugkW
+JtWU28D8lY6u1TDPwc0rF3nkWeauKiX5tKWe1oRdVQ145bCga3VIqBbOhxbX
+uh6Wxvd4d0/Bfvat4zuJ2SJHP1iq53ViIvanL7a51zOZQ9VvVm5YSuYvNLoW
+B+stHUw/YkjqjJ+/CA60lFqUwaJ2wwwlmE8f+UvFCH00jx9t10ReMmoeF46b
+fOfIB1jYnye5BLNiwsbL4T1TacpdMD0q5qIO1v8YsLOaNxu5Wi6zcYVb/uEx
++DAVR/2+AsuS077kwdIzfiE/YKcdzq/fwF2prkUuZJ6Hvx8MwbzKnsP5sL1b
+1ystY3jINV4Z89t9lfXNguP4JV9d4GLHVl86HJmvO3IOZqbzFdowp8njySNY
+2PJxQAnu0gye0gjrnZRqfEZ9QUdr9itYxfZv7mNigyR2CVyW9WTMVdJ/+U3R
+SS3yd0VwMQTm3/ilYw8zhLy0TTA9+dKK9+hPJI71tybrnWqWBMBiscv66TCH
+M6mmA/NR7cZcFZiWv8bTDQ4LPak1hLyKT7E6RMhvy/srjcOwwCss2QLW2Zey
+QQ33i15kbbTVwFyuzPrZMCt7Ac90EurvGvfbGZbPsw6fPxHzOt+feQTWrK+v
+91XH++Dv/7kI5l7OFokmoP+GjoIfsPBZnWINvFbV/KA98pAbHqCpwny7Tlks
+rPnsDw+FGqnflNoEJ2SVmurgep77axrdBPc1jr3gC28ZflAbAEsTK+rfwHFW
+Tok3yXWzcx67sP9jea5HByz86e6thf6SbRuDtUzRT+zRCbWwYiUzxw4WH5CP
+RGIedds9ehthAedgFUuDnB/3dG84UlZm2wA7WTx230ac8k2FQfJqkenw4HQf
+V43NsHFou+5yUv9tv5wPC47YKJmTesbZaw7Ba4OXiWlwnPmhp1tgTSPTetKf
+IixHby4cFLXPtxymNi53eI798qhZOulkvge1fhPh+BP9HodhlszK0wz9tiis
+gj1hzZej0SaYh+/OClpB1r+7f0cN8/uOyVe1J3lEe15sR557UjvDiaXf+m88
+VMX5KggWOJN68vh1yTT8PySEWekDC161Fx4fjzz0aq9Fw5zyItv4cfh+eFPi
+PXK9PlG9ZCzO8Qxr96+waGNTmwacPvGUy1zMx5eFnEtR4VDDuT6RQSRf2fqO
+tXBgdvH1SpjuVXBqAfxDdslVfQ7OxcjsYS7MWGM4gQeL29alpcNOvrruApiu
+z60ej/qRA5s722HOsWFmGvy1dqVQnwFP0zBciv64N6sU62Eq6Ht7H5xHNzoY
+DAsmv9LPxzzy8LrlCbBI2dt9C+Z1/uOQwVWYft7Me5j4baPFNVh6+HptFPKJ
+35xJz4Q1s2XrZbCN33XzOFi+nW+hjzxDVvV/2gv7/Buwaw45r0Wlq9fB4oBI
+PQruOpGWxiD93coIuY71xlMv2imT+0cOy2bCNQ47b0swjzzL/tMO7H87Pyaw
+FBZkblWcQL/R4WMrLsORk/PdT2Ae2UhTZRzM6mDk7ML8ZffuWoSTvM7SE5Yh
+L7HmY/cwOOFG5k6dMcj37TeDWHLdvOt2vxLOa5dGG6lHrbI+30oh79RxwSJY
+WvjHjLpRNsV6uXfeN1h09L2y3gib4iZO+NeE5OOyL6FymE0ZswUT/Mk8/l6f
+KofYFOPP2OzbJE+9av3Z8HCuX/B/JP+F4RO6f7Ep9bP905zM0P9bVSNtXKe5
+iFUTYGlP7YVMeGrR/DctsM/n3HQ+6lMXV1vomaP+3YLeuN9squzWpN7NsMg7
+7dAr9OOqctT7NLESrVcP/X/9R9uwCBZq89c3wzn5ai4NML3X7H0s5r3fOyHm
+IyxfoOVhrow8rYUd7f9f77f0HhwoGqchIZ6aoT8DecnHHJ1TZ05+3/xU5sE2
+devKC2Gf5BdVAbCeiVNlIhyZVDt3BRy02sxvL9m/zHlpH+oFHbWZvpLsn/RU
+dy8slq7fZEj2b5yhWop+mL8DE0cwL+eGyqaP6DcwfTKjDRakWo+pRv7cy8es
+62A6i81IwfzDjowjFTA1FOywCnkpYn5tLYNFvYrGPgWbqmH+rH9C1pv3vL0+
+iHyWKFm/J/d7nX575AebkvfqBg2TfI8wlSL68Dy8Tw0ySH/H12x8JmdTa9Wz
+rnqTeeqsaqu+san4h4OyKySPO90Xbn9FPzlREhnxHIO5W7rZVI7Sxw3zLFCf
+tn9R8xc2JVR6/jEUjjT0uqSF6zbb6sfWEEd03lLDeuc5knWTmVi/cunD3B42
+Fe3xeqsbzGk/PljTy6a25CdMuwD7dJR5mn1nU3GPAm49gaWcvQHn0K/o+LLC
+bzCdE2o22o88fs63U5+LemrmN/wH2NQeuaJOH6ZPql4nxPzcA9Sx2bBP1Uhz
+zX/IKyqng1wXvZw+4yry4v0t1JhEnGjQZPyTTQna/jo5QPafzLd3gWt+DzNf
+k/1XeUVNJ67tnl9E/KRtSijWx511Hj1D7rdXrwxF/celnyb4k/mqqCuzsL9m
+xJNGR3K/r0sDH/lLXmcUGcPUpGsq4ZjHlZ9cNxEW/Ezrd0X+jzk3v48iL5Fl
+g/F05FV8ZU3SMMnPMS15VyebCmLE3lIheY3Uz2lox/u2w6RIh9QrDln0WoL3
+8RNPYAdHuvF3ipuQT5hZ5w5yPbRwmqAOz7/60tEM4kcdnfoivG8F7pI3xGWz
+ftTcwfPsYzFJPhRX4zTvLPZL1VwSQCwYtV8YVEnlWU+5c4+Y/CSUUyrk05Lz
+P4Clt9A=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.703763748652328, 13.714402573074395}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJw11nk81PkfB/BvIkdiqgmFbZyxkpFopjBTUiJHl2NTDZUjRKWaQsYqx65q
+ioqu36DVqN0MHWSpKdqMFULOkmxb5IhEztrX54/fPB58H0+f7/d9fb/f8dHz
+D9+0R46iqJf4IUeKRn79wKWUyNGUS6X7hY5/0uVSoZEV2gUmXKrDtT3xKbwm
+kD0vABa8VqbHEcvSJD/AXbp2qwxhQW/VsfZFXIrX1dqQr8OlrkhVb92Ak8Y5
+F8zh685cpWg4aOk1vSvaXIr1vKXeFxa+7JbIweLkF8XOcIVPyOuABVzKNib1
+uSNZH3rjWz0f8TNWxrrCzVPrSu3h35NMf+fBlOysfqkWl5JnX70RA2tVspTd
+4AbnB+5ZsODOPdqwJuIrThpXwfxA+9q7MM/92/5RmJnYUngapo3SvQ3Rj5K5
+zfefYbrMTcEVZrLp2ULY0JRdFQ4Xfdi2/x58Ylez4y+wcNcWg344QsVz3yWY
+VyA9YYP8th7qpddgfiItJxlOCn9ncwHW2u6m2Qkzn/YfFZD1ipmmK9BPb+/s
+J9thlrMjMwXevc3y/RLYQ29uZR28LNvMbRj1sgq/aSuT+Tye01lA5js1McsM
+FhwKHgqGRZUbo6zhUM1Derqwh6+JtzFczuhn1xhjXsWTsknEGzA8qRkPj3o0
+WD6AvSf+jl0J8y7eX7Qdvrt1gdyEEfoTZwX2oN4Bv7HmMtgj+Z0kEJYonqi5
+CIseeWQ0on+lBeNmfJh7McbTDu69myDaA1Mzk2MzNbhU9OtPq3kww3BzpZIG
+me+5XwPh9ALnZ/x5+HtL0bZjMH/axLUROu7foTEVEl/wz8GGBLgrUynqT2KL
+EHVzeNRLwfJfkt/90kDPXC5Voj3/4GzUL7bmfS6Hk/JmBNvBThm6XkWweFTf
+PoD0d0nX+CnctV3fIRlOirFY3g2rGi5Suw5XKAVu0EN8Vc65i3eJ/WtZwbCg
+xX7TA5j1fv2cElh0StE+H67dahlKR/2+B4qGLsPN4SbpoXCo4E3uUTjiW0/3
+Q7ihddVSF+L4uRMK6J+3hD5A6uWGCXts4YY/9j6rIfO2+Xh5J8zUyJmRCNOC
+Ytv3wlqDH51XwFqxx6/6wjpne3i9hqjjaO2QFUy5HDUQwRGNlcsHkU9LL9TH
+G5Z0m3w9D5eY8NM04fS46HeGsNNU9JwOAxyrhu5nop81+g+z7sDNHcNTNLgk
+YY0wFTaRiT8ewXwiC0POCeAI/97Zr+bgOYjZXH4MDuLnmTrAQTZXsuNg6cM/
+ywtmI+5QtEYaLNyyiMaEGfs/8iXk+pMJ5x/RuNS7FEtJA8wPfiS/B2beXrDm
+G0wTKygZwEGpwdE/ot7aRA2nEXU8jz3ecZ6kvyVlLm1w1c1TMbFwR2G5/RBs
+eL33URbstMvlsw6uX5bysK0Upu1OCt4CmzRkPa2Gk9bGvLkML5452lMPezsl
+hffDkTcurK+CmcfDJGtRb3Pbt/2FMOvp5y/X4A6boAvnYbFe7plBuEF0OD4Q
+NvEp1mCj/6qxvItLSHyVs9cj4IbvBnd6yTzKPOekwUWuynrXDcj3YYqpCJYP
++ynai8y7OrzyHKwjeSBUhkWhXgohsK+ROrtUH/07dhmZwlJ2uN0hYsOUvGrk
+1/F7a7kMHv1hh8sO+ERFqtekHvk+8xO3oR8pqzeuBuYpC9xdSL/sIioPpgKK
+W3djXkznOOFlWLBJzdRcDednSjeeJ35RPTyuivc1Y9szss58rRvSMhNzaDr2
+6g+4o1+rt04F7zv78KAMFma8SB9QxnVvV3zqg2mnfnrLhjd4OfA09cnzMLn4
+rhLiGX095QCLfinM8IfXvJ+TGQ5Lbqk2OcL8M+fL0mGhVb2uL/yl/urqErIu
+OuCYqUTe9+zbTTBPkjSshviGVr+OdsGMJ7mDV2Ctl7a/9MOCwLtRq1AfX/ec
+zweSb69BxSAcUSv9UgdT2Z+PZ6Gfct/cxHxy/jG6gxP6Lcn4uyUejtBZtKIZ
+Di0fW+MCc7Ppp51m4f4lsX5TJr50tlMIi11SVj8m8zo6VXQTFoSU3Isk824a
+Lz0LnwjYKDOGI7QXTjnAWyY43q0MnKfrPvoY8ZNsa8zOwbR2SaYa8YBHqwcs
+iTrGskB9oj62WIucP99BxYz0U6zZ2rgQ54eUac9Ev+mp4vE0WMSZX9qiiPtk
+KbQOgyM2XFDLmoF6FQ427iTrstaocAWSL7cvBK6lIqxc5THn4X3bzsAdWtxM
+x+k45jh2/wUzY4w++8nh/oWbsRSRX2i4Myd3Gt7HqwknmbBIKM/Sh3u5shu+
+sNT/t5ZqCvenbWVFEtxRv9BDAr/yXUUrgCPyIrvL4cnnK/9+Sa6vUTirhOuj
+3VoTBsn54a7UIXhxnRtzOnk+t8qU5ZA/aJm6uTJ5/jZeGf8NVt0xHiZHnr8C
+HzVP1EtfPBXVj+t5685/moF+PFxEMc9Jvio25w94Q6mttYjM19ZTxx79N2/t
+/RoIU1aqOXmwmJF11Zhcb3xm/xhxokdjCfr3mFnQT8f8mq/O7TeApfob709h
+nbHca14S9kmMf/se5sOshSpyZJ8kOKJ4yBIesFJdvwPmzVS9H4v8ouPx2m3Y
+99C2L7ydiXq9NZqU9sLSKPdL19CP2NS6Qg0WNiw4EIv+RQkWqlXYB4n+3Bjt
+hnkNCOL8s7VJfLHY/BuHotIFeueJ3Wsqn01wKIls3m4RzDt3szxujEMppYbT
+y2DGqR2xEV85lCi6V34c5v44GJYzzKGap9E1VpH8U9Pzl37hUBHCpsBUHfL/
+x9afMcShmDerU3tgRmqZ+uHPHKpi/v0+B/RDWSvvs4b5Vy2eXYClivsctsFO
+X9PvtBO/+ev0G7L+c22FBubTMbvv/T3E69rT2bICplZ2qVUjX21Ap3gdWY+v
+LKSPcKigyv/NWknWDZYHRpJ6JXvU6TBv1csjjaMcSlqbNlBH8g8WLzIc51BJ
+OilmR8m8Ny0Tr0P/td/k/ZRhBoutbz7JocSu91iJqF9QGJxdBg+0/W79lcyH
+Htc1BdOGDwt2kPn6VE7UwUrBP+c+wb6IYlqI7OEgbl6AKSx98iZ+FeJLD2u7
+p5N95+Ay1lvMt8hrezod5m02/7QI9XUErW/Owj5IYCSaZoh+tPLMqtfCopZG
+hw/o33vtdJvpMDVxmpkwyKFGs5tutGBfJEi+3WXej/lb3z5RCXPFQTJeN4cS
+ysl/biDr/fXtL96hvvXT3o3A1HNH3VsduN/tvdbmJF5aA9ugFfnvFdccJPkD
+npSua8A8ln9pfErW77udeFuDfFn5Xbqol2K8W3ugEvH5n3wOE4+ZlXhUYD6u
+nCgZcVjM3t0yxL9y69VsMg+9D8n7nqN+reunnYnftPJn1GF+z3p8w4nfGnvu
+bORQ3HoZFUP8nTcV2Yb8fGOn/TBXRbuDj3pF6Y8tXMi+NJEjtPsHz9MG508q
+ZH1ziHzbv8hv/WwkH/m5EYsTjLrQ7/J9r1eTeR8JtBvGPILkilY/Rj/cvWtV
+TXpQnyoj2xKWLq4wzoY9ctL0MzAfaeCHTVvgoh813KewDxIs2fVk6UfU89yv
+fRfM9ZyI4iC+UEEaXId9j3TEyv0k8os0jczcYO4Ky81anRyK1/nkYRv2PVRz
+QJ/pKw4l0B/pOU6sVe9tV8+hGAV6/BXEfZ2zjpYh37VUBbJP+v9n4Ds+c7n/
+AZXP1VY=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.2230354724127457, 6.228068696807429}, \
+{-1, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.999999999998018`, 17.}, {16.99999999999754, 17.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.5, 17.6952}, {0, -1}], 
+        LineBox[CompressedData["
+1:eJxTTMoPSmViYGCwBWIQ7fP3PxAYODCAgYrD9j0SAo5yhg4MBV2fk8xUHBLS
+urLCHYH8FZsnucSrOPDG2kw5mg7ka2judq8Aqr/TN+lOP5D/YaPBr3oVB/uj
+pTeubAfyd0xhe1Wq4lB15Oj8F3eB/A1eZmuiVBxW2Ghr5DEYOTAkPGC8oq/i
+cFDoVNgHWSC/YvXC29+VHeQsVnq6mAL5HNen/d+q7HA/L2H+LFcgv0HsEF+e
+soPohtDibj8gX0COxUhF2aFGtThWJgDIf7Fi1bo7Sg4/77LIHvAC8jtWWC6f
+reSge9voi789kB/gaXEvRcnBUemR2H89IP9AfnedtZLDLhfv5x7SQD7D7ylv
+FJUcpss5sd9mBfI1rM4uklRyWHloQVPNB6D7DTQfSSsrOUTGsjZ9vgPkH/g/
+/7StksN+zvVcr88A+QEfuNUzlBzUBVv8bx0E8hPsLXfPV3JgV7VkeL8HFB4c
+7YEPlRzOnq++/nsfkC+wQU9eU9khPyAjK+cEKLwbk/8WKTvM1eZ4Z3cTFL6q
+R5ftUnaYLdbiz/IRyI+YMv3bb2UHVQ+dec/4QO4/I6FmrOLAIncvY6shyP+G
+GSyxKg5bt/NFfA8H8j0OHlYtV3GQ+w2M3nog/0J+PHuDikOb3cflHCsQ8hY3
+FKd7nUPo/7npcqLkR4T5zU+qN/zmM4bb33D+u+BBNWO4+9atmj51srkx3P2B
+2i0aLI7GcP+JXzv2X8DZGO7/7y+rN6jaGcPDJ/5jwFcRY2N4+B2Z+6uWR9kY
+Hr6lFvG1zfzG8PBvu7P3h8ovRPwkb9sisf0JIv7u3pB9yXAREb8f5c9ybziA
+iH8V2d+P7Lci0sfCqz2LHq9HpB8O71U9JRsR6cuuZ35C6i5E+vt/KGzb7lOI
+9BnzwnQl/yNE+i3bd+X6xP+I9L3YzCpBXMkYnv7vmXapa3sYw/NHmlxhrnKB
+MTz/CMw7nG01wxiev/ZOKZ26Yp8xPP+l2z1/v++hMTx/XgLnX2N4/gUAffB9
+2A==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.5, 8.354800000000001}, {0, 1}], 
+        LineBox[CompressedData["
+1:eJwd1wk0lWsXB/A3c0kp0k1XppQxKQ0y9HI1oAFJhohriAwRN6XSQYpQSolS
+HSRz6SrciIMGoiIUF92jgQaVipNIvv/+WqvV+q3nefez9/857yHlP3fbegkx
+DPMLf+lf5tcE/iiwzP//yLKMq4vq9eh5LMNNOHbHEi4fSH81U5FlrDPFlnPg
+hKf3E/Ngfvr11ouw94pjV5WV8Ly5h3AmXK1R9iQAZj/fXZMARwxpTC6D+WWX
+9V1g98FAgzE4acmfB+XgBY9KDq1UZpnFe7433JZhmfxwA5MAOMmztmgjfNLg
+/OpUmL9PENo6k2We+KgVl8NKk7+MWsNbTXiLH8NsYWJo4wyWKbP70NEBM43F
+K9bDFRU1yzrh4nr/yCZplrF68POPZlhaZpmxC3zihbFXNe0vk7o8Pp1lJKtm
+2uRSfdPkJl94w3N7oURaN3ieIQKb1FZk7IbduG11LdNY5kyQe6At9cdRKX0K
+r715IHsF7e+OeyiG/ZzuqbuUqb8BL3U/+MaqyqIZVP9VxIdRuM+9bu4UOGh/
+bOE29POv6zOxqTR/mpssD44bfuj0G+Uj0P+sh3ne/HX+tC6tp+z7LRc2z9cs
+saHzjvQbKSAPu+tyVhE0n8Ea2QRYxjM87CbtN7ly/jOs3pzw8SudX9mw9g/k
+++t6hsRKFdQfdzWMhhUPj3ZFkvW6ggphQV/2usdw0jnXZ5VwhFb89LmqcJy8
+Twn8OCrnmxfM19+yKgn209tbXwgrnYveZwd3+4Sf+AhLyxU5CMHTbD8cWzAf
+9xG2Xfgi+nEaSbGyh5tjfILV4bJ5um0HYI7iCzYP83VMdYpPgbkLP0bNh/8O
+nW59FR5MGD5yGfn0XvsZVkD1AiXOKcLL43sbad3tRtqVLcj3U5TU4TSYbxtc
+F4P7SfjgqBIDs1nvLvVIoc7lRcl+dN5Tlb/d4SwPi/5N9Pz2+lQ52MpE1V6P
+zlf+vefXVJbZU/NWaRbMdPh3y2P9ROTk8J+Yj9VVqfOBMwN2BryDmbg47ms4
+pG/hwx7yvwmnYnG+5FO56V2Uj0gMsxH9vZ4f5PSSrHD7gCz6N02vdhmivMpT
+2Dg43tDJfgb1M5x9fAI2d62bYgAHWeiL7kEeOp/mPNoFS3t3HemC7RtCorIp
+n+hTq1cgz9D3z6/1w0kH05hI2Kt8a4yuGt5nYyX7W3C4RvxYOMzNSi1tgTUl
+7v/3AE5yYNPb4H6T5kGZBchHNOvsHXi0y1OwHV58zccyEV7yh3knF+ZJGYau
+gRtmv/ynB06Sn970Fv3kXSoVmbkQ99N6cSAcniS1LdoIdmvdoMXAMywu+G6H
+k3oW+R7CfAVpZq7BMJOlX/kZ+RSU/xNxgDy0gPeO8svrdCHzm/i235DvGfOi
+cdrPcdrC0n3leUXedYPZRYdMnXFfrSdLAyxof27HxQZJlln1ZkSgA3PXBnd7
+w8Nz849Lkz8Iji2HFfx3+nxD/+wuB4lVsN2jvKYOmt88JjkIVo+I7aiF3Z6N
+LXsOL7G9El5C3vDgqw/Om16+zKmQ9r88/WMe+lm+ReneNVrPjB0chHvcH2dU
+wAzbtakd8+RtDPBqhZUEandrMG+a//A0ASw9pNS2FXmU/b50oSrlZbdrxV36
+PCxquecIWwd0Tl2I/ExtF11IhQe1Lj/dT99/y5N/9dD8mrK3ymF2ry6jro77
+8TUo58NVjvIRoXCzi1zHZzgjI8SwBrYWPjvvDRxhnzciqYH7qP9UxIOfKXbF
+28LsfIPqaPiOje3IadgtS/nsYtiva/qRRpgb7OvxEP1tmHX04Si8+ICmNvWv
+uqykUVET886vUi/AfO7pIwIDmB8j7pGB+TOTDPQsYKVTH66cQz7VphPtG2FW
+rT4+FXmyM1NK1sOcOUdNryFvv8xNQoaa9D56T3s5hWXG7ptuW0D1E1yGDOFI
+7YXJU8lH1zjUTmaZFd0jjz6jH05WXOV+eKMnyz6F+SXmSZ5weaqwVin1n9gj
+Gw1/KtlafZHmLTV1boVLAs6KxdP6WJeDDeo/sXRsOkzrAg+Z73CX0Y/jhyiP
+NwW9leivySfWOYbqP7lWlYb+lRsG3p2j5785FURjPr//zgbcovX8IfkgzC9+
+QzmnB+a9CveyQz457ye/mo7+rXefV5BBfuWRRpOsYOkpZlMC4Y+NGyMTKZ/r
+l5pKYWtZ3ul2Wp9zZvwdnG5VrK6shfdttE9RFPczfmimdCDMrjaqEIMlmxLE
+b8PcF1P8P2F/sODjcyFtfH5MWvsr4cDeZf5rYZ534HAIbDFH620UzETVO8qR
+lWMrS2H+s+shm9HvtLg3ZXxa363T54B52tbmyTA6qG+9rcMW85Yo7T4oCys5
+xFavQx47NE/Omkduq15nRu+Tb3qYAswvfvffBuR52GogTwZ286taH4z8M/YF
+zBaiekqiWuUSLFOzft3h93R++41/1OGIlre9j2E3m06PenGW0Riy87tB1q9P
+Ow9X5aY4n4HZ0xU5XFjt/PZP+2HOwOOcTvjs6rtmntr0+0R5vBnquSY7mW+l
++df2Gz+Do3ZbpWyiepeyOxLRT4toRqQN1WO7Bt3Qr3jzln5Xmv+c3Zc1mIer
+WLs8jNav5kYtwby27QKf8zD3jNPYXOSRWP2Vqafzava2foeDe4alJ+j5qnty
+lchv8ORJcxOaN7WqeQfyHX8r8Tma8vgrO6AL3jKRoPAYbnbffpR+XrB/WRbK
+L8L7lj+yQwWeN57rshOWvmPtTPc182fK1xswL3u+TS+eN9jTbzYCu/Ebfvei
+79czZXYrdennlVo5nV8l+SI4iPxcwP2E/uKUD6y6DLt9530Ugi0C+CV15BYZ
+gRDmk962aEsPeanRxxHkcXy/vvAAzD90NeQz8ur12ao2SOuJWapfkGfvCc/E
+97QeHDxPAg6yLNjXTXb2vmSM+6gWDeM8gJUsX59OE8NclrWxRTB728ZSBU74
+drMgCeacrtDpFmWZWTWdKiEwlxE91QAfWcnobqPn7QrS3sM1s5onTGgeI11j
+YzzPvSeXrk39XNffdgfOP/qkUZnOf+P7zBPnf5RvE1Gi80Y3/dJCfy2G4s7q
+dF7irIrJmGforyuhhnRemqTIEHzBVD/akZ6/772eT98/Y0GmUXT+97beOnwe
+Il8tFdyk9fbvx84gr6G7lgcpD0a2v3q9FMsxaA/KmbMY91M7YdaBfDtVx5uM
+yaHZDkbTWE76NsUcD5hruFAR3xccscWFc4/D/PAbPPr+0MgamFwMM6NSp42x
+ziR32rfR/oOv56Aep+/1nB/DMGukw5ijfm8tKyKrh/5+xvYdRT9x31r+1oHZ
+JTpauZIspy3xcqAZzNcYSy3GPLVrFjy3gblmahL5k1nODPese860v9v/2yUJ
+luOhWL7JDeZ9ixDD+8bZOhJbs4PMX52fLcZy9v/55xUnev72QHIj7qPxpvh1
+qscTdDrLwjsm3tWugd2kzJWOibCcXNcLvStgzpDqSg0R/P7o2KesQf2mWf0Y
+F2Y50rETWfLU31HjM2LY3+luEyNF6wfWiZthf9Uu7zYhmLnqp1GE9Z6ToTFj
+lEdYZpMZzhN/KOozQvl+mCQYE2U510QXzRuFlYR3aTSj3+akolmTqJ/DUfdu
+4fNwKNoymurzfsz3z8TnQT4n2U2R6qc82BOPPErXqvkvp/lOqdl7Iy+uZoC2
+LT0fu1pbA/evOvhkKJieH30xvRH56v02MnCG+m2cFmk+leVkZU/MuU31JoJL
+T8LFP6R9+bRfWaw7F/czkSVZIbYE+/VzjU5g/Ur9tUEtmH8izY6Fv0jcE2yC
+mQeGTTWof/zeo5ZA2O2hkfNseOnc7NzjMEfb/+w69Df7femjDKon5JXlhP59
+ZBzvl9B62Mz3jrjPVXrjm3lUf9mTK5sx/95jkzwe0P7GoL1r8b703xVa2gCz
+0V+H1yNPFYsC7fu03zHT0B15x/fM/lIF814WhqTivhJ/CW++ST6ZHy4Qwu9r
+neKrcuj5uZ6xkfAlkXW8VJib7TtgDNc0TPyKo/7f2P+nI8Ry2n/ulTtIvl21
+ywa20a1TCCJL1vlcxf4FwWNyO8k7XS6oC6POWYvX7lTfZPu/LbCKg70JmX9U
+xf48+rNQDSv0onny7Af2of8A868Ru8nTPhz3wP2/qTvXGEH9MJsvYn5OcV+r
+fzLVX6l+eAnuv+3UGuEiWlf/5/MkvP9yxx78eEjzJUtH3oQdXvLiB2i/04Zf
+pshbk7PvkfRS5Ktw/m4WPGn2jNLlMO+TrmQ7XFFZo+lCnrF4dits/VvLlGgy
+19zxIvxKr8UwB+Y23QhZBitJnbtVT+td6eqXcX8Zc/0T+6i+83o9PvqbRP+P
+18c++leC/R8W37Y1
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.994885276715344, 4.925732979470893}, \
+{0, -1}], LineBox[CompressedData["
+1:eJxFlglUU9cWhgMij4AoS6bk5t4DqSKlokSDrDIIWwFBHoUUQStjRBDahwxP
+K4iCgNWWwcoghVgGtXVoFYkiiAhCUygoolTFIaAGEQGLNCo+UFTeues9T+5a
+WVnfusM+Z5+9/38LIxMCorU5HE4J/rH//7sQpExM4+tj4EjyxfOiEfw5l6s3
+rcCcMWBcW4Pg9YlCiSwNsyqw4d4QAvOjUT/xlmK2bN6nNY0g+C0UGw9YAydx
+KJk7iWB7s+ukbxFmyd6lq28icO2dLyzwxJzxfOL7QgSbOrVqC98uAE7+z116
+jgjKFy1p6GjA3J28l+5kgHNdp9Q/C7O6a4vIj4G0w+Lca4GYD/2aFtNBw6JB
+dV+kGLPcYHIN0PBbzo3+AoQ5w45ztFEAHfUOiSvNMFvqJ91wF4B/5xWLS3zM
+0pP7O3spMLB9sqLBGrNKvflUNgW6p2OEsa4s+1WlfU4B1zO2KTeEfV7doeVA
+QdtNpapkJ2ZOQFThpxTcOcZ1uFbBrk8cMGc9BVub3is2NLPr59moiilomrjM
+HOxl46d8rjdKwSrp/opXasyicwW+6wRQ4vOy3/sdyzTE3hDAhmI9I+V7dn+y
+dP91NPyxbDB/2zjLNW47HtJAyy4zWffZ+PHrnaMYSFmrk/T+Ars+xwr9hwxQ
+3uvFuTmYjTKVqtUIQj3BOlzCxv+lOr0SgZWd6qXYkP2eV2F1L4Im4U9+Tr9b
+4Xz5VKVPIbg02F08vhVzd7ZR6DsE7Veu29NWmA/1rBX1IxCYPIhIvz0fx1t2
+NewEAlCdvH03F7OlamZ1EIL03oIvz3thlmu1i58x0Hso7eWaWZhbmFHDrQy4
+pR4LSe2dh+PdeyhS0+AwZD+dVIdZtKLNLJaGkBWXKp6VY7Yc00l4JADPpmCZ
+diH7fNLyK9ECGAs0GLBm+ZBevdckBcWP+xUu7PPSoATvSgqilh+YUXIGMxxM
+WBhBQe/RygHzLszqzx6ZOVMQqJ/XtOoZZtWe5G57Ck60LeEnzsHr45Sg474U
+vB85U9kuwqy6bJWQSUEYt9Er1w+z6Pbz/G4KeMlJnAWbMEs8Dtg4CEAdcMBa
+8jW7X//jzlUC0DN2FtumsvmI447Z0bDSsmdB+BbMYBHVc56GvbN2nKKlbD5M
+H3m4MlCxWDzlBJjVSuZIIwOSwSWGC03Y9wds6m0RuHsc4072sfs5Vz4zG4HH
+3d+sHcswJ0bd0OpCsG9qc/W7Nez9DUNBr/B5bR+eW6OLuUVHocuxgOl67Rjd
+8x/hfG2Z2DeKoDVC3KCIwSwXx6guIoiRO7+oEmCWhIsjExHYnvz9aXSPEMe/
+V9VhiKAwzzzPrQRzvlHtX6UMZP4ckGKzUcjWa+d35gw0pw03FzlhNqoefLOf
+BheHmdfDEOaMN1lP9Wg4LK7f1jmbfb5e/fo7AVC+Pj9mGrDfX/woyUwAbb6P
+5TnGmKUjm1/UUTCrKKMr0gqzShJom0DB5ZDR8/pumCVP/nFsJQUWF8dnCMPZ
+eDah+8UUOL3CcrVLc3+tncHbB4c175/63tj7VYvm+7Hrdi0tV2riy8sF/l+P
+atYXUlEblT6uWf+tOq9s++ea/TmeeyM60q/Zf12cOcS1afIz7ln17e0yTf4G
+woa3tMQKSX5Xu7mYHvxESPI/26nVMOCxJTkfec5Vz+WlluT8ti15V/ra25Kc
+b2j/YqXshQU5/+778w7rfGFB6kM6f6d8Xzsi9bPRt2Z0zipE6stHv2zwlzsM
+qb/TyTJuzi6G1GffRe7xP9wYUr/RB4LOuvMZUt/K09my4wYMqX99uzvyCFOG
+9EfDE3q6RsyQ/rFTfJs4EsmQ/hrjlLUkVjCk/2Sry7os+hnSnytbhr75txUi
+/bssu+XTbuxDH/pbGHxn8s8yRPq/xcAldW8bIvowe+GIo7wXEf2QBvt0vWH5
+//piH7BbMb8VEf1J1/1Biy5CRJ/iVGe9DbBuftAv+yId/hdDDNG3UabPtiCR
+IfoXa3IiwG+YJvp49pQ7zFhDE/0MdZP+0F4rIPoazw2/ZYbr7oP+xhdciMzd
+ThF9rtzmxisd5BP9FvnsOuMewSf6XufxmWzkKY/o/5T1BDMjj0f84cyRuNYp
+Dx7xj/Avlz2Ya84j/vLxr2MP/6nNI/7T6MZ3iZ/JI/4UZtKvMEE84l+Jg/9q
+7fTmEX/TDtZOdcnkEf8L6Rkt2qjgEX+ULvJx7dblE/+862O3Z9ibT/z1QYqo
+yW43n/jvrZ3inblyPvHnr/K+atl9lU/8e/3GQosdN/nE3zc1B7v0KfjE//P1
+0SonGZ/MB+qC0pHItXwyP+jv+c916RSPzBfy7eW58Tk8Mn8wrm+Llbo8Mp/E
+o7qm+1vNyfwyGZQ1Z9M9MzLfrPskveeuoxmZfxpzHC5c+9GUzEcTWcrwLh1T
+Mj95Vz/7WyvVBD7MV5OD7HxlDP8FAmqi9g==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.4452, 8.75}, {-1, 0}], 
+        LineBox[CompressedData["
+1:eJwt1A1MU1cYBuCb6lxjO6tSsKKgUBjUggWalI6wcVEUbTKsyBiKUiIKjSgW
+A6HiLG0E7cAfhuAqq1BAYZMfgaqFQRCmzFIrOMewDFa0Okb8WyfbQFHZe81u
+cnPyJPd85zvvzTleO/fH7qYRBLERLzUSzlk8viQxTY2rSIJjSC+ywfdl1S03
+4LjAkKE6WKGQ8Yvh7p65rP2wM8x38y5YKW8wCWCOWt+4Br5vKih74kMSzfM3
+7gyAnaFRledhMu/RMm9YUtY+sR0ubkhn+MBBizJPuMHOV76PguGTppnyn7mY
+v6nDLoHFs9aZMnhaL+7ZB3vqNCkymNA0P9HBVzWJHwfDQb/+I7fA82vqzjHh
+O5PXaQSfJLxZNaIX3iSxoTY/IRSunRO72QEnDPdN7YMlzBLLKOxMUmVXwQS/
+gP0AJm9bjg7AywOiw5/D5qVNnH9hR2TrJA31tdzPd7sEkIRuU3+FB6zMT5n3
+IWxoTN4VDstnoucEws3uL8gd1PdrY0b8YNv6Y8tUsPSbnkI3+PyUaEQPm63s
+opeo33Xn2hcmar6Q6P8Jlpoj/Kxw26s+owG2e4ojhmH10eVv0uAML/ec32Dn
+pddtPGp/wtbRe7BNdlYwgTy+Hxx33KTyy++3XICr36amNcILXT59Q/2/Cc4H
+l7Vwd3sazx8mpv44tI3qp/OY9i8ecgqmD3Kp+lXr2ddhuy3Rfxx56Io4Bypg
+20eMwBpYfiXBkQ/HqZ9Zt8OKjlRhDhy2yOLqCgdlbW3PhhVeIdx+L4zP9BI1
+HFNipRfCbRkVkWfgrp7JTglslmQfuQrnVmrmLoaVD9cWjcFJruXJD1aiL8PI
+QRb6vSgQzLbDxGUaLwruXGNv0sN0blnkIfjxD9VDX8LdHue2tMIlL42ZGlis
+3fPnOJw7bGIdgZXxdV1uyO94/YbhE7D2dKo+AmYPVugMlJWiehl8Rvnej9R6
+WlWsPBseGjr79T2q3t+Cjjw4KsnoMg1/y+8lVHCWJNR3KfonopcsVsAHBua1
+iOHkdbfWxcOlefX1cdT+RRf3BsN7mCmr0+GVGeF9NLjpYUthLlz8/l2aFf3G
+C42JGpjuoWKfgkWMrFIVLG0zimPghYbewkxqflj8XQZ1XhYsebsV1gp5cRbk
+N9HLcn+3vlLvdxwuPTmQxYQNv0yd3gIzn/5Ot6F/9YLxWm949dgn/Hd5XpKu
+mPHHebiy9/A2WJeTmmiHb/iMjrJh6VcFktuwvDGisnwF6jWVp5hhcVXIGAN2
+fpZgGIDZqxq+03jinriQc9gBv6buHY//7x9/8j9sjKv1
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.6318774622309, 14.558628882191854}, \
+{0, -1}], LineBox[{{17., 17.00000000000231}, {17., 9.999999999998607}}], 
+        PolygonBox[{{17., 12.9}, {16.6, 14.1}, {17.4, 14.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.9452, 13.5}, {-1, 0}], 
+        LineBox[{{17.000000000007276`, 17.000000000003638`}, {
+         11.000000000005457`, 13.5}}], 
+        PolygonBox[{{14.51826734053906, 15.552322615314452`}, {
+         13.280184249251306`, 15.293188945044921`}, {13.683281069670574`, 
+         14.602165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           
+           9.996694214876033]& ], {13.823799910437668, 15.984057296392571}, \
+{1, -1}], 
+        LineBox[{{17., 9.999999999996362}, {11.000000000001819`, 
+         13.499999999996362`}}], 
+        PolygonBox[{{13.48173265946094, 12.052322615314452`}, {
+         14.719815750748694`, 11.793188945044921`}, {14.316718930329426`, 
+         11.102165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.823799910437668, 11.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{7.5, 5.}], PointBox[{7.5, 12.5}], 
+         PointBox[{17., 17.}], PointBox[{17., 10.}], PointBox[{11., 13.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T14", " ", "P2", " ", "N28"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdief/fggjhihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdief/fggjhihjij.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:eJwd13lcjNsfB/BnCG2Y0jLtaXErhSIl1UxapLQKU0IbkihKi60iDNowUYhB
+ERUJGVRGJVM3GW5SQnPj1iAJyZTo9zk//zyvt7N9v99nOs8508Ni/NeNoyjK
+jUZR5EkNjOHfXyxqDgGdRdmqCfjlcM7JDnV5OFqnURgGc/4NcpkNy1QukNeA
+QzKz/WJgc2tTo7YZLIp+Ykm9EG5vC4o6A8vmmvXZKrGoUbVewWaYvTNMpgrO
+yZu335P038cN9VJmUTy/wN3zYX5PxdVe+D33WsssuH2Ttub+aVhPKD86F9YP
+667TU2FR2l6Vn1xgqVnXmxsw9fb54FrivNkT56sizpaj3/fCsUm30y/D7JpF
+4SVwseeB9HFqaNf7vev/8b44ssgFVhwXE0hDPqkX9WZvgnfFWauYkvwWydES
+4dIF9C8eMCNYyo+EufkucRFw0m3f3EXEWvnZcaR/1OuhSbD5/d03EmBqeblN
+NdaPL53VHg2XB81P2ABHa37gLSfjd/+7QhHWjy/wtCT190x7QPJp1+y5QxGr
+J2WvhgdsNgQ9IvnnObBV4fQaxsw0uNyJq/EW9aEa/DJJ/cRjV2WqYMVYvpXE
+GPN8oy+pgFubEkfy4PK1Hz7XwvxzHi2esOSD7d1+2Py2TMp4mL0ieYY15i9d
+43Gh1gjj3/VEc+EMihF3BC5OtcuVQ7x9svmVa2EpTViQA9tH519iwSJl9xIj
+5M/YnNc9C6ab/HIWwGcuWEWawamNAcdWq7OoeZeYx61g4Y9xpUMwV3ze2A2O
+zB3o2M9AfmobV4TD5Sva3kzQgKdl9x6EGesUrLbBxRtcnW6Q/vczWY9Je9LB
+o69hd0lh1jhNFjXoHds/Efnk/KvYaQAz6BXJFnBqqJ2FCcxLTtnnBYsjxlqn
+wZxCx5IIWOjGDZJgvsLwxNFYWP/U47VX4PZdBRO3wgKvv+NWweac3P5wUt/N
+/M7xcMZuveQlcJJetH8xg8xTPNmAtL9prPWGGT/X3uhHfLz4m2OjyFeFKRop
+h2NXGe7mw+nth/5EwSZXhJMPkPrc+sdaD6Y8vIo3wqKy7BCRIeqhoGyzHi78
+WhueBke+Lo3fDQt9AmdYw6L5r9quw6/jRZv7DVgU63Q3h6zX6ptcdR2W5vC3
+hyKevqaPVjthet+y0E54KUMzwR+mnFTp65HPrh0Bp+fDIUF+O0Zh25QpWiZw
+8ZYcuXzUi+KY/j0DFladeG2thfGrfogt4fLa4SlPYBeTFyOLYcaqV1SgNvJ0
+U7bcQNbnBZ1uhQW7p1pkkvW5WVkLdZD/6EPXO3DS9KH9h2GVSaq8btKfM87v
+Acx+XeaniPwERfd+t8O3MiLTLeG8WLv3L2HZnjd5PrDQYO+Fathll7dbBByi
+KJTNhJOKt1RuJvUJtf+5BJYeeXg6Cs4x7Zo1jHgKA+Kcgkj/kiJ1Hqwi/+24
+PWl/eW2PC5wa8Hq6MiztveTTh/wYjXaqrxEfJ+j20gI4eHC58Rl4TkqYMBge
+MH+RFgAL5jdFzIZvfTLkTyL1dLXsZMBz9EK5/Ol4f4LSFi34fZD/2EY4KVym
+dAFs5DT8ShemJ6/M2wazAnd0dejj96PJjnkEUyJqRwHM2WH1bDbi42dbXd8E
+i4QJzGtwe+OZcW7wgEPRYnvkyzrgEmEBl/OW322F9QcXGhvAOQ7r/9uqi/jP
+Pv5uCLOi57ybrIc6Ri3qsoQjCxPbL8ABrTnhHrDgzDKeKp4mhSd3kvXsRb/V
+/fAc/dV69xhZf8rNx2l4xrd/WVeNJ8U0/esSniqdLwokpP291Jn8/4B8a5IS
+8nNZbfCkAS71HDOzhgcUetXq4IxrDn/5wfbCx2o34fQz/o7hMHtJx8o8eI5P
+/F1Sr4HY0d54WLjhrxjSLn3w1tGTrMMIf+YD67/9pqcL1w/6Dc4irjrzVYx8
+mm1WZ9JIfSsVdh6GZRSzPgpJfWy3HXIkjirrPgBLhHIe4+DCmHc1DrB+0h+z
+V6iXvl+zA5mH4bWrqBGWnaJS4QRzxsKm/QOLdLZeL8KTw7947CeefJV3n5Tw
+ZChf+jkf/fiDk+8e0SG/x6Cn2XDSroQ6dVhgLo4dI/Mo5XXcxXt0eT44xYm8
+p6FD1fHwYIlJ3iESV2fkeA/49fxVV9pI/o66fxbA7vcrQ4yRF6Mp5r4zTPda
+KdwG848cmLoOZpsuH7kP580JvX6K/G4yFFz+kLqd6GeL4eiyfjcb/E5zynon
+WiKewbBQ1XVw5LkBi4Mk3hczPQ7AvCMM6g2J9892jVOwb0vaTXPkV1WUGMSD
+ZZ+2CWNh3/mRh/JhiZKVdyGc8e3EQzKe/dhTqw6OZH+/vhF2N1KSaYLLt1zZ
+40L673Qcq4RZbY33NMg+0TaDeQg2kThY95HfQc3OhU6w0ZY0cQ3cbnO2RIx4
+JD21pVziS9Vbo+DIHt2IWJKvTW1iN/IT0q5yAuCQ36UpXrC4p8faGWbdLP9Q
+jr8rboX2JEeY41a3TRku9G8Y70banev7E7Hv2abKHV8FF688TOvFvqhv35Kw
+h8z/weZVBBxfWdFSBouctAZ/YF91v3HHQAILs7TEBXCVs+H2mchn4IunxlqY
+NfggaDupp+R2jx0cUODLqCP7ZuLfnpYwNet5nRL2naSljrJOsEBjaMMasg91
+OlzeAEtCjE0uwWLjsILzsFS4PLwHlri3xX2E6WvlWrXJdzr11h97xGev+L1k
+MfmuaP4+fRyO1Bi4sg7meJomke9e+xFP0wRYMEH9hTXyDe45appMvsP7+30S
+4FSnE94xsMT7ukERPJBd3B5IvrsrF6+pId+Fh6ty7eAk9W2aD2DZDm7jNPLd
+y9HIJ/0j+J9VJWQfNj+yaiss8r+/4h7MObfHxJCsZ2OflgnLehWNq0Y8t2gn
+U8g+zr82j74Ipj6tmbwIZjzkxlciv8Jk7xMm8BxlGV09mHv0CUMTZl/JPZSG
+717p1KuTGbBvQVjqO5xDmt+brTCETZy1n3nAkW5sS7LPF/uw5cg5Le/2L9sw
+mPrz3ZJJzml7d63nwnTpo6MvcA7iHVut94yM1zqcvA+W/FXvrob8Qj6naXnC
+u05rhIaSen28HWsBt17MPnsd9r2kY2FGzq0u05T+kHPQsGMdE+b+Q28g5wb3
+V+qJm2BR1vK+bNh2eFPKFdi9P3DoCSz7o2vuD1iQsuwuDec8d1q56xLEJ7OW
+e9AUDunxpnjknFn004WcizkOr7K+w0l5YfF+cKS3mrMjOZfur3Qglt46+moH
+rK/zaRPpH1l9uaYQFsRFhpvDeYor7fnwnA+qSgqw7W3XGxUwe+jT825yTtrz
+tOQYHHHdeFUlOSeV5Y2uhI2cY7M5MHX4KX88HHz88rpgWKpIs8hDPMHfmh/M
+g/lR+g8Z5Nx7sd9dhYx3UX16CPkZbS8J+E3OedOFmwdwLs2Z+7b2K8wanTPX
+n5xrTZok38g5KTBw4JYy+Y69TaWRc6xPZpQuHCzoOK9D1r+gocrFPSN15Hq1
+G8zJ6W/RJP7gW7yT1FPB93Il7imi2k9F9+A81fWlUbAsSzGV1HeAJttgC5cG
+ZfC8yD1CgXN2OpzaoGxJ7jW+BqdOGcFU5FmHj+SespUvZsLao8nt88g537Ek
+JhbmmXU7JMOyptOdK+AQrdIft2CTvfnpFOKpN1j29T9yr9q0tGE5fGY8VSRv
+gvbRRa6lcHtqoKYBzI7fMfsPzMlfMDoTLi+t+uiKfAPm3T1lQtqvPmXvgZuN
+QnsZMOtbjepFeGn3tY1/ML/t3CVl5bDR/iTzThLffUl9Iey+SLnoBjxQm2hL
+xqtkhOemk3j9VUwcYE7Ryo8ryL2o+dRQN9Zf+tYpbyYsYDfaboNDHvYkTCD3
+xOftuf3Ij/WnS7eX3KtqZU8Hw8X7qKbn5F4yd7vsvqlYt3uBbRO5t5zfKXWd
+gqen16kWUt9jl69Pnoz3/tVzn5j0X7C+4D8Fsv7Jf8dIvf1ebGqXx/oad8fI
++qyjkt1f5HBOPk7LDCf3rufau63gW9+yygpJPsOmo5dkEef9fvpn2FfdeK4v
+3Gy/dIod6qMv9WqfBWcEP6/nkHp1rVN3gqPTKh3bYN/90st7YfpDp1w9U/wd
+mB6kfYZFJ6arhMHl5holiVjvtZ9/0GmYJ91wgYH4ZJqVExtNyTmp6kU9XB6Q
+RvtEHFtxNRb59D2qNR2DB85vP0JXxH684l3tBDOsF9UQlw9HmA27kPYcy8mJ
+NNTjvXDL4z5Y9ER/AQuO7br3/SkcGzEuwAfmiGZ8vQpT+veKzGDeu3yPVBLf
+ggt7RZiv8Pblp/5k/c6qRieYZx20zZj099d5lUbiYa80/IV8YyvfbzyBeH3/
+UbtG8g+ZWs86iPzaD3SeuEc8w7djNfJ3UZ46Wkzq01H02WgS4mqN33UR5j3q
+GOydgP1FvMWwhLS3bDhZIYP9L9o1WACLXV2n54zH39OIwuduWCC/Qnp4HN53
+bNiwEuJhGYl0SmnYr8oHFJeSeldzBSMU6vtO2yKbxD/pzn874TPpRl/bSX3W
+rJppBbfGbzs3A/Urr35ZrANH5Dd7bzcj+1b+54Wwr6BerpbUd65YlwNrW1Z/
+k5uJfIc7rH7Bo5FN6z3gkIw1bhlYX5reqJMGl68xlrNEfM2TjN1KYV8Oe+Fb
+OD1g6FQT8ZeD8znIx+hNQlwnLEpJ3mmIfOvXTfj7LZlvG8OxCGb/WO30Aqab
+vpGMn0Dug7RpAjI+JeaoDcy2Mpc/T+KJGWbbwbxsuY07yHy6J2/KwmLKvsWb
++N+U4+cxn++sYZXpM0n+ndsnwgyum9Ug8hPFXfJdiHgY5SP0v2FW5L4wN8Qb
+vHDBlmJYfLCmZzby027V5GeReiQY3KAhf76j2kAKTHXej878zaQGG44f2036
+ay6brPqLSbF2taZzYN5d2b03pExK8l1O/jycqr5VIXmISbXyDAUNZLy04U3K
+IJMqfJZUKCXr03rNXn5jUoJ9avrWiFfwpM834yuTap6qpUXyY73caFM8wKTq
+b85VewSnlgx1z4L1F09YMs0c6011d9GDRzmT60NhQZOWaxzc5xHCLSPOWqOs
+j/lGHTN7v8PURxpPDevJRg9bWFlgPl27EJfvTErsJ2+3HqbEG425iK/v3OWg
+LNL+csTwyw8mpWj7LOYKHDL77STHn0wqwNNHWgmzju2lRyFfWec29Tuk/e0D
+4zXDTCrk07Lcq2R8XXb7pBEmlc7d8ewYrB8Y6swmNvx9eyssDgh54AKzuhaf
+XUL6m6qsf4zxlFRkpwMLls0O7ML8VcdWx34h8W8zfpKD9fVjGufVwalHJra9
+R3zsst9Rp83Jd0NxWIJ8QryfPNhB+geocq4hf/2l4YfCic/XFRzvZ1Jz5J5e
+XUnqc1LT9sIHJpX6RG43m7SPKIXfec+kImMza9aT9os//GliJhW83OXwXtLu
+3xO38iXeh6fTihJiGwdRwlPUd4LPSBfx0tKSrlq8P+tJNbqknkOGrLwKJiU6
+9GjzOmJ6rOKzkxhvnrj9BjH5l1dN0clzFut/TP1DYw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.684589195445786, 6.720523577306384}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt1gs4lGkbB/AX5dBxQihTRoRknbXTonm/SqTkkBWdDDmUlUb4UmyNqCQk
+20E5NBY5rCyb1dhNjdN+o5XGodi2wxRFtBrWOh++/3N931wXc/3e557nue/7
+ed+ZR9f/mEegPEVRz/BH3v/3YtLUPPJuTFPczSYuk9o0lf8wvbJiHU1Jip5M
+/wFHVzwMCIDHD+oyb8MZdNPzlTDXuuQfZ1hszszvNKKpcrMGOelKmmqWsVdm
+w30duk1+MMtqg85RMq549ZeOFTTFe8TQ3g6zwpaP2sOiptcfLEh8SvrSPC2a
+0vqprM4QVt7m3KwC2zkleRjDaT3vXp3QpKlYy7rv2TB3OiRnWIOmSsdcrNzh
+xJ5wyWl40UmhynGYl28ZxILLQ+rEGXDXnhMeL5bj+hpBcx3JZygosAxmGsc5
+/0XymZVuyIa73vSFL0d9UvcjOndgUf/2VDbcNTzG+Q+s77Xb0BMWTbhmzMAB
+b4+uDoKdFNuNHbCefo2KOBTmz601uQln9KfOkXG6N8xuBN4aKW9DPq/8nF/o
+hnr0H9ZEWMOsPeNFRTBL1OunDBcxtCtG4UWeVexW5Gdks7XQBv3Y/7j95zT4
+sGmDgR/s1nRdkfTTaHLfvSj46qZ5ZdOGuF4nfceDRcdbg8pgraLlp9zhl8bN
+8n6w9JZ/jCacpmC6XRMWawkNGrCedOvRZ+0G2H+13H4f2KhGczwDzoi1cXyJ
+/MVD6zMPw6xPTvmu8GFn2/VbYaezTcxq9GPn3aDzJvC4fcO/VsN9lNywLsxr
+7O1MUMf9cXq3pj4cvUaQPqyG/QsuUbKE6YPyklCYcf6kozNs1FPpPa5KU+aa
+atIQMl9Rq8FNuFxv1YkrJJ/L32zwgKcflob8Cstc//JbC/dY3Ze9h7llkzvU
+YPVIP/YS1CfJ+3OPNpw1efuSBcyv/73cFu6qvXbMBe669tw3HG6YM6vzhYVs
+u2NCuPRkdnsQLFgnXLEI+QWUh58i/WP5/lshGC6qjdd1JTZbeqoeTrjY3WIG
+e59KFWqjXubUFb158GH5vSYhcFr33O4nyE+oJ7pfDJceL12RAps3qn1+Bkvf
+peY4wH0mMS4DMK+KPjSxFuvsnTzYCydUMXV/IF5R90oMsxzvFx+AzfUDay/D
+fSesG9WId9tz7OFPg4uXSfTR33nTv7YjP+sHz6RXYbfdqj96wT0J36wJgJW1
+HU8+Rr2hXrJtHJhSDDG3hsUNyRaG5PNy1/xvLsP95N5pwoQzLNva5xjYrxc+
+vav0yXXOxqPw/gu+J9bDjNGmj0+W0lRkwavALTCv8E1J9xKa8qweeXQITgu/
+Vq0Hex9hmybBrPQU1tXFeB6aChmVJP61ZjEbZv6klPOarH9/7q4qbJ1sNF+J
+1HfOb6EuzDBOSjWGeU5OJlxY3aD5wTaYVcqzeQzbFQSH+MD8O1Y79mC9hg+u
+3VxY1uH1eQa2G3ec2Aczyg4dv4d8xxdPLXOGheU5GzegHqavmel6ODoq7l4q
+bJJV83GO5Hc74sorUu8Wl8gmWFotLl+F/kS6msRfhLmP3uc4wwGyfrvNZLzE
+v4ULs46V6YzqIR+5mNoDsCDuaHchLK5rNaTheVtP+uyFM77XH1SC8yOfOzOI
+8yw5VVhPuX/cq3kN7ler36NcYKeWsI402HzAW+575M/XH670hVne8hFJqK/5
+umnYVzDPv9XvIPox4urepwuXV3/qNlqE++WYVYQGidcZO/PPAvQlS1CnScwO
+znuqgnoNPwzpwwz+0pV1yuiPMj/VjqzXZZXyXAnXBw8V74clF8wYy2FrH+3B
+szA9uFAUr4i4WxkPS+G0rnOnDODE7pMencTZvT/Ozsc641u75ohnX7kvxDg/
+ackNPdTL26kudYJ3Xp5aQsPmDnLpFXBpjpbmbliiM5xpj/X4QXpjpF+sYGZy
+N5yYoxrrBQuyuL9mIN/owmBFBxIfFtvsjnqkyrevGJD5Sh5aKaDe6PnBlVNk
+/bk+US7Myrx5sxHmLm3V11tIU+yLLsPnSP0eCaGnYW///LebYAHHLLQUzgrf
+1j2si36mNakXwT2PH9zNhyUqF8rDYMm+hap7YLeyjQoULGta/GIRzKrXdTmI
+9Q73GRWKWYhrVTFPRX588eu2ZGJd2YnryL9j+oHHPtjtXHvTGdSXXzEisIFl
+cWF2nuiHW1xlCZO46N6b1ein9QrNRgbx3R/YAwr4vp8xLl4Gl9tJ7zfI47lu
+23xiNSxa9si8Sg6/L/uCasl8otue3k0UTSXbB2d9zSLngUB3RVhr8ZOqGJjV
+cOP6h1kOlZx0PrIAptds5xnBkSrLl0iI/wiyfTbDoZgpNRXjJN7puOIATNtY
+FTBRr0BVe9If8Qz1dUEbSf2OAyUWcxxKuXGbeCfpz5ctEj2sVxS8cunXMP/l
+KxWSD5XSJu8OixLk3n2LfHs+imc5JH77xNwG1CM5YD6hS8wN7ewj9RUkxY+R
+fl1rs0xE/epMaX0tLOV6Vi+Yh+fadUHwWVKvi39IMNxRVplsCwsKNqncgKnv
+FPa/0UH9woiIq3AGQ4naokOeF5PX+2Fu0pM7havxbvvd2GfMz40veq8Kp03k
+9rvCIgMLhaRV6P/0Joc4eXJ+2CxcBkvq22qTkH/f3vSxuzh3sVb2jkaivr4z
+Zx/6wdKXq95+h/5wp0KHTJnk96uet26aQwlnlBw0YHpsR17tBIcSuI7baJLx
+vNu+EWMcSrR0ZIk5GT+TsM/zHw5FxZjMHID5Flyt6L851PjuBZbZsGij5+Tg
+EIcSbyhmfCTjT1MSGmUcitUzFGCH/Lh3eusV4OgWUe4VWGRU8MrnM4cqcrbU
+64ZpyfS3p2HB9enw9aiXSr+kaI147+J7CYHE2eK5OTLfxMBUMizY09CuNgw3
+h3nlwHzZsdb9yEcYtUz7BokXipsbRziUUazdaBRMR+Vps0c5FDu+rukrMn7L
+LT8L9cl6t5d9wPpU56mhl+MciifP/hBDfNdvUw/6Iaqsrpsh/Xg6ECaYRD4C
+41geLLg83Ss/xaEylO/NdeGcKtUYtpeD+QejKu1gfvLaimuIlwWq2ObinEr/
+nHn8EeaTcByNF8HSv3+8exbrMTTPNZ/FOZWb5uDVh/yU1wVKVci5taOtZgb5
+96UbcgtwjqLUHEbaUS8jc62HNywINZk+jX6IhWX5+jCfdeT+uk/IP3FMYyHx
+JcP1Pr0cKjHc1JyYkuOZ/PIO/YllOegRd6slyl5i/9KNk91IfGquQ9QzzHcg
+cdNlMq6n8eXFFnz+i+ONL4gtA1zXNGLcdVD2BfKj9gfNDtYgn3O/2cQTi3py
+HYXYT07NZ3IOpxZc6LSu5lBa/QP5q1AvFd5vYihC/0fXOnoTR3ylEf4b+nvE
+k8cnno2LnMV6jI6J6+kw39d2W3YH9s8nlJ1MnMd22PQC/bdpGf2GxHukdilI
+kc9232IL0l9127QW1Cf+HHDwNdanzRbt8HiPeldf2RVJrCHzCUQ/yiWn60bJ
+uVWV49rdh++P5DMDR2A6tKei7CP251BKRRvOpbTDyQM/wYLDVdEbiA+8Pv0O
+8VrFD6S3NMh+nte1x3zCLQNx82FKvWvb4x70q21zSQw51w8nns98i/gq7dXy
+MHXuQ/T1P3F/lFu9ycK5ifpjb+ZoG+Irnk7vIjY9s2tXPfZvl+mxlcT/fzHI
+P3X6v0/i0Lg=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.6402550371571483, 9.170599194669919}, \
+{1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.999999999996135`, 16.999999999996362`}, {
+          12.999999999995453`, 16.499999999996362`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.407378835015717, 17.441896309779956}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwd1XtUjGkcB/B3KwltRmwzk4aJMtlNJuWWUZM6mZkucimDKElX1Ipt7Iop
+o600bWZJlHTRqlOTjhhhVOy0km5skqnTJksXZHTaNdTZ9vv4Y97nfM5zeX+/
+7/ucM9ahsZv2GlAUFYEfGSkGeSzlU2wyzuNTE/al2ZZwXxwzJhXWHdg64QZT
+qvj0qfP5VOmc9wdi4YIc/0kJrG52uX8F9t9qN94F21/fuG+A7I9462TO5lOv
+44dFFlw+VbWFJbOHz/xzNduFmNX/wAU2v1N5LBjOWcbu4sHciYoXJ+CuZTIz
+J9hUNVL8G5wqaHOfBxt5D97+A6Zm6I9M4n0dO9asegnrlNw91+CU4bTN48Ty
+h97bYPGSmoNmjnyq/dmbWj368ZzhxbWCpZL47LMwNyIx2AbmfqV+4Az3rhWa
+cch6oc/SbhafkoiKZGS+gJW2Uw6LxOfcWTBtdUb4BtjqHO3fWWT+7NybNvDw
+kpOJhnB9a4puJlzx8n3HKOqJUww0m8P13FDaC1iaPWTqAPudL97QBreba2N3
+w8ZuAddq4aw9m1TlZF5t4VMF027tvjod9S0SL2aWEH9TvuEn+MnRaWMXSb8j
+Jx5/ggUe+zJyYf5AfU8S+vf3oELy4cjDXtunIr/e9a43vuRZUX3dF47USHOu
+w+yhvJTTsPNf0u4HMMO0Kr4dDs9ypfeR+RjXzSbWOLferWoCLs0xXr8SDjz9
+qYfkmTXwtnUH7MNkV7rB/MAnXYfg/moZI4zkk9L/KAnOvGxJpZH1wheZybDu
+vNJDCYvnL09LgA8GtDa2wfqy4vzdMC8t4ef3cCrrne06OMxAd2bGMj41qCvT
+WsL23glLFsJiW+rRO9Qrux+oXg7HhX1wvwtncwz618FVTM7VU3DRnKkSEZxl
+yZPvgPOMixQ+5DzfX9cvhXlBg8eFcE1MG3sabOKYpXGHpftHl3ciz4JZEosV
+5LykSxol3LTCLoADh7h7JuTCAkGe1AKuD3j+rgBeoFZVGpH9MnlLLUwzaJkc
+RT/+dh9vjcGdzg2KfnL/LnxfwSZ5F6470gH3tfhwN8LJr3ZWPCT3LZgSp8Ps
+6mCD32HBjfaVTbBEOWx7j+R5k37RDHmk3/2QqSH7yw/bBsBWgobEFnIfmZ+3
+5sLSyzH6bnL/hWvqeuFWfUgTyZdtKjRkLeBTu1bdSzEh+QxHGmyBKxIaMmxh
+O0X2QBLMd9hr5gVTWu3aEli7/SkjCubOVk6qYYO6U/lyYmt1YSPcERKUfA02
+2aVkECv61hR3woxfzjy/A5tHfDuohyWj859ehmVbHnoznJBPdPl+GUyFWw84
+watKiiOD4PwrnHERrCv7s9sBvt2Rpw+CKd9Q+n/oJ9lx7GQU2W8cKW+GjdSG
+J+Jg2sd5NXlwx5vA6Qdhdu7dyTjYf5FF3AFYMJtW6A27pGW6hsM1U3rOOsA9
+Zce42+Eshol0Lnw7LGyxN2zyNDRnNjystbJ3gUtltYV02C96tb8dnPr3UB8H
+bpz1o8oCFvtomZ6wSPX6qDGp38ZWEQMbNxlVk/6pC5WMi7BeVeI3Qu6XnGf+
+jJzvqLEehLs8o9Lp6Jd7vPvxa7J+oYeA5KHhzHk8DDdO1r0qgtm+mdvG4NIG
+06FBWHJoPNoQ7xsMqOz9biHy4xU20eGuz8HxUbCXXjPFkdS7LT/jEswrC//B
+j8zXde9qhrnRTFHsl/rjpSNw2GhVuoLUX6fQG9ngex6LtLsJ94UmCmfCKzrp
+U3pgifzO4a/h6eR/xRn5k9GG/z/9qkJF
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.23789659515192, 7.38794612872654}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwt1gk01vkaB/C/NdlfJZXtlW7WoqERkr+8OuXmpHJTpN4yIRUp68TMv6JF
+hm4RIpRJskXZalJvQpEQb0KblGgaRZahqPt95lzn4HzO81ue5WfR2xG4fqck
+wzAX8UnfGQn6Ysgy/3yoskzzX9419jD/Q0HJWjjNQbUkBj51ydcrFr5eO6Om
+meLGcwWFsLGtQZOmEcsUezrllcObf4uN9YVbBAN/XoJ9mUcVxbDq3OxfDsJr
+fYLMR+FTPOHYUlitRyhpYcwyXH6r+K4Kyww0m0T7wQw7+MeAMsuURZj7JsLd
+ZyoWf1NimZUOr2vLYNG/9w9NKrLM1l3xCxtp/98Pw0YUWGZd3arspxQ/4nzq
+kzzLTKzKze6A+XN2vxqfzjK/W0Rot9B5j/wD5sKOEbG+d2j/9GI7LzmW2dCn
++EMu7e/heh5MY5mPivrBcbTf0srSG366cvfGAIoPRiiaw1qWAZqudF6mhfZi
++Kcbn2UtYbZI9eVOOKpA4KRF+4+uPf0QTqk/2CZPcbVsH7qvKK92lwScVfD6
+0kzk05WU6UfuLnKQfA8nyjyqV6B+HJEebEE9FfpX1fXovLxrStWot6M2yMuB
+PBKaVIJ+bGx0sdlD5znda01Ev2a6v3+cRfexNsnb0c/73jmvXtD6x91XlNFv
+iaM/V+uZoJ7+DpNEuPdeZbw/zIg2ffwAx/gr6JfD/LQ5z+Qwr9zSSntJU8wz
+bVqZBL2XYYvMNTB/0s2I5rc/66PyGVh0td3ZBf78afOxNpiVcnQswP0Ku9VW
+KC5Ev20igt8iP4Gu4yNbmJ/d2jeF/Ocf26O5HRbu9RyTgPmdPfEH4Szdmz1f
+UH+z51HmJFlTb9cw+rMlY8/dBNq/Ws15DP00bfBLjqX97KhYCRY6p5ZGwqzE
+4TBH9H+bl3ueL8WdHm3MlGWZsXCNTS6wSN9jzAD+JX203YzWx30dfC3DMtYv
+G3fwyFd+q2uG88zEDiNUT2W+aAiu2tqQ3wV368d9csJ+SU1RSR3Z4F/2D+AX
+sscNblI//K5n78f9GweqE8ppf9ktTzvk59G0XaEKzqq4LdBFPYWP17k0wUzg
+wHJl1Kv9vOP0nxS/K0r7DrvsG8uifDjrc6f7Mf/slt66FTBjfaL8Nvq10Cun
+l+rtDjLwC0d/PR2XRt6m/FtLliuh/9d05SplFiF+8bV3KMxtbz/uCouMzr0s
+gsUqDhXpFM+zqb8O92dPTPbBQjXHoGg4Y02GtrkZ9gUObZ0Hz+pZ8H0/zFeJ
+EfwX92nu7RIVwVnWL5+0Ix9rq9bm1zA7YRH7BfkmqKtHypjjvqrjzjIKLFft
+xbsxE2bkNqtKyLNcRNT6EB1yaH74uBzLlSj53JsHsw6GrmPTWG5IymBID+Yb
+GmvLwIG7/aO1YOHZloJF6HeR3OolM2h948Tlg5iP1V7BO1myXZnlsDTL+JXY
+LBlCPsLZP+aeg52en2hvJZemrgmBec+qR0upniVTy6Lh8+taW1Mp/1X+m+vg
+m7VlCUeovvs6G5bi/NRpFnOCaf26Ky1iWHmJmLeX1ve55iYiH5d0JVEg3O3l
+vCgQ87/j7spEwYy+zxkPzN++/oJtEsWVF7quwfzd3+p4V1J/h7uSrTFvleT0
+wV6KH1vbpIF+DfqbhSqjnu4rA1+fo58XdMVfF8JZrmE2HPqdkvO00JXcyc76
+oshyH0eN40NofWbSK4ESy1Wc/HA0jeKbxP1bYFa8PPQuzG1NL2Lh+SeLbd5R
+P5vd+gdxnnpX3B25xVjfsYnbB/fzr8oZwkybTnAN8klaJbBzhLvdy88PY34z
+JBRKNsMsf8hPFvlbtxV88IeFGX5hstNZLq7hVWEozN/pYvUN87O7N3skks5P
+jAoal2W5EaWSsShYdOp223cZluudjDL4me4z40fqwKfFI6b7aX3y4VgvaZaL
+91B95kPru0Zu1Uihv1edjOl+LttE0wNe5fDB1Jnyi88r1ZNiuZ5DMVK2FD8b
+EKyNuJJ6RIsp2WlKwQVx3oXcfD7lZ181Vkjr3WLOapAzDyTZ4j67NTOD1Mge
+N4Wf8B5+TBQO8qhe3mrzu8hv2szqs7PI0bKJlzH/98UuRXReVsos2xTUaxGZ
+72RO9ahyPx3H/A+fCzFzovtnpbvtRX9GPy2Q3kb1rHBpWIZ+xuZEL6B+cPVT
+AQPo56sT6xsyqJ9B55eFYf7KOtOnqum8HsGTNswjcMui4n66L1X04Bvi0ard
+Nco/oP5fFWpH4fBS3mxLmG91+Wol1t8e/TveHWZNq3JWw4q8ufrhcNbcyfcF
+uG+pUsxAIiwaXVTQT7+ftuWYF9L6uOPN0vChlTuEInLvsQR5/LxaHVYybKL1
+bvO0pPHeG5ZND2in+HfOeBL9URJ3unVSfDGPm0I/I5sKrJ/Cwvy3kWqwjfPW
+4haKW/nkCdB/QYxRVB3lH2S1IV2S5UxOrI67QedtyDXkS7LM+vDevjxaf/r3
+CbEE/p7ElBekUf6Wlr9USbCcOPjNVByt12207kK8jn92/Fc6L/VaiBH2F3i3
+Xg6h/Z9LN1zG+f6KMyYCaL/1jnF6Dx3yRtf20Pot3xrUMe+j7g/9Aql/7w48
+GEW+169bRIaRLf7ofYOf/wsqyrwY2q8VE/UE7/mFRp9KCsyJD9bcwfwHLEwW
+FNN56fPtUzD/ZEF+fSPV/8bD8j/oZ1wPt3wAZmwOa3yE57znZapa4PyBd72e
+eA9Sz5/1LoGFHa4HUuHhxenjnuSMIxezMS/bFM/SQ3DWrRXHIhB3jOmYuAR3
+l+zcpyVPc6m/cZ/O04jvTMB7u9AdyLyDmb80nToxv+/0YfH//wfl2P8BT1Cq
+YQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.72092184717428, 1.8721747773942476}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwd1QtMk1cUB/BPUKljCgNaUEELIpSn1QJWBuwTdGOIkZSHosTwkIfgLCoj
+nytMcBXLYAqCo0V8ApH4BGGKghMVkTAmn8qrDLVugB2gaxC1Asr+1ybNzS8n
+ueecf25T21ipJN6Aoqg4fMlJTU3j405TWnLa0JRi9J/o93Bvckjzdjhpjr/N
+EKmvzvvQbU1TzRtbY1tghaFffzBczJx4WQozJU7u7EKa6sz9OL0NLjiy0TEe
+1urZUAdyn954hQkcYqCb/dyNptjk6/fZBTSVf2d8fwmsLb8adh7m3D4TEwy3
+ct87noTH97ptMIBT2w9JSV0zeH6kwZWmxF3Tqx/AlI/lRRnMV7nUzcT9rQ9c
+7gaQ+tWzE0Ewx/+7j1yYI7E7Wgb3b0xpeO1CU6aRPdnjMP+N6PETWDmnPX09
+9unsKC/shGmJ/6IzsOmqmVd6YNasJvQlrMixjh2CA8sUW52Rj+vnxeum4Sza
+XhAOVxxcVc5Hv1OG2cnJcNrxbN9AWLGioisRZjIkZ/fAvTOMnINhn5IZ/qeI
+K9RfW8Lsw4CYP2BmtsylDf0GnG5sHyPz0xajCbBP081XZsiDKlerdJjf9TTv
+gTMsFFD8FNhiU3SgGC5Y+I73F/IJ9prF9SZ5Wg8eXgtnlIykLoOtFjf1XZ6P
+OXlujlaw6eTRbxfD/K49RePoJ8hoeK20Qr8rfx+/R+Zfr5LZwgLfa9X5sHB3
+tbrREvcZWVetI5Z5LNsJK+UDjTPJ/LMCzqyEq7uXptwg+RlL1i6AOSs7wqVw
+ld+rz3iwcDBH4AA3KcNbnGAfP/u9z50xL/+FOBQO0yw5Vw5r+v50OQwL0hM7
+dsLKd03FauJ45tc1pK7waHbDfLqEKJEDrPUcLs2B5e3dEgs4yyuz+SncKK41
+M4FPrQweF2Jf4eVdFA/Wf+DYMTBjHLdIQKxddZfkM5o1+SoAZk5bTz+GqQH1
+gURYeEjV9xyu23b7eAHcmyDZ3APrB36+0ghTK75R1cIZDYM2/8IKT5PH6bC9
+/KSnOfZVmC+PsYOjzeYni2G9X/35esxXIM2Pi4CTfro21xfOF3VZp8CM59il
+WuxbplFMpMG9hTFhtrD2fcST3Z/ea51THo+mPDKfum+D69965bzlIr878dpA
+WKO7fzkJ7m1xLLIl/Q8UnhiywPuJFPn/h/k2HfNuToP7V9vl1JJ8w63UPDjJ
+wHNLKvGjypoOc8yrO2lG8tGwgkWnYcWuueInTvg9FL3pyoM5u+VpR2Bmw1fS
+w3DnyLQ0CM66+SjuHLzD3bzWCI7eJ7frg0efvcltF+D9XchzXYh+dRn+w6Ww
+MIrx3Q5nuRVFpcGpD6dkt2Bq39RwJKyfvaXGCvtUDblxg4mbp+RSmP/jrbYg
+uECXf/13uODZy5RwOPBFT9IM5NNa08Amw01jLV+KYHm6Y0Qu8S/vjoXAbPdT
+3SVYEF3fHwHbT6rWqGElVxm5Bk4Ktbg1C/MLQ5xyrWBt987flsOsbKlhJ/qx
+9hf2byZ5xFbtZeAo0XBlJqw5+LCSA3twqWdKWCuqEiiwT6NKHHgO1hlXxkyS
+/L433FENt2be8EmE9Rcrwkm96QfeBGuGeYOWlJXA4snFY75wluFEAgNz5m3d
+VPsF8vAK27Ge1EcNKC9Y6DGitYTr5921bzPFXh81hWSfkBCp9x64f6t3djHM
+jsruiWB5W4/NOrjXQew3F/70/+CIOjlN6P8BDe0+ig==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.763809742330267, 6.7361902576697315}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwl0w9MjGEcB/BHXX82yUVDu7t0FNGViqiQt+2cs2ZyazlpIR3RcbJLl24k
+1cr5EyPpMKzlRKflxS01x26c2erK2TXVnFxlw/zLn66bfJ95tnfPPnvfve/v
++33fV5irkim8CCGpOOj+fy1m/u/zGdK65mjeBpij9n3jDfOX7l3RAFsUiojx
+eQz5Y2qUvYe5P2S9b2G2+6A5Ioohcn7mGRMsve41lANrw3eZK+CBIt3Zk/BY
+YrdSAovt4pQWOFhpDSdwovQFMcOetJlOVsgQ5+z+Jguc7S937IZNDd/uP4LT
+dQlZfFjJ25/XBMe2LGx8HcaQ89N7aqrggMvqtjq4o72zij5/7JdYkAsv8/FZ
+EEfnYZ0/k+B8rzTNFFjT//z2XDi2LexOL/LkP+O4Z8Jfiy+5bsIaY/PgLHgs
+pZhbAWvdExcWwo07iGUPbM1YbhTDrnrV7K2wMqqSq4TNkjbdFrhvU7hQD0uV
+jl8K2E5kzi5Y3hxdUgabbJlBHORZ5rxSaoA9xJC3gub/u/nhANxqn7yhgC0n
+9kt4mPfAjJUOHVwdXtOxAy4rf6O+CUtF+yS0T9ur+JIHcGL50y43zC9sqHwI
+m2ctX7BOxJCTvsy3W/R+n7+IzsDBwic9p2CWZSa64U/vuO6dcIBPkZ9fNEPU
+gZ1founzCt5J4uGMbIHjM+2zWCNNh1mJanMTbE2tXbcdtv1cr8mC1dahhFzY
+rBAdnkbz2yUdmfS8dKO8ci7yJc2JXwNfc9Ufc4ciR+tjnQB2joasL4PPL0lJ
+HcM8msltd3lwRqdfzDM4f6RGbxOgt4u2gjq4uvqI4TpsTo5bnA9L2/28a2FD
+S0xlCmz1VGfpYbnxaTYflg/MGX4Crwo5uIQDc08/P0Rw/3pO3/hv9JW4ytUs
+gyOPvOSP035PRAruwX3jqjR/XG8Kfn+Xh/nVN0LKI+Cw0tp+mudOkNY3nVrv
+8P4Ii9cKC6tgVvdy1zya39/4mM6vIb0mCVxxzlcViLyGAC/Odlh0dVKfBXPs
+ozvp9xM5+D3SAFviVl/eC2uHN4z8gMUlZBHt12yY2pEcg/drilq7kvad4+kp
+geWD7Ggg/InXzRrhWOPEvhbMwyl0FzngD12tI4tgbajL8h0uO15wrx75PJNY
+sD/9/0OZf0nWbpA=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.613477323709358, 9.105546654636697}, \
+{-1, -1}], 
+        LineBox[{{6.999999999983629, 12.999999999992724`}, {
+         12.999999999987267`, 16.499999999996362`}}], 
+        PolygonBox[{{9.48173265946094, 14.447677384685548`}, {
+         10.719815750748694`, 14.706811054955079`}, {10.316718930329426`, 
+         15.397834175673825`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.823799910437668, 15.484057296392571}, \
+{1, -1}], 
+        LineBox[{{7., 13.000000000003638`}, {13.000000000003638`, 
+         9.500000000003638}}], 
+        PolygonBox[{{10.51826734053906, 10.947677384685548`}, {
+         9.280184249251306, 11.206811054955079`}, {9.683281069670574, 
+         11.897834175673825`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.823799910437668, 10.515942703607429}, \
+{1, 1}], LineBox[{{13., 16.50000000000231}, {13., 9.499999999998607}}], 
+        PolygonBox[{{13., 13.6}, {12.6, 12.4}, {13.4, 12.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.9452, 13.}, {-1, 0}], 
+        {PointSize[0.04], PointBox[{12., 4.}], PointBox[{7., 13.}], 
+         PointBox[{13., 16.5}], PointBox[{15.5, 7.5}], PointBox[{13., 9.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T15", " ", "P1", " ", "N29"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdief/fiijghgjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdief/fiijghgjhj.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:eJwd13lcjNsfB/BnCG2Y0jLtaXErhSIl1UxapLQKU0IbkihKi60iDNowUYhB
+ERUJGVRGJVM3GW5SQnPj1iAJyZTo9zk//zyvt7N9v99nOs8508Ni/NeNoyjK
+jUZR5EkNjOHfXyxqDgGdRdmqCfjlcM7JDnV5OFqnURgGc/4NcpkNy1QukNeA
+QzKz/WJgc2tTo7YZLIp+Ykm9EG5vC4o6A8vmmvXZKrGoUbVewWaYvTNMpgrO
+yZu335P038cN9VJmUTy/wN3zYX5PxdVe+D33WsssuH2Ttub+aVhPKD86F9YP
+667TU2FR2l6Vn1xgqVnXmxsw9fb54FrivNkT56sizpaj3/fCsUm30y/D7JpF
+4SVwseeB9HFqaNf7vev/8b44ssgFVhwXE0hDPqkX9WZvgnfFWauYkvwWydES
+4dIF9C8eMCNYyo+EufkucRFw0m3f3EXEWvnZcaR/1OuhSbD5/d03EmBqeblN
+NdaPL53VHg2XB81P2ABHa37gLSfjd/+7QhHWjy/wtCT190x7QPJp1+y5QxGr
+J2WvhgdsNgQ9IvnnObBV4fQaxsw0uNyJq/EW9aEa/DJJ/cRjV2WqYMVYvpXE
+GPN8oy+pgFubEkfy4PK1Hz7XwvxzHi2esOSD7d1+2Py2TMp4mL0ieYY15i9d
+43Gh1gjj3/VEc+EMihF3BC5OtcuVQ7x9svmVa2EpTViQA9tH519iwSJl9xIj
+5M/YnNc9C6ab/HIWwGcuWEWawamNAcdWq7OoeZeYx61g4Y9xpUMwV3ze2A2O
+zB3o2M9AfmobV4TD5Sva3kzQgKdl9x6EGesUrLbBxRtcnW6Q/vczWY9Je9LB
+o69hd0lh1jhNFjXoHds/Efnk/KvYaQAz6BXJFnBqqJ2FCcxLTtnnBYsjxlqn
+wZxCx5IIWOjGDZJgvsLwxNFYWP/U47VX4PZdBRO3wgKvv+NWweac3P5wUt/N
+/M7xcMZuveQlcJJetH8xg8xTPNmAtL9prPWGGT/X3uhHfLz4m2OjyFeFKRop
+h2NXGe7mw+nth/5EwSZXhJMPkPrc+sdaD6Y8vIo3wqKy7BCRIeqhoGyzHi78
+WhueBke+Lo3fDQt9AmdYw6L5r9quw6/jRZv7DVgU63Q3h6zX6ptcdR2W5vC3
+hyKevqaPVjthet+y0E54KUMzwR+mnFTp65HPrh0Bp+fDIUF+O0Zh25QpWiZw
+8ZYcuXzUi+KY/j0DFladeG2thfGrfogt4fLa4SlPYBeTFyOLYcaqV1SgNvJ0
+U7bcQNbnBZ1uhQW7p1pkkvW5WVkLdZD/6EPXO3DS9KH9h2GVSaq8btKfM87v
+Acx+XeaniPwERfd+t8O3MiLTLeG8WLv3L2HZnjd5PrDQYO+Fathll7dbBByi
+KJTNhJOKt1RuJvUJtf+5BJYeeXg6Cs4x7Zo1jHgKA+Kcgkj/kiJ1Hqwi/+24
+PWl/eW2PC5wa8Hq6MiztveTTh/wYjXaqrxEfJ+j20gI4eHC58Rl4TkqYMBge
+MH+RFgAL5jdFzIZvfTLkTyL1dLXsZMBz9EK5/Ol4f4LSFi34fZD/2EY4KVym
+dAFs5DT8ShemJ6/M2wazAnd0dejj96PJjnkEUyJqRwHM2WH1bDbi42dbXd8E
+i4QJzGtwe+OZcW7wgEPRYnvkyzrgEmEBl/OW322F9QcXGhvAOQ7r/9uqi/jP
+Pv5uCLOi57ybrIc6Ri3qsoQjCxPbL8ABrTnhHrDgzDKeKp4mhSd3kvXsRb/V
+/fAc/dV69xhZf8rNx2l4xrd/WVeNJ8U0/esSniqdLwokpP291Jn8/4B8a5IS
+8nNZbfCkAS71HDOzhgcUetXq4IxrDn/5wfbCx2o34fQz/o7hMHtJx8o8eI5P
+/F1Sr4HY0d54WLjhrxjSLn3w1tGTrMMIf+YD67/9pqcL1w/6Dc4irjrzVYx8
+mm1WZ9JIfSsVdh6GZRSzPgpJfWy3HXIkjirrPgBLhHIe4+DCmHc1DrB+0h+z
+V6iXvl+zA5mH4bWrqBGWnaJS4QRzxsKm/QOLdLZeL8KTw7947CeefJV3n5Tw
+ZChf+jkf/fiDk+8e0SG/x6Cn2XDSroQ6dVhgLo4dI/Mo5XXcxXt0eT44xYm8
+p6FD1fHwYIlJ3iESV2fkeA/49fxVV9pI/o66fxbA7vcrQ4yRF6Mp5r4zTPda
+KdwG848cmLoOZpsuH7kP580JvX6K/G4yFFz+kLqd6GeL4eiyfjcb/E5zynon
+WiKewbBQ1XVw5LkBi4Mk3hczPQ7AvCMM6g2J9892jVOwb0vaTXPkV1WUGMSD
+ZZ+2CWNh3/mRh/JhiZKVdyGc8e3EQzKe/dhTqw6OZH+/vhF2N1KSaYLLt1zZ
+40L673Qcq4RZbY33NMg+0TaDeQg2kThY95HfQc3OhU6w0ZY0cQ3cbnO2RIx4
+JD21pVziS9Vbo+DIHt2IWJKvTW1iN/IT0q5yAuCQ36UpXrC4p8faGWbdLP9Q
+jr8rboX2JEeY41a3TRku9G8Y70banev7E7Hv2abKHV8FF688TOvFvqhv35Kw
+h8z/weZVBBxfWdFSBouctAZ/YF91v3HHQAILs7TEBXCVs+H2mchn4IunxlqY
+NfggaDupp+R2jx0cUODLqCP7ZuLfnpYwNet5nRL2naSljrJOsEBjaMMasg91
+OlzeAEtCjE0uwWLjsILzsFS4PLwHlri3xX2E6WvlWrXJdzr11h97xGev+L1k
+MfmuaP4+fRyO1Bi4sg7meJomke9e+xFP0wRYMEH9hTXyDe45appMvsP7+30S
+4FSnE94xsMT7ukERPJBd3B5IvrsrF6+pId+Fh6ty7eAk9W2aD2DZDm7jNPLd
+y9HIJ/0j+J9VJWQfNj+yaiss8r+/4h7MObfHxJCsZ2OflgnLehWNq0Y8t2gn
+U8g+zr82j74Ipj6tmbwIZjzkxlciv8Jk7xMm8BxlGV09mHv0CUMTZl/JPZSG
+717p1KuTGbBvQVjqO5xDmt+brTCETZy1n3nAkW5sS7LPF/uw5cg5Le/2L9sw
+mPrz3ZJJzml7d63nwnTpo6MvcA7iHVut94yM1zqcvA+W/FXvrob8Qj6naXnC
+u05rhIaSen28HWsBt17MPnsd9r2kY2FGzq0u05T+kHPQsGMdE+b+Q28g5wb3
+V+qJm2BR1vK+bNh2eFPKFdi9P3DoCSz7o2vuD1iQsuwuDec8d1q56xLEJ7OW
+e9AUDunxpnjknFn004WcizkOr7K+w0l5YfF+cKS3mrMjOZfur3Qglt46+moH
+rK/zaRPpH1l9uaYQFsRFhpvDeYor7fnwnA+qSgqw7W3XGxUwe+jT825yTtrz
+tOQYHHHdeFUlOSeV5Y2uhI2cY7M5MHX4KX88HHz88rpgWKpIs8hDPMHfmh/M
+g/lR+g8Z5Nx7sd9dhYx3UX16CPkZbS8J+E3OedOFmwdwLs2Z+7b2K8wanTPX
+n5xrTZok38g5KTBw4JYy+Y69TaWRc6xPZpQuHCzoOK9D1r+gocrFPSN15Hq1
+G8zJ6W/RJP7gW7yT1FPB93Il7imi2k9F9+A81fWlUbAsSzGV1HeAJttgC5cG
+ZfC8yD1CgXN2OpzaoGxJ7jW+BqdOGcFU5FmHj+SespUvZsLao8nt88g537Ek
+JhbmmXU7JMOyptOdK+AQrdIft2CTvfnpFOKpN1j29T9yr9q0tGE5fGY8VSRv
+gvbRRa6lcHtqoKYBzI7fMfsPzMlfMDoTLi+t+uiKfAPm3T1lQtqvPmXvgZuN
+QnsZMOtbjepFeGn3tY1/ML/t3CVl5bDR/iTzThLffUl9Iey+SLnoBjxQm2hL
+xqtkhOemk3j9VUwcYE7Ryo8ryL2o+dRQN9Zf+tYpbyYsYDfaboNDHvYkTCD3
+xOftuf3Ij/WnS7eX3KtqZU8Hw8X7qKbn5F4yd7vsvqlYt3uBbRO5t5zfKXWd
+gqen16kWUt9jl69Pnoz3/tVzn5j0X7C+4D8Fsv7Jf8dIvf1ebGqXx/oad8fI
++qyjkt1f5HBOPk7LDCf3rufau63gW9+yygpJPsOmo5dkEef9fvpn2FfdeK4v
+3Gy/dIod6qMv9WqfBWcEP6/nkHp1rVN3gqPTKh3bYN/90st7YfpDp1w9U/wd
+mB6kfYZFJ6arhMHl5holiVjvtZ9/0GmYJ91wgYH4ZJqVExtNyTmp6kU9XB6Q
+RvtEHFtxNRb59D2qNR2DB85vP0JXxH684l3tBDOsF9UQlw9HmA27kPYcy8mJ
+NNTjvXDL4z5Y9ER/AQuO7br3/SkcGzEuwAfmiGZ8vQpT+veKzGDeu3yPVBLf
+ggt7RZiv8Pblp/5k/c6qRieYZx20zZj099d5lUbiYa80/IV8YyvfbzyBeH3/
+UbtG8g+ZWs86iPzaD3SeuEc8w7djNfJ3UZ46Wkzq01H02WgS4mqN33UR5j3q
+GOydgP1FvMWwhLS3bDhZIYP9L9o1WACLXV2n54zH39OIwuduWCC/Qnp4HN53
+bNiwEuJhGYl0SmnYr8oHFJeSeldzBSMU6vtO2yKbxD/pzn874TPpRl/bSX3W
+rJppBbfGbzs3A/Urr35ZrANH5Dd7bzcj+1b+54Wwr6BerpbUd65YlwNrW1Z/
+k5uJfIc7rH7Bo5FN6z3gkIw1bhlYX5reqJMGl68xlrNEfM2TjN1KYV8Oe+Fb
+OD1g6FQT8ZeD8znIx+hNQlwnLEpJ3mmIfOvXTfj7LZlvG8OxCGb/WO30Aqab
+vpGMn0Dug7RpAjI+JeaoDcy2Mpc/T+KJGWbbwbxsuY07yHy6J2/KwmLKvsWb
++N+U4+cxn++sYZXpM0n+ndsnwgyum9Ug8hPFXfJdiHgY5SP0v2FW5L4wN8Qb
+vHDBlmJYfLCmZzby027V5GeReiQY3KAhf76j2kAKTHXej878zaQGG44f2036
+ay6brPqLSbF2taZzYN5d2b03pExK8l1O/jycqr5VIXmISbXyDAUNZLy04U3K
+IJMqfJZUKCXr03rNXn5jUoJ9avrWiFfwpM834yuTap6qpUXyY73caFM8wKTq
+b85VewSnlgx1z4L1F09YMs0c6011d9GDRzmT60NhQZOWaxzc5xHCLSPOWqOs
+j/lGHTN7v8PURxpPDevJRg9bWFlgPl27EJfvTErsJ2+3HqbEG425iK/v3OWg
+LNL+csTwyw8mpWj7LOYKHDL77STHn0wqwNNHWgmzju2lRyFfWec29Tuk/e0D
+4zXDTCrk07Lcq2R8XXb7pBEmlc7d8ewYrB8Y6swmNvx9eyssDgh54AKzuhaf
+XUL6m6qsf4zxlFRkpwMLls0O7ML8VcdWx34h8W8zfpKD9fVjGufVwalHJra9
+R3zsst9Rp83Jd0NxWIJ8QryfPNhB+geocq4hf/2l4YfCic/XFRzvZ1Jz5J5e
+XUnqc1LT9sIHJpX6RG43m7SPKIXfec+kImMza9aT9os//GliJhW83OXwXtLu
+3xO38iXeh6fTihJiGwdRwlPUd4LPSBfx0tKSrlq8P+tJNbqknkOGrLwKJiU6
+9GjzOmJ6rOKzkxhvnrj9BjH5l1dN0clzFut/TP1DYw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.684589195445786, 6.720523577306384}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt1gs4lGkbB/AX5dBxQihTRoRknbXTonm/SqTkkBWdDDmUlUb4UmyNqCQk
+20E5NBY5rCyb1dhNjdN+o5XGodi2wxRFtBrWOh++/3N931wXc/3e557nue/7
+ed+ZR9f/mEegPEVRz/BH3v/3YtLUPPJuTFPczSYuk9o0lf8wvbJiHU1Jip5M
+/wFHVzwMCIDHD+oyb8MZdNPzlTDXuuQfZ1hszszvNKKpcrMGOelKmmqWsVdm
+w30duk1+MMtqg85RMq549ZeOFTTFe8TQ3g6zwpaP2sOiptcfLEh8SvrSPC2a
+0vqprM4QVt7m3KwC2zkleRjDaT3vXp3QpKlYy7rv2TB3OiRnWIOmSsdcrNzh
+xJ5wyWl40UmhynGYl28ZxILLQ+rEGXDXnhMeL5bj+hpBcx3JZygosAxmGsc5
+/0XymZVuyIa73vSFL0d9UvcjOndgUf/2VDbcNTzG+Q+s77Xb0BMWTbhmzMAB
+b4+uDoKdFNuNHbCefo2KOBTmz601uQln9KfOkXG6N8xuBN4aKW9DPq/8nF/o
+hnr0H9ZEWMOsPeNFRTBL1OunDBcxtCtG4UWeVexW5Gdks7XQBv3Y/7j95zT4
+sGmDgR/s1nRdkfTTaHLfvSj46qZ5ZdOGuF4nfceDRcdbg8pgraLlp9zhl8bN
+8n6w9JZ/jCacpmC6XRMWawkNGrCedOvRZ+0G2H+13H4f2KhGczwDzoi1cXyJ
+/MVD6zMPw6xPTvmu8GFn2/VbYaezTcxq9GPn3aDzJvC4fcO/VsN9lNywLsxr
+7O1MUMf9cXq3pj4cvUaQPqyG/QsuUbKE6YPyklCYcf6kozNs1FPpPa5KU+aa
+atIQMl9Rq8FNuFxv1YkrJJ/L32zwgKcflob8Cstc//JbC/dY3Ze9h7llkzvU
+YPVIP/YS1CfJ+3OPNpw1efuSBcyv/73cFu6qvXbMBe669tw3HG6YM6vzhYVs
+u2NCuPRkdnsQLFgnXLEI+QWUh58i/WP5/lshGC6qjdd1JTZbeqoeTrjY3WIG
+e59KFWqjXubUFb158GH5vSYhcFr33O4nyE+oJ7pfDJceL12RAps3qn1+Bkvf
+peY4wH0mMS4DMK+KPjSxFuvsnTzYCydUMXV/IF5R90oMsxzvFx+AzfUDay/D
+fSesG9WId9tz7OFPg4uXSfTR33nTv7YjP+sHz6RXYbfdqj96wT0J36wJgJW1
+HU8+Rr2hXrJtHJhSDDG3hsUNyRaG5PNy1/xvLsP95N5pwoQzLNva5xjYrxc+
+vav0yXXOxqPw/gu+J9bDjNGmj0+W0lRkwavALTCv8E1J9xKa8qweeXQITgu/
+Vq0Hex9hmybBrPQU1tXFeB6aChmVJP61ZjEbZv6klPOarH9/7q4qbJ1sNF+J
+1HfOb6EuzDBOSjWGeU5OJlxY3aD5wTaYVcqzeQzbFQSH+MD8O1Y79mC9hg+u
+3VxY1uH1eQa2G3ec2Aczyg4dv4d8xxdPLXOGheU5GzegHqavmel6ODoq7l4q
+bJJV83GO5Hc74sorUu8Wl8gmWFotLl+F/kS6msRfhLmP3uc4wwGyfrvNZLzE
+v4ULs46V6YzqIR+5mNoDsCDuaHchLK5rNaTheVtP+uyFM77XH1SC8yOfOzOI
+8yw5VVhPuX/cq3kN7ler36NcYKeWsI402HzAW+575M/XH670hVne8hFJqK/5
+umnYVzDPv9XvIPox4urepwuXV3/qNlqE++WYVYQGidcZO/PPAvQlS1CnScwO
+znuqgnoNPwzpwwz+0pV1yuiPMj/VjqzXZZXyXAnXBw8V74clF8wYy2FrH+3B
+szA9uFAUr4i4WxkPS+G0rnOnDODE7pMencTZvT/Ozsc641u75ohnX7kvxDg/
+ackNPdTL26kudYJ3Xp5aQsPmDnLpFXBpjpbmbliiM5xpj/X4QXpjpF+sYGZy
+N5yYoxrrBQuyuL9mIN/owmBFBxIfFtvsjnqkyrevGJD5Sh5aKaDe6PnBlVNk
+/bk+US7Myrx5sxHmLm3V11tIU+yLLsPnSP0eCaGnYW///LebYAHHLLQUzgrf
+1j2si36mNakXwT2PH9zNhyUqF8rDYMm+hap7YLeyjQoULGta/GIRzKrXdTmI
+9Q73GRWKWYhrVTFPRX588eu2ZGJd2YnryL9j+oHHPtjtXHvTGdSXXzEisIFl
+cWF2nuiHW1xlCZO46N6b1ein9QrNRgbx3R/YAwr4vp8xLl4Gl9tJ7zfI47lu
+23xiNSxa9si8Sg6/L/uCasl8otue3k0UTSXbB2d9zSLngUB3RVhr8ZOqGJjV
+cOP6h1kOlZx0PrIAptds5xnBkSrLl0iI/wiyfTbDoZgpNRXjJN7puOIATNtY
+FTBRr0BVe9If8Qz1dUEbSf2OAyUWcxxKuXGbeCfpz5ctEj2sVxS8cunXMP/l
+KxWSD5XSJu8OixLk3n2LfHs+imc5JH77xNwG1CM5YD6hS8wN7ewj9RUkxY+R
+fl1rs0xE/epMaX0tLOV6Vi+Yh+fadUHwWVKvi39IMNxRVplsCwsKNqncgKnv
+FPa/0UH9woiIq3AGQ4naokOeF5PX+2Fu0pM7havxbvvd2GfMz40veq8Kp03k
+9rvCIgMLhaRV6P/0Joc4eXJ+2CxcBkvq22qTkH/f3vSxuzh3sVb2jkaivr4z
+Zx/6wdKXq95+h/5wp0KHTJnk96uet26aQwlnlBw0YHpsR17tBIcSuI7baJLx
+vNu+EWMcSrR0ZIk5GT+TsM/zHw5FxZjMHID5Flyt6L851PjuBZbZsGij5+Tg
+EIcSbyhmfCTjT1MSGmUcitUzFGCH/Lh3eusV4OgWUe4VWGRU8MrnM4cqcrbU
+64ZpyfS3p2HB9enw9aiXSr+kaI147+J7CYHE2eK5OTLfxMBUMizY09CuNgw3
+h3nlwHzZsdb9yEcYtUz7BokXipsbRziUUazdaBRMR+Vps0c5FDu+rukrMn7L
+LT8L9cl6t5d9wPpU56mhl+MciifP/hBDfNdvUw/6Iaqsrpsh/Xg6ECaYRD4C
+41geLLg83Ss/xaEylO/NdeGcKtUYtpeD+QejKu1gfvLaimuIlwWq2ObinEr/
+nHn8EeaTcByNF8HSv3+8exbrMTTPNZ/FOZWb5uDVh/yU1wVKVci5taOtZgb5
+96UbcgtwjqLUHEbaUS8jc62HNywINZk+jX6IhWX5+jCfdeT+uk/IP3FMYyHx
+JcP1Pr0cKjHc1JyYkuOZ/PIO/YllOegRd6slyl5i/9KNk91IfGquQ9QzzHcg
+cdNlMq6n8eXFFnz+i+ONL4gtA1zXNGLcdVD2BfKj9gfNDtYgn3O/2cQTi3py
+HYXYT07NZ3IOpxZc6LSu5lBa/QP5q1AvFd5vYihC/0fXOnoTR3ylEf4b+nvE
+k8cnno2LnMV6jI6J6+kw39d2W3YH9s8nlJ1MnMd22PQC/bdpGf2GxHukdilI
+kc9232IL0l9127QW1Cf+HHDwNdanzRbt8HiPeldf2RVJrCHzCUQ/yiWn60bJ
+uVWV49rdh++P5DMDR2A6tKei7CP251BKRRvOpbTDyQM/wYLDVdEbiA+8Pv0O
+8VrFD6S3NMh+nte1x3zCLQNx82FKvWvb4x70q21zSQw51w8nns98i/gq7dXy
+MHXuQ/T1P3F/lFu9ycK5ifpjb+ZoG+Irnk7vIjY9s2tXPfZvl+mxlcT/fzHI
+P3X6v0/i0Lg=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.6402550371571483, 9.170599194669919}, \
+{1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.999999999996135`, 16.999999999996362`}, {
+          12.999999999995453`, 16.499999999996362`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.407378835015717, 17.441896309779956}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwd1XtUjGkcB/B3KwltRmwzk4aJMtlNJuWWUZM6mZkucimDKElX1Ipt7Iop
+o600bWZJlHTRqlOTjhhhVOy0km5skqnTJksXZHTaNdTZ9vv4Y97nfM5zeX+/
+7/ucM9ahsZv2GlAUFYEfGSkGeSzlU2wyzuNTE/al2ZZwXxwzJhXWHdg64QZT
+qvj0qfP5VOmc9wdi4YIc/0kJrG52uX8F9t9qN94F21/fuG+A7I9462TO5lOv
+44dFFlw+VbWFJbOHz/xzNduFmNX/wAU2v1N5LBjOWcbu4sHciYoXJ+CuZTIz
+J9hUNVL8G5wqaHOfBxt5D97+A6Zm6I9M4n0dO9asegnrlNw91+CU4bTN48Ty
+h97bYPGSmoNmjnyq/dmbWj368ZzhxbWCpZL47LMwNyIx2AbmfqV+4Az3rhWa
+cch6oc/SbhafkoiKZGS+gJW2Uw6LxOfcWTBtdUb4BtjqHO3fWWT+7NybNvDw
+kpOJhnB9a4puJlzx8n3HKOqJUww0m8P13FDaC1iaPWTqAPudL97QBreba2N3
+w8ZuAddq4aw9m1TlZF5t4VMF027tvjod9S0SL2aWEH9TvuEn+MnRaWMXSb8j
+Jx5/ggUe+zJyYf5AfU8S+vf3oELy4cjDXtunIr/e9a43vuRZUX3dF47USHOu
+w+yhvJTTsPNf0u4HMMO0Kr4dDs9ypfeR+RjXzSbWOLferWoCLs0xXr8SDjz9
+qYfkmTXwtnUH7MNkV7rB/MAnXYfg/moZI4zkk9L/KAnOvGxJpZH1wheZybDu
+vNJDCYvnL09LgA8GtDa2wfqy4vzdMC8t4ef3cCrrne06OMxAd2bGMj41qCvT
+WsL23glLFsJiW+rRO9Qrux+oXg7HhX1wvwtncwz618FVTM7VU3DRnKkSEZxl
+yZPvgPOMixQ+5DzfX9cvhXlBg8eFcE1MG3sabOKYpXGHpftHl3ciz4JZEosV
+5LykSxol3LTCLoADh7h7JuTCAkGe1AKuD3j+rgBeoFZVGpH9MnlLLUwzaJkc
+RT/+dh9vjcGdzg2KfnL/LnxfwSZ5F6470gH3tfhwN8LJr3ZWPCT3LZgSp8Ps
+6mCD32HBjfaVTbBEOWx7j+R5k37RDHmk3/2QqSH7yw/bBsBWgobEFnIfmZ+3
+5sLSyzH6bnL/hWvqeuFWfUgTyZdtKjRkLeBTu1bdSzEh+QxHGmyBKxIaMmxh
+O0X2QBLMd9hr5gVTWu3aEli7/SkjCubOVk6qYYO6U/lyYmt1YSPcERKUfA02
+2aVkECv61hR3woxfzjy/A5tHfDuohyWj859ehmVbHnoznJBPdPl+GUyFWw84
+watKiiOD4PwrnHERrCv7s9sBvt2Rpw+CKd9Q+n/oJ9lx7GQU2W8cKW+GjdSG
+J+Jg2sd5NXlwx5vA6Qdhdu7dyTjYf5FF3AFYMJtW6A27pGW6hsM1U3rOOsA9
+Zce42+Eshol0Lnw7LGyxN2zyNDRnNjystbJ3gUtltYV02C96tb8dnPr3UB8H
+bpz1o8oCFvtomZ6wSPX6qDGp38ZWEQMbNxlVk/6pC5WMi7BeVeI3Qu6XnGf+
+jJzvqLEehLs8o9Lp6Jd7vPvxa7J+oYeA5KHhzHk8DDdO1r0qgtm+mdvG4NIG
+06FBWHJoPNoQ7xsMqOz9biHy4xU20eGuz8HxUbCXXjPFkdS7LT/jEswrC//B
+j8zXde9qhrnRTFHsl/rjpSNw2GhVuoLUX6fQG9ngex6LtLsJ94UmCmfCKzrp
+U3pgifzO4a/h6eR/xRn5k9GG/z/9qkJF
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.23789659515192, 7.38794612872654}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwt1gk01vkaB/C/NdlfJZXtlW7WoqERkr+8OuXmpHJTpN4yIRUp68TMv6JF
+hm4RIpRJskXZalJvQpEQb0KblGgaRZahqPt95lzn4HzO81ue5WfR2xG4fqck
+wzAX8UnfGQn6Ysgy/3yoskzzX9419jD/Q0HJWjjNQbUkBj51ydcrFr5eO6Om
+meLGcwWFsLGtQZOmEcsUezrllcObf4uN9YVbBAN/XoJ9mUcVxbDq3OxfDsJr
+fYLMR+FTPOHYUlitRyhpYcwyXH6r+K4Kyww0m0T7wQw7+MeAMsuURZj7JsLd
+ZyoWf1NimZUOr2vLYNG/9w9NKrLM1l3xCxtp/98Pw0YUWGZd3arspxQ/4nzq
+kzzLTKzKze6A+XN2vxqfzjK/W0Rot9B5j/wD5sKOEbG+d2j/9GI7LzmW2dCn
++EMu7e/heh5MY5mPivrBcbTf0srSG366cvfGAIoPRiiaw1qWAZqudF6mhfZi
++Kcbn2UtYbZI9eVOOKpA4KRF+4+uPf0QTqk/2CZPcbVsH7qvKK92lwScVfD6
+0kzk05WU6UfuLnKQfA8nyjyqV6B+HJEebEE9FfpX1fXovLxrStWot6M2yMuB
+PBKaVIJ+bGx0sdlD5znda01Ev2a6v3+cRfexNsnb0c/73jmvXtD6x91XlNFv
+iaM/V+uZoJ7+DpNEuPdeZbw/zIg2ffwAx/gr6JfD/LQ5z+Qwr9zSSntJU8wz
+bVqZBL2XYYvMNTB/0s2I5rc/66PyGVh0td3ZBf78afOxNpiVcnQswP0Ku9VW
+KC5Ev20igt8iP4Gu4yNbmJ/d2jeF/Ocf26O5HRbu9RyTgPmdPfEH4Szdmz1f
+UH+z51HmJFlTb9cw+rMlY8/dBNq/Ws15DP00bfBLjqX97KhYCRY6p5ZGwqzE
+4TBH9H+bl3ueL8WdHm3MlGWZsXCNTS6wSN9jzAD+JX203YzWx30dfC3DMtYv
+G3fwyFd+q2uG88zEDiNUT2W+aAiu2tqQ3wV368d9csJ+SU1RSR3Z4F/2D+AX
+sscNblI//K5n78f9GweqE8ppf9ktTzvk59G0XaEKzqq4LdBFPYWP17k0wUzg
+wHJl1Kv9vOP0nxS/K0r7DrvsG8uifDjrc6f7Mf/slt66FTBjfaL8Nvq10Cun
+l+rtDjLwC0d/PR2XRt6m/FtLliuh/9d05SplFiF+8bV3KMxtbz/uCouMzr0s
+gsUqDhXpFM+zqb8O92dPTPbBQjXHoGg4Y02GtrkZ9gUObZ0Hz+pZ8H0/zFeJ
+EfwX92nu7RIVwVnWL5+0Ix9rq9bm1zA7YRH7BfkmqKtHypjjvqrjzjIKLFft
+xbsxE2bkNqtKyLNcRNT6EB1yaH74uBzLlSj53JsHsw6GrmPTWG5IymBID+Yb
+GmvLwIG7/aO1YOHZloJF6HeR3OolM2h948Tlg5iP1V7BO1myXZnlsDTL+JXY
+LBlCPsLZP+aeg52en2hvJZemrgmBec+qR0upniVTy6Lh8+taW1Mp/1X+m+vg
+m7VlCUeovvs6G5bi/NRpFnOCaf26Ky1iWHmJmLeX1ve55iYiH5d0JVEg3O3l
+vCgQ87/j7spEwYy+zxkPzN++/oJtEsWVF7quwfzd3+p4V1J/h7uSrTFvleT0
+wV6KH1vbpIF+DfqbhSqjnu4rA1+fo58XdMVfF8JZrmE2HPqdkvO00JXcyc76
+oshyH0eN40NofWbSK4ESy1Wc/HA0jeKbxP1bYFa8PPQuzG1NL2Lh+SeLbd5R
+P5vd+gdxnnpX3B25xVjfsYnbB/fzr8oZwkybTnAN8klaJbBzhLvdy88PY34z
+JBRKNsMsf8hPFvlbtxV88IeFGX5hstNZLq7hVWEozN/pYvUN87O7N3skks5P
+jAoal2W5EaWSsShYdOp223cZluudjDL4me4z40fqwKfFI6b7aX3y4VgvaZaL
+91B95kPru0Zu1Uihv1edjOl+LttE0wNe5fDB1Jnyi88r1ZNiuZ5DMVK2FD8b
+EKyNuJJ6RIsp2WlKwQVx3oXcfD7lZ181Vkjr3WLOapAzDyTZ4j67NTOD1Mge
+N4Wf8B5+TBQO8qhe3mrzu8hv2szqs7PI0bKJlzH/98UuRXReVsos2xTUaxGZ
+72RO9ahyPx3H/A+fCzFzovtnpbvtRX9GPy2Q3kb1rHBpWIZ+xuZEL6B+cPVT
+AQPo56sT6xsyqJ9B55eFYf7KOtOnqum8HsGTNswjcMui4n66L1X04Bvi0ard
+Nco/oP5fFWpH4fBS3mxLmG91+Wol1t8e/TveHWZNq3JWw4q8ufrhcNbcyfcF
+uG+pUsxAIiwaXVTQT7+ftuWYF9L6uOPN0vChlTuEInLvsQR5/LxaHVYybKL1
+bvO0pPHeG5ZND2in+HfOeBL9URJ3unVSfDGPm0I/I5sKrJ/Cwvy3kWqwjfPW
+4haKW/nkCdB/QYxRVB3lH2S1IV2S5UxOrI67QedtyDXkS7LM+vDevjxaf/r3
+CbEE/p7ElBekUf6Wlr9USbCcOPjNVByt12207kK8jn92/Fc6L/VaiBH2F3i3
+Xg6h/Z9LN1zG+f6KMyYCaL/1jnF6Dx3yRtf20Pot3xrUMe+j7g/9Aql/7w48
+GEW+169bRIaRLf7ofYOf/wsqyrwY2q8VE/UE7/mFRp9KCsyJD9bcwfwHLEwW
+FNN56fPtUzD/ZEF+fSPV/8bD8j/oZ1wPt3wAZmwOa3yE57znZapa4PyBd72e
+eA9Sz5/1LoGFHa4HUuHhxenjnuSMIxezMS/bFM/SQ3DWrRXHIhB3jOmYuAR3
+l+zcpyVPc6m/cZ/O04jvTMB7u9AdyLyDmb80nToxv+/0YfH//wfl2P8BT1Cq
+YQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.72092184717428, 1.8721747773942476}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwd1QtMk1cUB/BPUKljCgNaUEELIpSn1QJWBuwTdGOIkZSHosTwkIfgLCoj
+nytMcBXLYAqCo0V8ApH4BGGKghMVkTAmn8qrDLVugB2gaxC1Asr+1ybNzS8n
+ueecf25T21ipJN6Aoqg4fMlJTU3j405TWnLa0JRi9J/o93Bvckjzdjhpjr/N
+EKmvzvvQbU1TzRtbY1tghaFffzBczJx4WQozJU7u7EKa6sz9OL0NLjiy0TEe
+1urZUAdyn954hQkcYqCb/dyNptjk6/fZBTSVf2d8fwmsLb8adh7m3D4TEwy3
+ct87noTH97ptMIBT2w9JSV0zeH6kwZWmxF3Tqx/AlI/lRRnMV7nUzcT9rQ9c
+7gaQ+tWzE0Ewx/+7j1yYI7E7Wgb3b0xpeO1CU6aRPdnjMP+N6PETWDmnPX09
+9unsKC/shGmJ/6IzsOmqmVd6YNasJvQlrMixjh2CA8sUW52Rj+vnxeum4Sza
+XhAOVxxcVc5Hv1OG2cnJcNrxbN9AWLGioisRZjIkZ/fAvTOMnINhn5IZ/qeI
+K9RfW8Lsw4CYP2BmtsylDf0GnG5sHyPz0xajCbBP081XZsiDKlerdJjf9TTv
+gTMsFFD8FNhiU3SgGC5Y+I73F/IJ9prF9SZ5Wg8eXgtnlIykLoOtFjf1XZ6P
+OXlujlaw6eTRbxfD/K49RePoJ8hoeK20Qr8rfx+/R+Zfr5LZwgLfa9X5sHB3
+tbrREvcZWVetI5Z5LNsJK+UDjTPJ/LMCzqyEq7uXptwg+RlL1i6AOSs7wqVw
+ld+rz3iwcDBH4AA3KcNbnGAfP/u9z50xL/+FOBQO0yw5Vw5r+v50OQwL0hM7
+dsLKd03FauJ45tc1pK7waHbDfLqEKJEDrPUcLs2B5e3dEgs4yyuz+SncKK41
+M4FPrQweF2Jf4eVdFA/Wf+DYMTBjHLdIQKxddZfkM5o1+SoAZk5bTz+GqQH1
+gURYeEjV9xyu23b7eAHcmyDZ3APrB36+0ghTK75R1cIZDYM2/8IKT5PH6bC9
+/KSnOfZVmC+PsYOjzeYni2G9X/35esxXIM2Pi4CTfro21xfOF3VZp8CM59il
+WuxbplFMpMG9hTFhtrD2fcST3Z/ea51THo+mPDKfum+D69965bzlIr878dpA
+WKO7fzkJ7m1xLLIl/Q8UnhiywPuJFPn/h/k2HfNuToP7V9vl1JJ8w63UPDjJ
+wHNLKvGjypoOc8yrO2lG8tGwgkWnYcWuueInTvg9FL3pyoM5u+VpR2Bmw1fS
+w3DnyLQ0CM66+SjuHLzD3bzWCI7eJ7frg0efvcltF+D9XchzXYh+dRn+w6Ww
+MIrx3Q5nuRVFpcGpD6dkt2Bq39RwJKyfvaXGCvtUDblxg4mbp+RSmP/jrbYg
+uECXf/13uODZy5RwOPBFT9IM5NNa08Amw01jLV+KYHm6Y0Qu8S/vjoXAbPdT
+3SVYEF3fHwHbT6rWqGElVxm5Bk4Ktbg1C/MLQ5xyrWBt987flsOsbKlhJ/qx
+9hf2byZ5xFbtZeAo0XBlJqw5+LCSA3twqWdKWCuqEiiwT6NKHHgO1hlXxkyS
+/L433FENt2be8EmE9Rcrwkm96QfeBGuGeYOWlJXA4snFY75wluFEAgNz5m3d
+VPsF8vAK27Ge1EcNKC9Y6DGitYTr5921bzPFXh81hWSfkBCp9x64f6t3djHM
+jsruiWB5W4/NOrjXQew3F/70/+CIOjlN6P8BDe0+ig==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.763809742330267, 6.7361902576697315}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwl0w9MjGEcB/BHXX82yUVDu7t0FNGViqiQt+2cs2ZyazlpIR3RcbJLl24k
+1cr5EyPpMKzlRKflxS01x26c2erK2TXVnFxlw/zLn66bfJ95tnfPPnvfve/v
++33fV5irkim8CCGpOOj+fy1m/u/zGdK65mjeBpij9n3jDfOX7l3RAFsUiojx
+eQz5Y2qUvYe5P2S9b2G2+6A5Ioohcn7mGRMsve41lANrw3eZK+CBIt3Zk/BY
+YrdSAovt4pQWOFhpDSdwovQFMcOetJlOVsgQ5+z+Jguc7S937IZNDd/uP4LT
+dQlZfFjJ25/XBMe2LGx8HcaQ89N7aqrggMvqtjq4o72zij5/7JdYkAsv8/FZ
+EEfnYZ0/k+B8rzTNFFjT//z2XDi2LexOL/LkP+O4Z8Jfiy+5bsIaY/PgLHgs
+pZhbAWvdExcWwo07iGUPbM1YbhTDrnrV7K2wMqqSq4TNkjbdFrhvU7hQD0uV
+jl8K2E5kzi5Y3hxdUgabbJlBHORZ5rxSaoA9xJC3gub/u/nhANxqn7yhgC0n
+9kt4mPfAjJUOHVwdXtOxAy4rf6O+CUtF+yS0T9ur+JIHcGL50y43zC9sqHwI
+m2ctX7BOxJCTvsy3W/R+n7+IzsDBwic9p2CWZSa64U/vuO6dcIBPkZ9fNEPU
+gZ1founzCt5J4uGMbIHjM+2zWCNNh1mJanMTbE2tXbcdtv1cr8mC1dahhFzY
+rBAdnkbz2yUdmfS8dKO8ci7yJc2JXwNfc9Ufc4ciR+tjnQB2joasL4PPL0lJ
+HcM8msltd3lwRqdfzDM4f6RGbxOgt4u2gjq4uvqI4TpsTo5bnA9L2/28a2FD
+S0xlCmz1VGfpYbnxaTYflg/MGX4Crwo5uIQDc08/P0Rw/3pO3/hv9JW4ytUs
+gyOPvOSP035PRAruwX3jqjR/XG8Kfn+Xh/nVN0LKI+Cw0tp+mudOkNY3nVrv
+8P4Ii9cKC6tgVvdy1zya39/4mM6vIb0mCVxxzlcViLyGAC/Odlh0dVKfBXPs
+ozvp9xM5+D3SAFviVl/eC2uHN4z8gMUlZBHt12yY2pEcg/drilq7kvad4+kp
+geWD7Ggg/InXzRrhWOPEvhbMwyl0FzngD12tI4tgbajL8h0uO15wrx75PJNY
+sD/9/0OZf0nWbpA=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.613477323709358, 9.105546654636697}, \
+{-1, -1}], 
+        LineBox[{{6.999999999983629, 12.999999999992724`}, {
+         12.999999999987267`, 16.499999999996362`}}], 
+        PolygonBox[{{10.51826734053906, 15.052322615314452`}, {
+         9.683281069670574, 14.102165824326175`}, {9.280184249251306, 
+         14.793188945044921`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.823799910437668, 15.484057296392571}, \
+{1, -1}], 
+        LineBox[{{7., 13.000000000003638`}, {13.000000000003638`, 
+         9.500000000003638}}], 
+        PolygonBox[{{9.48173265946094, 11.552322615314452`}, {
+         10.316718930329426`, 10.602165824326175`}, {10.719815750748694`, 
+         11.293188945044921`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.823799910437668, 10.515942703607429}, \
+{1, 1}], LineBox[{{13., 16.50000000000231}, {13., 9.499999999998607}}], 
+        PolygonBox[{{13., 12.4}, {12.6, 13.6}, {13.4, 13.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.9452, 13.}, {-1, 0}], 
+        {PointSize[0.04], PointBox[{12., 4.}], PointBox[{7., 13.}], 
+         PointBox[{13., 16.5}], PointBox[{15.5, 7.5}], PointBox[{13., 9.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T15", " ", "P2", " ", "N30"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdief/fiijghgjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdief/fiijghgjhj.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:eJwt1QdUU1cYB/CLgwaZImisFIJYRJAYlNooJHlAWsBRYloBlREVaUQs4AAq
+tEXUQh3I0IgDBdEaDit6tKFHxRRXFKGcFmhYEkUF62IvBfu/bTkHcn65L/f7
+vv99j9hviJFumkAIScYvfSUm9A+bIf/+uDBEFv3AZvsMhrDjVaNtznh/uPNo
+y3SGpCzYekELW81ddEYIV+xMCvgNdr/1U3mBNdZ9hg/T9fy5CYIpcHCKv/Qh
+PGnpq6TvrBiiPeheY4D9Q4o9PiSwvPRghhv8VXvIFMU07DdqcGgLvLcjXOIN
+61d/4lVK+3H6vM0Q1qxpvdUHv/S1TXhiyZDE/J2DHvMZclC5u7wZVmY3nEmF
+53s/7+qE61gX827B7BZFlBE+T14KDd/DR3bapHrAfsHWKxe4wu5PVN9Sd6Vv
++BK+ti+to5La2aRmM1xvuEI1Gf0Sm6CrcXDyvNvH/WCL4ASzLbD4caQ0FR52
+WbkuECa77o+VwhzPjR3ucN1IavRdOm9F4j4WnLm7IKAaVvok//wn+hG/iFmv
+hjVqS6vjMCc+evd+uOtrq8frYKsi1yoxzMspEtvBK66lyjvRn0yukz+jeXo3
+t+yg84mjVl6GT5mVpXdjftVVo9MHaH7fhf8SRvO4E579Dc3PZ7/01lSG5Lre
+/iMM1loEXnaE89W6jaGw3P/S2gMWOD/lwPEoOPbkilVvzBnCN/zY+kfYz6nn
+s0dmmL/o6u0yuGLp9YgBU1w3K3rkMcy6GN68EB5e5BLLQb+Zx+IaT5ug/86n
+CRGw7GDeck9Y/uiSaQnMm7q22hhmvXs2oR/WcPu/p+5q95mzBHnppULhp3BK
+aNj6RFjbfq8qHSbxQb1lcL5y4cAQ3a92xq5mWG56U5KE+kQqdxih6xPOB7PQ
+r944VW3ExX2zbIx9BNYq35cYw1r+tdJpmE9Zl8h9T/fvL9Imw4xxPPspPNwm
+4N2BOcGNrytd6X02z60LTm9yup8BOzEOY62wdrBdEATrPNf35lMHneTPoudd
+FqhdCMtemenbMJ+u7KczOajP8/OJOgsn2lX23UG/wT4mg1vgrriP4v6g8zSc
+ihDQfNTysuvGqMtMXTyTXp+V8XvWFJxv/LkoA3p/O862XmOEfMxNooaQf2KY
+TZgtC+ed4Nz7Fk4pGS14aciQ7uyXpub0et/SzbWTcV6hN614tJ9nDStrJqG+
+geZSKBzcqUjpmYh6oa+Hj8IWfxbKvWBJzJydjbSfr2Kkv03A+zx7iQ3m02zy
+8tgOax6kxUbAsRmaikBYFsAqKHalz9XMcTnMrmlXv4ZZu34cPwc73bx33Znm
+n5laPJHW899jGQpbeKqXJ8NMle2hPXD6ushnk9CfTnxCcQqu8+VWZsOq8jjB
+BZj/TtDwIeZR5nl4FcKZ35zZkQ2zN1VZZ9Hz9mGr3sD549va4mC5fLl+HvKQ
+e0eu84VzawSmS2HOp6q2aTDx54hnUQuJPb2f9E+F9ffx+UT3N9w8+jxPnxvr
+B6tcTvBldH3NFjcF+smdFBjjSM/bvP77CvSvuhHe1ou8cu2WNF6heeVtZbQ0
+f5KXrDDA/navO5XUfuHsCIL1u0dyFfR5mfzXDum4iGhm5MRnw5JziysevRUR
+mef+oVM0fw9b1YEREelKe9x6Be6WjmsjhkQkcU/t4lY4P/xv5x8GRCRlY32M
+GfpJOTza9LxPRFhFAbJl9LwyZGPlvSKiSxuVH6L9v7cO1PVgP3N+Tj3Ms7/x
+IgKWBGRdsUEemoHKPik8PF54YgN1ZEnfCbh7VaETzVtWlvSRG/aTK/amtcB6
+x+f6yagXW2sgNlqAeWIdig37RUQfc3OrM2zhmlRti/50XGG5AOYls7fxBzHf
+Erswb5hpSrgmwDysh8l7+LC+/27VzGERCW6JbOHAJIh//FeYU9JS/Q71uptb
++abIg0Oyv6yl5585KGbBOsuonmO0n7eOhWdxPX/k8r4QmPnCs12H/SVPq7l2
+dJ6t2tUlqE8ci2d30Plttzs40P72bU6j969EXdfki3kyH2xbkUTz8gocc8L8
+uU82GK6GZU2S86pXmL9d+PtS+v+m8coH9V0iogzJmc+l+Vf6Szo7UE+ofke/
+bzRZvZ3zHyIPxcxohq7zTtuzG0SEOW3bF0ZdtGjv9XuoP3o+ZD/9PpnoprFU
+Y74Xz+s1rv9/Tx8R/PfKZf4BIR3UrA==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.545705156331749, 15.828020625326996}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1Qs01FkcB/DbZJnFMgyKoxojPeWV7anmrweKCoW2nWrSU1o7JVJLHq3X
+JKaIHtLUqdSUkkUhNdFmNctO6JSIOdrooZo0FZrY7z075zj/83Hv/97v73fn
+/x+70F8DN7MIIXvxR6+kYxifUQzR0KslQy4V9r7KhMk/Hg1Z8IH9BgpDWGrm
+sP5H+Bbb5+MeK4a4jEsf9cmCIZdv6q634f/SNyP1m2Ar/p/n5sKykFBFA3z2
+uPD8KVyZHLvlL3EtWPlqlwGuxRYmk3iYF+l5but+LkNEI9h+u2B2QP50A1i1
+7O3Gp3DJTEvZeXPMr77+LRD7nrU6sk4I81obHz6Cp5XrdTvCKp9YCyFy+hZ1
+rR8Fy24cbeiAu59xL9jAaqdqt5DRDGm63BzgDhMnx+HbsNvG2qciev9Q7T2O
+NUN0M07eOwlr/Ba7+cCL6qa0dsLSnfa+oXDB3qrwicjH0+NnroWb+RFnd9C8
+d+rZc2BHkfruJeq1FcEDWF981WdPK+zi1ZZRQPdT+475AnOqM8yc4IKt5v1D
+MIms2FiEvGuycza/g/1vPGjmw4dPXBmuhRkVcTuKejXP3a/G0/ms4Ggj2F7r
+dZFP1z+8bksG+uUqSd90jfbH/495Y+FfmkP2Tqb9kK9cex99Vz0TRhw1w9XD
+XD8drnL6mtjPYYgiSGoXBq9URm9eDUvjpLbbYJMPp7ujTDH/VmpLMqzu5NT5
+miD/UuFxBcw+umLkvB+wv+nchZbYz4+zTxVojP22hf0cDwdHFUpyjJD3Hit4
+ALbqrw4ygF0ay1tjkb/dmdVWZIg+1feYjUS9c4wrJqTB6iyWQTIsEucWZsPF
+0cf7v8LmVt9WKKmrS0s3oH+KA+sfT8R6jPR9TzEcsyBytIzu9z4o9AWsVkam
+TkYesj19mQ4ur4+tvAn7D4kDtPBNvs03T+RXm5w43wDrBk/2VMCiL2EmErhm
+UkafJepNSFx03xFumdsy5AeLEhtXViJPTHypMgQmn7eumAUPHcpd5QqLRzTZ
+FKE+2486s8dYj9NZmDkOJiZeNktov6ofnclFPxhNHk+CPGLPFFNreFIaCTyN
+/OIzXFKE/h7TSsylqNc/NrQihD43bvJTm7/H+X66smYMzJ/RkDmFjfUqXQoJ
+rPvosPq1PsbH7OpiwfkTcq4Wf4e8HV137OHXMa59aXoYD1Zs2QA7pUw6GTcS
+6/d9Tr8J79bzKcljYbzp0ZHxyGN+f4qwYwTOvy6s/TSsfdIWGwy7ZMXr7FFP
+prUshkXHd+ZbyeHAUgvLLoJzaatyn4p+ROxwju2DZQNBZ2SwxPGLyAnzxdb2
+8/XQT8P2UYsyYenn2c3+8L7VrS1s7K9xkgQmwZVJ2WHZsP+tpca5sPC4JJ2P
+vJqe8of0fGy5gkQ5rFav1qPfh/LQsoFxqE8abnvYBp5xl3swBuasCXtMz8tG
+47zwMvXvqXFecFqXp/V12OV+vHst8qeYPPdJhsV6ByJmwheDFFkOMInJNJKj
+/nMHO5YewX6Kt0mED5fGaHc2Il/xMcdv59E/nxfcnZ2oh1jWWXrAL9dldf2N
++kUbhLtf4Tk1zvP7iRkWEIVzv2UJvEP1zPQvnYC46HPyjsH59d6vvAcFRDpU
+ZVYAewyX+D7+IiCabVGmNfS9Y7OgJeMT5r/gZtHzXTUtxS3uo4DwIqvGCuHx
+qje2lR8ERPYknP2APu91heEBGgFJyNNkeiHvxbJw5bF3AsI8sJ2lhGN6/z28
+7q2AqP2O8ALo93OwZEJfL+73frLqISxLDuR5Y1x0m5m6GP1SGUb5e+N+zSHz
+ExeoM7Rdze8FhFN/KlkDu5ctjH6O/Xj2S1jj0H8yJU0+iDy8GwtSnWGLoU1J
+o5GX2C82tYNFeaPzHbRwVr2DFvdrU5ZHGNH6puk65XCGSVJ4GSzzaLzrA+9u
+rzEy/4z+HUqUNiFfr0J8jQszL/stlsOxT/auuI75qoOvVXdRX3uAa1831i+W
+V8ndYYutzR1l2F96dVEOfb7ae60Oje9D/TziOp2eFzs/YD7yM8+nJSjpe3dq
+a64D+sFEeWb9Rt/Lht3Tt/cg32DKLG86fme2MqoL/VX6fXChDpWPfftUQPyv
+WMlnw4rsjXEzHiKPb3SNCE7QGdsuVKCfuyeYnaPvcfpJqP7/95fL/Ac/lbt5
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.128720493773297, 4.310154074720437}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.00000000000106, 17.}, {16.49999999999894, 17.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.25, 17.6952}, {0, -1}], 
+        LineBox[CompressedData["
+1:eJxFlA9QTFscx7fUvDJjee+JGuXPvefNY5Gcq9VkJr/8eXbVa3qkUsafVfqz
+prJpUGJRNLymPLZC78VEWhH5U2vRtsZKjJSKsJJpp2yZUYasJu0752nOuzN3
+7nzmnPs7vz/f75mhSF4V6ygSiVaQl36fjdjt9r0+IPrvQeAfLG5OOkU4VPHj
+pnkI/Jb7fMvTE1b/4zVtDYKYYnFchpmwi0FSkowgNr0yVyKaD6JIg7YuE8Gr
+8Tk1BxDh/JA71j0IGqbM+xArI9xZbBqXiuDcdHPIjUTC/S+tl6IQNA6YJsYd
+Jjwz/0SLFEFcXuHwn2WE6yoCnV0R9HgEKTbUElZvvuLbwoPb8SHD8mbCTW/N
+lYU8TM6eL3ndQXjj0FdbJA/Br3yzhrsJx6d11XrwYDl+NqDaSjhH9lOVmYOy
+yPzciB6anzgs/iwHIRd6psZ2ErZpsuSpHJgnTU7TtNH11ZnKIA7qJZl8Qz1h
+UUK42puDr6JlgQ46wjpT/10vDnSXCtPDztP6Av6yenCQsHjWwq4CwrKgX6by
+HFyVvg5/dIjWeyNl2I8DwWnE1TODsEtFVEEUB9sdZ8gfbqPnG132HOQgNHd2
+YtlWwjs7ktr0HCgjWpaupiwrLVV85uCHQTdYTPdPAK9ygYfxxTO1JTSee2uj
+XcWDUT43JukIzW+JveYKD3LjMZx4mta/r8Snl4ewX3N3eOgJ+73v/OKJoO9j
+3uYnz2m/l7VafkOQxhl+v2YjnKL44L0FQXbpor6GKZjUJ9u1bxf6rhOg7Og6
+Vo0gfd29idKY/9e17XA1+BBm/wsuKcU+5ZjFr2hX5XSbMDu/OmDrY80bzPIL
+qH566ugnzPIXb3gevtFJYPVNcu411IkFVr+mfM7tiz8LrD+XVa2atZRH+6e1
+dVT70v2j/e0ddBjsovFG+6+8x2kX2DCbT0HdsweeVszmt2JVfHZFO2bzRUO3
+akfqMZt/RNN+s1SHmT4CLe8OJ17ATD9Va9zfnizBTF9R55NV5UWY6c9/S7RR
+XoCZPpunPcwYcwIz/VrTG9u4M5jpu1fpDPpKzPTv3n3979NGzPxRo4wfk/oC
+M/+Euvr3FX3GzF/Rb/iqlW4C85/U0jTh5EKB+RP175DtjhaYf3XqP1RtewXm
+75vrB4qySgXm/3r9E8cUk8Duh/vXBryPWgR2f0gcqGAWsPvlXyACxJo=
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.25, 8.354800000000001}, {0, 1}], 
+        LineBox[CompressedData["
+1:eJwd2Hk81OsXB/BvthCSRLYMCUUMWim+3bIUlSyJrCWSuJQQqSlkS0iRrea6
+ol8pa0Ulc1WytLio7Ea3ZEmRNYXf58k/Xu/XOc/znHO+z8wwSgf+tDrEQ1GU
+wjyKIr+p4Tn8SNPU7x8pmmozXbwpcilNMXieq5nBseaml5bI0BSzvGcwBN6Q
+bTKUD3NN9F9egeuEuwdNZGnK0u71jlS4z9tWvBseHmv5eRouW/Rt2E+Opjj9
+jrE7YYkVf3tOwYWRXwr54A6X4Sf+8ji/b1o1bwlNWfwcaW2FG9pY4RvgwH08
+e7UUaIou0ZWqkKSp/JozOT4wK2OgbCMcoZIllwqzWwwzShbTVFVP9MwtuPBc
+iDATDhnNOkHMld67oVSCphLDKuJIfmJJG48xzC13EDsBu06+quxdRFPfG1QD
+TMj+vl2iWXBdcc79hTBjLubOETjAbqPaW9THCnc/uAdOlI6mM0i9HnMff/uC
+RKAHPHyQ/tcbbv6xgs8AFl8WUkr2E/skXyUPczxkl36Cj7p/mBKD/aa3ZRmi
+nvy3gUaSsGWigVIuHCgw7qwFczcLD0ihH4mlJkbOMLPtSmscXPzBpvNvOFHg
+U84cvFRfw3wWZpftEvXBfEojpsq9UT+HpSLzBm4TSonvJ/M0DNiuhPmGVNwP
+DliGeunMOhfYJOgSW1ARLsvJioLFj8RV/wVTXtfLUuBbffyPFBioJ6lA/gKs
+OWWbfhhu6KrnepL8N+b2BcT81UwNOPZz8q9vsHh2Nt2C81/+aq9TV4J16tYc
+g1fPHXfZBw/flaRmUL9B+/7yMJgxuWxjGJzuIWdyFW7QetA3iXm88fj2OQ+m
+lwRbH4ON1whN5pP9hLo5I5in5JumzTfhxPytf4TClQs8h9NJ/gaZU4vhuAuR
+18+T8x7UHH8ijudhWazmQ9bf2eJ+Bva4L5llSfL5pDL2wSx9vrV6MJc33cUc
+vr9LS0uaxO9JfrKDj7+wK5tFf4zuK2ZhsKd3ZccgzBqPTi+HL/7JOMyFqeKs
+USGcb778j/edJL9I5TK5Tw1pvSafYGZivMh7uKrpuecknOi5x2cH+jtkLR0k
+ifOYhttOVcIiX6cNNsGsbNEhcr95VTuFfGHXgx7pafBEfMUL0j9npLBiDO4a
+F/w1ALOzkpUNMe9vmVEdusrYr9/Dhsx/U2CJ22k4seHC04vw1ms3HOvhQguF
+niR4+8ydi9LLEW9+rB0KS01c+ccVtnzTa2YOS5REdefA4i+OveMl9ys4VegD
+TAWns/Jwfijz520pFfS5auu/G+GvrCUJW2BGG0eU9FOyMfOjG5yYWCi4CR7j
+sbAMgrmtHUP3MA+z0PrBs2S9n4uwLqwrctn4HEy37U++h/lqXP7icJI4p8LH
+GJ6yWB9/GKZelnyvX0hTP18IJO+BOd1OT9fC950zDq0j8XzWl1diNLVeKUlD
+htQTE7j0KqwamaP0C/XTN23fXoGL0qPP9cAsCZWIanjofJNvPcxwuOCihv3u
+8fK/ewSzC+rSSmCx6mtupWQ+90zNdFHPtBPz4H2Ye95aOA3OcF1aXUX2V9Jx
+I/dhnHOZv43sd/Os3mnYuzFejZxv+SFg/XeYHWjzWB31ia8e1HDFfHiT9/7n
+DA9b6S96Cq+wTbXJggvbtV3I+8NV00jfDzBLXmjdXvji5FVTzRXIL9wdfQb2
+65+pCoY5dW8NEmGfLI+85yvIffSho2Djt5IPxFURf+WR4Q7baknU2MHDi2w8
+V8J8wsntV2HuqmU173G+X9V5vUbihA9N5PU4M+B9iEcN9ysuzX8W9f9BZXmp
+w5bcQa0zcLG2X+5WmNE/JzZNXl/KxRPWMGdsj00AbMmz7rY9TJtVJfRinvPU
+j0TZwq4nVlNTmH99pVS5Gcw2/ctaFc78fL1+DVkf+M/tk6K4Pzq2qXIwa9+2
+9CkRPJ+5c6vnUJ+r6GxrHvyDX6Gqh9S7uE4uFvZVGU1+TuKPQvqvwzv3+Tfn
+w7SOIPszrH5sOCENpuYZnnXC/opSqanxMMtCveMnbFxa7hNL1gdd2PEI9eiZ
+xK9NgtlVb6lk1K/Y3pGbDSeGx6VsQn9VtSYClWS/9oTCIvjlJVvlXrhQ/8rZ
+5ZgPr/xlW2nUX7hIl3sBblGLit8Diw/pz/bBlwW37E0m/W6/m6mHeZs+kxho
+I/l8KRu9YL7dRdtU1RH3+ro2ClYQoTYehympHyNx5PUmdiW6EmYere0KhAtf
+Tv0UXIn6OywizOB3E+khO2FOTXwoDzy+46RSHMxc/qdTHnl/sgq345B4eEau
+Pnl/jerqGoT99N8ncdCPs57lB5FVqLfKYmAz3KSyaVYZpvTDC/7EPJ6sf79N
+C+bWVO/0xLxupLlu1oYZb0QZPphnRNSRLlWSz4maIc9H+ppfuBRM/y+zvHYB
+TWnHaXbN4Txqa+ozJtz3yvTjR5h9w7z9uTDujzPz4QuYJbqs9gJs3jWWcYvE
+8wSMouCHCsrPE8j61xb/lMJzbrn7TpJ+vj/Jl8B+EqlPtnuReYxoWWfCRfa9
+Jm7ER+dWm6MeWaW7eQfI/hlsFWnU+3eGgbMvzPgf78cJeEW7+FAE2S/YZisX
+/YX0RLvlwlzGw6Ia9J/iaGzdSGxn2GyF+dRIXO6bj/4aol0u3oeD2jO7jcn8
+5KkJYcx3aMd4Ruwqcr6nogWZ9/X5G5pJvmfV10D4X5GkNIYG7pfYo40x8PZh
++2gf2DWmq+sseb3t1a0ugznvmv91hZc4a6tRmnjuE5/k1GAnevn/tsDUTHXD
+O5yfr2AVEwoPa6tPHYPDy4Pt8jXJ++dQ6yzqP+htx98EsweOeM6D3cxkvn8l
+68/bJk+if/kj8iNzJP/tWOcg5vWXcaO5wGr06/+2vQ/zTJLNecIDs3afejqF
++d/xmvGbQD53XGJOBQ593tj3AWacL60+IYTX+zzN6VoSf3LjxYggTS2oOFhy
+B2aFruvIgvNujpgkapLPd7v3p2Bfl4LR48QeSz0SYHog9YsDyW9yFGyGJdnz
+t5iS/YTElEyxf13WqWp9Un/DcoX/4HU9L/jWk/ys1gI26vnndcSKzSRfOVop
+CPW75MZ83knid9/ccUR/VTdbUrxIvXdlh0zQv+QqL6Hf9bzjM9bA829KHWRz
+SLyqz2EO7ntwYs80We/yJLwc83vj9ibfAPMQZ5ulqJP70Pdp5Bxs2X4pwwWe
+C6pUfA0zM/2Xk79PcguUFshpYf7rDoRFwnWseYGesKvBkCB5Xl9bnqgVwYWW
+RzeRz8OCmRX8EzBTeAGbgqM/6qqt0UZ+jn/ITpzvbsL+5gWzesMEAlGfobi7
+bApM+ZtsC0c/kyqO9Q9gdmfDw9Po9+X91NTXZH2LRtExzKNMqDWmDWY0uVd6
+YV5vdRWVO0i+oaSjL+Yps3KzZTPMeW7jHYv5p42WeT0jcd+Bpur5+Puw0FXu
+LtkvTE5RA1b207FLhrnG29UqBGhq/2lro0BST/mDFhZ8c/HChfYkrqA1Pxge
+0inmMST77dN3yIatqryN1Eg/jYOWM/CZAMZjKZhu7HSMwP4T1nqaYmR9mM9i
+HdSTwas2RMzxEDz+E64Z6JyUIfnheRvbUH9F7tJ32qS/zw1mT9GfolNOpiXJ
+39UnkY/+k0WCB0LJ+U06ouT9Sqyy7kshyZd9oGSN+W1vnPD8SvJ30/KzojTL
+zOrQARkm6jN8IRouRrNsItvFDWFGgE52O+ZfKZCk507ixcXuvAtp1i7NeQWx
+ML117Nsk8n1Ofj5YSOJnp+aXw++1XQ2ayfqi7EwzWNX9ru44TLW8KL2F81LW
+qXtI6KA+4dt/fEJ9u+Y3yWrAnIZH/82h/jPlptWGMO298yIvHPkwRnKnDnl/
+4zCn0f+iyqRBW5ibu87kqyDN+izicdSexLVtDw3Mp1k3c0pH7Ejc/sOrKQGa
+df7S7AIrst+oyLQy5r9vLCzUjOTvFdngz0+zyqoE1TeReIKX5QAfzdKRNZPW
+IvWYP9yUDH97eMdNkdSb+nHElw//j0xcU10EU+7a9GnYodKGxUfOywquq0R+
+dvFo0DST/L/zTZKJ/ROiHKdHyXxq792qhY9lrn49QuIar/ZFor76ILe4MTKf
+uI5QB9wH78cfL/8i8+sJczLC80/qOSwpTOrtW5m1Uohmufeyp+RhxrAVW0yY
+Znkzf46vIVYa4/sIt/Q3xOwh9YVVLmIvoFnmf/fN+RNbaSnqi9Cs0nfiIVdI
+v5f4xm/BwoasHw+JlW2WDsGZZSlePcSFpQIzeD4OkbG35+vCVdqOrYhfTQjP
+1oS5oyYfziGu2/aX0W6YmvSP+oXzHEeOxvvCnKN+RuZ4fip3mA9jYJZR9asT
+uK88zPcMNvHaG6ci0I+aL3d3Edlv2v4pC/2ypzTEKn6bjxuA5ynm7ub0FGYE
+DR/2Js/zcOfJZyRepN3my4/6ilRaOKS+TgeVGDwPe7kpxXIS19fe8pQXn88l
+Rivuknqm0xtV4P2LZbp/n19o3lDCg3m98nK6RNZ7bDQNgBvDPSrCSb5M7+rD
+PDQlHBGrEAiz+1fuToA3151NOkL6bfaz+Ix8zrMoqQPEA3seePPSrN32ZdFO
+pN533lukUM9Bv+o0YtdV56hu2M34VC3J56799fQx6u8M2evqQ853WhV8A/3t
+MA04Gkb2m1FKvoj+136Z4ZD6uLJXz/vgvtfKCU7lk3qGv+hswPxUJbmB9STO
+d3X3J1ho9aWAIbLftr2tRzFvtWB3Hgk97Leu27kG92O2v3/JBpjbG2Q+ingw
+c8tlZ5hhflx6EPEfN/idI2D2++iDBYjvN/Dff5Osf9z6awviBbKa0bVkvc3J
+2ly8Hlv0d8z26pHvJ8yv/Yf6Zsn3N2Q/8v2NIP1/jDpz6w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.272475489649668, 5.171062742038147}, \
+{0, -1}], LineBox[CompressedData["
+1:eJxFlgs0lekaxzeSRqXt1rf3/oQ23/apZJtFUapHJyWqQS41yiW3UeO4zHHN
+uERYFKUJKdtWNGWXsyu3cRuF9tAocteFVHLUaW3KYUqc9ztn1jvfWnt967fe
+/b7f877v8zz//+ojIc7+iiwWqxj9mPf/Hw589b/3SmB1OvLOiglYevPZjaUR
+iMVs1zoXAoR2TjztPxA7iqhWPQIyor8r8UsngDXivHJWiYAzdNF0qy4HWPp3
+Y9MUCRBpzaRWVSOGB3QySUBd//2kvH1ctF5iW99eAmynFZ+MPEcMLm2ueQQk
+b9QL3+/HA5bwtG/3RwL0f7u8hH7CcF+j7REO5KfkqFoBCaxEv9ypIQ68kocc
+pM4i1s9JunKQC4+UqQtHf0fclJM3PMCFXM/gpxGTiFm/Thrt54Esen72OksH
+WKGuIebNPMh4b77V4zMadxzmrTckoV8rtLHpJWJ2jeRVGAmPv0Q8fFLPrO/T
+M3eNBJ3NFu1uGYjFHw5ry0go0IrIOuTIjFdGvmgnIesP18Cjmkx8QvWNFSRY
+X0kN1R1A8SdqVLJTSLCfNslcdAWxfu3NE9YkWNbqrPKLRiyfW14ywoMjbNMW
+9iHE0qVp3/+DB8+fOS0BJ8RNw5npc1zwHBMP+3+LGPpLqXgubA1ROM2NYc4n
+xeKXeQ54VacpLypnxsM5LckcWOX3tmhglpmv8+i8BgeWFZd6HTiA4oPpZnUp
+AW6ruTVe7cx+Jq1jvAkYuL9VOO+Azqfpwl5rIwLE4rcvcgcRe69/3L2YgKfv
+4oOXhKxC8y9yrrIIeB/Kvjakoov20+w/o0XATpVM1dAixPJIxTfbCRi5HtZo
+aaaH9l8vj0Z54ubM1nxdw/DUM8koAbyTG3Ptufpo/pRnwV4OOFXpvE/ai7gz
+cPHVFg64zdj490YhlpdEl23ngs6TfaYheYhDh3ZtuMcFmV03Vy5B3NRlINvC
+Az/36qs/VDLzM5sXS3kgsXo4mFXB/H/fG2UtEpykJrLdZcx491i4PwkBH4aN
+tfIRs66FtolJyDb/Nqkygfme5rGYZhKEvWH+Vr6IE1V2K6G8CpDbTAzsQCxV
+KlhSi85NV7Z8VICYzdZ1zCKhxSNrq2gps55U2GBPwqKhOOPwCbTfzpJ/bZri
+weGer687PkB8Rm3oYjoP3kmGUtc1IJa6t4do8GCRe12c6B5idp9D109cqF9p
+3BDwDLE8zMFEmwuZpc1t61TQ+iMK2ioXOPDIyYUnWYPYMcWzjuLAOB2sUXIA
+sbfllx1NBNQoReRwzzDxu/YoBxPwWC/hbMkjZn6yZ64pqrfwbFGK9moUH0wU
+qhLQuNtv2x0vxML1NpULK8FqOtXtk4RhtQWXFQR8ut2cv2wWsXTYo9OSAEHn
+DqUiGz7Kh9bLh2IJOFEbaHkiFbGQp0R1EdC3EFtW24LY238kyIoDpunD6bmf
+EIt/3llWzoGE+ndxTQIDFI9rTe9aLhzV9AncZ4cYFExTJFxIb0g5/sATsXjD
+SzOaB9PaJ+22HGU4amfcJXReSytiDI4hPkOcPqxEwsCtTsfwI4hDH1r4oTwf
+TWsm0p0QC/9m/CqPhG3hrfOrNjHjVc56v5Lga+SrZqGLmGUz6Yvud+vMAnr4
+eLx46NJk+ws+nt+SvUlhtJWP1+fHWo9HlfPx90usTf95upCP41v4j0Pq05/4
+OP4V72Kr753n4/3F7TieYl7Mx/sveC/Kv1X91/mctNVM3jb41/n1xOhHBSkb
+4PM1UTzparvZAJ9/0q582Y8xBvh+npvVzXk3GuD7U/3GOvCDiiG+3wfLYq4r
+uxji+7etudi0R2yI8yMpO9Tn+IQhzh+z0cS/ewgpnF975jOCx0IonH/kYM6/
+PX6mcH5aSCWvXXopnL/Rh6w3dM9SOL9LI48V71EX4PxPcrt8V6orwPWx/EZO
+fdBqAa6f3rwAiTtPgOtL8bzN2/uqAlx/cDXsrs9HCten0ivLqVWDFK5fkXqj
+tlEdhet7Dzer4P4lCtd/REdpvH0ihfuDSE2/720ghfvHHafHllWuFO4vXRVm
+gjAHCvefojK7g6fsKdyftvyybmyFC4X717jgVueZ7yjc36iZhoI16RTuf3cc
+XqrH36Zwf5yI+y2ocozC/XNgICrytIEA99dTXJnYN1CA+69PfO2nXVIB7s+n
+2mYkGnMC3L9zM6HtuJ0R7u8VZqrZ5ueMcP/PF428YQ0ZYX04GPbBoJNHY/2I
+NzPp7N5PY32Z/kZVei6ZxvrjIrD+8uUajfXJ3z7B6odmGutXT5Ypu+MxjfVN
+S7P/s1c/jfWvO2a8cKaLxvo4XhI22cHM/1M/PVWCan8sp7G+BkjrZfJzNNbf
+Lcquv9tH0lifq6Naa7rcaazfkX6vC3o20VjfSaVWTs5qGut//oxMrKdGY3/Q
+mPHa21mRxv6BcztRSbJghP1FjXObuq0Kjf2HTkLwnXYujf1Jzld2+4M30ti/
+CG9Uxb70orG/+VhY/vlYDo39z/YA+c6+Dhr7I5+0+JxstjH2T6ITOtsqDhhj
+f1URlVJvWGKM/VddsFC5UG6M/Vlj64ObHZvXYP/ma98fHpG8Bvu7+LVnjWNb
+Ef/p/xYUmPda+C9XmtaC
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.0548, 9.5}, {1, 0}], 
+        LineBox[CompressedData["
+1:eJxFlHswXHcUx7e7pUobK9sWu3uzFhV772130hJvjjZBBolkZsdbUUKLeg0p
+lYSIdEIWsSE606gKCYISHcmmEYnnJlGvbT0a0WXKLKslTUhMgv62f/z2N3Pn
+zmd+957zO7/zPV9hdPKRWCaDwQhFj/Zts76NljUw/l8U7Kwz0nPqQVwdo5A/
+JKH4Y8L2xHHElcYrbZdJGOsJXv98D2K2XKpfSELDtYxDv89aASPA15OTS0KO
+71WV5jxis4S+iDMkeG+vWvfvQ1yfqZR9T0JNl5d1+KYlMCIv1RXcI8Gn89sP
+w+4gvrug8nhKgthq/8+vzmo5fYdQTEGwxHu3Ogox4wO3rVQKqkx7soXeiH1Y
+i/43KbCYu5D+3Anxzcy5wC0KXDfc8xjOiA2ONccBDWQqP9DCC7FFUvNWNg37
+XnfaqAhDrHj3GOsaDedexaWYfYM4t3xA8ysNB274/aWpQqxSqGdmaRAIHTPZ
+fYgr49uG5mloa7BZil3S5pMPFUzRIPXVPB83QvWl5FQ0dtLAjHY2yLdBXLrq
+3CGjIWaOK5p3QDzybEIVTkNowB1y3Q0xWxTHEtCQ2csy9dHuf31lT+ofFAgd
+ZSXmVogjefcfyCig60eNIl9D3DqwOHiQgtu3fBIUYyj/ZNAMYUyBJ2dL2VyJ
+OIXB4U+SYJ9bH/iGRFuvS0ZrEwmLEROB/oba88Yb7i4hoUruaBL0ixDFd1ca
+55Fg0evBcUpADB0/ivJJiHl0osWEQFwayAgqJ2ElPFyqVlqgeO3ttR0k3I4X
+d+SWIa5uvOc3jzgiy9IuFLHBkv/kLgrKyxIWlGLEkbSBayQFspbViyUmiFXu
+ccwrFNQa2X4yz9B+zz2VvUzB2kGbHPuXAmCov3xrSUyDUfjI/bv6aF9dMNqV
+SIN9X3d7F1eb347Z+wMNhS9S/k500MaLH/i0n4aPdsiibEMQT743aD9Dg8sa
+kvNJxIrGYckC6vd0YtVEnW5f86R4p0yh+9/zfTc/mNfFT5CK93ps6PK/7F72
+jGUK8fnGZiY6udu688+5GMen/KOrbzbwgjk9oqv/VtGZxw9rdfcjzxs5cDJJ
+d38V7TVpprTufi13MS9P9wnw/Tf55U5JRQLcn9ao4seHzu7C/TM3PRwQqyFw
+f0/91hLwRELg/n/RwgqqHeJjfaR99pUoOYSP9SM7Hab22ORhfTXETKkG5Tys
+v23fF6PJ53lYn3vt8hs5p3lYv9bsB832pTysbzW7aGXjOg/rf8xNxD6i5uH5
+KMy7TtlRfDw/LWUlnD8z+Hi+go8edbDt5uP5Uz4SC4bfJPB8Rg9K3x7zIvD8
+Vv7bf7grncDznT6Xt7lVROD5b2KPm5mcI7A/DD/NMuxMJbB/OJKpbWJXAvuL
+tDjjov4yH/tPSMhqjXc+H/vTVUnajf16fOxfEeNER3omD/vbM7c2d9tpLva/
+746/EyVx5WJ/9PL34zheMsf+OZTU9xNLzxz7q6JQvSbNMsP+W63W+rMp9uf/
+AHbvO2E=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.25, 15.145199999999999}, {0, -1}], 
+        LineBox[{{16.5, 17.00000000000231}, {16.5, 9.999999999998607}}], 
+        PolygonBox[{{16.5, 14.1}, {16.1, 12.9}, {16.9, 12.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.4452, 13.5}, {-1, 0}], 
+        LineBox[{{16.500000000007276`, 17.000000000003638`}, {
+         10.500000000005457`, 13.5}}], 
+        PolygonBox[{{12.98173265946094, 14.947677384685548`}, {
+         13.816718930329426`, 15.897834175673825`}, {14.219815750748694`, 
+         15.206811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.323799910437668, 15.984057296392571}, \
+{1, -1}], 
+        LineBox[{{16.5, 9.999999999996362}, {10.500000000001819`, 
+         13.499999999996362`}}], 
+        PolygonBox[{{14.01826734053906, 11.447677384685548`}, {
+         13.183281069670574`, 12.397834175673825`}, {12.780184249251306`, 
+         11.706811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.323799910437668, 11.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{6., 13.5}], PointBox[{6., 5.5}], 
+         PointBox[{16.5, 17.}], PointBox[{16.5, 10.}], 
+         PointBox[{10.5, 13.5}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T16", " ", "P1", " ", "N31"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdieg/fgfjhihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdieg/fgfjhihjij.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:eJwt1QdUU1cYB/CLgwaZImisFIJYRJAYlNooJHlAWsBRYloBlREVaUQs4AAq
+tEXUQh3I0IgDBdEaDit6tKFHxRRXFKGcFmhYEkUF62IvBfu/bTkHcn65L/f7
+vv99j9hviJFumkAIScYvfSUm9A+bIf/+uDBEFv3AZvsMhrDjVaNtznh/uPNo
+y3SGpCzYekELW81ddEYIV+xMCvgNdr/1U3mBNdZ9hg/T9fy5CYIpcHCKv/Qh
+PGnpq6TvrBiiPeheY4D9Q4o9PiSwvPRghhv8VXvIFMU07DdqcGgLvLcjXOIN
+61d/4lVK+3H6vM0Q1qxpvdUHv/S1TXhiyZDE/J2DHvMZclC5u7wZVmY3nEmF
+53s/7+qE61gX827B7BZFlBE+T14KDd/DR3bapHrAfsHWKxe4wu5PVN9Sd6Vv
++BK+ti+to5La2aRmM1xvuEI1Gf0Sm6CrcXDyvNvH/WCL4ASzLbD4caQ0FR52
+WbkuECa77o+VwhzPjR3ucN1IavRdOm9F4j4WnLm7IKAaVvok//wn+hG/iFmv
+hjVqS6vjMCc+evd+uOtrq8frYKsi1yoxzMspEtvBK66lyjvRn0yukz+jeXo3
+t+yg84mjVl6GT5mVpXdjftVVo9MHaH7fhf8SRvO4E579Dc3PZ7/01lSG5Lre
+/iMM1loEXnaE89W6jaGw3P/S2gMWOD/lwPEoOPbkilVvzBnCN/zY+kfYz6nn
+s0dmmL/o6u0yuGLp9YgBU1w3K3rkMcy6GN68EB5e5BLLQb+Zx+IaT5ug/86n
+CRGw7GDeck9Y/uiSaQnMm7q22hhmvXs2oR/WcPu/p+5q95mzBHnppULhp3BK
+aNj6RFjbfq8qHSbxQb1lcL5y4cAQ3a92xq5mWG56U5KE+kQqdxih6xPOB7PQ
+r944VW3ExX2zbIx9BNYq35cYw1r+tdJpmE9Zl8h9T/fvL9Imw4xxPPspPNwm
+4N2BOcGNrytd6X02z60LTm9yup8BOzEOY62wdrBdEATrPNf35lMHneTPoudd
+FqhdCMtemenbMJ+u7KczOajP8/OJOgsn2lX23UG/wT4mg1vgrriP4v6g8zSc
+ihDQfNTysuvGqMtMXTyTXp+V8XvWFJxv/LkoA3p/O862XmOEfMxNooaQf2KY
+TZgtC+ed4Nz7Fk4pGS14aciQ7uyXpub0et/SzbWTcV6hN614tJ9nDStrJqG+
+geZSKBzcqUjpmYh6oa+Hj8IWfxbKvWBJzJydjbSfr2Kkv03A+zx7iQ3m02zy
+8tgOax6kxUbAsRmaikBYFsAqKHalz9XMcTnMrmlXv4ZZu34cPwc73bx33Znm
+n5laPJHW899jGQpbeKqXJ8NMle2hPXD6ushnk9CfTnxCcQqu8+VWZsOq8jjB
+BZj/TtDwIeZR5nl4FcKZ35zZkQ2zN1VZZ9Hz9mGr3sD549va4mC5fLl+HvKQ
+e0eu84VzawSmS2HOp6q2aTDx54hnUQuJPb2f9E+F9ffx+UT3N9w8+jxPnxvr
+B6tcTvBldH3NFjcF+smdFBjjSM/bvP77CvSvuhHe1ou8cu2WNF6heeVtZbQ0
+f5KXrDDA/navO5XUfuHsCIL1u0dyFfR5mfzXDum4iGhm5MRnw5JziysevRUR
+mef+oVM0fw9b1YEREelKe9x6Be6WjmsjhkQkcU/t4lY4P/xv5x8GRCRlY32M
+GfpJOTza9LxPRFhFAbJl9LwyZGPlvSKiSxuVH6L9v7cO1PVgP3N+Tj3Ms7/x
+IgKWBGRdsUEemoHKPik8PF54YgN1ZEnfCbh7VaETzVtWlvSRG/aTK/amtcB6
+x+f6yagXW2sgNlqAeWIdig37RUQfc3OrM2zhmlRti/50XGG5AOYls7fxBzHf
+Erswb5hpSrgmwDysh8l7+LC+/27VzGERCW6JbOHAJIh//FeYU9JS/Q71uptb
++abIg0Oyv6yl5585KGbBOsuonmO0n7eOhWdxPX/k8r4QmPnCs12H/SVPq7l2
+dJ6t2tUlqE8ci2d30Plttzs40P72bU6j969EXdfki3kyH2xbkUTz8gocc8L8
+uU82GK6GZU2S86pXmL9d+PtS+v+m8coH9V0iogzJmc+l+Vf6Szo7UE+ofke/
+bzRZvZ3zHyIPxcxohq7zTtuzG0SEOW3bF0ZdtGjv9XuoP3o+ZD/9PpnoprFU
+Y74Xz+s1rv9/Tx8R/PfKZf4BIR3UrA==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.545705156331749, 15.828020625326996}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1Qs01FkcB/DbZJnFMgyKoxojPeWV7anmrweKCoW2nWrSU1o7JVJLHq3X
+JKaIHtLUqdSUkkUhNdFmNctO6JSIOdrooZo0FZrY7z075zj/83Hv/97v73fn
+/x+70F8DN7MIIXvxR6+kYxifUQzR0KslQy4V9r7KhMk/Hg1Z8IH9BgpDWGrm
+sP5H+Bbb5+MeK4a4jEsf9cmCIZdv6q634f/SNyP1m2Ar/p/n5sKykFBFA3z2
+uPD8KVyZHLvlL3EtWPlqlwGuxRYmk3iYF+l5but+LkNEI9h+u2B2QP50A1i1
+7O3Gp3DJTEvZeXPMr77+LRD7nrU6sk4I81obHz6Cp5XrdTvCKp9YCyFy+hZ1
+rR8Fy24cbeiAu59xL9jAaqdqt5DRDGm63BzgDhMnx+HbsNvG2qciev9Q7T2O
+NUN0M07eOwlr/Ba7+cCL6qa0dsLSnfa+oXDB3qrwicjH0+NnroWb+RFnd9C8
+d+rZc2BHkfruJeq1FcEDWF981WdPK+zi1ZZRQPdT+475AnOqM8yc4IKt5v1D
+MIms2FiEvGuycza/g/1vPGjmw4dPXBmuhRkVcTuKejXP3a/G0/ms4Ggj2F7r
+dZFP1z+8bksG+uUqSd90jfbH/495Y+FfmkP2Tqb9kK9cex99Vz0TRhw1w9XD
+XD8drnL6mtjPYYgiSGoXBq9URm9eDUvjpLbbYJMPp7ujTDH/VmpLMqzu5NT5
+miD/UuFxBcw+umLkvB+wv+nchZbYz4+zTxVojP22hf0cDwdHFUpyjJD3Hit4
+ALbqrw4ygF0ay1tjkb/dmdVWZIg+1feYjUS9c4wrJqTB6iyWQTIsEucWZsPF
+0cf7v8LmVt9WKKmrS0s3oH+KA+sfT8R6jPR9TzEcsyBytIzu9z4o9AWsVkam
+TkYesj19mQ4ur4+tvAn7D4kDtPBNvs03T+RXm5w43wDrBk/2VMCiL2EmErhm
+UkafJepNSFx03xFumdsy5AeLEhtXViJPTHypMgQmn7eumAUPHcpd5QqLRzTZ
+FKE+2486s8dYj9NZmDkOJiZeNktov6ofnclFPxhNHk+CPGLPFFNreFIaCTyN
+/OIzXFKE/h7TSsylqNc/NrQihD43bvJTm7/H+X66smYMzJ/RkDmFjfUqXQoJ
+rPvosPq1PsbH7OpiwfkTcq4Wf4e8HV137OHXMa59aXoYD1Zs2QA7pUw6GTcS
+6/d9Tr8J79bzKcljYbzp0ZHxyGN+f4qwYwTOvy6s/TSsfdIWGwy7ZMXr7FFP
+prUshkXHd+ZbyeHAUgvLLoJzaatyn4p+ROxwju2DZQNBZ2SwxPGLyAnzxdb2
+8/XQT8P2UYsyYenn2c3+8L7VrS1s7K9xkgQmwZVJ2WHZsP+tpca5sPC4JJ2P
+vJqe8of0fGy5gkQ5rFav1qPfh/LQsoFxqE8abnvYBp5xl3swBuasCXtMz8tG
+47zwMvXvqXFecFqXp/V12OV+vHst8qeYPPdJhsV6ByJmwheDFFkOMInJNJKj
+/nMHO5YewX6Kt0mED5fGaHc2Il/xMcdv59E/nxfcnZ2oh1jWWXrAL9dldf2N
++kUbhLtf4Tk1zvP7iRkWEIVzv2UJvEP1zPQvnYC46HPyjsH59d6vvAcFRDpU
+ZVYAewyX+D7+IiCabVGmNfS9Y7OgJeMT5r/gZtHzXTUtxS3uo4DwIqvGCuHx
+qje2lR8ERPYknP2APu91heEBGgFJyNNkeiHvxbJw5bF3AsI8sJ2lhGN6/z28
+7q2AqP2O8ALo93OwZEJfL+73frLqISxLDuR5Y1x0m5m6GP1SGUb5e+N+zSHz
+ExeoM7Rdze8FhFN/KlkDu5ctjH6O/Xj2S1jj0H8yJU0+iDy8GwtSnWGLoU1J
+o5GX2C82tYNFeaPzHbRwVr2DFvdrU5ZHGNH6puk65XCGSVJ4GSzzaLzrA+9u
+rzEy/4z+HUqUNiFfr0J8jQszL/stlsOxT/auuI75qoOvVXdRX3uAa1831i+W
+V8ndYYutzR1l2F96dVEOfb7ae60Oje9D/TziOp2eFzs/YD7yM8+nJSjpe3dq
+a64D+sFEeWb9Rt/Lht3Tt/cg32DKLG86fme2MqoL/VX6fXChDpWPfftUQPyv
+WMlnw4rsjXEzHiKPb3SNCE7QGdsuVKCfuyeYnaPvcfpJqP7/95fL/Ac/lbt5
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.128720493773297, 4.310154074720437}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.00000000000106, 17.}, {16.49999999999894, 17.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.25, 17.6952}, {0, -1}], 
+        LineBox[CompressedData["
+1:eJxFlA9QTFscx7fUvDJjee+JGuXPvefNY5Gcq9VkJr/8eXbVa3qkUsafVfqz
+prJpUGJRNLymPLZC78VEWhH5U2vRtsZKjJSKsJJpp2yZUYasJu0752nOuzN3
+7nzmnPs7vz/f75mhSF4V6ygSiVaQl36fjdjt9r0+IPrvQeAfLG5OOkU4VPHj
+pnkI/Jb7fMvTE1b/4zVtDYKYYnFchpmwi0FSkowgNr0yVyKaD6JIg7YuE8Gr
+8Tk1BxDh/JA71j0IGqbM+xArI9xZbBqXiuDcdHPIjUTC/S+tl6IQNA6YJsYd
+Jjwz/0SLFEFcXuHwn2WE6yoCnV0R9HgEKTbUElZvvuLbwoPb8SHD8mbCTW/N
+lYU8TM6eL3ndQXjj0FdbJA/Br3yzhrsJx6d11XrwYDl+NqDaSjhH9lOVmYOy
+yPzciB6anzgs/iwHIRd6psZ2ErZpsuSpHJgnTU7TtNH11ZnKIA7qJZl8Qz1h
+UUK42puDr6JlgQ46wjpT/10vDnSXCtPDztP6Av6yenCQsHjWwq4CwrKgX6by
+HFyVvg5/dIjWeyNl2I8DwWnE1TODsEtFVEEUB9sdZ8gfbqPnG132HOQgNHd2
+YtlWwjs7ktr0HCgjWpaupiwrLVV85uCHQTdYTPdPAK9ygYfxxTO1JTSee2uj
+XcWDUT43JukIzW+JveYKD3LjMZx4mta/r8Snl4ewX3N3eOgJ+73v/OKJoO9j
+3uYnz2m/l7VafkOQxhl+v2YjnKL44L0FQXbpor6GKZjUJ9u1bxf6rhOg7Og6
+Vo0gfd29idKY/9e17XA1+BBm/wsuKcU+5ZjFr2hX5XSbMDu/OmDrY80bzPIL
+qH566ugnzPIXb3gevtFJYPVNcu411IkFVr+mfM7tiz8LrD+XVa2atZRH+6e1
+dVT70v2j/e0ddBjsovFG+6+8x2kX2DCbT0HdsweeVszmt2JVfHZFO2bzRUO3
+akfqMZt/RNN+s1SHmT4CLe8OJ17ATD9Va9zfnizBTF9R55NV5UWY6c9/S7RR
+XoCZPpunPcwYcwIz/VrTG9u4M5jpu1fpDPpKzPTv3n3979NGzPxRo4wfk/oC
+M/+Euvr3FX3GzF/Rb/iqlW4C85/U0jTh5EKB+RP175DtjhaYf3XqP1RtewXm
+75vrB4qySgXm/3r9E8cUk8Duh/vXBryPWgR2f0gcqGAWsPvlXyACxJo=
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.25, 8.354800000000001}, {0, 1}], 
+        LineBox[CompressedData["
+1:eJwd2Hk81OsXB/BvthCSRLYMCUUMWim+3bIUlSyJrCWSuJQQqSlkS0iRrea6
+ol8pa0Ulc1WytLio7Ea3ZEmRNYXf58k/Xu/XOc/znHO+z8wwSgf+tDrEQ1GU
+wjyKIr+p4Tn8SNPU7x8pmmozXbwpcilNMXieq5nBseaml5bI0BSzvGcwBN6Q
+bTKUD3NN9F9egeuEuwdNZGnK0u71jlS4z9tWvBseHmv5eRouW/Rt2E+Opjj9
+jrE7YYkVf3tOwYWRXwr54A6X4Sf+8ji/b1o1bwlNWfwcaW2FG9pY4RvgwH08
+e7UUaIou0ZWqkKSp/JozOT4wK2OgbCMcoZIllwqzWwwzShbTVFVP9MwtuPBc
+iDATDhnNOkHMld67oVSCphLDKuJIfmJJG48xzC13EDsBu06+quxdRFPfG1QD
+TMj+vl2iWXBdcc79hTBjLubOETjAbqPaW9THCnc/uAdOlI6mM0i9HnMff/uC
+RKAHPHyQ/tcbbv6xgs8AFl8WUkr2E/skXyUPczxkl36Cj7p/mBKD/aa3ZRmi
+nvy3gUaSsGWigVIuHCgw7qwFczcLD0ihH4mlJkbOMLPtSmscXPzBpvNvOFHg
+U84cvFRfw3wWZpftEvXBfEojpsq9UT+HpSLzBm4TSonvJ/M0DNiuhPmGVNwP
+DliGeunMOhfYJOgSW1ARLsvJioLFj8RV/wVTXtfLUuBbffyPFBioJ6lA/gKs
+OWWbfhhu6KrnepL8N+b2BcT81UwNOPZz8q9vsHh2Nt2C81/+aq9TV4J16tYc
+g1fPHXfZBw/flaRmUL9B+/7yMJgxuWxjGJzuIWdyFW7QetA3iXm88fj2OQ+m
+lwRbH4ON1whN5pP9hLo5I5in5JumzTfhxPytf4TClQs8h9NJ/gaZU4vhuAuR
+18+T8x7UHH8ijudhWazmQ9bf2eJ+Bva4L5llSfL5pDL2wSx9vrV6MJc33cUc
+vr9LS0uaxO9JfrKDj7+wK5tFf4zuK2ZhsKd3ZccgzBqPTi+HL/7JOMyFqeKs
+USGcb778j/edJL9I5TK5Tw1pvSafYGZivMh7uKrpuecknOi5x2cH+jtkLR0k
+ifOYhttOVcIiX6cNNsGsbNEhcr95VTuFfGHXgx7pafBEfMUL0j9npLBiDO4a
+F/w1ALOzkpUNMe9vmVEdusrYr9/Dhsx/U2CJ22k4seHC04vw1ms3HOvhQguF
+niR4+8ydi9LLEW9+rB0KS01c+ccVtnzTa2YOS5REdefA4i+OveMl9ys4VegD
+TAWns/Jwfijz520pFfS5auu/G+GvrCUJW2BGG0eU9FOyMfOjG5yYWCi4CR7j
+sbAMgrmtHUP3MA+z0PrBs2S9n4uwLqwrctn4HEy37U++h/lqXP7icJI4p8LH
+GJ6yWB9/GKZelnyvX0hTP18IJO+BOd1OT9fC950zDq0j8XzWl1diNLVeKUlD
+htQTE7j0KqwamaP0C/XTN23fXoGL0qPP9cAsCZWIanjofJNvPcxwuOCihv3u
+8fK/ewSzC+rSSmCx6mtupWQ+90zNdFHPtBPz4H2Ye95aOA3OcF1aXUX2V9Jx
+I/dhnHOZv43sd/Os3mnYuzFejZxv+SFg/XeYHWjzWB31ia8e1HDFfHiT9/7n
+DA9b6S96Cq+wTbXJggvbtV3I+8NV00jfDzBLXmjdXvji5FVTzRXIL9wdfQb2
+65+pCoY5dW8NEmGfLI+85yvIffSho2Djt5IPxFURf+WR4Q7baknU2MHDi2w8
+V8J8wsntV2HuqmU173G+X9V5vUbihA9N5PU4M+B9iEcN9ysuzX8W9f9BZXmp
+w5bcQa0zcLG2X+5WmNE/JzZNXl/KxRPWMGdsj00AbMmz7rY9TJtVJfRinvPU
+j0TZwq4nVlNTmH99pVS5Gcw2/ctaFc78fL1+DVkf+M/tk6K4Pzq2qXIwa9+2
+9CkRPJ+5c6vnUJ+r6GxrHvyDX6Gqh9S7uE4uFvZVGU1+TuKPQvqvwzv3+Tfn
+w7SOIPszrH5sOCENpuYZnnXC/opSqanxMMtCveMnbFxa7hNL1gdd2PEI9eiZ
+xK9NgtlVb6lk1K/Y3pGbDSeGx6VsQn9VtSYClWS/9oTCIvjlJVvlXrhQ/8rZ
+5ZgPr/xlW2nUX7hIl3sBblGLit8Diw/pz/bBlwW37E0m/W6/m6mHeZs+kxho
+I/l8KRu9YL7dRdtU1RH3+ro2ClYQoTYehympHyNx5PUmdiW6EmYere0KhAtf
+Tv0UXIn6OywizOB3E+khO2FOTXwoDzy+46RSHMxc/qdTHnl/sgq345B4eEau
+Pnl/jerqGoT99N8ncdCPs57lB5FVqLfKYmAz3KSyaVYZpvTDC/7EPJ6sf79N
+C+bWVO/0xLxupLlu1oYZb0QZPphnRNSRLlWSz4maIc9H+ppfuBRM/y+zvHYB
+TWnHaXbN4Txqa+ozJtz3yvTjR5h9w7z9uTDujzPz4QuYJbqs9gJs3jWWcYvE
+8wSMouCHCsrPE8j61xb/lMJzbrn7TpJ+vj/Jl8B+EqlPtnuReYxoWWfCRfa9
+Jm7ER+dWm6MeWaW7eQfI/hlsFWnU+3eGgbMvzPgf78cJeEW7+FAE2S/YZisX
+/YX0RLvlwlzGw6Ia9J/iaGzdSGxn2GyF+dRIXO6bj/4aol0u3oeD2jO7jcn8
+5KkJYcx3aMd4Ruwqcr6nogWZ9/X5G5pJvmfV10D4X5GkNIYG7pfYo40x8PZh
++2gf2DWmq+sseb3t1a0ugznvmv91hZc4a6tRmnjuE5/k1GAnevn/tsDUTHXD
+O5yfr2AVEwoPa6tPHYPDy4Pt8jXJ++dQ6yzqP+htx98EsweOeM6D3cxkvn8l
+68/bJk+if/kj8iNzJP/tWOcg5vWXcaO5wGr06/+2vQ/zTJLNecIDs3afejqF
++d/xmvGbQD53XGJOBQ593tj3AWacL60+IYTX+zzN6VoSf3LjxYggTS2oOFhy
+B2aFruvIgvNujpgkapLPd7v3p2Bfl4LR48QeSz0SYHog9YsDyW9yFGyGJdnz
+t5iS/YTElEyxf13WqWp9Un/DcoX/4HU9L/jWk/ys1gI26vnndcSKzSRfOVop
+CPW75MZ83knid9/ccUR/VTdbUrxIvXdlh0zQv+QqL6Hf9bzjM9bA829KHWRz
+SLyqz2EO7ntwYs80We/yJLwc83vj9ibfAPMQZ5ulqJP70Pdp5Bxs2X4pwwWe
+C6pUfA0zM/2Xk79PcguUFshpYf7rDoRFwnWseYGesKvBkCB5Xl9bnqgVwYWW
+RzeRz8OCmRX8EzBTeAGbgqM/6qqt0UZ+jn/ITpzvbsL+5gWzesMEAlGfobi7
+bApM+ZtsC0c/kyqO9Q9gdmfDw9Po9+X91NTXZH2LRtExzKNMqDWmDWY0uVd6
+YV5vdRWVO0i+oaSjL+Yps3KzZTPMeW7jHYv5p42WeT0jcd+Bpur5+Puw0FXu
+LtkvTE5RA1b207FLhrnG29UqBGhq/2lro0BST/mDFhZ8c/HChfYkrqA1Pxge
+0inmMST77dN3yIatqryN1Eg/jYOWM/CZAMZjKZhu7HSMwP4T1nqaYmR9mM9i
+HdSTwas2RMzxEDz+E64Z6JyUIfnheRvbUH9F7tJ32qS/zw1mT9GfolNOpiXJ
+39UnkY/+k0WCB0LJ+U06ouT9Sqyy7kshyZd9oGSN+W1vnPD8SvJ30/KzojTL
+zOrQARkm6jN8IRouRrNsItvFDWFGgE52O+ZfKZCk507ixcXuvAtp1i7NeQWx
+ML117Nsk8n1Ofj5YSOJnp+aXw++1XQ2ayfqi7EwzWNX9ru44TLW8KL2F81LW
+qXtI6KA+4dt/fEJ9u+Y3yWrAnIZH/82h/jPlptWGMO298yIvHPkwRnKnDnl/
+4zCn0f+iyqRBW5ibu87kqyDN+izicdSexLVtDw3Mp1k3c0pH7Ejc/sOrKQGa
+df7S7AIrst+oyLQy5r9vLCzUjOTvFdngz0+zyqoE1TeReIKX5QAfzdKRNZPW
+IvWYP9yUDH97eMdNkdSb+nHElw//j0xcU10EU+7a9GnYodKGxUfOywquq0R+
+dvFo0DST/L/zTZKJ/ROiHKdHyXxq792qhY9lrn49QuIar/ZFor76ILe4MTKf
+uI5QB9wH78cfL/8i8+sJczLC80/qOSwpTOrtW5m1Uohmufeyp+RhxrAVW0yY
+Znkzf46vIVYa4/sIt/Q3xOwh9YVVLmIvoFnmf/fN+RNbaSnqi9Cs0nfiIVdI
+v5f4xm/BwoasHw+JlW2WDsGZZSlePcSFpQIzeD4OkbG35+vCVdqOrYhfTQjP
+1oS5oyYfziGu2/aX0W6YmvSP+oXzHEeOxvvCnKN+RuZ4fip3mA9jYJZR9asT
+uK88zPcMNvHaG6ci0I+aL3d3Edlv2v4pC/2ypzTEKn6bjxuA5ynm7ub0FGYE
+DR/2Js/zcOfJZyRepN3my4/6ilRaOKS+TgeVGDwPe7kpxXIS19fe8pQXn88l
+Rivuknqm0xtV4P2LZbp/n19o3lDCg3m98nK6RNZ7bDQNgBvDPSrCSb5M7+rD
+PDQlHBGrEAiz+1fuToA3151NOkL6bfaz+Ix8zrMoqQPEA3seePPSrN32ZdFO
+pN533lukUM9Bv+o0YtdV56hu2M34VC3J56799fQx6u8M2evqQ853WhV8A/3t
+MA04Gkb2m1FKvoj+136Z4ZD6uLJXz/vgvtfKCU7lk3qGv+hswPxUJbmB9STO
+d3X3J1ho9aWAIbLftr2tRzFvtWB3Hgk97Leu27kG92O2v3/JBpjbG2Q+ingw
+c8tlZ5hhflx6EPEfN/idI2D2++iDBYjvN/Dff5Osf9z6awviBbKa0bVkvc3J
+2ly8Hlv0d8z26pHvJ8yv/Yf6Zsn3N2Q/8v2NIP1/jDpz6w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.272475489649668, 5.171062742038147}, \
+{0, -1}], LineBox[CompressedData["
+1:eJxFlgs0lekaxzeSRqXt1rf3/oQ23/apZJtFUapHJyWqQS41yiW3UeO4zHHN
+uERYFKUJKdtWNGWXsyu3cRuF9tAocteFVHLUaW3KYUqc9ztn1jvfWnt967fe
+/b7f877v8zz//+ojIc7+iiwWqxj9mPf/Hw589b/3SmB1OvLOiglYevPZjaUR
+iMVs1zoXAoR2TjztPxA7iqhWPQIyor8r8UsngDXivHJWiYAzdNF0qy4HWPp3
+Y9MUCRBpzaRWVSOGB3QySUBd//2kvH1ctF5iW99eAmynFZ+MPEcMLm2ueQQk
+b9QL3+/HA5bwtG/3RwL0f7u8hH7CcF+j7REO5KfkqFoBCaxEv9ypIQ68kocc
+pM4i1s9JunKQC4+UqQtHf0fclJM3PMCFXM/gpxGTiFm/Thrt54Esen72OksH
+WKGuIebNPMh4b77V4zMadxzmrTckoV8rtLHpJWJ2jeRVGAmPv0Q8fFLPrO/T
+M3eNBJ3NFu1uGYjFHw5ry0go0IrIOuTIjFdGvmgnIesP18Cjmkx8QvWNFSRY
+X0kN1R1A8SdqVLJTSLCfNslcdAWxfu3NE9YkWNbqrPKLRiyfW14ywoMjbNMW
+9iHE0qVp3/+DB8+fOS0BJ8RNw5npc1zwHBMP+3+LGPpLqXgubA1ROM2NYc4n
+xeKXeQ54VacpLypnxsM5LckcWOX3tmhglpmv8+i8BgeWFZd6HTiA4oPpZnUp
+AW6ruTVe7cx+Jq1jvAkYuL9VOO+Azqfpwl5rIwLE4rcvcgcRe69/3L2YgKfv
+4oOXhKxC8y9yrrIIeB/Kvjakoov20+w/o0XATpVM1dAixPJIxTfbCRi5HtZo
+aaaH9l8vj0Z54ubM1nxdw/DUM8koAbyTG3Ptufpo/pRnwV4OOFXpvE/ai7gz
+cPHVFg64zdj490YhlpdEl23ngs6TfaYheYhDh3ZtuMcFmV03Vy5B3NRlINvC
+Az/36qs/VDLzM5sXS3kgsXo4mFXB/H/fG2UtEpykJrLdZcx491i4PwkBH4aN
+tfIRs66FtolJyDb/Nqkygfme5rGYZhKEvWH+Vr6IE1V2K6G8CpDbTAzsQCxV
+KlhSi85NV7Z8VICYzdZ1zCKhxSNrq2gps55U2GBPwqKhOOPwCbTfzpJ/bZri
+weGer687PkB8Rm3oYjoP3kmGUtc1IJa6t4do8GCRe12c6B5idp9D109cqF9p
+3BDwDLE8zMFEmwuZpc1t61TQ+iMK2ioXOPDIyYUnWYPYMcWzjuLAOB2sUXIA
+sbfllx1NBNQoReRwzzDxu/YoBxPwWC/hbMkjZn6yZ64pqrfwbFGK9moUH0wU
+qhLQuNtv2x0vxML1NpULK8FqOtXtk4RhtQWXFQR8ut2cv2wWsXTYo9OSAEHn
+DqUiGz7Kh9bLh2IJOFEbaHkiFbGQp0R1EdC3EFtW24LY238kyIoDpunD6bmf
+EIt/3llWzoGE+ndxTQIDFI9rTe9aLhzV9AncZ4cYFExTJFxIb0g5/sATsXjD
+SzOaB9PaJ+22HGU4amfcJXReSytiDI4hPkOcPqxEwsCtTsfwI4hDH1r4oTwf
+TWsm0p0QC/9m/CqPhG3hrfOrNjHjVc56v5Lga+SrZqGLmGUz6Yvud+vMAnr4
+eLx46NJk+ws+nt+SvUlhtJWP1+fHWo9HlfPx90usTf95upCP41v4j0Pq05/4
+OP4V72Kr753n4/3F7TieYl7Mx/sveC/Kv1X91/mctNVM3jb41/n1xOhHBSkb
+4PM1UTzparvZAJ9/0q582Y8xBvh+npvVzXk3GuD7U/3GOvCDiiG+3wfLYq4r
+uxji+7etudi0R2yI8yMpO9Tn+IQhzh+z0cS/ewgpnF975jOCx0IonH/kYM6/
+PX6mcH5aSCWvXXopnL/Rh6w3dM9SOL9LI48V71EX4PxPcrt8V6orwPWx/EZO
+fdBqAa6f3rwAiTtPgOtL8bzN2/uqAlx/cDXsrs9HCten0ivLqVWDFK5fkXqj
+tlEdhet7Dzer4P4lCtd/REdpvH0ihfuDSE2/720ghfvHHafHllWuFO4vXRVm
+gjAHCvefojK7g6fsKdyftvyybmyFC4X717jgVueZ7yjc36iZhoI16RTuf3cc
+XqrH36Zwf5yI+y2ocozC/XNgICrytIEA99dTXJnYN1CA+69PfO2nXVIB7s+n
+2mYkGnMC3L9zM6HtuJ0R7u8VZqrZ5ueMcP/PF428YQ0ZYX04GPbBoJNHY/2I
+NzPp7N5PY32Z/kZVei6ZxvrjIrD+8uUajfXJ3z7B6odmGutXT5Ypu+MxjfVN
+S7P/s1c/jfWvO2a8cKaLxvo4XhI22cHM/1M/PVWCan8sp7G+BkjrZfJzNNbf
+Lcquv9tH0lifq6Naa7rcaazfkX6vC3o20VjfSaVWTs5qGut//oxMrKdGY3/Q
+mPHa21mRxv6BcztRSbJghP1FjXObuq0Kjf2HTkLwnXYujf1Jzld2+4M30ti/
+CG9Uxb70orG/+VhY/vlYDo39z/YA+c6+Dhr7I5+0+JxstjH2T6ITOtsqDhhj
+f1URlVJvWGKM/VddsFC5UG6M/Vlj64ObHZvXYP/ma98fHpG8Bvu7+LVnjWNb
+Ef/p/xYUmPda+C9XmtaC
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.0548, 9.5}, {1, 0}], 
+        LineBox[CompressedData["
+1:eJxFlHswXHcUx7e7pUobK9sWu3uzFhV772130hJvjjZBBolkZsdbUUKLeg0p
+lYSIdEIWsSE606gKCYISHcmmEYnnJlGvbT0a0WXKLKslTUhMgv62f/z2N3Pn
+zmd+957zO7/zPV9hdPKRWCaDwQhFj/Zts76NljUw/l8U7Kwz0nPqQVwdo5A/
+JKH4Y8L2xHHElcYrbZdJGOsJXv98D2K2XKpfSELDtYxDv89aASPA15OTS0KO
+71WV5jxis4S+iDMkeG+vWvfvQ1yfqZR9T0JNl5d1+KYlMCIv1RXcI8Gn89sP
+w+4gvrug8nhKgthq/8+vzmo5fYdQTEGwxHu3Ogox4wO3rVQKqkx7soXeiH1Y
+i/43KbCYu5D+3Anxzcy5wC0KXDfc8xjOiA2ONccBDWQqP9DCC7FFUvNWNg37
+XnfaqAhDrHj3GOsaDedexaWYfYM4t3xA8ysNB274/aWpQqxSqGdmaRAIHTPZ
+fYgr49uG5mloa7BZil3S5pMPFUzRIPXVPB83QvWl5FQ0dtLAjHY2yLdBXLrq
+3CGjIWaOK5p3QDzybEIVTkNowB1y3Q0xWxTHEtCQ2csy9dHuf31lT+ofFAgd
+ZSXmVogjefcfyCig60eNIl9D3DqwOHiQgtu3fBIUYyj/ZNAMYUyBJ2dL2VyJ
+OIXB4U+SYJ9bH/iGRFuvS0ZrEwmLEROB/oba88Yb7i4hoUruaBL0ixDFd1ca
+55Fg0evBcUpADB0/ivJJiHl0osWEQFwayAgqJ2ElPFyqVlqgeO3ttR0k3I4X
+d+SWIa5uvOc3jzgiy9IuFLHBkv/kLgrKyxIWlGLEkbSBayQFspbViyUmiFXu
+ccwrFNQa2X4yz9B+zz2VvUzB2kGbHPuXAmCov3xrSUyDUfjI/bv6aF9dMNqV
+SIN9X3d7F1eb347Z+wMNhS9S/k500MaLH/i0n4aPdsiibEMQT743aD9Dg8sa
+kvNJxIrGYckC6vd0YtVEnW5f86R4p0yh+9/zfTc/mNfFT5CK93ps6PK/7F72
+jGUK8fnGZiY6udu688+5GMen/KOrbzbwgjk9oqv/VtGZxw9rdfcjzxs5cDJJ
+d38V7TVpprTufi13MS9P9wnw/Tf55U5JRQLcn9ao4seHzu7C/TM3PRwQqyFw
+f0/91hLwRELg/n/RwgqqHeJjfaR99pUoOYSP9SM7Hab22ORhfTXETKkG5Tys
+v23fF6PJ53lYn3vt8hs5p3lYv9bsB832pTysbzW7aGXjOg/rf8xNxD6i5uH5
+KMy7TtlRfDw/LWUlnD8z+Hi+go8edbDt5uP5Uz4SC4bfJPB8Rg9K3x7zIvD8
+Vv7bf7grncDznT6Xt7lVROD5b2KPm5mcI7A/DD/NMuxMJbB/OJKpbWJXAvuL
+tDjjov4yH/tPSMhqjXc+H/vTVUnajf16fOxfEeNER3omD/vbM7c2d9tpLva/
+746/EyVx5WJ/9PL34zheMsf+OZTU9xNLzxz7q6JQvSbNMsP+W63W+rMp9uf/
+AHbvO2E=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.25, 15.145199999999999}, {0, -1}], 
+        LineBox[{{16.5, 17.00000000000231}, {16.5, 9.999999999998607}}], 
+        PolygonBox[{{16.5, 12.9}, {16.1, 14.1}, {16.9, 14.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.4452, 13.5}, {-1, 0}], 
+        LineBox[{{16.500000000007276`, 17.000000000003638`}, {
+         10.500000000005457`, 13.5}}], 
+        PolygonBox[{{14.01826734053906, 15.552322615314452`}, {
+         12.780184249251306`, 15.293188945044921`}, {13.183281069670574`, 
+         14.602165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.323799910437668, 15.984057296392571}, \
+{1, -1}], 
+        LineBox[{{16.5, 9.999999999996362}, {10.500000000001819`, 
+         13.499999999996362`}}], 
+        PolygonBox[{{12.98173265946094, 12.052322615314452`}, {
+         14.219815750748694`, 11.793188945044921`}, {13.816718930329426`, 
+         11.102165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.323799910437668, 11.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{6., 13.5}], PointBox[{6., 5.5}], 
+         PointBox[{16.5, 17.}], PointBox[{16.5, 10.}], 
+         PointBox[{10.5, 13.5}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T16", " ", "P2", " ", "N32"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdieg/fgfjhihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdieg/fgfjhihjij.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:eJwt1gtQU1caB/AjtjwEIshDtlAQzAKuRUOX54rJpUKxksGAvCqMIiOIGiVF
+aYMiG4Uqsm4LiDa6FHkEDUIhIkKwyvAqRJYuEW1BsBApICLViFgDIuz/dDcz
+mczv5jz+35d77sQxPjksQY8QkoU3/STqRbz+xJA/XhyGjPyrNboQLu755pBq
+PUOazpZyXOBV9iuCLsDpaYrCMhuGmI2djjgMbw8uDbGCxS3EOAa2bKkVSlYy
+xMfqt/AQuIj11e4n1livwFlK/TDQ6/twWNpVVEXHd6RPDnZYMSTa1nKYrld7
+0XliE2x4t0onhVPO/pDTY8mQzdku/A446aqbWghry8xVc3C7p/e79rDqaZH+
+e8ivb+FZNGrBEGXUpnZvOH2fm0sLPH8hPigCtkv4beN1uPvFmN9nMCfV+3wj
+LCs5F58DW68aMuiFp+62FVyCB+Tul2dhxXeVAzUwd65l+AO6n2hBdBMeXWZX
+vgfWPF7b2wRLkoYKyuGCEya3bsE7/vPx2hHYJKvmwzo4x9rzpQ3q8xtbJymn
+eWe/rg+EZaoc9zy4UL5QuRtmX6w2E8MaG4PiFNqP2xrbGJh/rHflAZhzY/bI
+Bjjfz14YBgvu96XQ+rd87DHoCGt81tdMoz9TBi55g9hf/At/vha+qP69XAL7
+REljxLDcqc7cAm6W57ED4bkAh2/OoV7pgu8OW7j+TVW5MazOZVXMr0OOpV4e
+aSsY4toZ6zYJ9/ePnxsxx/2gqPlqFO41Dgjmw4rDw6NPYTud/92bZrh/uKzv
+F+H0rkzRh7Dg628tHbC+X8OV9w8uZ4jOffyLzTTvxiIjKQv7eXEX0mDxC/uX
+j02Rb6Qo6Roc+0vTP3bBYvYynylYZLqzWR9WcLeNWqD+OBlf1meC60LPBg5s
+Kf1C1AvLDpl/EgyrvDvPv4TnD6oS4+HmhMYJT8y/df62Xiqce1Lekw9rqgOZ
+E/CUJrxAD3lUU3rHTsMzaypq0+H2js4oer+0p7l56WAP3Y26LNjPiWsrRD18
+/QNN9Pdjm00oemB26obRRPiZvPSoKepvDk78aStdn7gdXQ1rHG6mecCiyEfv
+uMAmofWPrWCB9SLLGpYEHLk2iXpNGpQPh7CeujPPW077Me7ZkQA3PxOy9sCu
+se1ercgTPZRxfw2sjl6Ieo164pZkvp1G/038P18wok4bbGiHmRWbUgn6IRVq
+7hfDfJfLviPLcF4vOt7IhsXziooGI9wvXSLfY7BrxM6K04aYdzWqMQPWueh9
+tMuAIRMDcYtnYJsyKyZIH+OzYoOv0PkV393b9C7q6ju1vZuObz/lveMd9PMB
+N3UO5gxnxxcuxfWSsuPrkTdr65sOPVixVfTeXjj3QbBTgR7ytryRy+D+a4Kd
+obDP9sjjw/R5pIk54wt337z8d2P0K2Bf5tgnsMbrn6Fsen6Cq6ePwcrhj6x9
+YSHLQdkDF/ZXPtgMk0zha2/s90Gh/lAYnR/oklENy/6qK4uEmc6fM/6CvLGP
+pp9vg5PasrWlMP/Kre4tdH7NuJaF+nQBczn0PBZnVbATYYms7bYzrD4RsaIE
+5txL9DClz4eQhEONsKvwb7/S/HLDQ+KrsKKN7V8MC1qPvBXBZlF7zHbAhg1v
+K41hw09lc/Q8svn5Rkexv/hkjPwh+qfm+ae0IK/GykRWCscNPl0YQX1aq0Ku
+CBZtVEePLUG+Rc7nQXBSKCu9h2D8nRzNGjpfnN8XtsgjysruCzawoGFD/et5
+HlnVcNDHElYI/L+9NMcjuSGDHXaw9ssfD8fqeEQ+8bbVna7Xd9Kf9zuPKKY7
+V4fBqtr6/VEzPCL6OXl3Orzq15mVtdM8YvbkeUE1rIz+TPrpCx6JmzVPHocl
+4ifz4VqM73JKdkR9zVXLz2x9ziMaS//nsbDGoD+j7BmPiOMdAs5TlzxeWgRn
+7yUDXbBkIdyPg/Hq1dcFOtqvn1gHnLBedkLNFhb9/dtaMjVwVkzmPH0+KoI8
+f2jF/u2apBJH+vzPrTZWIp/4wJUhakY1FV/9kkcMD1pcsoWzS8z/fRb1qJbP
+WCyHlVqj+chXPMLZ358wi/3IvXWOE/DmU3O7aB7lubVf+qIfTOf1V/mw2d4h
+ZwYW2CkjIqgvj3BmMF6ZZz1nQfPPKkJCYfGf92Xepf3Krx+MxH7Ni6FFubSf
+jrsmDZBH2ZU4vo2ev21qp/3ILzk9ced9en7MXV9Zon5BTnSy1g3rSUzzxiZ5
+RMq1L/oR1rrXpSSO84i2xaOyHubcOR7R+Aj9Yl3fV+VG+z2gXjqA71d3O9dQ
+L6krUKmxnlZe2AQzxvf0Wc3oZyB38YHb//8nFN/+3+c65r9ilhyv
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.907871335428632, 17.11903631971389}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1gk8lPkfB/DHUe4rFIomWrRSE4VVmqeibJGhRLusiagkTSK5JyS5EjZX
+y0QUHTurclQ0VK5Ks6JW5yhHroxat/h/nv3P69Xreb37Hd9reCzzPOrkLU4Q
+RBP+UU+iaw4fPZL477OAJCTiUvbUwKKmYcc8FZKMysw+FAjz2pSqnFVI/kt9
+h3fLYdrnSN0fVUgizNXuUqsuSQjybca0VUgOXdKyiUPZUXF8DSz8FutlAguv
+jZh747zPz27M/mW4/6vQ8A7Wf6tZsvgaTF8rVaWN+EYvV/1zAqa925WcDdM0
+dGUcYDLfyVZXleS3hYTFr4V5vkkfeKok2RdgE2kAc/8Zn7RSI/kOyVPulFlK
+cU51aiTpdql7yAQW7CjQNFcniepFGS62sPBSPPOCOs5LRZDe1P1e1zTfqJMc
+pnVaXxzMjByZFFtIEj+Lqe0upfI94iUls5DkxMZXHXpK3W/RLi5SJ/mXZ9X0
+qXq4met+rYTHOqQeEKiXP+Ss5Q27GP/YrABzY1fen1IjOUuLVrsrwUzpW18j
+ke/AVKaBJLWufmbvBOobNXeKHcB9/HN22v6qJId46h39GOY8DMrtXUCSrkUr
+u9KoeOfD5g6jPwv7DNSdqXyiyj6KLSA55yfHFipS9TXXf7uJ+bjkHvXh09Cv
+dTGlwej/lk7Ga39YENQp5wGT6R3hS2B2Y/wpH8xD6rRdQ9ZS5Ofxuj4Z1m9w
+kJOACaWEwVbcZ/WTl0GEDvIbTgswQfz8D39clYNZYUbBVxD/eV2YbJk2zr/d
+PGGE/DcZG8UHwOwAjeVVqiRx5sXlWXuYkL99exv6IT2k07kF5uQcdxTAd5sD
+SSdY2HJ+ZAfmEaii0x0E0+3DLW9jfqflXUNLYV6mdLsE5vH1N6vGfpgMVrlj
+hnmN1PMn6chHMK/aYTvWW98J+09QJjKqrbB+VO17aDnMTb1UrwIfWPL9fR+V
+v8zkq0bcb79v9osc6uXOW/XJB/GPiwUf1oDp9wNWjCC/VeWrzeQpWy0bPaJG
+EguyNMK7cV5ZnGXThXodFBqeFcLCq3bsX+HV23b9YAvzZi/wX6M/Am2bjjaq
+vv5bqofgdtONEf/1Y0VjhDz8NFiyrHwJ4tvoTDSh/0bZR3vVYbamv04R+l8p
+Hqp6bDHytQqazYf7rG09W7So76PvzF2YVen6yRTmWdx/9i/8/YKpxRVNzKPV
+O2E75pWT8sHWGGYb97+oQLzXS1TEmzUQf+OIkjnyNSDiaRyYZLJv1cIDMW7y
+jrBgk38OE/WmqhnWb4C5j5oOvIVtoiR7N1HrHTO97uiXgj/rljvM6eIda4H1
+ta8xkmC+vRrDEPNIDOy/3EidV7a+54P+a9eGbFZAPtxz9x7EwZHJUTK7qfyY
+6TWUs90MWi7AwhjXV9jPKd3ikfOcsqJPO+4jNuk8/j5Bmd6+SIB4A40ZexRR
+v2iF7f59cKxpvZI8zLw2WPwR85s+pvX3MPbzeEqFvyD/17LpeZVwqvvhLAG+
+n2sCr3f7wIJXXzp3wArfrwbPIF9W26L0F+jfsI75sXCYKSWj6Q+PR1cqDyzC
+/uY9XTT0M8XXNcKe8g1Fmgj9X5o9eKoEeTLXPwt5j3n6rScZ82DRKcH3QVhG
+520HvmcEvaBPejHu27/9okEb8uKryjr64L7N0977nGDRk0mJJ3DwCs133chL
+MJE9tQXzaVrs++I8zLGUnG2GO2T+XOsKpxb2aO3Fuc60rpSfYPZA9WwP6vcN
+sp6/DuYqyf1yBP35ckDAsoUJDY/N3cjjZPva5WyYvkLrnC3yNPU89ugKtf+Q
++Mo09F/zSZuwj7ov38O9BuvrdbWS6IgjKJP92oz16m5hbhDMM29lVcCZVi7T
+ZTBXp/R5LOy1+uEM5kCQG7dK4ueVY1ZUXEQgLnN6aONzPAPI6BEpPIVGYWJ7
+kF84rVJqDPtZyzmP8fuBkGu/t6+Juu9pQNFWPB8kpHw4hSen5eD3GtTPDzje
+RKP6tclTehNcJvuo5irVj792RmF+nJXqTWnasDK7c2M4+t1Z4a8ZiydHa3iC
+gXVLo5ieTswt9dzx0WX4f6eaLnErWJif3KMH24Yl5uYqI59dD/62wX6Tghs3
+JWCB7mWlOKzbp/x5YlQR+2dpnp3U+TbWsCxM29y1dBfi/vvlrJ6DAvqdNxTQ
+TuVxmjVTL49+3n5ZvA95SymybgbCvOe10SLq+6nyKNcFFqpalIaiL1v/fu3m
+B6fe+zQ3AQ/dqR66DgvspyS9MQ+DPKk5ZdzP9HehV8HRGXbeKQrU+6LSYgTu
+CQu7pIl8+DlmO2XxPU0xmBdWDPN0phkS8N7IikJDJeRLWCS9xf6t1VVuGTDb
+N3FvFkzTlFb7ANPLDX+xhJP113ydg7lFtjkNyIe428cUwcSykA1b4ZcGm9Su
+w6wrLgbVqKc2pbFzDcyzm1diCpesbTCJofqjY6z+F/oxPR1LXlag/t6o8dwA
+a5vynuSiPtFsTMsb9PNLyIvaADnkMxF4JgMePZ312FQW+w/TD/nCb1O0uf3S
+iJ9j2egB79b5p6BQCv1SvecUBFfqMsUPz8d9EW5SpfBk928mdvPQv+7GzdNw
+0+Kzdo6SuC9R4dN+xC9mxMRHS2BdVS6qE8bfF8+6xTGPrzJ/+iL/g30HvSNh
+gUSR5yRcJ6Px1A7m+J1lxKH+M2fyb+yE2WVqkrLo14CyiUQUTGwv/hwBn5BV
+dXkJ8/5InHpDvY+SSwx3IB4n4+HhpZhHyKmRw60w76DfC2t4uv4PbRbyozuG
+/7od3mX5Y1cvzNrG6lgNv35z9I476kmdMxOM4b59O1VOlsO0lQluBfD9VPus
+zzD7zu+y5nBdj3/8IEyf2pF9F/mu9VqiXw2LWLY3TOEfMjfOuVD3yVYFl6A+
+zYcdAdVUfLF+Zz24m6Z7XUTl6xTlT/2cZe6WOTmOesh3CY4MeDsnbLxDDPmd
+i+UOob+t89xNCgj0y6auDu8fYixxZlnFLIMQTO8v5VLzsf0hbvkMg+Ctarte
+As+e97QommQQdFEHu5War0PPW+Y4g+A+d/imgfsvGlW82jDKIDhPtQtCYCed
+u8Zh37D/My1pGH7/kkjX/Ao7nygMRL6lx6Vu0UYYBDviL0Vx1Cf6nXM/XcQg
+SNV7salw7LdaMzbMTYu/qYH+lE3M17sJCwOSz6bDgbqPD5A4n9pR/XgKfpR3
+hKOO+5lOZlo/o/9ZMV4HNRCff1czKRRW/Pby9pp/GYRy4nBhEvxeUNdii3xF
+thUpkbDTwbwNNmMMgtY3augIjzVE9yuhPr7Yim/z4aSKLI8MWJBkKSpEvHi9
+PEEtrFxdftQYLq3QE0ui+lGTUV+C/BPky3sHcB/nk93UUtj1g7O8kIqXctMz
+E/W/f7jtoh/yIY/v37YIVj5pZJJL5T/sEFmMfqWMbnYORb10lw4l6v1nLbI5
+8tMgg2DtluiRofrdNOtH70W+u6MSeqh5XfSLkPmIeTWYj3+EpUtHpAY7cL/1
+s7A5+OSl6Vo7Ac4f8K2yxHnhuGDd+hrEC9W/Q723/vtkV///qUb+D6LOr4I=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.922596693736967, 3.8067338747393404}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000002274`, 17.}, {13.500000000002274`, 16.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.552325660469876, 17.180083206945802}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1ws4lNkfB/B3RZQwqywh5JbrmCKpqKmtdkhWUs22RhIaUsZ2G4oG67KR
+hkaIXHIJycrdFkYJyS1FF2I2FWqLveVa/b9nn7/nwfN5zu895/f7vec978xy
+zwAXbymKorrwS/5TS8gffSb1348Wk9KaGRZbwMKQWh8BcWVPoB9My41/8QH+
+2Wt2RwnsfI8r2KbNpPicJM1puHTZQGwEXHpxxpFlwKQYwsa4HNhxnrpqKpwV
+b3k2D26jX8sYhXUGvft/gTcY2KtaGWI+UeUFF1h98vMIHxYesB2Vgp2vTz+o
+gCdYmt6ZWD/dwHH8NUwlXwwzhxPd5s+XXwHzC4+WL2NS7YopbnrE3pKmNTDX
+sVhCh3UWdDAaNZmUB09Rlzgru1RrD9zZdH67Llyqstl3ToNJXdJbt0QBlggK
+lGphTd+KwgmsR7vn9PEC3N2bK+qCPfxKKiPgk7blKcUkn+CzQUnwQEhSwjk4
+68G7P5tgt5T3Tv4wM0+wl4b12HkNPFe4u6047Djs3MzctpWMd5QovodpCVdL
+maR+9dnLx5F/1EFHeRaJ7+PIyKDetqu/qruRfCJP306Gf4sTSoWQ+D8GvjZE
+vzyUN24pgnkc//hCWKelr+klzJ/V0FXUYVKuW9b066M+m8PVcbZwVbS091GY
+v/EnaXdYcDXv99swW+GESSBsIvtHgoIRk2JJfXI9AYcW9VzmwBPshmQ/uH4m
+3biIeMvEnZ2wNTsueQJmXplmm5F4FW4s3Rj5vWn+OIV8plotVD1hZ544k9z/
+t2cE3b/ATJWcOhr8TyL/ZS7MKHv+TIT6PufaqJXDvNUPczRhsUnIUAXcPeyV
+XoL+CJIY314nDi++6wy3Ta0bTCbx3yzdIQer2Vq3nIE9jCo4z9DfdUdlT7rB
+OsLaJ82wpKkody1c2qhr3QO37bttpkry0ZsImiX7ZYw3PIl6hLc0TTZhPv3w
+eycGYd5dW58suKC6aFuHEdkX/QtVkN+Zzj7nZpi2tet1KnleMm8rPIAlYSOT
+Rqivk/bKcwD2OH5HfAu2jRJemoHlNgpaDdAvQ7+tjgYkP77POBeWO7z7lx9h
+7vltjrlwuM23jWkwpd5t0wtfOrl3bBiOSSlLnIYXrTqeuNKESdXYpvUpLWdS
+m6cHZcNhSpttqQp73jkd2APHnKKLyHixWcuktinGZX/PJtc3XWwdOQQzCn/4
+rQ9+/qdV7zWYK9o/VAA7FyjXvoBpS1Zf+Qn2qdsnL2eG/f6F89YaLr69q88A
+pvF2SP+F+tr/uXnH2oycB7Gn+KR+l1ca62FqyzqxLNykzG63JNfzPal89Ctq
++uVOXZjp15zOJv18/qaIzO9BL53Sg/nvNO3GsL7Qkb9BHg73+K66meTvHLaG
+Bo8qs8ZzYElX9mpLWDeQVR8B81aqKx2DHTyrB7hkXMXevEOL7N/hht3EeV43
+7JAPu2Qk2BF2tk9LaIA/f+2b60TGz6kKDFFf3/qIzRx49Nvq5gDYaG93HR8W
+Pw7cVgP/MbR+IAuequwvm4PPpA3efQyzlin9vRb9zsgWyyxGPSz3J6wj8Fzl
+9K8/wILXB46J4N/EDj75ML+/7sENuEh1+uxHM7JPG3+ogR8nBxp/Z459keYk
+KYdzMxbEJMESjd2SLHJ/TZcODsI68qcSBXCWbt4NHTr2w2fRE1cyrjD8hA0z
+rBYt14G7m2RrImGuzsOdr8n5sE3RJh8WV75PvQarHeIN1sJMh5VO5HlvPqn/
+WAzrqNDqGTCjSPTyFizQjl88h345RRX5FpP4+df/JedPeIi/kwgu7TjbGACP
+5i4YPgHznpWNOMN9luH3d8GSgoVnv4eV/fb3MMj8fBkTf3ifofYzJVjIeaSY
+D7uHLsn6G/VRdLWXM8RZkTdIvcKUj2GWpP/NDaaP4FGV531kf/Y9q+jogQu8
+bZPJ/TG0Dqkl8R71P6V+hfr1H3UETZL+mWSec4A/0zUmNbGeXFy1mhCmHRLz
+neCpjnDNLjj4iGbJOZK/c1CjtC6eb96qhi6YpiEspMMM+9mDGhbI55Ox/HY4
+5hXzq8Owzs3yFja8wfXS/VvwRFt70F7YL9qbJ8PA+DqH4O/gJrtFYhN4dKCn
+3xjuGM6Mc4QlpTs4FGzeeeSWLyzn1rGrA/mIThj6h8FGYbTzF2GnDxPzLsI2
+jEVme+BokdLqDDhGa1OYGuwRXymVAwuDHkpeoB/R/w6Is2HGKV9+IXmeP2nT
+0sj6vyuuCIWFTfd7L5D5yx6xyfuh1yqCQdZ7Gmk9uh2uUDb145H4sfL5LFhG
+IW7EHWaFlJrvgi0F9d84wTWngtWOwMv9lnA2wtzNJS0i+MurYzJWxHaPzrfC
+OdpfLMzhUnaC/nySL+/pXVOYH3PsPrk/c4lVBxnE5Q88SL03S555ryfrWXxJ
+H4CvaLV0kX7FLN5upEf6bye1xwtO2TfReRDW+3JvP8lfEFV2LQ2u9Bcqkn7I
+JRfYtMKxJTr2rTAvOv7SCGyf4HZ/nMw3Tz5kCt545YiZ2kpcr17lPgNrVdtL
+M2EbxW/838MLt9wf84azGtYm9MCGj73jY+AYWSW/63B7nbg9H5aI5OjBMDtN
+p7oBFr9ZItoE14XSc3pgFt2+lOyvkST3VUPwRPRf7c3kvLa4vOc1LLd0hhkL
+U8cnXIi5nKKtu2GvH7fWkPiUgncdK+DRhcbuvTBt9ayHDMyzWMVuIflKH58Z
+R78l4wdGq2C1ELs/R8n739MuII+sH5r+ZgLmuHrvE5H4Ztt6WVy/wypGORL2
+2JScaQYHGSeO8WFGVA7lDn9yn1sQCD89uKM2FTY7rcg9ClOFNVovyPnV0F75
+33jejL4B6rPLNN13mvTHLjPyKCx2mDocCwuLlccq4fy3VaXZpJ7Tr2ik/4fU
+IjPrSPy6DmqVHpOq3jNwaJDMZ8rTPwAzDIdmpVbhXFszGxABz/qWLDOBY1zk
+gpPhu3u1AlxguWb++XS4Ulk6Iph4F7csEd7fxxzPgtm9zTeCYbFtvnsTLAi8
+MrkbTjN6mD0MGx0NLjDUI59bDOs/Eb/44D5O9s+ulTNfWzKp1sQjWuVwTX/n
+G2149Crd+AS8m57vtQK2uTjdZwOfsanMM4LFMUN+X8GH5z0x0YdpcnNjD9Gv
+Qze969ThlOat/xbDC7gsbwUSb+lSQN4XZSNvfyTrq93+NfQc3HXq7tw7mHds
+xaYLpP+ZJhXPYZuxntmrsLIL530bLOZEfGqCbTrjqHpY+DRM8jccKh5cXgnT
+LqxNN0c+L+OsXG7CzoffZwTAi22CXcpJvYOWH6pg16Rll2+R8Z8zHCn0IzHa
+cCeZv7XqpicL1v9+vdMQycfIcCwWtttcpDZD+rnFvacF3umz/8NS1JM1LRU4
+DX+8EdxhBxsFD6Vq4XtFVoZCmBfpZ9T3Dathrtb+0ji4Ru219AbYR/+f8Qp4
+osrRYQ0clxr5qB+WO//GTBeWJ99rrP7//Uaf+T/tBqKl
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.54570515633175, 7.171979374673003}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwt1wlUjfkbB/C3tN+0oGPmKm5TUkKFQQpvJYQUZUmr20iNVEyRGrwto6SS
+GoU56hYVow1ZC7fFMkq0GEupG2lPm5RC/+8z53/Pwfmc531/v+f5/t73Fm2h
+/6ad0gzDVOAP/ctI0V+6LPPfZxLLfDc2ybOGC2qd9znAJdFjZomwsfBVQyy8
+eI1mzzuq7yzouwi//7m5auFM+EK7JBOO/OdjYyTMnvp+MAIuHaub/xwWRMXp
+WsGGKT7Tp+jh+sRHNW3qLDOo3LtlA8wtvvE6CI5SMlU/BLMX2VsDaizjomf5
+YxrV4z5U/QIHRn9tvgYLnO9NzVJlGUl7XGwR2VBacEyFZXQcTrfeIGeOpXMT
+WSajJ8s9m+6f+yT0jDLLDHFrP8eTffgvGnks05nZqBUAizceiXWC5z22T7Wl
+euCrUlXYPjvBfzbZsyRGBq65G5OoCHuUzBEvhudPye3owXyizGVKWbDp4NdJ
+b2Buzmp5G+yX5JBvTfMzjgWiqehnW6f8zzWweJZfuBz6/TXp2xcJ5RU8kK+A
+eeJ1nsh8gxO+B05VwLzsS52petjPuDbcPQr2aPVd7Uzel792DNbkFSj/RXbu
+inZFfuq8p5vew31f4q9ehFccrjxlMgv9rfE/8Qq+WjQoHQGLC5w3dMKrWz+c
+q4PVumf/3QC3hXXs0tHH/g7+o/mw3inbKF9YXPF5nhcclN7mmwtzZzfekIb3
+VRUPvYclwfn2Mehnv8m0KBUD9Pnxl2ppODviis4cWGSWeuED5p2jmBBsTn7D
+u1OKPHga3s0rYObcBc3LyGtfZ43nYpjVddibgzxLnzSm68KC05+n1CqxzMyc
+pHJFqqe8PmgA9/4R495B/Ti6pN5UZJkv3cp2D2EmqPF8ONxtF5J4HmY32x6P
+hXUaJLqR5CeV/Dp46OizF7/S/QfrehyxnuCap+52qi/9mCeP/W+nHZjuSFae
+EfwO9rglsqY6x1fY/Br9Nt3xCN1D9TF1SSPmCbWPH4qDPbITBlow75fhOLMi
+qtfUub3F+a734eZ8onynbdjsinw0mjVUaF4mUs/jFjx5wsrzYXDC2b6HozAj
+KLSphiWel8sFyLtRZpemzmyWCbDvUtSHd2Q//DEQZn3M61VhfrbxuhK4L6CM
+/xr3r1Dr75I3hG3SzI/SeQhy4qzhANF5vWkwL3vrkmCYXW44aor+JuvPiEw1
+pPeHf08H/Q8ua7x8E5Z87jSUwnw1ActTymBx1plgCfKQ+T5YXwpzMw6JnyG/
+pn7FGzfIecW2DchX78T5YRHZN7lDHX60SLE/gtbP2W0RooDnl2++SUj1udG7
+NOF/akTyK2DRFcP9X+XxvCw/OVmL9rf6y2ka6gd8q7zGMZ+o4nvZfnimxpvb
+7bDA++91ilhfXmOBTz0sfmN99Qk8nLF2y2u63tlwYwH6y534pOo95cX3y8xF
+/718v9AxmNm37VMhztPlutNWAe3f2jt+E/Ouj9pUsJHyaTItvYg85Cd/MIqn
+fosyZoYgr1WPR7pr4QTpqG1qyLMzoidSMAee5XLCBm47ObJ0L9xXMWX3Tjjm
+ua5mGdXFB7WFcLStpt7kuXj/ut6FrYAbKov93GCuek/vN6zvyfdbmwFLQg/3
+roLlXC38G2DR/birQvQzwuNN5s1DPUd2qQv6Tfbukp5LPuFtw2KeGapq1yxg
+0U/B9zQxb9X9Jmsb8qOmN+PIZ9mF+TErYY9H96OHkaf67Py+hTBjf+e8Gqw6
+/jJYk+r6bXZbcB61deXJ32j/eudd1XIs41XcNKmePOGpbDSsbmX34SYsyLZY
+cgiuUvyokgIzGcN1BXBbxPO9oVRXjj40g9azcL+8i+pnjSpKYVff4X5Xmt95
+KOMk9tdrqRt2h8V73HI59FuyqLzOj/ZrPdYVjvMsE5cMx1A+kROFMZiv3sdK
+u5DWc3n6PBrz83OCvTrInKtfAPJZ8nbLMgPKJ9P23ELk9/dIbcJeWGygkvgE
+Dti9quE+za/cLjFA3sUG4evVjbBfV1H3eng0YbxFaETv97/GJvALY53sK2RZ
+NeFL3B+xI/32KMykHNlpRetHjD3UMsb61pZav09kuSPqslKmsODDwMTj6E/+
+wbTlG4zp+T7UHIr+FzrNY1xhj/Y7T50xn+cfv0zfCYtCi1qXKLKcVeyiR14w
+J8ncqY18ZEMUDgth1q2w5yd5lktt8Z7iRPult76ykWO5xQ7r09bRegdST4lk
+WSZEq9bbjOp2h7SM4HPdjk0GVOdiY0dlWG793YTwH8jX1BtlUNePGXmmQP19
+C6tZD9+tWOQ2QvN2d4w/hbW83O61weLpg7wwOXo+tj1thjmnOGUXnGfL4Sxe
+O+W3xFrJAf1yqclOY7CkP+XcNpxnTEXT0ETKI944zU2J5fz1dS/okgel3m3h
+sdyl/Ul6FjDTnNezAHlVFYal0bxcaE5+hzLLVcZ8642ifl1l+X4436yvsQ/z
+KY9Df2bfRt6fXCIKXlF+o133HqE+N0h5rpQJrl9b8zEZ9R0rBsSzYKbUVMoA
+/u3dD0rryJ9uvQ/H+v3CgmofWHLlthd+HnEDh+doRlC98dq/+ej3bIzxomQT
++v2kOPAMzkfL6cHdDKqL3F/g+4kLNPHIvgiL/uHNw/vDbRoMXk7mKpadtcb5
+HFO8qE3XS5ImCDchT6OkI0tTyCWu66Jl8L2x/PiVaFhwdf943wSWy6yb0nSA
+1tdMP54EC8RBpl5k2fMygXDAt7cWm2FWTnUj6kx2e2zAKlpP7KvVi7pqzhFt
+M7reuHI0DOsfG0kMX0h12/lZVrIsZ3RFOnIB3d+wMMgA/XUbT65cQtf7z3+n
+h/5nCo/mraR+Fn8ynofzdJxuq7+V5qu01jHB/L13cpv8ab1W80JtPL8ZMxr1
+48khic8HkFeW2QuVK7C48E/pM8jzrZHE/SW5s16Bh/Nteb/57jjlUzDB3hLu
+STqbqz+fzkvPxgznsdvxaL49LPG9eHoI70vJXKMN+8n7eviBWO+jxaSFp2HG
++sa9YuwffTXN/DrM2vIXv8LzZrXGMqKS1jusdawa/SdN0fJ/S/erPAi5juc1
+LqflThssvqTVdRLP89IB3+AuWi+vbloQzmfXSLFqB3lr2ZAv3pc9IddNm+n+
+WOVNR5G3dnLC5zpYFGCysVKa5RpHb3IPqH7z8ePV0vg+eJhqXkh1dedn36VY
+xn/nb1kZ1E/Ydt9PUiwXNHJmeSJdr28foI/r8/N6gyLnUx7rDqRgPcWlb86G
+wIK9gRpm2M9LQ/NxEPWr8JuhEs7zksDuX8pD9Lub2xfYU1huf5jWY2Vzx9D/
+Pktnv1i637WdPwHn+T4+TyWd9nfQ9pZCHsLbxUVFNN+kksp2uLx+KL/+v/UV
+8nKQn6W5h2Scrq+etdIS+aos2KA0awFcpaifjvP9cXV/mR0s2FBdUob69qN9
+8cGweOzXxGz4OTexO42uP7HD0RZ+tfaFXzksKl49cAvPj5zF9uctsOTSzw79
+2H+cPgv+//8TBfZ/11uc6w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.666233980906949, 2.1296932060463307}, \
+{0, 1}], LineBox[CompressedData["
+1:eJxTTMoPSmViYGCwBWIQDQEqDiEyIFrOgaGg63OSmYrDzO9z9v9uk3VgWLF5
+kku8ioPSsWuhi37JODBoaO52r1BxuLaBb/3LBCD/w0aDX/UqDvqbjmztPSDt
+wLBjCturUhWHfy805q1RAPI3eJmtiVJxUBZ+2RDbIeXAkPCA8Yq+ikNNZHC8
++z9JB4aK1Qtvf1d26H97fYldB5DPcX3a/63KDn84o2++0wLyG8QO8eUpO4jX
+1jVNfSnhwCAgx2KkouywPWWl0aWjQP6LFavW3VFyWLTIuKtvP5DfscJy+Wwl
+h/kz33T/vwLkB3ha3EtRcojcYaJ/gAlo3oH87jprJYcJ68uXMLsA+Qy/p7xR
+VHIQen0p6c4kIF/D6uwiSSWHdau+P5r8Asg30Hwkrazk8EG39iuvHdD9B/7P
+P22r5LDt2qvvhj1AfsAHbvUMJYfOV85Xg8+A/GdvuXu+kkPCzvcHp/0A8ndw
+tAc+VHKoWCL935kHGB4CG/TkNZUdXvAILhJgAfILGpP/Fik7+D+OC/O7B1Sv
+oXp02S5lBwab++4ss4H8iCnTv/1WdpDY/v7gO2uQ/Wck1IxVHCpY/NtTjwDd
+98IwgyVWxaF0ZnuMliWQ73HwsGq5ioOa/NH5SguA/r+QH8/eoOIw1QIUvxJw
++SfM1gl348Xh+qd0Viy+ekwMbv4kuY0Vs6zF4PYL7hKwEzwiCncf13OFHb9T
+ROHu32W/cOVGRVG4/xTF3se+/y0C9/+GM08Y9nwWgYfPykwBu0x2UXj4NVjs
+0VpjLAoP32AfUY5zxaLw8Ldwbub6dFAUHj/RFRyyOeJi8Pj7bq47VzlXDB6/
+lcUd0X92i8Hj/8KO0xfs/4rB00dWp3AJg7Y4PP1kNJwpLXQQh6ev4H1hZ3Wt
+xOHpT+hLY22WmDg8ffJJLlUTvCoGT79VphrRB8vF4Om79+SaBTsYxeDpny1O
+vH5RuSg8f/BYXU8Mvi8Czz+3Cqy9iuxF4Pkr+MDHALH5wvD8x7Fac1UsqzA8
+fxZoJzuwVAo5wPLvVjYQLeQAAACtaGA=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.354800000000001, 6.}, {1, 0}], 
+        LineBox[CompressedData["
+1:eJxTTMoPSmViYGAwBmIQDQEqDis4ITTDhdu3dtmrONz7tfe8025lBwYOlz9u
+2SoOf3P6puVlAvkvylXY6lUcDp5abPiQH8hf8TIwpFLF4c7e6gtztig5MDBU
+rVgVpeJwWHOR3IlYID8hIGGqqorD9Ss5KdqCQP6F+ZNq7yk7HEt+3Lj1sqID
+ww/VNO9uZQc9U+P/QiuBfI6qjBdGyg6rtsx6HT8ZyM9QbVtzR8nB9nYt++9J
+QP6EvTcP9is5bJyc/qF2GZD/wNKnJ0jJgf3JuY+3ToHUb1inqKXkoDhZ4e/c
+30B+xaxpdyWVHBY/iEr0Ngba/0L6u6SykoOR9oXkK9lAvsGGFCFXJYdPWkE8
+EvNB/NupX2qUHG50nC5JPQ7kW+iVSR9TcqiS8z3z5T7I/SEHiqWUHXbuCGPy
+fQrkT7gR87tI2WFrwoYVvVeB/AiFqPATyg4/OgWeT9sA5Guc1SkQVnE4oXFW
+m6cCFD4mnRx+Kg5ut1fEGOqD9O+QcSpWcZgx42PG0ltA9wbskGNtUHHwkgFG
+R4MiXP5tBd/0KFVFuH47s/DF5y4owM3f+8Loyud2Bbj9ve3vJTL9FeDuu7DB
+P7xISwHu/jMRK/9uklKA+4/78yZjbgUFuP/XdJh0z7JQgIfP5GdrPz9PUICH
+X/Az/TnaUxTg4fvIYOm8LWcU4OGfUnefKYkFET+1uoZ8qqaI+LtSO4O/KRIR
+v+5mTT9YchHxfzsmVWRBDiJ9hN85w/A2TBGefvavlanz0lGEp6+1NpNnX3mn
+AE9/B5/HPjRfpABPnyuCW/STvRXg6bejd8cc2wfy8PQt4Pn4kpKuPDz9++q2
+JFR1yjnA8scOfhAt5wAAXRMymg==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.354800000000001, 8.75}, {1, 0}], 
+        LineBox[{{6.4999999999976925`, 16.}, {13.49999999999251, 16.}}], 
+        PolygonBox[{{9.4, 16.}, {10.6, 15.6}, {10.6, 16.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 16.9452}, {0, -1}], 
+        LineBox[{{6.499999999996362, 16.000000000005457`}, {10., 
+         10.000000000003638`}}], 
+        PolygonBox[{{8.552322615314452, 12.48173265946094}, {
+         7.602165824326175, 13.316718930329426`}, {8.293188945044921, 
+         13.719815750748694`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 12.823799910437668}, \
+{1, 1}], LineBox[{{13.500000000007276`, 16.000000000005457`}, {
+         10.000000000003638`, 10.000000000001819`}}], 
+        PolygonBox[{{12.052322615314452`, 13.51826734053906}, {
+         11.102165824326175`, 12.683281069670574`}, {11.793188945044921`, 
+         12.280184249251306`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.484057296392571, 12.823799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 16.}], PointBox[{10., 4.5}], 
+         PointBox[{13.5, 16.}], PointBox[{10., 7.5}], PointBox[{10., 10.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T17", " ", "P1", " ", "N33"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdieg/giijfhfjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdieg/giijfhfjhj.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:eJwt1gtQU1caB/AjtjwEIshDtlAQzAKuRUOX54rJpUKxksGAvCqMIiOIGiVF
+aYMiG4Uqsm4LiDa6FHkEDUIhIkKwyvAqRJYuEW1BsBApICLViFgDIuz/dDcz
+mczv5jz+35d77sQxPjksQY8QkoU3/STqRbz+xJA/XhyGjPyrNboQLu755pBq
+PUOazpZyXOBV9iuCLsDpaYrCMhuGmI2djjgMbw8uDbGCxS3EOAa2bKkVSlYy
+xMfqt/AQuIj11e4n1livwFlK/TDQ6/twWNpVVEXHd6RPDnZYMSTa1nKYrld7
+0XliE2x4t0onhVPO/pDTY8mQzdku/A446aqbWghry8xVc3C7p/e79rDqaZH+
+e8ivb+FZNGrBEGXUpnZvOH2fm0sLPH8hPigCtkv4beN1uPvFmN9nMCfV+3wj
+LCs5F58DW68aMuiFp+62FVyCB+Tul2dhxXeVAzUwd65l+AO6n2hBdBMeXWZX
+vgfWPF7b2wRLkoYKyuGCEya3bsE7/vPx2hHYJKvmwzo4x9rzpQ3q8xtbJymn
+eWe/rg+EZaoc9zy4UL5QuRtmX6w2E8MaG4PiFNqP2xrbGJh/rHflAZhzY/bI
+Bjjfz14YBgvu96XQ+rd87DHoCGt81tdMoz9TBi55g9hf/At/vha+qP69XAL7
+REljxLDcqc7cAm6W57ED4bkAh2/OoV7pgu8OW7j+TVW5MazOZVXMr0OOpV4e
+aSsY4toZ6zYJ9/ePnxsxx/2gqPlqFO41Dgjmw4rDw6NPYTud/92bZrh/uKzv
+F+H0rkzRh7Dg628tHbC+X8OV9w8uZ4jOffyLzTTvxiIjKQv7eXEX0mDxC/uX
+j02Rb6Qo6Roc+0vTP3bBYvYynylYZLqzWR9WcLeNWqD+OBlf1meC60LPBg5s
+Kf1C1AvLDpl/EgyrvDvPv4TnD6oS4+HmhMYJT8y/df62Xiqce1Lekw9rqgOZ
+E/CUJrxAD3lUU3rHTsMzaypq0+H2js4oer+0p7l56WAP3Y26LNjPiWsrRD18
+/QNN9Pdjm00oemB26obRRPiZvPSoKepvDk78aStdn7gdXQ1rHG6mecCiyEfv
+uMAmofWPrWCB9SLLGpYEHLk2iXpNGpQPh7CeujPPW077Me7ZkQA3PxOy9sCu
+se1ercgTPZRxfw2sjl6Ieo164pZkvp1G/038P18wok4bbGiHmRWbUgn6IRVq
+7hfDfJfLviPLcF4vOt7IhsXziooGI9wvXSLfY7BrxM6K04aYdzWqMQPWueh9
+tMuAIRMDcYtnYJsyKyZIH+OzYoOv0PkV393b9C7q6ju1vZuObz/lveMd9PMB
+N3UO5gxnxxcuxfWSsuPrkTdr65sOPVixVfTeXjj3QbBTgR7ytryRy+D+a4Kd
+obDP9sjjw/R5pIk54wt337z8d2P0K2Bf5tgnsMbrn6Fsen6Cq6ePwcrhj6x9
+YSHLQdkDF/ZXPtgMk0zha2/s90Gh/lAYnR/oklENy/6qK4uEmc6fM/6CvLGP
+pp9vg5PasrWlMP/Kre4tdH7NuJaF+nQBczn0PBZnVbATYYms7bYzrD4RsaIE
+5txL9DClz4eQhEONsKvwb7/S/HLDQ+KrsKKN7V8MC1qPvBXBZlF7zHbAhg1v
+K41hw09lc/Q8svn5Rkexv/hkjPwh+qfm+ae0IK/GykRWCscNPl0YQX1aq0Ku
+CBZtVEePLUG+Rc7nQXBSKCu9h2D8nRzNGjpfnN8XtsgjysruCzawoGFD/et5
+HlnVcNDHElYI/L+9NMcjuSGDHXaw9ssfD8fqeEQ+8bbVna7Xd9Kf9zuPKKY7
+V4fBqtr6/VEzPCL6OXl3Orzq15mVtdM8YvbkeUE1rIz+TPrpCx6JmzVPHocl
+4ifz4VqM73JKdkR9zVXLz2x9ziMaS//nsbDGoD+j7BmPiOMdAs5TlzxeWgRn
+7yUDXbBkIdyPg/Hq1dcFOtqvn1gHnLBedkLNFhb9/dtaMjVwVkzmPH0+KoI8
+f2jF/u2apBJH+vzPrTZWIp/4wJUhakY1FV/9kkcMD1pcsoWzS8z/fRb1qJbP
+WCyHlVqj+chXPMLZ358wi/3IvXWOE/DmU3O7aB7lubVf+qIfTOf1V/mw2d4h
+ZwYW2CkjIqgvj3BmMF6ZZz1nQfPPKkJCYfGf92Xepf3Krx+MxH7Ni6FFubSf
+jrsmDZBH2ZU4vo2ev21qp/3ILzk9ced9en7MXV9Zon5BTnSy1g3rSUzzxiZ5
+RMq1L/oR1rrXpSSO84i2xaOyHubcOR7R+Aj9Yl3fV+VG+z2gXjqA71d3O9dQ
+L6krUKmxnlZe2AQzxvf0Wc3oZyB38YHb//8nFN/+3+c65r9ilhyv
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.907871335428632, 17.11903631971389}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1gk8lPkfB/DHUe4rFIomWrRSE4VVmqeibJGhRLusiagkTSK5JyS5EjZX
+y0QUHTurclQ0VK5Ks6JW5yhHroxat/h/nv3P69Xreb37Hd9reCzzPOrkLU4Q
+RBP+UU+iaw4fPZL477OAJCTiUvbUwKKmYcc8FZKMysw+FAjz2pSqnFVI/kt9
+h3fLYdrnSN0fVUgizNXuUqsuSQjybca0VUgOXdKyiUPZUXF8DSz8FutlAguv
+jZh747zPz27M/mW4/6vQ8A7Wf6tZsvgaTF8rVaWN+EYvV/1zAqa925WcDdM0
+dGUcYDLfyVZXleS3hYTFr4V5vkkfeKok2RdgE2kAc/8Zn7RSI/kOyVPulFlK
+cU51aiTpdql7yAQW7CjQNFcniepFGS62sPBSPPOCOs5LRZDe1P1e1zTfqJMc
+pnVaXxzMjByZFFtIEj+Lqe0upfI94iUls5DkxMZXHXpK3W/RLi5SJ/mXZ9X0
+qXq4met+rYTHOqQeEKiXP+Ss5Q27GP/YrABzY1fen1IjOUuLVrsrwUzpW18j
+ke/AVKaBJLWufmbvBOobNXeKHcB9/HN22v6qJId46h39GOY8DMrtXUCSrkUr
+u9KoeOfD5g6jPwv7DNSdqXyiyj6KLSA55yfHFipS9TXXf7uJ+bjkHvXh09Cv
+dTGlwej/lk7Ga39YENQp5wGT6R3hS2B2Y/wpH8xD6rRdQ9ZS5Ofxuj4Z1m9w
+kJOACaWEwVbcZ/WTl0GEDvIbTgswQfz8D39clYNZYUbBVxD/eV2YbJk2zr/d
+PGGE/DcZG8UHwOwAjeVVqiRx5sXlWXuYkL99exv6IT2k07kF5uQcdxTAd5sD
+SSdY2HJ+ZAfmEaii0x0E0+3DLW9jfqflXUNLYV6mdLsE5vH1N6vGfpgMVrlj
+hnmN1PMn6chHMK/aYTvWW98J+09QJjKqrbB+VO17aDnMTb1UrwIfWPL9fR+V
+v8zkq0bcb79v9osc6uXOW/XJB/GPiwUf1oDp9wNWjCC/VeWrzeQpWy0bPaJG
+EguyNMK7cV5ZnGXThXodFBqeFcLCq3bsX+HV23b9YAvzZi/wX6M/Am2bjjaq
+vv5bqofgdtONEf/1Y0VjhDz8NFiyrHwJ4tvoTDSh/0bZR3vVYbamv04R+l8p
+Hqp6bDHytQqazYf7rG09W7So76PvzF2YVen6yRTmWdx/9i/8/YKpxRVNzKPV
+O2E75pWT8sHWGGYb97+oQLzXS1TEmzUQf+OIkjnyNSDiaRyYZLJv1cIDMW7y
+jrBgk38OE/WmqhnWb4C5j5oOvIVtoiR7N1HrHTO97uiXgj/rljvM6eIda4H1
+ta8xkmC+vRrDEPNIDOy/3EidV7a+54P+a9eGbFZAPtxz9x7EwZHJUTK7qfyY
+6TWUs90MWi7AwhjXV9jPKd3ikfOcsqJPO+4jNuk8/j5Bmd6+SIB4A40ZexRR
+v2iF7f59cKxpvZI8zLw2WPwR85s+pvX3MPbzeEqFvyD/17LpeZVwqvvhLAG+
+n2sCr3f7wIJXXzp3wArfrwbPIF9W26L0F+jfsI75sXCYKSWj6Q+PR1cqDyzC
+/uY9XTT0M8XXNcKe8g1Fmgj9X5o9eKoEeTLXPwt5j3n6rScZ82DRKcH3QVhG
+520HvmcEvaBPejHu27/9okEb8uKryjr64L7N0977nGDRk0mJJ3DwCs133chL
+MJE9tQXzaVrs++I8zLGUnG2GO2T+XOsKpxb2aO3Fuc60rpSfYPZA9WwP6vcN
+sp6/DuYqyf1yBP35ckDAsoUJDY/N3cjjZPva5WyYvkLrnC3yNPU89ugKtf+Q
++Mo09F/zSZuwj7ov38O9BuvrdbWS6IgjKJP92oz16m5hbhDMM29lVcCZVi7T
+ZTBXp/R5LOy1+uEM5kCQG7dK4ueVY1ZUXEQgLnN6aONzPAPI6BEpPIVGYWJ7
+kF84rVJqDPtZyzmP8fuBkGu/t6+Juu9pQNFWPB8kpHw4hSen5eD3GtTPDzje
+RKP6tclTehNcJvuo5irVj792RmF+nJXqTWnasDK7c2M4+t1Z4a8ZiydHa3iC
+gXVLo5ieTswt9dzx0WX4f6eaLnErWJif3KMH24Yl5uYqI59dD/62wX6Tghs3
+JWCB7mWlOKzbp/x5YlQR+2dpnp3U+TbWsCxM29y1dBfi/vvlrJ6DAvqdNxTQ
+TuVxmjVTL49+3n5ZvA95SymybgbCvOe10SLq+6nyKNcFFqpalIaiL1v/fu3m
+B6fe+zQ3AQ/dqR66DgvspyS9MQ+DPKk5ZdzP9HehV8HRGXbeKQrU+6LSYgTu
+CQu7pIl8+DlmO2XxPU0xmBdWDPN0phkS8N7IikJDJeRLWCS9xf6t1VVuGTDb
+N3FvFkzTlFb7ANPLDX+xhJP113ydg7lFtjkNyIe428cUwcSykA1b4ZcGm9Su
+w6wrLgbVqKc2pbFzDcyzm1diCpesbTCJofqjY6z+F/oxPR1LXlag/t6o8dwA
+a5vynuSiPtFsTMsb9PNLyIvaADnkMxF4JgMePZ312FQW+w/TD/nCb1O0uf3S
+iJ9j2egB79b5p6BQCv1SvecUBFfqMsUPz8d9EW5SpfBk928mdvPQv+7GzdNw
+0+Kzdo6SuC9R4dN+xC9mxMRHS2BdVS6qE8bfF8+6xTGPrzJ/+iL/g30HvSNh
+gUSR5yRcJ6Px1A7m+J1lxKH+M2fyb+yE2WVqkrLo14CyiUQUTGwv/hwBn5BV
+dXkJ8/5InHpDvY+SSwx3IB4n4+HhpZhHyKmRw60w76DfC2t4uv4PbRbyozuG
+/7od3mX5Y1cvzNrG6lgNv35z9I476kmdMxOM4b59O1VOlsO0lQluBfD9VPus
+zzD7zu+y5nBdj3/8IEyf2pF9F/mu9VqiXw2LWLY3TOEfMjfOuVD3yVYFl6A+
+zYcdAdVUfLF+Zz24m6Z7XUTl6xTlT/2cZe6WOTmOesh3CY4MeDsnbLxDDPmd
+i+UOob+t89xNCgj0y6auDu8fYixxZlnFLIMQTO8v5VLzsf0hbvkMg+Ctarte
+As+e97QommQQdFEHu5War0PPW+Y4g+A+d/imgfsvGlW82jDKIDhPtQtCYCed
+u8Zh37D/My1pGH7/kkjX/Ao7nygMRL6lx6Vu0UYYBDviL0Vx1Cf6nXM/XcQg
+SNV7salw7LdaMzbMTYu/qYH+lE3M17sJCwOSz6bDgbqPD5A4n9pR/XgKfpR3
+hKOO+5lOZlo/o/9ZMV4HNRCff1czKRRW/Pby9pp/GYRy4nBhEvxeUNdii3xF
+thUpkbDTwbwNNmMMgtY3augIjzVE9yuhPr7Yim/z4aSKLI8MWJBkKSpEvHi9
+PEEtrFxdftQYLq3QE0ui+lGTUV+C/BPky3sHcB/nk93UUtj1g7O8kIqXctMz
+E/W/f7jtoh/yIY/v37YIVj5pZJJL5T/sEFmMfqWMbnYORb10lw4l6v1nLbI5
+8tMgg2DtluiRofrdNOtH70W+u6MSeqh5XfSLkPmIeTWYj3+EpUtHpAY7cL/1
+s7A5+OSl6Vo7Ac4f8K2yxHnhuGDd+hrEC9W/Q723/vtkV///qUb+D6LOr4I=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.922596693736967, 3.8067338747393404}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000002274`, 17.}, {13.500000000002274`, 16.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.552325660469876, 17.180083206945802}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1ws4lNkfB/B3RZQwqywh5JbrmCKpqKmtdkhWUs22RhIaUsZ2G4oG67KR
+hkaIXHIJycrdFkYJyS1FF2I2FWqLveVa/b9nn7/nwfN5zu895/f7vec978xy
+zwAXbymKorrwS/5TS8gffSb1348Wk9KaGRZbwMKQWh8BcWVPoB9My41/8QH+
+2Wt2RwnsfI8r2KbNpPicJM1puHTZQGwEXHpxxpFlwKQYwsa4HNhxnrpqKpwV
+b3k2D26jX8sYhXUGvft/gTcY2KtaGWI+UeUFF1h98vMIHxYesB2Vgp2vTz+o
+gCdYmt6ZWD/dwHH8NUwlXwwzhxPd5s+XXwHzC4+WL2NS7YopbnrE3pKmNTDX
+sVhCh3UWdDAaNZmUB09Rlzgru1RrD9zZdH67Llyqstl3ToNJXdJbt0QBlggK
+lGphTd+KwgmsR7vn9PEC3N2bK+qCPfxKKiPgk7blKcUkn+CzQUnwQEhSwjk4
+68G7P5tgt5T3Tv4wM0+wl4b12HkNPFe4u6047Djs3MzctpWMd5QovodpCVdL
+maR+9dnLx5F/1EFHeRaJ7+PIyKDetqu/qruRfCJP306Gf4sTSoWQ+D8GvjZE
+vzyUN24pgnkc//hCWKelr+klzJ/V0FXUYVKuW9b066M+m8PVcbZwVbS091GY
+v/EnaXdYcDXv99swW+GESSBsIvtHgoIRk2JJfXI9AYcW9VzmwBPshmQ/uH4m
+3biIeMvEnZ2wNTsueQJmXplmm5F4FW4s3Rj5vWn+OIV8plotVD1hZ544k9z/
+t2cE3b/ATJWcOhr8TyL/ZS7MKHv+TIT6PufaqJXDvNUPczRhsUnIUAXcPeyV
+XoL+CJIY314nDi++6wy3Ta0bTCbx3yzdIQer2Vq3nIE9jCo4z9DfdUdlT7rB
+OsLaJ82wpKkody1c2qhr3QO37bttpkry0ZsImiX7ZYw3PIl6hLc0TTZhPv3w
+eycGYd5dW58suKC6aFuHEdkX/QtVkN+Zzj7nZpi2tet1KnleMm8rPIAlYSOT
+Rqivk/bKcwD2OH5HfAu2jRJemoHlNgpaDdAvQ7+tjgYkP77POBeWO7z7lx9h
+7vltjrlwuM23jWkwpd5t0wtfOrl3bBiOSSlLnIYXrTqeuNKESdXYpvUpLWdS
+m6cHZcNhSpttqQp73jkd2APHnKKLyHixWcuktinGZX/PJtc3XWwdOQQzCn/4
+rQ9+/qdV7zWYK9o/VAA7FyjXvoBpS1Zf+Qn2qdsnL2eG/f6F89YaLr69q88A
+pvF2SP+F+tr/uXnH2oycB7Gn+KR+l1ca62FqyzqxLNykzG63JNfzPal89Ctq
++uVOXZjp15zOJv18/qaIzO9BL53Sg/nvNO3GsL7Qkb9BHg73+K66meTvHLaG
+Bo8qs8ZzYElX9mpLWDeQVR8B81aqKx2DHTyrB7hkXMXevEOL7N/hht3EeV43
+7JAPu2Qk2BF2tk9LaIA/f+2b60TGz6kKDFFf3/qIzRx49Nvq5gDYaG93HR8W
+Pw7cVgP/MbR+IAuequwvm4PPpA3efQyzlin9vRb9zsgWyyxGPSz3J6wj8Fzl
+9K8/wILXB46J4N/EDj75ML+/7sENuEh1+uxHM7JPG3+ogR8nBxp/Z459keYk
+KYdzMxbEJMESjd2SLHJ/TZcODsI68qcSBXCWbt4NHTr2w2fRE1cyrjD8hA0z
+rBYt14G7m2RrImGuzsOdr8n5sE3RJh8WV75PvQarHeIN1sJMh5VO5HlvPqn/
+WAzrqNDqGTCjSPTyFizQjl88h345RRX5FpP4+df/JedPeIi/kwgu7TjbGACP
+5i4YPgHznpWNOMN9luH3d8GSgoVnv4eV/fb3MMj8fBkTf3ifofYzJVjIeaSY
+D7uHLsn6G/VRdLWXM8RZkTdIvcKUj2GWpP/NDaaP4FGV531kf/Y9q+jogQu8
+bZPJ/TG0Dqkl8R71P6V+hfr1H3UETZL+mWSec4A/0zUmNbGeXFy1mhCmHRLz
+neCpjnDNLjj4iGbJOZK/c1CjtC6eb96qhi6YpiEspMMM+9mDGhbI55Ox/HY4
+5hXzq8Owzs3yFja8wfXS/VvwRFt70F7YL9qbJ8PA+DqH4O/gJrtFYhN4dKCn
+3xjuGM6Mc4QlpTs4FGzeeeSWLyzn1rGrA/mIThj6h8FGYbTzF2GnDxPzLsI2
+jEVme+BokdLqDDhGa1OYGuwRXymVAwuDHkpeoB/R/w6Is2HGKV9+IXmeP2nT
+0sj6vyuuCIWFTfd7L5D5yx6xyfuh1yqCQdZ7Gmk9uh2uUDb145H4sfL5LFhG
+IW7EHWaFlJrvgi0F9d84wTWngtWOwMv9lnA2wtzNJS0i+MurYzJWxHaPzrfC
+OdpfLMzhUnaC/nySL+/pXVOYH3PsPrk/c4lVBxnE5Q88SL03S555ryfrWXxJ
+H4CvaLV0kX7FLN5upEf6bye1xwtO2TfReRDW+3JvP8lfEFV2LQ2u9Bcqkn7I
+JRfYtMKxJTr2rTAvOv7SCGyf4HZ/nMw3Tz5kCt545YiZ2kpcr17lPgNrVdtL
+M2EbxW/838MLt9wf84azGtYm9MCGj73jY+AYWSW/63B7nbg9H5aI5OjBMDtN
+p7oBFr9ZItoE14XSc3pgFt2+lOyvkST3VUPwRPRf7c3kvLa4vOc1LLd0hhkL
+U8cnXIi5nKKtu2GvH7fWkPiUgncdK+DRhcbuvTBt9ayHDMyzWMVuIflKH58Z
+R78l4wdGq2C1ELs/R8n739MuII+sH5r+ZgLmuHrvE5H4Ztt6WVy/wypGORL2
+2JScaQYHGSeO8WFGVA7lDn9yn1sQCD89uKM2FTY7rcg9ClOFNVovyPnV0F75
+33jejL4B6rPLNN13mvTHLjPyKCx2mDocCwuLlccq4fy3VaXZpJ7Tr2ik/4fU
+IjPrSPy6DmqVHpOq3jNwaJDMZ8rTPwAzDIdmpVbhXFszGxABz/qWLDOBY1zk
+gpPhu3u1AlxguWb++XS4Ulk6Iph4F7csEd7fxxzPgtm9zTeCYbFtvnsTLAi8
+MrkbTjN6mD0MGx0NLjDUI59bDOs/Eb/44D5O9s+ulTNfWzKp1sQjWuVwTX/n
+G2149Crd+AS8m57vtQK2uTjdZwOfsanMM4LFMUN+X8GH5z0x0YdpcnNjD9Gv
+Qze969ThlOat/xbDC7gsbwUSb+lSQN4XZSNvfyTrq93+NfQc3HXq7tw7mHds
+xaYLpP+ZJhXPYZuxntmrsLIL530bLOZEfGqCbTrjqHpY+DRM8jccKh5cXgnT
+LqxNN0c+L+OsXG7CzoffZwTAi22CXcpJvYOWH6pg16Rll2+R8Z8zHCn0IzHa
+cCeZv7XqpicL1v9+vdMQycfIcCwWtttcpDZD+rnFvacF3umz/8NS1JM1LRU4
+DX+8EdxhBxsFD6Vq4XtFVoZCmBfpZ9T3Dathrtb+0ji4Ru219AbYR/+f8Qp4
+osrRYQ0clxr5qB+WO//GTBeWJ99rrP7//Uaf+T/tBqKl
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.54570515633175, 7.171979374673003}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwt1wlUjfkbB/C3tN+0oGPmKm5TUkKFQQpvJYQUZUmr20iNVEyRGrwto6SS
+GoU56hYVow1ZC7fFMkq0GEupG2lPm5RC/+8z53/Pwfmc531/v+f5/t73Fm2h
+/6ad0gzDVOAP/ctI0V+6LPPfZxLLfDc2ybOGC2qd9znAJdFjZomwsfBVQyy8
+eI1mzzuq7yzouwi//7m5auFM+EK7JBOO/OdjYyTMnvp+MAIuHaub/xwWRMXp
+WsGGKT7Tp+jh+sRHNW3qLDOo3LtlA8wtvvE6CI5SMlU/BLMX2VsDaizjomf5
+YxrV4z5U/QIHRn9tvgYLnO9NzVJlGUl7XGwR2VBacEyFZXQcTrfeIGeOpXMT
+WSajJ8s9m+6f+yT0jDLLDHFrP8eTffgvGnks05nZqBUAizceiXWC5z22T7Wl
+euCrUlXYPjvBfzbZsyRGBq65G5OoCHuUzBEvhudPye3owXyizGVKWbDp4NdJ
+b2Buzmp5G+yX5JBvTfMzjgWiqehnW6f8zzWweJZfuBz6/TXp2xcJ5RU8kK+A
+eeJ1nsh8gxO+B05VwLzsS52petjPuDbcPQr2aPVd7Uzel792DNbkFSj/RXbu
+inZFfuq8p5vew31f4q9ehFccrjxlMgv9rfE/8Qq+WjQoHQGLC5w3dMKrWz+c
+q4PVumf/3QC3hXXs0tHH/g7+o/mw3inbKF9YXPF5nhcclN7mmwtzZzfekIb3
+VRUPvYclwfn2Mehnv8m0KBUD9Pnxl2ppODviis4cWGSWeuED5p2jmBBsTn7D
+u1OKPHga3s0rYObcBc3LyGtfZ43nYpjVddibgzxLnzSm68KC05+n1CqxzMyc
+pHJFqqe8PmgA9/4R495B/Ti6pN5UZJkv3cp2D2EmqPF8ONxtF5J4HmY32x6P
+hXUaJLqR5CeV/Dp46OizF7/S/QfrehyxnuCap+52qi/9mCeP/W+nHZjuSFae
+EfwO9rglsqY6x1fY/Br9Nt3xCN1D9TF1SSPmCbWPH4qDPbITBlow75fhOLMi
+qtfUub3F+a734eZ8onynbdjsinw0mjVUaF4mUs/jFjx5wsrzYXDC2b6HozAj
+KLSphiWel8sFyLtRZpemzmyWCbDvUtSHd2Q//DEQZn3M61VhfrbxuhK4L6CM
+/xr3r1Dr75I3hG3SzI/SeQhy4qzhANF5vWkwL3vrkmCYXW44aor+JuvPiEw1
+pPeHf08H/Q8ua7x8E5Z87jSUwnw1ActTymBx1plgCfKQ+T5YXwpzMw6JnyG/
+pn7FGzfIecW2DchX78T5YRHZN7lDHX60SLE/gtbP2W0RooDnl2++SUj1udG7
+NOF/akTyK2DRFcP9X+XxvCw/OVmL9rf6y2ka6gd8q7zGMZ+o4nvZfnimxpvb
+7bDA++91ilhfXmOBTz0sfmN99Qk8nLF2y2u63tlwYwH6y534pOo95cX3y8xF
+/718v9AxmNm37VMhztPlutNWAe3f2jt+E/Ouj9pUsJHyaTItvYg85Cd/MIqn
+fosyZoYgr1WPR7pr4QTpqG1qyLMzoidSMAee5XLCBm47ObJ0L9xXMWX3Tjjm
+ua5mGdXFB7WFcLStpt7kuXj/ut6FrYAbKov93GCuek/vN6zvyfdbmwFLQg/3
+roLlXC38G2DR/birQvQzwuNN5s1DPUd2qQv6Tfbukp5LPuFtw2KeGapq1yxg
+0U/B9zQxb9X9Jmsb8qOmN+PIZ9mF+TErYY9H96OHkaf67Py+hTBjf+e8Gqw6
+/jJYk+r6bXZbcB61deXJ32j/eudd1XIs41XcNKmePOGpbDSsbmX34SYsyLZY
+cgiuUvyokgIzGcN1BXBbxPO9oVRXjj40g9azcL+8i+pnjSpKYVff4X5Xmt95
+KOMk9tdrqRt2h8V73HI59FuyqLzOj/ZrPdYVjvMsE5cMx1A+kROFMZiv3sdK
+u5DWc3n6PBrz83OCvTrInKtfAPJZ8nbLMgPKJ9P23ELk9/dIbcJeWGygkvgE
+Dti9quE+za/cLjFA3sUG4evVjbBfV1H3eng0YbxFaETv97/GJvALY53sK2RZ
+NeFL3B+xI/32KMykHNlpRetHjD3UMsb61pZav09kuSPqslKmsODDwMTj6E/+
+wbTlG4zp+T7UHIr+FzrNY1xhj/Y7T50xn+cfv0zfCYtCi1qXKLKcVeyiR14w
+J8ncqY18ZEMUDgth1q2w5yd5lktt8Z7iRPult76ykWO5xQ7r09bRegdST4lk
+WSZEq9bbjOp2h7SM4HPdjk0GVOdiY0dlWG793YTwH8jX1BtlUNePGXmmQP19
+C6tZD9+tWOQ2QvN2d4w/hbW83O61weLpg7wwOXo+tj1thjmnOGUXnGfL4Sxe
+O+W3xFrJAf1yqclOY7CkP+XcNpxnTEXT0ETKI944zU2J5fz1dS/okgel3m3h
+sdyl/Ul6FjDTnNezAHlVFYal0bxcaE5+hzLLVcZ8642ifl1l+X4436yvsQ/z
+KY9Df2bfRt6fXCIKXlF+o133HqE+N0h5rpQJrl9b8zEZ9R0rBsSzYKbUVMoA
+/u3dD0rryJ9uvQ/H+v3CgmofWHLlthd+HnEDh+doRlC98dq/+ej3bIzxomQT
++v2kOPAMzkfL6cHdDKqL3F/g+4kLNPHIvgiL/uHNw/vDbRoMXk7mKpadtcb5
+HFO8qE3XS5ImCDchT6OkI0tTyCWu66Jl8L2x/PiVaFhwdf943wSWy6yb0nSA
+1tdMP54EC8RBpl5k2fMygXDAt7cWm2FWTnUj6kx2e2zAKlpP7KvVi7pqzhFt
+M7reuHI0DOsfG0kMX0h12/lZVrIsZ3RFOnIB3d+wMMgA/XUbT65cQtf7z3+n
+h/5nCo/mraR+Fn8ynofzdJxuq7+V5qu01jHB/L13cpv8ab1W80JtPL8ZMxr1
+48khic8HkFeW2QuVK7C48E/pM8jzrZHE/SW5s16Bh/Nteb/57jjlUzDB3hLu
+STqbqz+fzkvPxgznsdvxaL49LPG9eHoI70vJXKMN+8n7eviBWO+jxaSFp2HG
++sa9YuwffTXN/DrM2vIXv8LzZrXGMqKS1jusdawa/SdN0fJ/S/erPAi5juc1
+LqflThssvqTVdRLP89IB3+AuWi+vbloQzmfXSLFqB3lr2ZAv3pc9IddNm+n+
+WOVNR5G3dnLC5zpYFGCysVKa5RpHb3IPqH7z8ePV0vg+eJhqXkh1dedn36VY
+xn/nb1kZ1E/Ydt9PUiwXNHJmeSJdr28foI/r8/N6gyLnUx7rDqRgPcWlb86G
+wIK9gRpm2M9LQ/NxEPWr8JuhEs7zksDuX8pD9Lub2xfYU1huf5jWY2Vzx9D/
+Pktnv1i637WdPwHn+T4+TyWd9nfQ9pZCHsLbxUVFNN+kksp2uLx+KL/+v/UV
+8nKQn6W5h2Scrq+etdIS+aos2KA0awFcpaifjvP9cXV/mR0s2FBdUob69qN9
+8cGweOzXxGz4OTexO42uP7HD0RZ+tfaFXzksKl49cAvPj5zF9uctsOTSzw79
+2H+cPgv+//8TBfZ/11uc6w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.666233980906949, 2.1296932060463307}, \
+{0, 1}], LineBox[CompressedData["
+1:eJxTTMoPSmViYGCwBWIQDQEqDiEyIFrOgaGg63OSmYrDzO9z9v9uk3VgWLF5
+kku8ioPSsWuhi37JODBoaO52r1BxuLaBb/3LBCD/w0aDX/UqDvqbjmztPSDt
+wLBjCturUhWHfy805q1RAPI3eJmtiVJxUBZ+2RDbIeXAkPCA8Yq+ikNNZHC8
++z9JB4aK1Qtvf1d26H97fYldB5DPcX3a/63KDn84o2++0wLyG8QO8eUpO4jX
+1jVNfSnhwCAgx2KkouywPWWl0aWjQP6LFavW3VFyWLTIuKtvP5DfscJy+Wwl
+h/kz33T/vwLkB3ha3EtRcojcYaJ/gAlo3oH87jprJYcJ68uXMLsA+Qy/p7xR
+VHIQen0p6c4kIF/D6uwiSSWHdau+P5r8Asg30Hwkrazk8EG39iuvHdD9B/7P
+P22r5LDt2qvvhj1AfsAHbvUMJYfOV85Xg8+A/GdvuXu+kkPCzvcHp/0A8ndw
+tAc+VHKoWCL935kHGB4CG/TkNZUdXvAILhJgAfILGpP/Fik7+D+OC/O7B1Sv
+oXp02S5lBwab++4ss4H8iCnTv/1WdpDY/v7gO2uQ/Wck1IxVHCpY/NtTjwDd
+98IwgyVWxaF0ZnuMliWQ73HwsGq5ioOa/NH5SguA/r+QH8/eoOIw1QIUvxJw
++SfM1gl348Xh+qd0Viy+ekwMbv4kuY0Vs6zF4PYL7hKwEzwiCncf13OFHb9T
+ROHu32W/cOVGRVG4/xTF3se+/y0C9/+GM08Y9nwWgYfPykwBu0x2UXj4NVjs
+0VpjLAoP32AfUY5zxaLw8Ldwbub6dFAUHj/RFRyyOeJi8Pj7bq47VzlXDB6/
+lcUd0X92i8Hj/8KO0xfs/4rB00dWp3AJg7Y4PP1kNJwpLXQQh6ev4H1hZ3Wt
+xOHpT+hLY22WmDg8ffJJLlUTvCoGT79VphrRB8vF4Om79+SaBTsYxeDpny1O
+vH5RuSg8f/BYXU8Mvi8Czz+3Cqy9iuxF4Pkr+MDHALH5wvD8x7Fac1UsqzA8
+fxZoJzuwVAo5wPLvVjYQLeQAAACtaGA=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.354800000000001, 6.}, {1, 0}], 
+        LineBox[CompressedData["
+1:eJxTTMoPSmViYGAwBmIQDQEqDis4ITTDhdu3dtmrONz7tfe8025lBwYOlz9u
+2SoOf3P6puVlAvkvylXY6lUcDp5abPiQH8hf8TIwpFLF4c7e6gtztig5MDBU
+rVgVpeJwWHOR3IlYID8hIGGqqorD9Ss5KdqCQP6F+ZNq7yk7HEt+3Lj1sqID
+ww/VNO9uZQc9U+P/QiuBfI6qjBdGyg6rtsx6HT8ZyM9QbVtzR8nB9nYt++9J
+QP6EvTcP9is5bJyc/qF2GZD/wNKnJ0jJgf3JuY+3ToHUb1inqKXkoDhZ4e/c
+30B+xaxpdyWVHBY/iEr0Ngba/0L6u6SykoOR9oXkK9lAvsGGFCFXJYdPWkE8
+EvNB/NupX2qUHG50nC5JPQ7kW+iVSR9TcqiS8z3z5T7I/SEHiqWUHXbuCGPy
+fQrkT7gR87tI2WFrwoYVvVeB/AiFqPATyg4/OgWeT9sA5Guc1SkQVnE4oXFW
+m6cCFD4mnRx+Kg5ut1fEGOqD9O+QcSpWcZgx42PG0ltA9wbskGNtUHHwkgFG
+R4MiXP5tBd/0KFVFuH47s/DF5y4owM3f+8Loyud2Bbj9ve3vJTL9FeDuu7DB
+P7xISwHu/jMRK/9uklKA+4/78yZjbgUFuP/XdJh0z7JQgIfP5GdrPz9PUICH
+X/Az/TnaUxTg4fvIYOm8LWcU4OGfUnefKYkFET+1uoZ8qqaI+LtSO4O/KRIR
+v+5mTT9YchHxfzsmVWRBDiJ9hN85w/A2TBGefvavlanz0lGEp6+1NpNnX3mn
+AE9/B5/HPjRfpABPnyuCW/STvRXg6bejd8cc2wfy8PQt4Pn4kpKuPDz9++q2
+JFR1yjnA8scOfhAt5wAAXRMymg==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.354800000000001, 8.75}, {1, 0}], 
+        LineBox[{{6.4999999999976925`, 16.}, {13.49999999999251, 16.}}], 
+        PolygonBox[{{10.6, 16.}, {9.4, 15.6}, {9.4, 16.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 16.9452}, {0, -1}], 
+        LineBox[{{6.499999999996362, 16.000000000005457`}, {10., 
+         10.000000000003638`}}], 
+        PolygonBox[{{7.947677384685548, 13.51826734053906}, {
+         8.206811054955079, 12.280184249251306`}, {8.897834175673825, 
+         12.683281069670574`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 12.823799910437668}, \
+{1, 1}], LineBox[{{13.500000000007276`, 16.000000000005457`}, {
+         10.000000000003638`, 10.000000000001819`}}], 
+        PolygonBox[{{11.447677384685548`, 12.48173265946094}, {
+         11.706811054955079`, 13.719815750748694`}, {12.397834175673825`, 
+         13.316718930329426`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.484057296392571, 12.823799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 16.}], PointBox[{10., 4.5}], 
+         PointBox[{13.5, 16.}], PointBox[{10., 7.5}], PointBox[{10., 10.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T17", " ", "P2", " ", "N34"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdieg/giijfhfjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdieg/giijfhfjhj.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:eJwl2HlcjNsfB/AnWqZ90UpqSiktTEmSMoMi1aVIiiKMpUUGUVfLzW29SUpR
+LmlaqKgrSpsuSVJEU4pUl6G0SAnTXvw+5/Xzz/N6e87y/X7PmXMetPYd3Xpg
+DkVRukIURZ7UzC/8WcyiJshThUWFVNm+uAfHhuUYE/eLxGX7wv0HrmkrqbIo
+etHa0kUw1fF16Tp4RE1cm6/Lotxq4kuj4MhPUm+yYGr/pZXvYP4/FlFHYC/l
+J+6b1NDu7FjcWrj88D7RWrh8cFmfJszXfBdjPx/j62ouE4dpY5W322F+i3vs
+rA7imdws5LMAfy/mnDsD91tkvZ+EpeJdW0TQnpt/qSpCnUVZmNIGVGB9k8CN
+cxeyKEf1tqMmcLiwwuUAuIuml+FE5m+6sqsV1mennDwB222q/aKpwaICfng1
+ppL3TG7QdljHJ/jIffLez1UqgLxfoGLQBVsE8zKC4cj2qZFx0t5bWvkI3Kqe
+2S1F6jcrb2YP85udvdXgNN6rBCWYdvM4Ux2u/vMNpwXz58UfilaEwz3Ol0fC
+Ltl/PBOC6+83FzHgku5kWg/GZ0lM93QgvxG+3j8kHrpL8PcYmBEqefEvkp/y
+TXcrmDWeP7UZrubUbJlBfXSGdp+QJvGufpf8HGZf2tpRh/oVCeXZFcKq386s
+CYXrmx1as2GjKyUvTGH+5PDTIrhny8oHA4swX2d+UytsU7zGIgeu/pR7Sxbz
+2RS+ZbLheoMSUy944qsL1xCmTqjuroXLL3x8O62N+V22716FfHRi1iq8hlWX
+vi+7D9tNC4nfh8MHKw5uRH08at7J3oLLNWLE2mGe+GmxG6T/qX3C3prYP7ev
+eZH39cWPHo/CkbaTWpUwl1M1aEVnUQIVme882GOB0MUgOEBDVHcYnolaqFgA
+f0l+8kIW8bEfjX5vgyPt05uXwxYTzQtHYTmnF7M74KALe4ZpWljH7zMLT8O1
+IS6m8rDwnzUKacRvOcYycGOuS99tmJ/77BIFf3ka8+kh7DERljSA8Zy2O+TW
+kfdO8zKfwS7JAp3HcNrL2cvX4fJ3tQ9LSD3HvyWEEMuy7K7Aefp37jvDBeYK
+VCAcQK3014N11h5LtVtE9rPru1/IX1hPabE8sbNcWyVctEGG3oJ8g5a33I2A
+u54PbjgHe8mVd3rCtH8aUm1ghoPaXEdYP3LWfApxuykMyjqR9o0mO4vgoAZH
+cV/Y42iTiTecaCIilQ4LDl9tWQxzJ3Zt+gSrJwbQB0mc1YViWnjy9ccqy/Ck
+G8874oYnTa7/yzk62advzFPxTDsyN8Of1IV5ILgTT7cleZt34mk3oau2CON6
+re2kkbxtphwafWEzsxrvraT/+UnbYtiomMv1JOt6r339OFmf/GVBx+DEdaa5
+K5DXVY2JffEkjlNpcX5w4+HlZ8m65xRt3P43HGKa8KkJVnQPfP4vXLRTZoOA
+vA8WzCf7Mm/a9pQKxg1gR3V/hCdujzisJOt+s9qyh+zDuYoPneH+3xm3OmBh
++Uc/2XDe+LOlT2Gd/dkRR+E0zQkdsk+7LmdocuAS4bM2sWTfcj6KHyT9L1rH
+ecGRop96nWDB47065rBUnGIjg9TfN9VDkuzj4fE1ojDnnk/4R7JOzK5lLST/
+joaGf2GrDuuRi3D953V2GbCds5PuNrh22/fnsTDfZ2mZJBybM9kSDKuW3z9N
+9gXH2ur07zAjrrNlmJxL2j+P/QlXtyl+8CT2fzt2iczHez1AzknHmK1NpSRu
+J1H+Driqa9HmD2S9StOtPuN3Lnd3ibsS4mUNGXQmwGx6boAz3C+U2rWReITT
+kgy77dmXpAzPyOxnk/pZBJr5TeNcEdzf/00b+9jNyW52FPYKXmjkS343N3vG
+hNE+3jPmWRF8+Mkdy8Xq5B5wSP9G3kuxv7rCBa5qNwxxblXX/JeeDPdHiBt5
+wiM70l3aYf4N0xeRcPiQNI+O+PvHn8dnwu3chTcOw0ap6/+7C5eLeZy4BTf2
+9VwvJ+dkwyuxTzCts3V9MUyZtCXJoz4MrZ3R2eQeKpupNYaFzVNvxME8/b5p
+c9isQmK1DzlHbVdvM4Tb87br2cD0X4IqcdhGayh2Ppl/hbEkuQc49SGZX5HP
+yJev38g9oHjr9cMnMGdMmtIh70089DNgVbPl5+8gn7wNzbOhsF129y0GHHsj
+2pCcw26LXMZyUL+07ErnbbDcD49QBdhv8WSJI9y/jroYSu5ZCV0TZ3JOpxnd
+/Ix7OP7sbcZeMr7JH0q7YYuKHXkhcLlk23An7nGbE+kq2eSckT3WfQh2YXef
+e0XGS98vJwLX+kiWSJF7ekvJx3v4bpiQMexwhFnVyT+DYU71c9oFHXK+Ji91
+g1mbRZU64LSLCbvsiT/cKtUm95r+5XPOcBDvcoY3LKfQN+oLlzzdlFwA82zs
+hVJhde/C0AFyr2XEHG+CHV/7xmrg3kxsOxkhj3i8luUZ25Pvmo3Jku5wo0PS
+RvIdEysaezOTfMe0LlA/A1vs+iDohWekj7LPLib7zTpTB/nbpJZviYOd9BeU
+uMJsa/szYeReHv0r73dYykhJwpuMx9BOiYMdZ2s9HWDuy5c2MXDPu4H1emQ8
+M+sd/jDNuuHJT8Q7cVrKlglXcRPUWsl3wxlDnynMT9tw52w+HNu7VIjE5+Z6
+8tAZOE2yVnkFHM4Peu9JvqsUHwVUIN+8jVbjLFIPz9woE1LvwbP+RqS/xX2T
+TGXEez39thb5DrJQKpOC1VUuVxPTFWzDgpRwrnzVWGVM2i9eO9SvyKJSHCyt
+bGDVwKOW++CRDVOnDpLxh5LX9s/D70u2ZlEyHHTNwyMMjr9srNAAO9VqsvRg
+fS3LYlHky9I2+NijgHpLmi8h9R9hVuwvh11obTuTYLsj/qJZcLXFdVoH7FVU
+tCQTNuoR79HSw+/KStW5hPS/y7txEOZEZS5/C+d4cgxuwHb6Uq+kMN+E7dyw
+dzBtzam/HWCG38IpaX2cDy1TfybBtabFzsvh8qddVh1w4x52xm+w3aLLu7SQ
+H6so298DDl+jEUHypV3wrN4DV79yT7lM6pE8LOEGy7W6vqkh7Ye8V2yAnb5a
+aXXCOV5eCYaw6mCh4D3MTox6IA7zDppfaYJDtKrKPiK+cq+X5vlwecWKzHLY
+4nHpMz/Sv/nYo3Mknz3uqxfA+vSZg2yY5W1kWzqP3IPtvDVw4toxHxZMSz+r
+oknqs2txVxWp3/YiFTE4b8LOZRncc+jL7gnUkzf7QXBFHudWpay6AOb4mC0Q
+g63uTCtMk/X4cH35STmMK8NLkSb1PS+l1iaL9XUsDDEk8z2e5/JaBr/rNGMT
+F7j6AcdyVBr78EDUzWiYOzXwYCU80y4V+gimKxsczpLCPWZd1zcH+bPWBWlb
+wH51jr12ML2kTWtKEvPoB9gmwYmDd9r64ALRuoq3+uT+LR7+Cbswxsc0l6B9
+m9up1ehv9ob9dC/sFXhmPBVWL8jXTofD61eXSmN+fV32Oh7MyeIKUuDEh+4l
+kzDPcnKtLuLniq/xVjXA+hWLNt+Du65GPzSEGSKTzdbIlxb731/L4ZHu0MYS
+OHL/iBwDtqvTCxZHffSv/SWnDXMaDj3Sh+lZ8kUSMD2QFbAC5m2rPTWI+bi0
+l/HGcKPNPKs6mPX439eycIFYqyKJl2VoOVlG6vtiyvo4LJcSo6wLl5yrFLGD
+EyP82r0RX7mPoJhO2lcc+ycO+egs7Tv+E/XhLtwSeA75s0ylV3WT/Rj2zeZ3
+1MttvuQ9HtmP1GpFVwmMlx1iVU/28xyvYCNxrFfKlgfPSPt92ltFaPi9nrKo
+aIcpS78dA6L4fmjJMv9Oxt/V+4Yvgt91ndMzZczPV1no/kMY37GthZdsSTxX
+Uh31YO7NvO2hcJFA8OLMXMxjU3GgiuSz5o6/KFygldBBoT5eJ/Lly+aQfx/e
+S7SDEw+8epMMu/UFr08i/jSscQWunaOW005sYH2hAeaObTqmbohxBRcc52O8
+qzW7EnbC1MrDEjFw4/lHqkkwn9vjTUM8qoIdwQ9gLtvd/BKc1pQY9gHmKepU
+6SEfncKPLpMw/QFXqwR2q5rJEjFCe+Vrj0yRf+Md3whRuDqlLOIKHL83LmqG
+zP9LZlkfrPOlPrcfZnSplsiK4fvkY+RvjWS83+J85IhlOxj5ZD77EVYv2gfl
+zzidIfHuk+g6D09oNf/nStrX5eVIw1dnkrSMYFbfH4/3Ih7H6UPec2FOzQLJ
+RMQf1No99A71oMJf8dKRb8DgpqpqUs8sh9Ik1KdqeVrmTdip8u6BE0I4X16r
+q14j7Tl+6x0o7N9Zd4urcPXXiwybn0xKx6+58Drp3x19VGiGSU1cNSiqhFns
+gw7vJ5lUT/wk1Un6X8oMGxpnUq1TVsMiiMerN7pt1RiTqvr7tLslceCyzCYB
+k6IfYzw+Rept+nR92Q+MZ754ZwWxSGvH6HcmJfVTSIZCPamcAYlzMFuwN8eO
+1LueP3wajvXJbkqE+YusDSthlqH/htdweNKUzjqMV3J0XqeyMfo3nHcXw3z6
+qc1JTsSz3NZpuHyJ2r0zxmS9Cx/IIr5EHeG+PJhfOveXCeKvWvXbsifG5P6J
++uw0gfgCLUReEytZTexEvilWtO2dcPWxpADmFJPi1taFt5H3iZOGX+F4Nw8P
+0t+LYS/qOc2khEXn6xaQ9mEx8WFwo5XsybNkPt+WbY7w1Uu3TA+QeGrNNtWg
+v8enbaGrSX+WbSepb0BTUaocTB+d/JWLeJwSUni9pD4LjihrId72zv2+1TDr
+5dPrLqNob/gjNoPUx/7z9GbUQ7iqVj6avM+/e1vjG5MqkIzOOkn2a/Uzlbwh
+JqW4KSX4KHm/1KWZGsD744yAAFLP3giBTw+s3fstkrRfpWIhzke+CqE9XDI/
+Z03IxBsmVdt9re4p8YE78TU87JcEg+wJ4qKDUjZPkN/3nxqmpP5jdr2CUszn
+2h59nLgx+71/Jtan/S6/jJj8Cbf+//8fGbP+ByrUpRc=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.851144620506076, 7.907943040036291}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl2Hk8VPsbB/ATCUWNpFzLNeRSlqiQ1pmUcJOlxdI6SHS52VpUqhHViKJQ
+IjWyhmqKauxTKlOoKbLLXOVS2bIlit/ne3/+8Xr3Pef7PM/nnBnnpOnut9lT
+gqIo2SkURX5TXZP40WD+//ciJqVWVsyWoDMpk7YAGg+mr6ik9WJde/YiKxbx
+xwlxIZxVEZCoCHPs1M76wv46yY1VhkyKpXDPSwrmTCievwjz5PlaEb8zKZe7
+hRXb4a7pYTt/qjOp4mPX9JbC3qHxnL2w9cr+B8qw8Y+otAo1JvXpRl7xDNh6
+3toefTgqnDZOHOzwNuaqKpMSswxDyPEJAb5uNNj61Fi+EUy7cyUqSYVJCWee
+iLOHzQOPbV8NG/imJh8i51/wGR39DXP67Zl2ExZqmDuK4KGy0CYhPBpmNlwO
+7z1+i95Pjm9ZoVgD06X/nFTAvCypqtPjcNqU82J9mB+j3LYc+zf02FxeCWf9
+teN+BOx7LN+NAXP1b2Z1wBw9P2Mzsq6yoMUK/dYmxJ7WIHm+sFLKJvN0FoWP
+o17/ckp9GuZ1KKuTrST9D+TKOsHeha3saDKfVCcnDv7p09v+JyxTKKNVokb2
+T0+cNEB+xbQDVXALvceTBwuKFloIYOMjpUtZ8Kjt01dXYVbQ4UkFWPzpn/gt
+cPH12ByhPuaIXR41TPorz2w9C7OZVo1sWNBk0WoHc8celv/APFXHDx7RgmVW
+fT3iCZtnW3dJwP4luypekjyPulb262G+nA9tBrDvXbM53cRe7hNxykzqmYnE
+rCFYKDlTUwa+nrp8vzQ538O5OHIeco1eY6ENM03aDmvDaZmvLazJerpz3/u5
+TEquzrLQHx6lNkXfgll/rRIkwqLdU/+OhAVjLS7lcNemrtUxML1PP7ETtn5q
+sP0enDbHTzQV88e8CnnbAcfd672pDLvI8aKNSD3BX1qacP/3kuhz8Pr22gk1
+mNMUqNIFN+TqHJsBC+Ua5Deif2P2aXY39u+/UbMwG1bLNcgQEHtZ7J6ETW45
+0CNgzqXiuZbIg2nY/dAKpnEc2Yfh4qzrtyeQh4xdzfNo+OdvHsk82GWylHER
+zj9fFsCC2Uo+8f4wzatUUwFmarZUm8HhY/zk5wvxebP5274d9ValJ2aw4ZgX
+Dq8PwTsVD+eshxPsy/WGyXyTyjmKMN3vGtMTFs1XVe1bgH0/h2dXIo+hQO77
+elimXjZkESzz7sHM17DYJ3o4VgnznOQ7voV5iWvNJOCDd3XOieH+tti+k3OY
+lPK3BRJjxOn032fBDUaX41VRj39sV+UjRVyvJQr3LGBRoWFzMNy9YusRX9h/
+TNjpBDPrIobjyXr0Y0NHeK9WmEkxHPzhA2cfHJWR6dUCe//x9HQcnLaxR34I
+5gxbBtTDJsMaClOQDxV0OE0P9W13DLQRCxcppXDgrM7LocPk/EJFz69wvqko
+pRl2kEp7YIt5dt4wjc+HaVNNd2fAwq3dW0Nhrv2FpAG41iYucB1Zn8ncYIB8
++lfnTv2FeY3XDGjawwbbT0Tx4IYo21kuMLfgTR0LZttKLrWE+Vd7G2hwgqac
+/FzYVvt+ZLkuPkd1H05WYn+1oW0vjsM82SCBF/zs4BTVVTAnKHx9L8nzWNKj
+aTC/MviCB7xqMNmyVQd9ZkoMV2F+mfEFbQKY42Ox3xjmzHf/fh/OyritFTcb
+95vzS1ce7BLCcJpQYFILDF/pF8EyyQpdB+Faq/3fRWT9daLmLxrO+3mupA+O
+WfbILwnuD2mcqYT6QmkX/S2wi4mj3hq4waPETwcOKbqg4Q3H2KtTc+F89cuD
+0bB1idYaTfh6vMSLB7BDWMbiDbDgvuJwNUwXWqeEwvx1PmvayP59j1a8gYdK
+XZo/EZ/JFC5Ef4J/pl5thdnuX4Ii4Z2isFYh7F/DkuuFlcPkyzNg71g7p42Y
+l24nIRkMi0tWuyTD2tEVI6thkUdW+ge4wbY3fAzzBXs+vTUdeWnXHZIl+VjX
+KpaqwxRns7kbTFkqJivBtTeyxmkwbejS8m84P6uWZf/0D9y3wRG9PLiqpVU1
+GBbxs4OcYJcvaQqmMD+no+IT+rMtKjs3ro16F0dmsODwxyG7q7XJ90K1XTXm
+9VUd78yBR8u32C2BxWlZ9VfJeozLHr1ZmH/jqeWXYG7Lq72j8vj3UP8Ass7l
+vX7WJIf7SF5q3W2YRr1JaJmBvD++FT+D2bN1A6ThT9spyS6yn/PtVvfpyDX/
+jSQN/dEL9GYNySK/PTnUCpireOdKCUw3M59whx1SHC3L4CzmFXkOmU89ddEI
+vJUtFZABs/pUqndiv/V22qVFsH/mb1Zf4bQ61Z/P4Zi1I6KrqF+ra1FcTo7f
+sVPXGf1qB07o55N1KQk1dcyTtoSmcZWcv7rBsBUWfOUr/A0bm9r8ETkTOTLv
+aC0j/S3+lKuKPIzfKkt9xzziRxJt4bA33ePrXZJH+/EnpXDa5lIfN9iYt/12
+OcxeVrdHgeQT9zg0Bo7TWfrkyXzM83jNgDbcf0U+/BBMXWN7hKHeekWPQCOY
+11Un5qEfcz0V2QEtrHs6Neaj/+uen13KYHpJ+9MEkvees90JME+zL9UL8wvG
+9zw8BYvLHkQYIq+QL7WTQTDXPerbiDSTym0+6ncIFun2G4im4XuhPlkyDGaW
+nqh4JoXP/2TN/CTYePDJyIepyOt6R14R2a89V0UXXlC4ZFE76ad3aGuqJOZy
+WFY+A/0KpNirnOHgvOwQU5hZf5G3DpbZc9p9J9w/tbF6H2ySIss9AYsXaU0r
+hoUUI/MKOf6opusq7G/dWuKQDtMjh3NIfa5kxkgmzC78Z0UC+vNnL45IJnm9
+EWrsQv97q74nnYH9g+r+pWM+erm5D4vUez5Xrx7OX9zTsIjkvXKvwUEZzOP1
+xI3k2R+n6tsDr58VNv0OTBP56KxAXiY9nze4wazK+mdbyP03Y6RJgeSREW1k
+Bs8RufGfaCLvzUmUGOcvOFvfGKRJ7sdt8ZvhnwseqevDDiO7f11C/a1iM60v
+eM7tv19XkYZ+07h52nkwb6Hb/VjMY2Kf1XEOptjfzPZjXpOiqsv7YWZ/3uzF
+yMfY15XvAtMnTtz+PgXf11FGK7YRu/T4vaRwfQ8s37Yb5l4+n7x3kkEZbBjI
+CoTF0RvUjv1i4HOfbB1DrJ6Y3DHOoJhRTjX55Ph3W4wfjjGo8CevLrXCgpZu
+auAHg5IL0U+QRv9M66F/b8LdGne/GMHcQ4qmJbDvnJpbW2DxdInXFjh/a2GK
+oj9Mf+dxQhv7s+WUvp4mvrUyxvEng+IUzrM/T6x0Jv0h+qmSzxgKJ855mbsc
+/Xb3DRkFwsYP54e5U+R5tvanI8nTb9MODcyba9cxoU3q5Ry0r4AdPicf7SZ5
+Oetus5dArlZhzGzYweZr/x14NMaVyyLz6pXnNsPK6/dbzIZjZgQcqoG9lU7N
+Dcd7A/1eZ+NlCfL3QKGnA+8NomuihSowJR370R5mZmQF+KKe6GyUXwXeG3jl
+qVuj0Z8wtGqnIyzw3x+lhP77mwIvfSPPuUe3bXqLeWmBJq3ZMLuSHe2NfBzo
+y+pOwvRuq9LB7wyK1bX6+d8wd92z5shhBsVfq37rMCzYtcnaZpBBCU6m0slz
+M7ft30sW3xiUjOuW6kqYOtKXP7ePQSkXcMxpqM9MmP18XzeDasj8ariH9OMh
+HRH5Bdc7/fjwA+KmXzUxnxkUNW9akhTmYd94H3YEZqWcN3ck86VsOmyK4wU6
+3YwYsv76mvSjrwxKvNRJUELWDy+d09zDoPyzh1Lfw9yU2+aMflxf3/H2Wpjl
+2fqpAP0xrUNvFxCvrPCwRP/GhdsOhBH/9TtfOIT9vfJ/LIEp1sk/9Ucwr+vp
+Ha/QH0siX80JeYg3X3xrS+bZpfzZZJRBCVWUbpaSPN71aTyGva+frtcm+T72
+fSSCRWtlNM6Q9xjvZSXHYPom+l7y3kMf1nich/0c7hyI3wizjIpzTqEe/WGy
+cwl5r2qSGe5EP1lp70sZMMsm/NXYAPqzWTurHs+tLJ2j0a8wX0JXwbmzMFNm
+c1Mj8pURmC53IH41nzPYSTzUbQJTJgqScz6in6C7Kv857Au3sQX7563sI8/p
+FHOJj2stro+jt8dRYtnAkuGXuH4vX7vxibVdNsgXI9/Wjz8k0Q9lUM41SUe/
+vnnJTsSUlnPGYgZlbvGnVzYxNy2CHllG8W32u//4b724ulkL+Zt/riPvnRRr
+X15WKvovMIwJJG63dNMtwP7KBr/HEv+WM/3gCwbFa2qUuw6zF84z+CZiUF2J
+9rMiiRMvaivUo/77M2p7yPGV3llmrZh3cH2IMiyYxlc69Q/2b8oo56M+e7Bk
+x9RPmGfJticWsED3qhX1L+5/r2PbC0leJs/v2iEv60sq27VhdoFUWw1sbLjU
+9Ow8cv7Z0RMkT9ULL8h7EXuGa7Ulzufui5OygalQo5VG2N97irDoIZ5L2W9m
+jlujvjjWc9ViYs6Zd87NuJ9/NGoK8FxKfTBPHnyH/Wcvm7OPeHVK14Fy3G8d
+J5P+ICY/7JL///+DIvN/nXAewg==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.5990515496243272, 9.421161979599258}, \
+{1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.999999999996362`, 17.}, {14.999999999995453`, 
+          15.499999999996362`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.126447748763752, 16.890374170787496}, \
+{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]& ], {17.81512204377634, 8.004985304149105}, \
+{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]& ], {18.88748581947994, 4.835942983375933}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwd1Qk41GkcB/B/ji2PclTuaFzlyBBJizzvJmUljX1sKGVcTVJLRUutTIex
+SjkqUWmHlKOSatcVGylylKGY3bGtWbIlcobayuz3zfN45vk8v/f4/b6veRgG
+R34XJscwTCR+6Scjoz82hPnyo0kYQws59xew2sR5QY4GYbw7hr4ug4XlpoN+
+GqT2b9trghSYn1+TvFKD8K/oN84OhtMcVUtXwYMHTa+sgjnJU3GBWL9EN89q
+Pj3/TVtbIeqs7qkcqTVhbB4UCNQ0Cb/YukRUCAsfbxam4X71MwtnDsPSqVsF
+hlqE/7L2qX8oHMW3N76nRZijcxXY/nDak0gtH23CZIiGuwLo/u3q6X2wMqui
+dQ9MZi6wg3QIP3ZE8V4ydadT7iM44IAo/yY8am2jr6xL+O5OvvO7YE5nzx0r
+XcIEq+9fJ6Pn7ww+aYn6y6451V/6f9uooKhLSN+gncAIlj7Zd6NahzClK9k8
+K7jWRKLlq0PIX4IhVVual67qZQn6GfdTTLeGbfzIlJc2IQZFC8JN6f4yjbpq
+zHdZfDhlARzVK69gBYuZwNZ3uJ+5n3q5EPksy92Q9xvNw1hc5wDHNFzT3E37
+m5ex7x+8z6hEwU2PztNgoH8d+Q780FPRwMZ532iuyUL9tIqKwz5YLWE3KUa9
+Y2PLMUOYcdtCpDDz/IHZH1ao5/oQnM98vJ/vkg3XZnq4FsMJvOOreXCpflCO
+LfJvO9nT5QqLAtO2PEa/M3KZ3dawUHu6Ilib8Mtzg6wtYb7iiVvvMb+byenm
+FTC3cHbcEeQv29vZ5EHX/yTWnYTv2kSc3AVzPlf1eCLvYXasOI3uTxz//Rje
+4+aTTPUqanF+USZcUO4b1UvPE/dVHod9++McvsI8tZ8PkU3Yn/XId4zOR1yr
+Sj/gfe6maOXbwkKnwIhk3Kd7dY/MHubuH45QRD1PtpxvAXOqOC9i0O/Skfwk
+VXqewOlSH+b9qPQ5tJ/Oa/e6xBfz5msWc27SfIo9qiR4j8mCs/7hMEveID4a
+ea2sjHNbRPMKeOhnifqYg/uOpmV4n9dGI/Kohyuq8aLh2lhuN/2+JbicXWAI
+i9a2JRvBJ4736z+zxPqxXct52J+bntR/inrEa6QZzso65eoDp4UelnNHP01e
+rdvNYNaeMBMx7FVUf0IZjjpT9z4S8zgPOtvNWCCPWIfTSpi3pryzU0ad1P3q
+AvLY5CtRUsV6YcCuJD3kqe8wec6c7o/uG0H+fAeDsAxPeh+nRPsp3MO9fi4a
+Jmu5zZNY3zIkN5BD+2On97yH1Xvj6h7S9aOSMDHscpEc7IelKXNyzmD/rOyS
+1k8wP+bI8+Wot44J5eZgftZqBfMK9NMevoylCHPfFy9ho98qOyO5CaznXnzh
+cwl/XxpF6ZHt9D5Li7vKmG9x7yr9XGr7PnYi5ncxKMkLofMkPtdRx/vdj30V
+pEfvm95YXIZ8Uz2zglswf5RsRcoh5KnpfN74R5g12JgcAode1Qkzgrnx3t5R
+WC+vw4yIzPF9sfHamos6b92NzQKYPy99fAJ1VS1poxvMvf1mWwjuH+6eeqYO
+qzm2mw3g/q3+PI8hM7y3pFgQj/4vWQwv6oKl8vXNWphXqD7Xuw3mxPz6tgTz
+Vm4tk9G6zaSrtiPyUnnnHDIIixx9LG/Dix1Tx5VoP9WPnefpEf7HEKefrWFO
+jnjWt/CffqIMP1hYsZMVpEeYCXbVhiOwdMMvwT6oVwd5jV2FSfCBJmP4nGkK
+U0/P+887vgPvIXqjE9EJl47uzQmDuffWNEjo+YU2Y33o14trGNUO16Y2JnwP
+LyysKayg+xO7F9ZjPt6s7Jw0OK3FsdIe7ng0vWMLvY8ztLQMeXyoVJ3Wovmo
+DKz3RF5FnvqfWjAf1zL9zgzy5A1ZlMfBrNcWXh3IO8xcodmE5rM7UY7+/cfX
+bJaJluK+HetT/sX6+MxtakdhtW3Ze5fgvAOGWRFOsNRCoi2Av/yTo3X6qU3+
+B+U8lqE=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.109669593634097, 4.811165529975059}, \
+{0, 1}], LineBox[CompressedData["
+1:eJw9lAtMU2cUx6+PkoIb4mOmcO+1Frz3U0CFoRVnlAMR6cLYEJS3KFWMjLBW
+wQRDytpp9vKxymAOAQkiWkAIlTfy0kxQExQVlBHETthiEbExLoBT2ddozk1u
+Tn757v2+75zz/x+FWhORPJthmBD62uP7h8CSefboAUy4ekHSGgJdCSM73W+6
+A6M/y8t3EPjzVLHE8jNlaYdnsYbA9J0nvo4hlGM6yjt1BDRM6WjFjAIY45dt
+1mwCMQ4241QDZUvh9Y/TCaR2lyjWaijbBq1VcQTq2kLUeZ6UVxjz7yvp+e/S
+H/g+WwZMZ2WgxJGAj6XX4Z/LlPV7atbdF6FxOGVj4BHKvX8NVZ8W4XeLkz5j
+J+Xdr6enYkSIkRZVBgdR3n9opN1VhJLNuZMOn1L+UbXQPCRA+9OG7371pmx0
+3r7/vADvvn48Gu5LeSrv6OfpAoh1PtfWBdjXI3WpoQJsvXv3k/7tlJmUKP1q
+AS4VS5rTtJSbrtuu8QJEu2Xq3v5C2bI5x+oqQERVr1O0mbIqVFjqIYCXvurU
+hnuUbfXaN/4ClDcFR6TYKEsr436LE2Bk0dzxbkea/9RVafb3AgzOaU9L5Shn
+Dn/T30K/n1XuVStSVpWWqv8VoGZPbGYsoewCvMlPhDqu71sDT1nWd3vmoAiP
+u6qrOqWUm4JmGmtEyEotW+9htedvKPYZE+HiwYEzXh2U/cctkxyBnsK/XXqO
+2eu9pW90K4EMpcU/KZyyVv1i9T4CRT2GvfnO9vxUhw2HCTxULYgcMMopz3Z0
+0hPI87frRY7rfoMTl4hmKf7f+8MbZc8THvdXNASc3LSLx/O11rXDyU85vF/r
+pq9umQwc3n/xF/XG5lUc5head+589gSL+Z+zRjNv/2CxPqb4sPlhZhbr9yCt
+2pR/mcX6RrFHl6/sZrH+Qf9NEu04i/1pNGfEr5Jz2L9a97Kh4/Ec9nffjcSx
+bUUc9j9hYr5EYuFQH+aRVyeWy3nUT7Y+oW9HFI/6am85m5Vr4FF/3gWBysQi
+HvV5fFvO64ELPOq3u+yhy8sCHvUdu7DLlJHFo/4Hk8ZmlgTz6I+CZO+fdNMc
++qdcnfjS7wyH/nokyiILV3Lov5KL2o39FSz60y+3tfW0gkX/Zu1dNuyc44b+
+9nRvUVYwbuh/2ZHPCp8fcMX5kBl29VXAmAznhy5lw5YraZQ/zJdHH9mjDP4H
+xxO6LA==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.4452, 7.75}, {-1, 0}], 
+        LineBox[{{7.9999999999976925`, 15.5}, {14.99999999999251, 15.5}}], 
+        PolygonBox[{{10.9, 15.5}, {12.1, 15.1}, {12.1, 15.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.5, 16.4452}, {0, -1}], 
+        LineBox[{{7.999999999996362, 15.500000000005457`}, {11.5, 
+         9.500000000003638}}], 
+        PolygonBox[{{10.052322615314452`, 11.98173265946094}, {
+         9.102165824326175, 12.816718930329426`}, {9.793188945044921, 
+         13.219815750748694`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.015942703607429, 12.323799910437668}, \
+{1, 1}], LineBox[{{15.000000000007276`, 15.500000000005457`}, {
+         11.500000000003638`, 9.500000000001819}}], 
+        PolygonBox[{{13.552322615314452`, 13.01826734053906}, {
+         12.602165824326175`, 12.183281069670574`}, {13.293188945044921`, 
+         11.780184249251306`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.984057296392571, 12.323799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{11.5, 6.}], PointBox[{8., 15.5}], 
+         PointBox[{15., 15.5}], PointBox[{17., 5.5}], PointBox[{11.5, 9.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T18", " ", "P1", " ", "N35"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdiei/fifjghgjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdiei/fifjghgjhj.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:eJwl2HlcjNsfB/AnWqZ90UpqSiktTEmSMoMi1aVIiiKMpUUGUVfLzW29SUpR
+LmlaqKgrSpsuSVJEU4pUl6G0SAnTXvw+5/Xzz/N6e87y/X7PmXMetPYd3Xpg
+DkVRukIURZ7UzC/8WcyiJshThUWFVNm+uAfHhuUYE/eLxGX7wv0HrmkrqbIo
+etHa0kUw1fF16Tp4RE1cm6/Lotxq4kuj4MhPUm+yYGr/pZXvYP4/FlFHYC/l
+J+6b1NDu7FjcWrj88D7RWrh8cFmfJszXfBdjPx/j62ouE4dpY5W322F+i3vs
+rA7imdws5LMAfy/mnDsD91tkvZ+EpeJdW0TQnpt/qSpCnUVZmNIGVGB9k8CN
+cxeyKEf1tqMmcLiwwuUAuIuml+FE5m+6sqsV1mennDwB222q/aKpwaICfng1
+ppL3TG7QdljHJ/jIffLez1UqgLxfoGLQBVsE8zKC4cj2qZFx0t5bWvkI3Kqe
+2S1F6jcrb2YP85udvdXgNN6rBCWYdvM4Ux2u/vMNpwXz58UfilaEwz3Ol0fC
+Ltl/PBOC6+83FzHgku5kWg/GZ0lM93QgvxG+3j8kHrpL8PcYmBEqefEvkp/y
+TXcrmDWeP7UZrubUbJlBfXSGdp+QJvGufpf8HGZf2tpRh/oVCeXZFcKq386s
+CYXrmx1as2GjKyUvTGH+5PDTIrhny8oHA4swX2d+UytsU7zGIgeu/pR7Sxbz
+2RS+ZbLheoMSUy944qsL1xCmTqjuroXLL3x8O62N+V22716FfHRi1iq8hlWX
+vi+7D9tNC4nfh8MHKw5uRH08at7J3oLLNWLE2mGe+GmxG6T/qX3C3prYP7ev
+eZH39cWPHo/CkbaTWpUwl1M1aEVnUQIVme882GOB0MUgOEBDVHcYnolaqFgA
+f0l+8kIW8bEfjX5vgyPt05uXwxYTzQtHYTmnF7M74KALe4ZpWljH7zMLT8O1
+IS6m8rDwnzUKacRvOcYycGOuS99tmJ/77BIFf3ka8+kh7DERljSA8Zy2O+TW
+kfdO8zKfwS7JAp3HcNrL2cvX4fJ3tQ9LSD3HvyWEEMuy7K7Aefp37jvDBeYK
+VCAcQK3014N11h5LtVtE9rPru1/IX1hPabE8sbNcWyVctEGG3oJ8g5a33I2A
+u54PbjgHe8mVd3rCtH8aUm1ghoPaXEdYP3LWfApxuykMyjqR9o0mO4vgoAZH
+cV/Y42iTiTecaCIilQ4LDl9tWQxzJ3Zt+gSrJwbQB0mc1YViWnjy9ccqy/Ck
+G8874oYnTa7/yzk62advzFPxTDsyN8Of1IV5ILgTT7cleZt34mk3oau2CON6
+re2kkbxtphwafWEzsxrvraT/+UnbYtiomMv1JOt6r339OFmf/GVBx+DEdaa5
+K5DXVY2JffEkjlNpcX5w4+HlZ8m65xRt3P43HGKa8KkJVnQPfP4vXLRTZoOA
+vA8WzCf7Mm/a9pQKxg1gR3V/hCdujzisJOt+s9qyh+zDuYoPneH+3xm3OmBh
++Uc/2XDe+LOlT2Gd/dkRR+E0zQkdsk+7LmdocuAS4bM2sWTfcj6KHyT9L1rH
+ecGRop96nWDB47065rBUnGIjg9TfN9VDkuzj4fE1ojDnnk/4R7JOzK5lLST/
+joaGf2GrDuuRi3D953V2GbCds5PuNrh22/fnsTDfZ2mZJBybM9kSDKuW3z9N
+9gXH2ur07zAjrrNlmJxL2j+P/QlXtyl+8CT2fzt2iczHez1AzknHmK1NpSRu
+J1H+Driqa9HmD2S9StOtPuN3Lnd3ibsS4mUNGXQmwGx6boAz3C+U2rWReITT
+kgy77dmXpAzPyOxnk/pZBJr5TeNcEdzf/00b+9jNyW52FPYKXmjkS343N3vG
+hNE+3jPmWRF8+Mkdy8Xq5B5wSP9G3kuxv7rCBa5qNwxxblXX/JeeDPdHiBt5
+wiM70l3aYf4N0xeRcPiQNI+O+PvHn8dnwu3chTcOw0ap6/+7C5eLeZy4BTf2
+9VwvJ+dkwyuxTzCts3V9MUyZtCXJoz4MrZ3R2eQeKpupNYaFzVNvxME8/b5p
+c9isQmK1DzlHbVdvM4Tb87br2cD0X4IqcdhGayh2Ppl/hbEkuQc49SGZX5HP
+yJev38g9oHjr9cMnMGdMmtIh70089DNgVbPl5+8gn7wNzbOhsF129y0GHHsj
+2pCcw26LXMZyUL+07ErnbbDcD49QBdhv8WSJI9y/jroYSu5ZCV0TZ3JOpxnd
+/Ix7OP7sbcZeMr7JH0q7YYuKHXkhcLlk23An7nGbE+kq2eSckT3WfQh2YXef
+e0XGS98vJwLX+kiWSJF7ekvJx3v4bpiQMexwhFnVyT+DYU71c9oFHXK+Ji91
+g1mbRZU64LSLCbvsiT/cKtUm95r+5XPOcBDvcoY3LKfQN+oLlzzdlFwA82zs
+hVJhde/C0AFyr2XEHG+CHV/7xmrg3kxsOxkhj3i8luUZ25Pvmo3Jku5wo0PS
+RvIdEysaezOTfMe0LlA/A1vs+iDohWekj7LPLib7zTpTB/nbpJZviYOd9BeU
+uMJsa/szYeReHv0r73dYykhJwpuMx9BOiYMdZ2s9HWDuy5c2MXDPu4H1emQ8
+M+sd/jDNuuHJT8Q7cVrKlglXcRPUWsl3wxlDnynMT9tw52w+HNu7VIjE5+Z6
+8tAZOE2yVnkFHM4Peu9JvqsUHwVUIN+8jVbjLFIPz9woE1LvwbP+RqS/xX2T
+TGXEez39thb5DrJQKpOC1VUuVxPTFWzDgpRwrnzVWGVM2i9eO9SvyKJSHCyt
+bGDVwKOW++CRDVOnDpLxh5LX9s/D70u2ZlEyHHTNwyMMjr9srNAAO9VqsvRg
+fS3LYlHky9I2+NijgHpLmi8h9R9hVuwvh11obTuTYLsj/qJZcLXFdVoH7FVU
+tCQTNuoR79HSw+/KStW5hPS/y7txEOZEZS5/C+d4cgxuwHb6Uq+kMN+E7dyw
+dzBtzam/HWCG38IpaX2cDy1TfybBtabFzsvh8qddVh1w4x52xm+w3aLLu7SQ
+H6so298DDl+jEUHypV3wrN4DV79yT7lM6pE8LOEGy7W6vqkh7Ye8V2yAnb5a
+aXXCOV5eCYaw6mCh4D3MTox6IA7zDppfaYJDtKrKPiK+cq+X5vlwecWKzHLY
+4nHpMz/Sv/nYo3Mknz3uqxfA+vSZg2yY5W1kWzqP3IPtvDVw4toxHxZMSz+r
+oknqs2txVxWp3/YiFTE4b8LOZRncc+jL7gnUkzf7QXBFHudWpay6AOb4mC0Q
+g63uTCtMk/X4cH35STmMK8NLkSb1PS+l1iaL9XUsDDEk8z2e5/JaBr/rNGMT
+F7j6AcdyVBr78EDUzWiYOzXwYCU80y4V+gimKxsczpLCPWZd1zcH+bPWBWlb
+wH51jr12ML2kTWtKEvPoB9gmwYmDd9r64ALRuoq3+uT+LR7+Cbswxsc0l6B9
+m9up1ehv9ob9dC/sFXhmPBVWL8jXTofD61eXSmN+fV32Oh7MyeIKUuDEh+4l
+kzDPcnKtLuLniq/xVjXA+hWLNt+Du65GPzSEGSKTzdbIlxb731/L4ZHu0MYS
+OHL/iBwDtqvTCxZHffSv/SWnDXMaDj3Sh+lZ8kUSMD2QFbAC5m2rPTWI+bi0
+l/HGcKPNPKs6mPX439eycIFYqyKJl2VoOVlG6vtiyvo4LJcSo6wLl5yrFLGD
+EyP82r0RX7mPoJhO2lcc+ycO+egs7Tv+E/XhLtwSeA75s0ylV3WT/Rj2zeZ3
+1MttvuQ9HtmP1GpFVwmMlx1iVU/28xyvYCNxrFfKlgfPSPt92ltFaPi9nrKo
+aIcpS78dA6L4fmjJMv9Oxt/V+4Yvgt91ndMzZczPV1no/kMY37GthZdsSTxX
+Uh31YO7NvO2hcJFA8OLMXMxjU3GgiuSz5o6/KFygldBBoT5eJ/Lly+aQfx/e
+S7SDEw+8epMMu/UFr08i/jSscQWunaOW005sYH2hAeaObTqmbohxBRcc52O8
+qzW7EnbC1MrDEjFw4/lHqkkwn9vjTUM8qoIdwQ9gLtvd/BKc1pQY9gHmKepU
+6SEfncKPLpMw/QFXqwR2q5rJEjFCe+Vrj0yRf+Md3whRuDqlLOIKHL83LmqG
+zP9LZlkfrPOlPrcfZnSplsiK4fvkY+RvjWS83+J85IhlOxj5ZD77EVYv2gfl
+zzidIfHuk+g6D09oNf/nStrX5eVIw1dnkrSMYFbfH4/3Ih7H6UPec2FOzQLJ
+RMQf1No99A71oMJf8dKRb8DgpqpqUs8sh9Ik1KdqeVrmTdip8u6BE0I4X16r
+q14j7Tl+6x0o7N9Zd4urcPXXiwybn0xKx6+58Drp3x19VGiGSU1cNSiqhFns
+gw7vJ5lUT/wk1Un6X8oMGxpnUq1TVsMiiMerN7pt1RiTqvr7tLslceCyzCYB
+k6IfYzw+Rept+nR92Q+MZ754ZwWxSGvH6HcmJfVTSIZCPamcAYlzMFuwN8eO
+1LueP3wajvXJbkqE+YusDSthlqH/htdweNKUzjqMV3J0XqeyMfo3nHcXw3z6
+qc1JTsSz3NZpuHyJ2r0zxmS9Cx/IIr5EHeG+PJhfOveXCeKvWvXbsifG5P6J
++uw0gfgCLUReEytZTexEvilWtO2dcPWxpADmFJPi1taFt5H3iZOGX+F4Nw8P
+0t+LYS/qOc2khEXn6xaQ9mEx8WFwo5XsybNkPt+WbY7w1Uu3TA+QeGrNNtWg
+v8enbaGrSX+WbSepb0BTUaocTB+d/JWLeJwSUni9pD4LjihrId72zv2+1TDr
+5dPrLqNob/gjNoPUx/7z9GbUQ7iqVj6avM+/e1vjG5MqkIzOOkn2a/Uzlbwh
+JqW4KSX4KHm/1KWZGsD744yAAFLP3giBTw+s3fstkrRfpWIhzke+CqE9XDI/
+Z03IxBsmVdt9re4p8YE78TU87JcEg+wJ4qKDUjZPkN/3nxqmpP5jdr2CUszn
+2h59nLgx+71/Jtan/S6/jJj8Cbf+//8fGbP+ByrUpRc=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.851144620506076, 7.907943040036291}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl2Hk8VPsbB/ATCUWNpFzLNeRSlqiQ1pmUcJOlxdI6SHS52VpUqhHViKJQ
+IjWyhmqKauxTKlOoKbLLXOVS2bIlit/ne3/+8Xr3Pef7PM/nnBnnpOnut9lT
+gqIo2SkURX5TXZP40WD+//ciJqVWVsyWoDMpk7YAGg+mr6ik9WJde/YiKxbx
+xwlxIZxVEZCoCHPs1M76wv46yY1VhkyKpXDPSwrmTCievwjz5PlaEb8zKZe7
+hRXb4a7pYTt/qjOp4mPX9JbC3qHxnL2w9cr+B8qw8Y+otAo1JvXpRl7xDNh6
+3toefTgqnDZOHOzwNuaqKpMSswxDyPEJAb5uNNj61Fi+EUy7cyUqSYVJCWee
+iLOHzQOPbV8NG/imJh8i51/wGR39DXP67Zl2ExZqmDuK4KGy0CYhPBpmNlwO
+7z1+i95Pjm9ZoVgD06X/nFTAvCypqtPjcNqU82J9mB+j3LYc+zf02FxeCWf9
+teN+BOx7LN+NAXP1b2Z1wBw9P2Mzsq6yoMUK/dYmxJ7WIHm+sFLKJvN0FoWP
+o17/ckp9GuZ1KKuTrST9D+TKOsHeha3saDKfVCcnDv7p09v+JyxTKKNVokb2
+T0+cNEB+xbQDVXALvceTBwuKFloIYOMjpUtZ8Kjt01dXYVbQ4UkFWPzpn/gt
+cPH12ByhPuaIXR41TPorz2w9C7OZVo1sWNBk0WoHc8celv/APFXHDx7RgmVW
+fT3iCZtnW3dJwP4luypekjyPulb262G+nA9tBrDvXbM53cRe7hNxykzqmYnE
+rCFYKDlTUwa+nrp8vzQ538O5OHIeco1eY6ENM03aDmvDaZmvLazJerpz3/u5
+TEquzrLQHx6lNkXfgll/rRIkwqLdU/+OhAVjLS7lcNemrtUxML1PP7ETtn5q
+sP0enDbHTzQV88e8CnnbAcfd672pDLvI8aKNSD3BX1qacP/3kuhz8Pr22gk1
+mNMUqNIFN+TqHJsBC+Ua5Deif2P2aXY39u+/UbMwG1bLNcgQEHtZ7J6ETW45
+0CNgzqXiuZbIg2nY/dAKpnEc2Yfh4qzrtyeQh4xdzfNo+OdvHsk82GWylHER
+zj9fFsCC2Uo+8f4wzatUUwFmarZUm8HhY/zk5wvxebP5274d9ValJ2aw4ZgX
+Dq8PwTsVD+eshxPsy/WGyXyTyjmKMN3vGtMTFs1XVe1bgH0/h2dXIo+hQO77
+elimXjZkESzz7sHM17DYJ3o4VgnznOQ7voV5iWvNJOCDd3XOieH+tti+k3OY
+lPK3BRJjxOn032fBDUaX41VRj39sV+UjRVyvJQr3LGBRoWFzMNy9YusRX9h/
+TNjpBDPrIobjyXr0Y0NHeK9WmEkxHPzhA2cfHJWR6dUCe//x9HQcnLaxR34I
+5gxbBtTDJsMaClOQDxV0OE0P9W13DLQRCxcppXDgrM7LocPk/EJFz69wvqko
+pRl2kEp7YIt5dt4wjc+HaVNNd2fAwq3dW0Nhrv2FpAG41iYucB1Zn8ncYIB8
++lfnTv2FeY3XDGjawwbbT0Tx4IYo21kuMLfgTR0LZttKLrWE+Vd7G2hwgqac
+/FzYVvt+ZLkuPkd1H05WYn+1oW0vjsM82SCBF/zs4BTVVTAnKHx9L8nzWNKj
+aTC/MviCB7xqMNmyVQd9ZkoMV2F+mfEFbQKY42Ox3xjmzHf/fh/OyritFTcb
+95vzS1ce7BLCcJpQYFILDF/pF8EyyQpdB+Faq/3fRWT9daLmLxrO+3mupA+O
+WfbILwnuD2mcqYT6QmkX/S2wi4mj3hq4waPETwcOKbqg4Q3H2KtTc+F89cuD
+0bB1idYaTfh6vMSLB7BDWMbiDbDgvuJwNUwXWqeEwvx1PmvayP59j1a8gYdK
+XZo/EZ/JFC5Ef4J/pl5thdnuX4Ii4Z2isFYh7F/DkuuFlcPkyzNg71g7p42Y
+l24nIRkMi0tWuyTD2tEVI6thkUdW+ge4wbY3fAzzBXs+vTUdeWnXHZIl+VjX
+KpaqwxRns7kbTFkqJivBtTeyxmkwbejS8m84P6uWZf/0D9y3wRG9PLiqpVU1
+GBbxs4OcYJcvaQqmMD+no+IT+rMtKjs3ro16F0dmsODwxyG7q7XJ90K1XTXm
+9VUd78yBR8u32C2BxWlZ9VfJeozLHr1ZmH/jqeWXYG7Lq72j8vj3UP8Ass7l
+vX7WJIf7SF5q3W2YRr1JaJmBvD++FT+D2bN1A6ThT9spyS6yn/PtVvfpyDX/
+jSQN/dEL9GYNySK/PTnUCpireOdKCUw3M59whx1SHC3L4CzmFXkOmU89ddEI
+vJUtFZABs/pUqndiv/V22qVFsH/mb1Zf4bQ61Z/P4Zi1I6KrqF+ra1FcTo7f
+sVPXGf1qB07o55N1KQk1dcyTtoSmcZWcv7rBsBUWfOUr/A0bm9r8ETkTOTLv
+aC0j/S3+lKuKPIzfKkt9xzziRxJt4bA33ePrXZJH+/EnpXDa5lIfN9iYt/12
+OcxeVrdHgeQT9zg0Bo7TWfrkyXzM83jNgDbcf0U+/BBMXWN7hKHeekWPQCOY
+11Un5qEfcz0V2QEtrHs6Neaj/+uen13KYHpJ+9MEkvees90JME+zL9UL8wvG
+9zw8BYvLHkQYIq+QL7WTQTDXPerbiDSTym0+6ncIFun2G4im4XuhPlkyDGaW
+nqh4JoXP/2TN/CTYePDJyIepyOt6R14R2a89V0UXXlC4ZFE76ad3aGuqJOZy
+WFY+A/0KpNirnOHgvOwQU5hZf5G3DpbZc9p9J9w/tbF6H2ySIss9AYsXaU0r
+hoUUI/MKOf6opusq7G/dWuKQDtMjh3NIfa5kxkgmzC78Z0UC+vNnL45IJnm9
+EWrsQv97q74nnYH9g+r+pWM+erm5D4vUez5Xrx7OX9zTsIjkvXKvwUEZzOP1
+xI3k2R+n6tsDr58VNv0OTBP56KxAXiY9nze4wazK+mdbyP03Y6RJgeSREW1k
+Bs8RufGfaCLvzUmUGOcvOFvfGKRJ7sdt8ZvhnwseqevDDiO7f11C/a1iM60v
+eM7tv19XkYZ+07h52nkwb6Hb/VjMY2Kf1XEOptjfzPZjXpOiqsv7YWZ/3uzF
+yMfY15XvAtMnTtz+PgXf11FGK7YRu/T4vaRwfQ8s37Yb5l4+n7x3kkEZbBjI
+CoTF0RvUjv1i4HOfbB1DrJ6Y3DHOoJhRTjX55Ph3W4wfjjGo8CevLrXCgpZu
+auAHg5IL0U+QRv9M66F/b8LdGne/GMHcQ4qmJbDvnJpbW2DxdInXFjh/a2GK
+oj9Mf+dxQhv7s+WUvp4mvrUyxvEng+IUzrM/T6x0Jv0h+qmSzxgKJ855mbsc
+/Xb3DRkFwsYP54e5U+R5tvanI8nTb9MODcyba9cxoU3q5Ry0r4AdPicf7SZ5
+Oetus5dArlZhzGzYweZr/x14NMaVyyLz6pXnNsPK6/dbzIZjZgQcqoG9lU7N
+Dcd7A/1eZ+NlCfL3QKGnA+8NomuihSowJR370R5mZmQF+KKe6GyUXwXeG3jl
+qVuj0Z8wtGqnIyzw3x+lhP77mwIvfSPPuUe3bXqLeWmBJq3ZMLuSHe2NfBzo
+y+pOwvRuq9LB7wyK1bX6+d8wd92z5shhBsVfq37rMCzYtcnaZpBBCU6m0slz
+M7ft30sW3xiUjOuW6kqYOtKXP7ePQSkXcMxpqM9MmP18XzeDasj8ariH9OMh
+HRH5Bdc7/fjwA+KmXzUxnxkUNW9akhTmYd94H3YEZqWcN3ck86VsOmyK4wU6
+3YwYsv76mvSjrwxKvNRJUELWDy+d09zDoPyzh1Lfw9yU2+aMflxf3/H2Wpjl
+2fqpAP0xrUNvFxCvrPCwRP/GhdsOhBH/9TtfOIT9vfJ/LIEp1sk/9Ucwr+vp
+Ha/QH0siX80JeYg3X3xrS+bZpfzZZJRBCVWUbpaSPN71aTyGva+frtcm+T72
+fSSCRWtlNM6Q9xjvZSXHYPom+l7y3kMf1nich/0c7hyI3wizjIpzTqEe/WGy
+cwl5r2qSGe5EP1lp70sZMMsm/NXYAPqzWTurHs+tLJ2j0a8wX0JXwbmzMFNm
+c1Mj8pURmC53IH41nzPYSTzUbQJTJgqScz6in6C7Kv857Au3sQX7563sI8/p
+FHOJj2stro+jt8dRYtnAkuGXuH4vX7vxibVdNsgXI9/Wjz8k0Q9lUM41SUe/
+vnnJTsSUlnPGYgZlbvGnVzYxNy2CHllG8W32u//4b724ulkL+Zt/riPvnRRr
+X15WKvovMIwJJG63dNMtwP7KBr/HEv+WM/3gCwbFa2qUuw6zF84z+CZiUF2J
+9rMiiRMvaivUo/77M2p7yPGV3llmrZh3cH2IMiyYxlc69Q/2b8oo56M+e7Bk
+x9RPmGfJticWsED3qhX1L+5/r2PbC0leJs/v2iEv60sq27VhdoFUWw1sbLjU
+9Ow8cv7Z0RMkT9ULL8h7EXuGa7Ulzufui5OygalQo5VG2N97irDoIZ5L2W9m
+jlujvjjWc9ViYs6Zd87NuJ9/NGoK8FxKfTBPHnyH/Wcvm7OPeHVK14Fy3G8d
+J5P+ICY/7JL///+DIvN/nXAewg==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.5990515496243272, 9.421161979599258}, \
+{1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.999999999996362`, 17.}, {14.999999999995453`, 
+          15.499999999996362`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.126447748763752, 16.890374170787496}, \
+{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]& ], {17.81512204377634, 8.004985304149105}, \
+{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]& ], {18.88748581947994, 4.835942983375933}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwd1Qk41GkcB/B/ji2PclTuaFzlyBBJizzvJmUljX1sKGVcTVJLRUutTIex
+SjkqUWmHlKOSatcVGylylKGY3bGtWbIlcobayuz3zfN45vk8v/f4/b6veRgG
+R34XJscwTCR+6Scjoz82hPnyo0kYQws59xew2sR5QY4GYbw7hr4ug4XlpoN+
+GqT2b9trghSYn1+TvFKD8K/oN84OhtMcVUtXwYMHTa+sgjnJU3GBWL9EN89q
+Pj3/TVtbIeqs7qkcqTVhbB4UCNQ0Cb/YukRUCAsfbxam4X71MwtnDsPSqVsF
+hlqE/7L2qX8oHMW3N76nRZijcxXY/nDak0gtH23CZIiGuwLo/u3q6X2wMqui
+dQ9MZi6wg3QIP3ZE8V4ydadT7iM44IAo/yY8am2jr6xL+O5OvvO7YE5nzx0r
+XcIEq+9fJ6Pn7ww+aYn6y6451V/6f9uooKhLSN+gncAIlj7Zd6NahzClK9k8
+K7jWRKLlq0PIX4IhVVual67qZQn6GfdTTLeGbfzIlJc2IQZFC8JN6f4yjbpq
+zHdZfDhlARzVK69gBYuZwNZ3uJ+5n3q5EPksy92Q9xvNw1hc5wDHNFzT3E37
+m5ex7x+8z6hEwU2PztNgoH8d+Q780FPRwMZ532iuyUL9tIqKwz5YLWE3KUa9
+Y2PLMUOYcdtCpDDz/IHZH1ao5/oQnM98vJ/vkg3XZnq4FsMJvOOreXCpflCO
+LfJvO9nT5QqLAtO2PEa/M3KZ3dawUHu6Ilib8Mtzg6wtYb7iiVvvMb+byenm
+FTC3cHbcEeQv29vZ5EHX/yTWnYTv2kSc3AVzPlf1eCLvYXasOI3uTxz//Rje
+4+aTTPUqanF+USZcUO4b1UvPE/dVHod9++McvsI8tZ8PkU3Yn/XId4zOR1yr
+Sj/gfe6maOXbwkKnwIhk3Kd7dY/MHubuH45QRD1PtpxvAXOqOC9i0O/Skfwk
+VXqewOlSH+b9qPQ5tJ/Oa/e6xBfz5msWc27SfIo9qiR4j8mCs/7hMEveID4a
+ea2sjHNbRPMKeOhnifqYg/uOpmV4n9dGI/Kohyuq8aLh2lhuN/2+JbicXWAI
+i9a2JRvBJ4736z+zxPqxXct52J+bntR/inrEa6QZzso65eoDp4UelnNHP01e
+rdvNYNaeMBMx7FVUf0IZjjpT9z4S8zgPOtvNWCCPWIfTSpi3pryzU0ad1P3q
+AvLY5CtRUsV6YcCuJD3kqe8wec6c7o/uG0H+fAeDsAxPeh+nRPsp3MO9fi4a
+Jmu5zZNY3zIkN5BD+2On97yH1Xvj6h7S9aOSMDHscpEc7IelKXNyzmD/rOyS
+1k8wP+bI8+Wot44J5eZgftZqBfMK9NMevoylCHPfFy9ho98qOyO5CaznXnzh
+cwl/XxpF6ZHt9D5Li7vKmG9x7yr9XGr7PnYi5ncxKMkLofMkPtdRx/vdj30V
+pEfvm95YXIZ8Uz2zglswf5RsRcoh5KnpfN74R5g12JgcAode1Qkzgrnx3t5R
+WC+vw4yIzPF9sfHamos6b92NzQKYPy99fAJ1VS1poxvMvf1mWwjuH+6eeqYO
+qzm2mw3g/q3+PI8hM7y3pFgQj/4vWQwv6oKl8vXNWphXqD7Xuw3mxPz6tgTz
+Vm4tk9G6zaSrtiPyUnnnHDIIixx9LG/Dix1Tx5VoP9WPnefpEf7HEKefrWFO
+jnjWt/CffqIMP1hYsZMVpEeYCXbVhiOwdMMvwT6oVwd5jV2FSfCBJmP4nGkK
+U0/P+887vgPvIXqjE9EJl47uzQmDuffWNEjo+YU2Y33o14trGNUO16Y2JnwP
+LyysKayg+xO7F9ZjPt6s7Jw0OK3FsdIe7ng0vWMLvY8ztLQMeXyoVJ3Wovmo
+DKz3RF5FnvqfWjAf1zL9zgzy5A1ZlMfBrNcWXh3IO8xcodmE5rM7UY7+/cfX
+bJaJluK+HetT/sX6+MxtakdhtW3Ze5fgvAOGWRFOsNRCoi2Av/yTo3X6qU3+
+B+U8lqE=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.109669593634097, 4.811165529975059}, \
+{0, 1}], LineBox[CompressedData["
+1:eJw9lAtMU2cUx6+PkoIb4mOmcO+1Frz3U0CFoRVnlAMR6cLYEJS3KFWMjLBW
+wQRDytpp9vKxymAOAQkiWkAIlTfy0kxQExQVlBHETthiEbExLoBT2ddozk1u
+Tn757v2+75zz/x+FWhORPJthmBD62uP7h8CSefboAUy4ekHSGgJdCSM73W+6
+A6M/y8t3EPjzVLHE8jNlaYdnsYbA9J0nvo4hlGM6yjt1BDRM6WjFjAIY45dt
+1mwCMQ4241QDZUvh9Y/TCaR2lyjWaijbBq1VcQTq2kLUeZ6UVxjz7yvp+e/S
+H/g+WwZMZ2WgxJGAj6XX4Z/LlPV7atbdF6FxOGVj4BHKvX8NVZ8W4XeLkz5j
+J+Xdr6enYkSIkRZVBgdR3n9opN1VhJLNuZMOn1L+UbXQPCRA+9OG7371pmx0
+3r7/vADvvn48Gu5LeSrv6OfpAoh1PtfWBdjXI3WpoQJsvXv3k/7tlJmUKP1q
+AS4VS5rTtJSbrtuu8QJEu2Xq3v5C2bI5x+oqQERVr1O0mbIqVFjqIYCXvurU
+hnuUbfXaN/4ClDcFR6TYKEsr436LE2Bk0dzxbkea/9RVafb3AgzOaU9L5Shn
+Dn/T30K/n1XuVStSVpWWqv8VoGZPbGYsoewCvMlPhDqu71sDT1nWd3vmoAiP
+u6qrOqWUm4JmGmtEyEotW+9htedvKPYZE+HiwYEzXh2U/cctkxyBnsK/XXqO
+2eu9pW90K4EMpcU/KZyyVv1i9T4CRT2GvfnO9vxUhw2HCTxULYgcMMopz3Z0
+0hPI87frRY7rfoMTl4hmKf7f+8MbZc8THvdXNASc3LSLx/O11rXDyU85vF/r
+pq9umQwc3n/xF/XG5lUc5head+589gSL+Z+zRjNv/2CxPqb4sPlhZhbr9yCt
+2pR/mcX6RrFHl6/sZrH+Qf9NEu04i/1pNGfEr5Jz2L9a97Kh4/Ec9nffjcSx
+bUUc9j9hYr5EYuFQH+aRVyeWy3nUT7Y+oW9HFI/6am85m5Vr4FF/3gWBysQi
+HvV5fFvO64ELPOq3u+yhy8sCHvUdu7DLlJHFo/4Hk8ZmlgTz6I+CZO+fdNMc
++qdcnfjS7wyH/nokyiILV3Lov5KL2o39FSz60y+3tfW0gkX/Zu1dNuyc44b+
+9nRvUVYwbuh/2ZHPCp8fcMX5kBl29VXAmAznhy5lw5YraZQ/zJdHH9mjDP4H
+xxO6LA==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.4452, 7.75}, {-1, 0}], 
+        LineBox[{{7.9999999999976925`, 15.5}, {14.99999999999251, 15.5}}], 
+        PolygonBox[{{12.1, 15.5}, {10.9, 15.1}, {10.9, 15.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.5, 16.4452}, {0, -1}], 
+        LineBox[{{7.999999999996362, 15.500000000005457`}, {11.5, 
+         9.500000000003638}}], 
+        PolygonBox[{{9.447677384685548, 13.01826734053906}, {
+         9.706811054955079, 11.780184249251306`}, {10.397834175673825`, 
+         12.183281069670574`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.015942703607429, 12.323799910437668}, \
+{1, 1}], LineBox[{{15.000000000007276`, 15.500000000005457`}, {
+         11.500000000003638`, 9.500000000001819}}], 
+        PolygonBox[{{12.947677384685548`, 11.98173265946094}, {
+         13.206811054955079`, 13.219815750748694`}, {13.897834175673825`, 
+         12.816718930329426`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.984057296392571, 12.323799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{11.5, 6.}], PointBox[{8., 15.5}], 
+         PointBox[{15., 15.5}], PointBox[{17., 5.5}], PointBox[{11.5, 9.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T18", " ", "P2", " ", "N36"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdiei/fifjghgjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdiei/fifjghgjhj.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.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215291833344`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"0aac61b9-b707-4352-b484-ba5a8ea791ae"],
+
+Cell[BoxData[
+ GraphicsBox[{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:eJwl1wk4lWkbB/A3awgn+1YOxlKok0GROoeIQrRMtlH2ofgcNYpK3yFkpOzN
+TGbMQSOVsZQGUY5lKFRnxpqlTtpE5WTJNsP3f+ZzXa7H7zzvcz/3fb/v+5yL
+TkDkvmARiqIe4peMnDfL+NFjUf/+qLEommS3bStMn33Ov6DKooxpprEJsHt3
+zJypKovTsJ03awkLFR11x1VY1JeuAyfe6LIoTsj59FYVFmesrHsyG6YVpI03
+Yj4mWeKcHcwf8LYYhh2inBkzOiwqI6SqQQXxi/VcO8tgSvwHx6Pw+eRbHVEw
+N0CE3ov9FF9t1GfBfinX2HvVWByv2U2bNWH2196JvciXWZt4R5TM/yOud0id
+RfVGj/8yT0d+NfGTAngm29Dub1hw3eSphwbqmAnfJo3redEGvvUaLM7PKS1X
+dGDOQaPFlZosTrdOyGsm7K5/jG0FW5qUOAeQfFPfT+3WZFEHn3S0JBGXJvjY
+YN7P+KbVNbL/2/vGcnD6n0ZlzaSe0KcZTdhP6bhFWD/Mqs+19cV+JVn71V+S
+/f6Idn2J/GR55VMvyPWRw/3e6pjfZdLZBfNvVLW3o77QM2v0a2DGo75Ia9R/
+um3EIp3sb7tRvRL9yk4QHfWC6d+l11qgX1zfmXZ1Ev9GUspj9Fv+1cZlPp3U
+O1nGwf2Jj/tVPQHmX+9a4Y756kL6Cgbpz8Tg4+2wIK70Up02rr934Z4rfEWM
+vawFc0WOtJ6GNUMPm6SuRb5Jf7Fwv6nVIYNuK2FuEVdiHfIxzKvk5a1Bfrf6
+bubDmZ3j1Y4wZ8S3jY56yiau6MvBrMvzTiVw1inB5Qkt5GMv32+KfkgOZmwY
+h9n9RpY34BJffsUSzJjS4qqgn2b+sgUGWM9nNRhFwLPjLexDMHvaa+V1uE8x
+v54LV+i0DbXCHirXc97CglePe1tgacOFDhPky4k48lch7FAV7XwEZj0r9gyA
+mbqxgVdIfW1yFyTgEZqGWg1M1y6bz0Y+mh5LgQ2wu//LYBr82NPlP7/BwoZN
+0QmoR6fpeQWHrP+41vMT6pc1bFxlReJHtIUFwfEXOjv6kA99h+WjEfTPeHNk
++mHSD/ubssfheuVA027SD9XuVg147DXzjDXMvZfp9UwZ+0rmKPyA59Dd1KaS
+B+9fGl+cRJ6CmBitZjjVu/qbvTDbsnzra/ijq8vBWuTJvSknoY94Rf8JcmKo
+k+e559VZ8n6WOM/cRd7CVydffoA7pLgyvuQcUFObJO/j71WTy2owP7HPchJe
+E/p8fAIj/WldWCw+l2ja998XcMWEh+UCqd+uWew97GetkR+BfdQmdWNW4XOe
+s8bBR/CY4ED5dpjVeFpTCXlu3SmZFQfT9y7Ob4PFfMUPNcNU8DTHCb4bHjEt
+RfKvU3tlBsf8wTN2Jvnf1pNYwvhzYoJuPEbB6Hx4KUZHtsKlYoz8A93adhiH
+vIpWVGNk7LaJakFc5+u568phnllptRX8vkV9Lo3Eu5o5V4K8kzqbeG5whd4X
+qerwrbOXbedIvquWK7LQHxFr7R9TYIFN8XZNePqt6Hqxf/u12rIW/V43UhAR
+iXW8UYnTUfB5X6maJ7iO1pmc4QiHXo8XrifvWcrNsG0we/6A3XmMGfXn3PZj
+VAuRaR9TwvrUbcPk88X28B0+MNvuqUI/3Jp0uX5YEfUtfxPHRJzCJNN9J2C6
+wt1jNWQfT+s5Q9hP5WtfG+TxpXXWvmkF7DfzRqkFjjN8nj8IV3Ss2O6EvN2V
+wyuHYEal7G+N8O2uZ2IzMF/cvXUd+uB1SGaIjnjCkszeU3Ccsca3PjAllX64
+Ar7P87P/hfjklgNtcFlHjtMbmOGSZ3sfHq08uXc98nevdAvIhcdVmzyCYX5D
+SN4eWKpurjMTZhiJBH7A/pplE69vED99l3kCXtyjPFgK029e1BUi/9BCA81c
+sn7NgMAP7gq6GhEA05oU5Pmo3+iYlagyzN0dI+YAy2pZHC8j+Vd0tbeif/EN
+VsWbYNqCHM8Hto2yKS9EvX7Kj1lScJC5IEcCFj6M9+tCHCmelFzgauwvdfdW
+PfxoyNziPg33Iy/XqBX+PJRhuRbOYGiLTcDhS4cXVsvj/p2zHTEn71/njjZJ
+OfTnn86BbPgH0539BrKIPyuokkB+ns67V55Yhedrw7zJefjsn1Wl8zK4PwpT
+TnKo76qbl89tmJdfdCeHeNChpwCmFpXXKaI/GzyTVRthgYlrCzl/LvEWM6QR
+j/8kLHIYTjxw/FQ07OfjZ7yWvAcnD7vMwhUFcwdsyfflsKRLIvJh5Ob02JPn
+3uOREQ35CusYTCN4IH9nwSVYoGP413vEY9zJMpyGGUXfhOfCZnmOZyxRr4At
+EWhA9tvyYrOrPKlPz+lX5JtWF7fVDKbXb+GqwWb5SyIjWM8/WpZK6uXd3d7t
+A7OHvQLm0Z+YmBcPCpBPxh+93tGweZT5rRrkK5AXaovACTpX+q+hXnbuF2d+
+Rb89jZ79GCON+bY56SA47V7GuIUU7v8Tw0UWLJKw3DYuiXxqP73cBp/oib9Y
+LIHnUdBc7k2es9fJnsfEMa/i/TN5rj4aaPh7i8HndnmMw8mLgUGhorheq5bu
+gf17g6V1r4rAsRNKXXDy1K5pBZgl6n/CE/V81NucUr0C9XHUpQTkfLUdrc2E
+OR+ajwegfqfA4Mv5sPCjdWE/LJdve64fzlg4+YUN+uf3ue27zYgntBhNPA+n
+cNobK2HBnYLM30m/t53u3Yp8eCNFOa1w537v/Icw33RTDJk/5r/z/h7kz1vp
+05NM7leXgVsDzLD9Z5ycdyYOSXE01Muwyknswv5vLtRpWImT8zDhnie8b4+W
+mhlMTzjaSs6tW+qFrz+T9T/ZXiTnTVmUaXkS7C7ylX856i95rh79HPuzlpwz
+DWANt+ElSZjeT5ci7y33q4ASceRPo++ecYCbUptWvaDQj/yxyHm8hyXXyvV3
+LTMpzpd+Nu2wSWJAc/XfTIpt/SDnLmzfE5tisMCkKujaqzpgc8eqlWWzTIrn
+kpa8AKdkf74QPMOkWJ22TjsRv3R5vsd/CusNjDTIOWKe3ipf9QlefSSBjvyE
+jzJfhAqZFCX3TrYIpj9cmyU/QeYbi8m5HFNrcET/I+J57Jsqh53Skvpk4Az3
+3hpj8r3Gdo2tgGlhX9l8T9w3P/sZ67lB734i33s5Pp2sYcTP2JKla4h+p1W3
+Db7F/vTbZ+J2wFqatFOiyI/2/sgkE/42jxukOs2k3I+NR2nBVYqlzjKoJ8PY
+6McBEl/u+7QHsEDb7qc4OPH+Wf+tn5mU0OxrTWnYZUvY2H6YF5vzKgn5KjVY
+i0gSRxoXz6K+B8UO3XuwXnj2fU4I3B99Zb0x9qN9SpEZQH/UlmfZBZPwphlD
+L9iGsSG8Hvm7208dHSPnJjN2v+oH9J/WEZwNO7379pDDKJPiX2wO9oRjWsdG
+N75kUgxFB3sbWHBUul9uCP08+9tWFsze5MBb+BPzxb19gTAngZ0j0Yh4biZ/
+X1X8//8dHO49ikb+UGL9D/eEi/g=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.1542307644825485, 4.562492355174517}, \
+{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:eJwd1Qk41GkcB/B/OtZapMORnJNKyA5JKukvcuTI5ljs7CRyjiuxqwhZocmu
+u0PZDjxNjqKLzfF4HCVUZlLKljMhV5GMY9nv6/8888zzmXnn/f1+33nnP6ru
+QYc8RSiKOo4HeV68Ypg0JVzAJU1T8jcldaPgYBFZpzwZmrrtn+oXB19b4hdn
+KUtTB1Q7itPglJCDVn1w4L6hizz4DSe095gcTZUtY1nWw4m+s+xBWNiVn9AP
+h/OD583W0VSuat1TCR2sfyIITYD9ptZY68PFCe9kbsEf3jZpHIY/L4yOF8CS
+M18j4+EWVbolFR7obArKJ+9v/VWaDVuz3rs9hX3sAy9Iw9/GAye7YZ7xlEMV
+6teV926dIOtXfVM+DLPNREPn4IuCHw0X0P+3FSdy/iP17zCm8uDHugU/TJH9
+5oP2usI90yc5g3CM4wVjBtxxL+rjK9h5V/LKpXDG7dKvlbBQXMuZgj8NnbXJ
+gd1yPXQV4KiKzS8S4OolbgtO8DDF9wggDpPwvAOfl/f86EhcFHKEgf5o/5bv
+TOBwXlVYASyiIdAn+cR45H00xXzD1WHnmKT+SIjkAByzxatUl9RPMqr4Ux55
+zs7OGsINjKEs7fU0FTqesekgHMzRyaqFc719033I/B8E9mYKNGW6vlQ/kdSL
+PuBdArP5lQWFJG+jN48pRZqybXpo0Uryyz//RQc+1MjTJ3mpL3eRNYXjqNpz
+G3Xx+bmDagbwsGG9lxXMc3t+T4qsvzf8fQBcbTH8iY/9r7T0TiTCFmaqe07D
+ws12k9lwMaWhtBHOkGg0LiDrHS/l1aFfcU2riGLiDuMt3rBtenBpEdlffXPr
+GrhZc39UDkz1vd7Lx/z5FXk1abC6Sb90Hrw2qqA1Ela51FOVDosEddp6kHpb
+1DdcgwXeJgvmcOKIxekmeDThxDMtMo+yHksa+xtNR1xdA7dM6sZGwO5lHKN5
+zK9ia6c1A/82Nms4SvJp5Oglof+46IGuD3AXZ4KtifnZrx5J9cJy8hvvt8AV
+MT1m5DzR5e29oUr4ngrbueS8CR9Z3ZZSpin/l1XBEqhHb++3yoYPPXBQ1oBF
+5XZ7i6nQlK5Qj2UNt6aI7d4Jty49mh0CJy27ftIFZlWylS+TeU7I2vnBotPs
++VqSF8OlhgOLhQX8NARf6a+6z4bfnarcv3IbvMeh3RQuPNpooA07mEdmq8Cf
+e6tfmMHUg1szg+hn3KNPzBku+5xcz4VjM7vtj8B20V6dGrCrQCveHVb/qyaT
+j/m8xGW//AK7zUS0nYFZii72trAPy5NvAxuN+Lbsgi9KdmVqEy/V6WIQq+xp
+1VQidRd2isIpM9M55jCv+b/yYfQvF9HkFQv7HfG1E8DOrmq17fCnbnXBI5hZ
+cqbUBv3sYhqM34R9ZOLrX8Mz6QGL+Qj3rl1ngPnc2r4cy4TjQicLzpK8JlMv
+XyB5Os3GvoNdTZveXyd5jidPaKnifjCmsuI+qWcUHvY7LHAcC34GN7wNfFUG
+Sz3PWD0Ch3Ln3UfhruP+8avQv1q3mKwMA6/L1jF2wkzHjmJtOEv+jhTJy19B
+sWEHPFDo5sWFDXwuC3SIq9L3FcPFybWKSjAlFd7Phxs0hsrnsX9u7Y2XI3Dr
+jhyv1zA3OrtNRA+/C5uin3mwwvnOTVJwypN6+XC4+biRhzSx8VtXSzj+H50b
+q2GL5aeKlGGVqqscUXgtN+vwPOZvv2Vydwr7J5VomQ3AzL51j7tJv2N3Mzth
+J/FM4wY42O/vmj6Yu483XkjO08NI/1m4ImSsOnUbuZ+IOapgfyHHOy0cNrUo
+9LAn/cUZMj3gCg3VB2mwvt32rfawXnH8w39hSTn1F5Ywz1bvgCbJj1k1Zw5b
+K7h+PQXHP+UyyXmy7u0Tb4GTfLRDWLB4e++E4gaamvtj0DGEnOdM//1H4Ujf
+XJFkOLdrh9g1ePWItFEJ3LxEoec5/CbTNaoNluuX3TQGL/5JIo/FS43+H88X
+pNI=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.631304063066693, 8.096807950948126}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwd1AlQU1cUBuBbFwiEfROF1kCC2FEEZUeWJ0SlaAXLIiBbUaDDCMYFiIA0
+rImIEqhSZNMqiwvSFIGiUxVbEZFKAdEShyrYmKJQRQsMQ0vof81M5s037957
+/nPeSyxi938Rt4gQsgtfeiWqhYWFr+0Y8uFjwhCjgf3+l2A9j7ibunBhb825
+AdhU+Y+jypghHSuttObgkaM6rB54gNd+7+P1DLl/gHSmwa83dm50h1ltt+Tq
+8NrsUV4QPMKsiBAZMSSqqrlqL3VVyO2/DBmipXRemwRfnMw9vBnmtzT1Uwuf
+W2d+Z8CQHTVXSAI9n1vxdjG892BCZRhMnKckh/UZ0nL8wsstcPlvYrs5PYYM
+7hg7YAeHxh8tq4CHfR00TWHZZvGzMDjvdcrpBdpv8rFYNzjTJezfMVia/HOx
+O1wTyWY9gceGhCNRdH9S2c778OrHhe+r4TJFNOcOLJKXXJ+CX7ywiqAW8lu6
+I5BHdfZUVjfsq9ff1gsXtboVyem8uHk53sivbOUbvYNdvqwzkMES+yXOusgn
+2BZ/SRf9V/SPNm+g/RxYHhoOr1POzdB+WZ7zcYWwhLvLLRcO0DCuq4RTC6LK
+GmEXSyvZcVgYp84dpP2WuerQ/aldKwxn6TwdLrqy4ION470mG7C+warwDK3/
+cIptC4uW2S82hKV81XMv2NfzrkYG8rsPN/X6wuekSUvl6Nfg0u2+z+DymjPv
+Hag5CUE+sN4j/pCNLkNm6qednOA+/eB4bR2GbGla1M6FZcIQoYk28ijG4rXh
+joibxUFaDOHtq2VPI99kx5xZH5shTiGJRcPUBenzJ+DQxdn9nXDfN9EexXD5
+T3MXm2HRoTUqul4ZNn2llvYrcqjfjvNaLMdXVdP7MymbZmHLkkNqH/y3vnEX
+6ue8knbT9ZNe87svI195anB6CyzljVuUIr9T4udXe+DVtcplzuhP4N0mfkXn
+e8ss61t4idL6Vy3kb8/5w/dPeMx1asIeJvmTTUaYV6OHDTeSzqMyNtkaHv7+
+P0kBPCtvYi+HOfJ7jk1wzLOTM2PYv84/LXyAnicLKS2H458FRryj8zWNtlgD
+t4m7JjTsGWI3Ff3pNuSr33PX3AxmagX55shfcLUqkQdLbRoM5Og3Iim/24qa
+/8kdKeYjiQo8vxIW2LO6AzXxHvonPDSAOxQbb6zXYMiNfbwCAstqxKddWPh9
+dVwOfY36Uhl3/pA6Q1b5vNSk+QTirZIJNYZkvfHKuU6fb/BTnwbYr/14w3na
+/0dVCXXwE7Mf/IphztIVfAWsEA2qZ8MBXhmJkTjvyaZ02yMwk/GYrY56D0rZ
+14T0ftqxwkFq2bCJCLaz9XD8Efma/XIT6Xl9uy9wziL/SdmbrfV0vzLFMBP9
+zcT6y3+h9W3mUj3Rf8VA6kslfb/CLTyH4BcBs6Pa6E80MdLqgedvOqrScIYD
+fGQb4un72J4vjIFjEs1LtsMPhpP5Erreez77LfYrv/q9qhHm5I5U74TzXJcq
+euj6lYWeR1D/6Z6oLgVdX9nJESBf3zW1wBk631OqR97IT/9fF+BJelVn/gcL
+PvkH
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.547014064132036, 3.0238996897848462}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt1gk0lGsYB/CPI0m2iLGUOxhTjGXaFBVfK1Ky3lRTJhlUipSkVF/lilvu
+SEmWsaVFRzVdUcnIpUVaTFe3yJK4ipLRIpUb9/92mnOcOb/zfO/y/J8xZ8yC
+InxEyhRFHcQfeWdG8NrHp6kfLwO6at5MP/d1MPuavLlIn6bFIt9ZLnCe4EZA
+mD5NdUts7xmTeqtBhDOc4BrEeWOP9cuGde30aYZ9PiMiB263uW06C/Wl497d
+9IOFB8XuApj7lfLQhumj0dYZcHtwA0tuh/cdOm69WF/1e2D3SViHe2uajwHN
+rHSdzd0Ey7dnXLpjQFNTHVQaXGFhhmrrQhbNWFu47bGHmc78qLssmvqmCHIy
+h/N8tnx2M6SpowvSTv8CV6m5fKsxpBmj4jX/cuFIafqKaUY0Y9jZeckB5pdF
+h6XCr0dprV9GzgtKcWo1oqkxCws1NsD06OZyHWOa6f5QHn+InH9/wzNrY5qK
+p2Liz8DSiwtOEGf3c2/WkOd9uWw8T+0fyRpqgamBW5Ut2N/frdimn+zflvaI
+nOehKT80BKdU1hXOgNeovTz5neSRmbrxHu4/arK5zwDpx9lJ4QMnKtpYHeS8
+LM62Z+h3paX5XXJef17nZgH8crfj1UyyXq7wfo28kswGSkPJ827pXnvgLw4P
+hnkkj9PlbAvk+2q/q22PLfYPq69rQf7t71x5+TAdLoq7gPl8dOw1+ZXUZxqL
+0lE3yhteoA4LP8blZKHul9nXf9MG+bHe/VIOK2ltCoyFq4q/Vr7H87nLSgtm
+we2j586hcb4sVJY8woNVJgkKcP6SzSq59XDklEL18ZhnebF5fxGss8kwMQX9
+zEk8ayUm9XMVEl3MLzCmcfc+YifTZ8eRh6QrJ3sX2c93UeU45NcYfKOO1Omk
+t6x4eO5h46fJsDzUeuJruGqhwuYULPTiSh0wn/wupXcymJq4NSkC9laL/tJM
+9o/mC8TwOjcTzSG4an+s4ji8tEbQaoh+2JI6HgOb8jKtpsFUitYEH1izbaDR
+FZZyTTs0yOdFL0rHn7jSObcEnyeX/SLXlXDkjTzvJbjPDk1RgC9Zr73q3D/o
+75Zpd/J84r6/6lfBBp9MznPJ+oaQWS+Qj9YucQ/Jj5+ttzoM9qzLoEh+jFJs
+3BDyTMhJ10sj/XSO3yaBa/v8zvuSPDmNW8n/U4+7ba4GyafsWdNEWNSarV5t
+jfxqRusrw4uPWNjsgPku2bvxfUDlc2O9eaReOH2REeoT9nJknVY4L3NHggec
+1ZOcnA+zn06ZnQaXxuSdDiEOlAg+wq7yofTpsPzyNeUgzFOyNjtNA/YSCcUt
+cOeY60LFZOQ76PRyDfqNtwtd2AqnvPU40o75nq0RjnsKs+1k+oHIq69Dm90E
+e2314D+BL9+qXdEF68y78dkJeR+c1OH0lTy/8W8zzI9RYbiDujhP+vjAzIeY
+j8uh7lg+ud+A8+UPcFdNa8Jy0o/sMWsYVqJr5JutSH4JegqsP/tfhW4SLGx7
+H3EHtq0IsMqF2+9a6SXAR8vZ1hdJP5eed/PhoCvlO6+QflX1qutwv+DE841S
+sr7RnheA+UuKP+0qgOnNVx3b0F/Z8JjRP/bX8PALgrf5ZeYEk/uWGA32IJ+d
+7hYtM0h9bXDMLjj18ZIH39Ef/fBirSHmz4vz7JBNJt+flovvIe/EItXuGFIf
+TD0ghme02r6xJXWNQfYW+FjhbbOOSdhPNepqCOZ7PTG1+QRM/XFbFgs7F8nW
+esL9vbzEM3DphCsN6jBdUun5Fus1D6+0ecRFXctk3iKc3/DwuFYmXKW66bQU
+rvW2qI6AI3X3KFlhniWlu829iHM4S4vg+VNWp80m669Vc2yQj36ZSHUqzPZK
+1SpGPs6X1LqJdcZaX7Ag+TudcJwL0yknR5Lh8Mn+qcvJ+uPi9FeYV0Hc2Clh
+cN6ZuXVWJjQV3rdC+zdi34pGPxOa8VMb9eUULJzprxWC+t3XgbnVpL7Rq0EA
+px9IqGgj51nuKXHE83trT5h/JvVjNgH4PDDsZUWNquhfav8y+gLOU4SK7bVh
+JiDu4hLU3y4QPdEkeV2fuuE5ub8d74USzL9JFaxDf0tZt1veYD+pRtmfXZiv
+2cP3DbWkH9kAKxx5KDUpL8qGU56UTv+G+WpUrOCEwHL1JoM0uEa5qX4SsXaU
+yzx4xqtXIx2WuK8pa6sy8u6NWnclA2bebEhoxnzqBVmmnnDKIYnPI9jlvnWS
+MszP8k9GnVLTPeV8nYP7qsvqsJ4aWe8ZuR1mwnnMfPhJ+vBEB7i911L/JOvn
+7wLOz3dD+n9/iwB3
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.131120426728657, 4.809365547472548}, \
+{0, 1}], LineBox[CompressedData["
+1:eJw9lAtME1kUhmd1SwrrIj7WFGbG2pkRFFBBtKJGORCRGkQRkLfsUsWIBNsV
+TDCk2KrxibsVQUVAwkvLM1QREBHQrLBrguIKigSxChrLIjbGDeALb6M5k0xO
+vtyZe+855/+PTKkKSZhCUVQAea3x2yPAnJ+skQcqWDkjfokA7bGD27h/OKC0
+F1npVgGenC4UmU4QFre6FqoEmLj/wtM2gHBka3mbRgAVVTJUMSkDSr/ppjlD
+gEgbi368nrAp/87PKQIkdRTJlqkIW/rM1dEC1N0MUOa4El6gz30oJ+d/SXnk
++d88oNoqfUW2AniYumxeXSGs3V67/CEPDQOJq30PEe563l9zjofzJjtt6jbC
+v32YGI/kIVJcUOnvR3jXvsEWRx6K1maP2SwlfEwx09jPQcvr+oNn3Anr7cN2
+lXLwZfezoWBPwuM5hzekcOBc53F7uY91PVSTFMjB+gcPfukJI0wlhmsXc1BV
+KLqerCbceMdym+UgwilN8/lPwqa1WWZHDkKqu+wijIQVgfPn8hy4aatPr/yX
+sOWa+pM3B+WN/iGJFsLiyuiz0RwMzvpxpMOW5D9+S5xxhIO+qS3JSQzhtIE9
+PU3k+x/K3a46E1aUlCj/56B2e1RalAthB2ANXjzUMd0HdCxhSfe9yb08PGuv
+qW4TE270m2yo5SE9qWwFb7bmryv0GObh8t7eC26thL1HTGOMAJ35Lx06T1rr
+va57aL0AqXKTd3wwYbXy7eKdAhR06nbk2lvzU+zX7RfgsWJGaK9eSniKrZ1W
+gBxvq16kuO7VN1rlopqL/3cd/STvfMHi/rJ6nz/W/Mri+WrzsoGE1wzer3nN
+5rsGHYP3n73xmv76IgbzC8wpLs0YpTH/YnME9fkvGutjiAmaHmSksX6PkmsM
+uVdorG84fVhY2EFj/f0+jrmoR2jsT4MxNWaRlMH+XeXK+jNjGOzvzr/jhrcU
+MNj/2NHpIpGJQX0YB9+fEqQs6idDG9u9NZxFfbU0XUzP1rGoP/c8X3lcAYv6
+zNyS9aH3Eov67Sh77PAuj0V9R81sN6Sms6j/vvjhyTn+LPojL8H9uGaCQf+U
+K+PeeV1g0F9PnSWh+QsZ9F/RZfXqngoa/emV3dx8Tkajf9N3zBuwz3JCf7ty
+TfIKygn9Lzm0Kv/N7444H9KCbr33GZbg/NAkrlx3I5nw9/nydJo1SuAr7LO5
+Vw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.354800000000001, 7.75}, {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.499999999996362, 15.500000000005457`}, {10., 
+         9.500000000003638}}], 
+        PolygonBox[{{8.552322615314452, 11.98173265946094}, {
+         7.602165824326175, 12.816718930329426`}, {8.293188945044921, 
+         13.219815750748694`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 12.323799910437668}, \
+{1, 1}], LineBox[{{13.500000000007276`, 15.500000000005457`}, {
+         10.000000000003638`, 9.500000000001819}}], 
+        PolygonBox[{{12.052322615314452`, 13.01826734053906}, {
+         11.102165824326175`, 12.183281069670574`}, {11.793188945044921`, 
+         11.780184249251306`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.484057296392571, 12.323799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 15.5}], PointBox[{10., 6.}], 
+         PointBox[{13.5, 15.5}], PointBox[{16.5, 5.5}], PointBox[{10., 9.5}]},
+         InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T19", " ", "P1", " ", "N37"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdiei/gigjfhfjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdiei/gigjfhfjhj.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: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:eJwl1wk4lWkbB/A3awgn+1YOxlKok0GROoeIQrRMtlH2ofgcNYpK3yFkpOzN
+TGbMQSOVsZQGUY5lKFRnxpqlTtpE5WTJNsP3f+ZzXa7H7zzvcz/3fb/v+5yL
+TkDkvmARiqIe4peMnDfL+NFjUf/+qLEommS3bStMn33Ov6DKooxpprEJsHt3
+zJypKovTsJ03awkLFR11x1VY1JeuAyfe6LIoTsj59FYVFmesrHsyG6YVpI03
+Yj4mWeKcHcwf8LYYhh2inBkzOiwqI6SqQQXxi/VcO8tgSvwHx6Pw+eRbHVEw
+N0CE3ov9FF9t1GfBfinX2HvVWByv2U2bNWH2196JvciXWZt4R5TM/yOud0id
+RfVGj/8yT0d+NfGTAngm29Dub1hw3eSphwbqmAnfJo3redEGvvUaLM7PKS1X
+dGDOQaPFlZosTrdOyGsm7K5/jG0FW5qUOAeQfFPfT+3WZFEHn3S0JBGXJvjY
+YN7P+KbVNbL/2/vGcnD6n0ZlzaSe0KcZTdhP6bhFWD/Mqs+19cV+JVn71V+S
+/f6Idn2J/GR55VMvyPWRw/3e6pjfZdLZBfNvVLW3o77QM2v0a2DGo75Ia9R/
+um3EIp3sb7tRvRL9yk4QHfWC6d+l11qgX1zfmXZ1Ev9GUspj9Fv+1cZlPp3U
+O1nGwf2Jj/tVPQHmX+9a4Y756kL6Cgbpz8Tg4+2wIK70Up02rr934Z4rfEWM
+vawFc0WOtJ6GNUMPm6SuRb5Jf7Fwv6nVIYNuK2FuEVdiHfIxzKvk5a1Bfrf6
+bubDmZ3j1Y4wZ8S3jY56yiau6MvBrMvzTiVw1inB5Qkt5GMv32+KfkgOZmwY
+h9n9RpY34BJffsUSzJjS4qqgn2b+sgUGWM9nNRhFwLPjLexDMHvaa+V1uE8x
+v54LV+i0DbXCHirXc97CglePe1tgacOFDhPky4k48lch7FAV7XwEZj0r9gyA
+mbqxgVdIfW1yFyTgEZqGWg1M1y6bz0Y+mh5LgQ2wu//LYBr82NPlP7/BwoZN
+0QmoR6fpeQWHrP+41vMT6pc1bFxlReJHtIUFwfEXOjv6kA99h+WjEfTPeHNk
++mHSD/ubssfheuVA027SD9XuVg147DXzjDXMvZfp9UwZ+0rmKPyA59Dd1KaS
+B+9fGl+cRJ6CmBitZjjVu/qbvTDbsnzra/ijq8vBWuTJvSknoY94Rf8JcmKo
+k+e559VZ8n6WOM/cRd7CVydffoA7pLgyvuQcUFObJO/j71WTy2owP7HPchJe
+E/p8fAIj/WldWCw+l2ja998XcMWEh+UCqd+uWew97GetkR+BfdQmdWNW4XOe
+s8bBR/CY4ED5dpjVeFpTCXlu3SmZFQfT9y7Ob4PFfMUPNcNU8DTHCb4bHjEt
+RfKvU3tlBsf8wTN2Jvnf1pNYwvhzYoJuPEbB6Hx4KUZHtsKlYoz8A93adhiH
+vIpWVGNk7LaJakFc5+u568phnllptRX8vkV9Lo3Eu5o5V4K8kzqbeG5whd4X
+qerwrbOXbedIvquWK7LQHxFr7R9TYIFN8XZNePqt6Hqxf/u12rIW/V43UhAR
+iXW8UYnTUfB5X6maJ7iO1pmc4QiHXo8XrifvWcrNsG0we/6A3XmMGfXn3PZj
+VAuRaR9TwvrUbcPk88X28B0+MNvuqUI/3Jp0uX5YEfUtfxPHRJzCJNN9J2C6
+wt1jNWQfT+s5Q9hP5WtfG+TxpXXWvmkF7DfzRqkFjjN8nj8IV3Ss2O6EvN2V
+wyuHYEal7G+N8O2uZ2IzMF/cvXUd+uB1SGaIjnjCkszeU3Ccsca3PjAllX64
+Ar7P87P/hfjklgNtcFlHjtMbmOGSZ3sfHq08uXc98nevdAvIhcdVmzyCYX5D
+SN4eWKpurjMTZhiJBH7A/pplE69vED99l3kCXtyjPFgK029e1BUi/9BCA81c
+sn7NgMAP7gq6GhEA05oU5Pmo3+iYlagyzN0dI+YAy2pZHC8j+Vd0tbeif/EN
+VsWbYNqCHM8Hto2yKS9EvX7Kj1lScJC5IEcCFj6M9+tCHCmelFzgauwvdfdW
+PfxoyNziPg33Iy/XqBX+PJRhuRbOYGiLTcDhS4cXVsvj/p2zHTEn71/njjZJ
+OfTnn86BbPgH0539BrKIPyuokkB+ns67V55Yhedrw7zJefjsn1Wl8zK4PwpT
+TnKo76qbl89tmJdfdCeHeNChpwCmFpXXKaI/GzyTVRthgYlrCzl/LvEWM6QR
+j/8kLHIYTjxw/FQ07OfjZ7yWvAcnD7vMwhUFcwdsyfflsKRLIvJh5Ob02JPn
+3uOREQ35CusYTCN4IH9nwSVYoGP413vEY9zJMpyGGUXfhOfCZnmOZyxRr4At
+EWhA9tvyYrOrPKlPz+lX5JtWF7fVDKbXb+GqwWb5SyIjWM8/WpZK6uXd3d7t
+A7OHvQLm0Z+YmBcPCpBPxh+93tGweZT5rRrkK5AXaovACTpX+q+hXnbuF2d+
+Rb89jZ79GCON+bY56SA47V7GuIUU7v8Tw0UWLJKw3DYuiXxqP73cBp/oib9Y
+LIHnUdBc7k2es9fJnsfEMa/i/TN5rj4aaPh7i8HndnmMw8mLgUGhorheq5bu
+gf17g6V1r4rAsRNKXXDy1K5pBZgl6n/CE/V81NucUr0C9XHUpQTkfLUdrc2E
+OR+ajwegfqfA4Mv5sPCjdWE/LJdve64fzlg4+YUN+uf3ue27zYgntBhNPA+n
+cNobK2HBnYLM30m/t53u3Yp8eCNFOa1w537v/Icw33RTDJk/5r/z/h7kz1vp
+05NM7leXgVsDzLD9Z5ycdyYOSXE01Muwyknswv5vLtRpWImT8zDhnie8b4+W
+mhlMTzjaSs6tW+qFrz+T9T/ZXiTnTVmUaXkS7C7ylX856i95rh79HPuzlpwz
+DWANt+ElSZjeT5ci7y33q4ASceRPo++ecYCbUptWvaDQj/yxyHm8hyXXyvV3
+LTMpzpd+Nu2wSWJAc/XfTIpt/SDnLmzfE5tisMCkKujaqzpgc8eqlWWzTIrn
+kpa8AKdkf74QPMOkWJ22TjsRv3R5vsd/CusNjDTIOWKe3ipf9QlefSSBjvyE
+jzJfhAqZFCX3TrYIpj9cmyU/QeYbi8m5HFNrcET/I+J57Jsqh53Skvpk4Az3
+3hpj8r3Gdo2tgGlhX9l8T9w3P/sZ67lB734i33s5Pp2sYcTP2JKla4h+p1W3
+Db7F/vTbZ+J2wFqatFOiyI/2/sgkE/42jxukOs2k3I+NR2nBVYqlzjKoJ8PY
+6McBEl/u+7QHsEDb7qc4OPH+Wf+tn5mU0OxrTWnYZUvY2H6YF5vzKgn5KjVY
+i0gSRxoXz6K+B8UO3XuwXnj2fU4I3B99Zb0x9qN9SpEZQH/UlmfZBZPwphlD
+L9iGsSG8Hvm7208dHSPnJjN2v+oH9J/WEZwNO7379pDDKJPiX2wO9oRjWsdG
+N75kUgxFB3sbWHBUul9uCP08+9tWFsze5MBb+BPzxb19gTAngZ0j0Yh4biZ/
+X1X8//8dHO49ikb+UGL9D/eEi/g=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.1542307644825485, 4.562492355174517}, \
+{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:eJwd1Qk41GkcB/B/OtZapMORnJNKyA5JKukvcuTI5ljs7CRyjiuxqwhZocmu
+u0PZDjxNjqKLzfF4HCVUZlLKljMhV5GMY9nv6/8888zzmXnn/f1+33nnP6ru
+QYc8RSiKOo4HeV68Ypg0JVzAJU1T8jcldaPgYBFZpzwZmrrtn+oXB19b4hdn
+KUtTB1Q7itPglJCDVn1w4L6hizz4DSe095gcTZUtY1nWw4m+s+xBWNiVn9AP
+h/OD583W0VSuat1TCR2sfyIITYD9ptZY68PFCe9kbsEf3jZpHIY/L4yOF8CS
+M18j4+EWVbolFR7obArKJ+9v/VWaDVuz3rs9hX3sAy9Iw9/GAye7YZ7xlEMV
+6teV926dIOtXfVM+DLPNREPn4IuCHw0X0P+3FSdy/iP17zCm8uDHugU/TJH9
+5oP2usI90yc5g3CM4wVjBtxxL+rjK9h5V/LKpXDG7dKvlbBQXMuZgj8NnbXJ
+gd1yPXQV4KiKzS8S4OolbgtO8DDF9wggDpPwvAOfl/f86EhcFHKEgf5o/5bv
+TOBwXlVYASyiIdAn+cR45H00xXzD1WHnmKT+SIjkAByzxatUl9RPMqr4Ux55
+zs7OGsINjKEs7fU0FTqesekgHMzRyaqFc719033I/B8E9mYKNGW6vlQ/kdSL
+PuBdArP5lQWFJG+jN48pRZqybXpo0Uryyz//RQc+1MjTJ3mpL3eRNYXjqNpz
+G3Xx+bmDagbwsGG9lxXMc3t+T4qsvzf8fQBcbTH8iY/9r7T0TiTCFmaqe07D
+ws12k9lwMaWhtBHOkGg0LiDrHS/l1aFfcU2riGLiDuMt3rBtenBpEdlffXPr
+GrhZc39UDkz1vd7Lx/z5FXk1abC6Sb90Hrw2qqA1Ela51FOVDosEddp6kHpb
+1DdcgwXeJgvmcOKIxekmeDThxDMtMo+yHksa+xtNR1xdA7dM6sZGwO5lHKN5
+zK9ia6c1A/82Nms4SvJp5Oglof+46IGuD3AXZ4KtifnZrx5J9cJy8hvvt8AV
+MT1m5DzR5e29oUr4ngrbueS8CR9Z3ZZSpin/l1XBEqhHb++3yoYPPXBQ1oBF
+5XZ7i6nQlK5Qj2UNt6aI7d4Jty49mh0CJy27ftIFZlWylS+TeU7I2vnBotPs
++VqSF8OlhgOLhQX8NARf6a+6z4bfnarcv3IbvMeh3RQuPNpooA07mEdmq8Cf
+e6tfmMHUg1szg+hn3KNPzBku+5xcz4VjM7vtj8B20V6dGrCrQCveHVb/qyaT
+j/m8xGW//AK7zUS0nYFZii72trAPy5NvAxuN+Lbsgi9KdmVqEy/V6WIQq+xp
+1VQidRd2isIpM9M55jCv+b/yYfQvF9HkFQv7HfG1E8DOrmq17fCnbnXBI5hZ
+cqbUBv3sYhqM34R9ZOLrX8Mz6QGL+Qj3rl1ngPnc2r4cy4TjQicLzpK8JlMv
+XyB5Os3GvoNdTZveXyd5jidPaKnifjCmsuI+qWcUHvY7LHAcC34GN7wNfFUG
+Sz3PWD0Ch3Ln3UfhruP+8avQv1q3mKwMA6/L1jF2wkzHjmJtOEv+jhTJy19B
+sWEHPFDo5sWFDXwuC3SIq9L3FcPFybWKSjAlFd7Phxs0hsrnsX9u7Y2XI3Dr
+jhyv1zA3OrtNRA+/C5uin3mwwvnOTVJwypN6+XC4+biRhzSx8VtXSzj+H50b
+q2GL5aeKlGGVqqscUXgtN+vwPOZvv2Vydwr7J5VomQ3AzL51j7tJv2N3Mzth
+J/FM4wY42O/vmj6Yu483XkjO08NI/1m4ImSsOnUbuZ+IOapgfyHHOy0cNrUo
+9LAn/cUZMj3gCg3VB2mwvt32rfawXnH8w39hSTn1F5Ywz1bvgCbJj1k1Zw5b
+K7h+PQXHP+UyyXmy7u0Tb4GTfLRDWLB4e++E4gaamvtj0DGEnOdM//1H4Ujf
+XJFkOLdrh9g1ePWItFEJ3LxEoec5/CbTNaoNluuX3TQGL/5JIo/FS43+H88X
+pNI=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.631304063066693, 8.096807950948126}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwd1AlQU1cUBuBbFwiEfROF1kCC2FEEZUeWJ0SlaAXLIiBbUaDDCMYFiIA0
+rImIEqhSZNMqiwvSFIGiUxVbEZFKAdEShyrYmKJQRQsMQ0vof81M5s037957
+/nPeSyxi938Rt4gQsgtfeiWqhYWFr+0Y8uFjwhCjgf3+l2A9j7ibunBhb825
+AdhU+Y+jypghHSuttObgkaM6rB54gNd+7+P1DLl/gHSmwa83dm50h1ltt+Tq
+8NrsUV4QPMKsiBAZMSSqqrlqL3VVyO2/DBmipXRemwRfnMw9vBnmtzT1Uwuf
+W2d+Z8CQHTVXSAI9n1vxdjG892BCZRhMnKckh/UZ0nL8wsstcPlvYrs5PYYM
+7hg7YAeHxh8tq4CHfR00TWHZZvGzMDjvdcrpBdpv8rFYNzjTJezfMVia/HOx
+O1wTyWY9gceGhCNRdH9S2c778OrHhe+r4TJFNOcOLJKXXJ+CX7ywiqAW8lu6
+I5BHdfZUVjfsq9ff1gsXtboVyem8uHk53sivbOUbvYNdvqwzkMES+yXOusgn
+2BZ/SRf9V/SPNm+g/RxYHhoOr1POzdB+WZ7zcYWwhLvLLRcO0DCuq4RTC6LK
+GmEXSyvZcVgYp84dpP2WuerQ/aldKwxn6TwdLrqy4ION470mG7C+warwDK3/
+cIptC4uW2S82hKV81XMv2NfzrkYG8rsPN/X6wuekSUvl6Nfg0u2+z+DymjPv
+Hag5CUE+sN4j/pCNLkNm6qednOA+/eB4bR2GbGla1M6FZcIQoYk28ijG4rXh
+joibxUFaDOHtq2VPI99kx5xZH5shTiGJRcPUBenzJ+DQxdn9nXDfN9EexXD5
+T3MXm2HRoTUqul4ZNn2llvYrcqjfjvNaLMdXVdP7MymbZmHLkkNqH/y3vnEX
+6ue8knbT9ZNe87svI195anB6CyzljVuUIr9T4udXe+DVtcplzuhP4N0mfkXn
+e8ss61t4idL6Vy3kb8/5w/dPeMx1asIeJvmTTUaYV6OHDTeSzqMyNtkaHv7+
+P0kBPCtvYi+HOfJ7jk1wzLOTM2PYv84/LXyAnicLKS2H458FRryj8zWNtlgD
+t4m7JjTsGWI3Ff3pNuSr33PX3AxmagX55shfcLUqkQdLbRoM5Og3Iim/24qa
+/8kdKeYjiQo8vxIW2LO6AzXxHvonPDSAOxQbb6zXYMiNfbwCAstqxKddWPh9
+dVwOfY36Uhl3/pA6Q1b5vNSk+QTirZIJNYZkvfHKuU6fb/BTnwbYr/14w3na
+/0dVCXXwE7Mf/IphztIVfAWsEA2qZ8MBXhmJkTjvyaZ02yMwk/GYrY56D0rZ
+14T0ftqxwkFq2bCJCLaz9XD8Efma/XIT6Xl9uy9wziL/SdmbrfV0vzLFMBP9
+zcT6y3+h9W3mUj3Rf8VA6kslfb/CLTyH4BcBs6Pa6E80MdLqgedvOqrScIYD
+fGQb4un72J4vjIFjEs1LtsMPhpP5Erreez77LfYrv/q9qhHm5I5U74TzXJcq
+euj6lYWeR1D/6Z6oLgVdX9nJESBf3zW1wBk631OqR97IT/9fF+BJelVn/gcL
+PvkH
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.547014064132036, 3.0238996897848462}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt1gk0lGsYB/CPI0m2iLGUOxhTjGXaFBVfK1Ky3lRTJhlUipSkVF/lilvu
+SEmWsaVFRzVdUcnIpUVaTFe3yJK4ipLRIpUb9/92mnOcOb/zfO/y/J8xZ8yC
+InxEyhRFHcQfeWdG8NrHp6kfLwO6at5MP/d1MPuavLlIn6bFIt9ZLnCe4EZA
+mD5NdUts7xmTeqtBhDOc4BrEeWOP9cuGde30aYZ9PiMiB263uW06C/Wl497d
+9IOFB8XuApj7lfLQhumj0dYZcHtwA0tuh/cdOm69WF/1e2D3SViHe2uajwHN
+rHSdzd0Ey7dnXLpjQFNTHVQaXGFhhmrrQhbNWFu47bGHmc78qLssmvqmCHIy
+h/N8tnx2M6SpowvSTv8CV6m5fKsxpBmj4jX/cuFIafqKaUY0Y9jZeckB5pdF
+h6XCr0dprV9GzgtKcWo1oqkxCws1NsD06OZyHWOa6f5QHn+InH9/wzNrY5qK
+p2Liz8DSiwtOEGf3c2/WkOd9uWw8T+0fyRpqgamBW5Ut2N/frdimn+zflvaI
+nOehKT80BKdU1hXOgNeovTz5neSRmbrxHu4/arK5zwDpx9lJ4QMnKtpYHeS8
+LM62Z+h3paX5XXJef17nZgH8crfj1UyyXq7wfo28kswGSkPJ827pXnvgLw4P
+hnkkj9PlbAvk+2q/q22PLfYPq69rQf7t71x5+TAdLoq7gPl8dOw1+ZXUZxqL
+0lE3yhteoA4LP8blZKHul9nXf9MG+bHe/VIOK2ltCoyFq4q/Vr7H87nLSgtm
+we2j586hcb4sVJY8woNVJgkKcP6SzSq59XDklEL18ZhnebF5fxGss8kwMQX9
+zEk8ayUm9XMVEl3MLzCmcfc+YifTZ8eRh6QrJ3sX2c93UeU45NcYfKOO1Omk
+t6x4eO5h46fJsDzUeuJruGqhwuYULPTiSh0wn/wupXcymJq4NSkC9laL/tJM
+9o/mC8TwOjcTzSG4an+s4ji8tEbQaoh+2JI6HgOb8jKtpsFUitYEH1izbaDR
+FZZyTTs0yOdFL0rHn7jSObcEnyeX/SLXlXDkjTzvJbjPDk1RgC9Zr73q3D/o
+75Zpd/J84r6/6lfBBp9MznPJ+oaQWS+Qj9YucQ/Jj5+ttzoM9qzLoEh+jFJs
+3BDyTMhJ10sj/XSO3yaBa/v8zvuSPDmNW8n/U4+7ba4GyafsWdNEWNSarV5t
+jfxqRusrw4uPWNjsgPku2bvxfUDlc2O9eaReOH2REeoT9nJknVY4L3NHggec
+1ZOcnA+zn06ZnQaXxuSdDiEOlAg+wq7yofTpsPzyNeUgzFOyNjtNA/YSCcUt
+cOeY60LFZOQ76PRyDfqNtwtd2AqnvPU40o75nq0RjnsKs+1k+oHIq69Dm90E
+e2314D+BL9+qXdEF68y78dkJeR+c1OH0lTy/8W8zzI9RYbiDujhP+vjAzIeY
+j8uh7lg+ud+A8+UPcFdNa8Jy0o/sMWsYVqJr5JutSH4JegqsP/tfhW4SLGx7
+H3EHtq0IsMqF2+9a6SXAR8vZ1hdJP5eed/PhoCvlO6+QflX1qutwv+DE841S
+sr7RnheA+UuKP+0qgOnNVx3b0F/Z8JjRP/bX8PALgrf5ZeYEk/uWGA32IJ+d
+7hYtM0h9bXDMLjj18ZIH39Ef/fBirSHmz4vz7JBNJt+flovvIe/EItXuGFIf
+TD0ghme02r6xJXWNQfYW+FjhbbOOSdhPNepqCOZ7PTG1+QRM/XFbFgs7F8nW
+esL9vbzEM3DphCsN6jBdUun5Fus1D6+0ecRFXctk3iKc3/DwuFYmXKW66bQU
+rvW2qI6AI3X3KFlhniWlu829iHM4S4vg+VNWp80m669Vc2yQj36ZSHUqzPZK
+1SpGPs6X1LqJdcZaX7Ag+TudcJwL0yknR5Lh8Mn+qcvJ+uPi9FeYV0Hc2Clh
+cN6ZuXVWJjQV3rdC+zdi34pGPxOa8VMb9eUULJzprxWC+t3XgbnVpL7Rq0EA
+px9IqGgj51nuKXHE83trT5h/JvVjNgH4PDDsZUWNquhfav8y+gLOU4SK7bVh
+JiDu4hLU3y4QPdEkeV2fuuE5ub8d74USzL9JFaxDf0tZt1veYD+pRtmfXZiv
+2cP3DbWkH9kAKxx5KDUpL8qGU56UTv+G+WpUrOCEwHL1JoM0uEa5qX4SsXaU
+yzx4xqtXIx2WuK8pa6sy8u6NWnclA2bebEhoxnzqBVmmnnDKIYnPI9jlvnWS
+MszP8k9GnVLTPeV8nYP7qsvqsJ4aWe8ZuR1mwnnMfPhJ+vBEB7i911L/JOvn
+7wLOz3dD+n9/iwB3
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.131120426728657, 4.809365547472548}, \
+{0, 1}], LineBox[CompressedData["
+1:eJw9lAtME1kUhmd1SwrrIj7WFGbG2pkRFFBBtKJGORCRGkQRkLfsUsWIBNsV
+TDCk2KrxibsVQUVAwkvLM1QREBHQrLBrguIKigSxChrLIjbGDeALb6M5k0xO
+vtyZe+855/+PTKkKSZhCUVQAea3x2yPAnJ+skQcqWDkjfokA7bGD27h/OKC0
+F1npVgGenC4UmU4QFre6FqoEmLj/wtM2gHBka3mbRgAVVTJUMSkDSr/ppjlD
+gEgbi368nrAp/87PKQIkdRTJlqkIW/rM1dEC1N0MUOa4El6gz30oJ+d/SXnk
++d88oNoqfUW2AniYumxeXSGs3V67/CEPDQOJq30PEe563l9zjofzJjtt6jbC
+v32YGI/kIVJcUOnvR3jXvsEWRx6K1maP2SwlfEwx09jPQcvr+oNn3Anr7cN2
+lXLwZfezoWBPwuM5hzekcOBc53F7uY91PVSTFMjB+gcPfukJI0wlhmsXc1BV
+KLqerCbceMdym+UgwilN8/lPwqa1WWZHDkKqu+wijIQVgfPn8hy4aatPr/yX
+sOWa+pM3B+WN/iGJFsLiyuiz0RwMzvpxpMOW5D9+S5xxhIO+qS3JSQzhtIE9
+PU3k+x/K3a46E1aUlCj/56B2e1RalAthB2ANXjzUMd0HdCxhSfe9yb08PGuv
+qW4TE270m2yo5SE9qWwFb7bmryv0GObh8t7eC26thL1HTGOMAJ35Lx06T1rr
+va57aL0AqXKTd3wwYbXy7eKdAhR06nbk2lvzU+zX7RfgsWJGaK9eSniKrZ1W
+gBxvq16kuO7VN1rlopqL/3cd/STvfMHi/rJ6nz/W/Mri+WrzsoGE1wzer3nN
+5rsGHYP3n73xmv76IgbzC8wpLs0YpTH/YnME9fkvGutjiAmaHmSksX6PkmsM
+uVdorG84fVhY2EFj/f0+jrmoR2jsT4MxNWaRlMH+XeXK+jNjGOzvzr/jhrcU
+MNj/2NHpIpGJQX0YB9+fEqQs6idDG9u9NZxFfbU0XUzP1rGoP/c8X3lcAYv6
+zNyS9aH3Eov67Sh77PAuj0V9R81sN6Sms6j/vvjhyTn+LPojL8H9uGaCQf+U
+K+PeeV1g0F9PnSWh+QsZ9F/RZfXqngoa/emV3dx8Tkajf9N3zBuwz3JCf7ty
+TfIKygn9Lzm0Kv/N7444H9KCbr33GZbg/NAkrlx3I5nw9/nydJo1SuAr7LO5
+Vw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.354800000000001, 7.75}, {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.499999999996362, 15.500000000005457`}, {10., 
+         9.500000000003638}}], 
+        PolygonBox[{{7.947677384685548, 13.01826734053906}, {
+         8.206811054955079, 11.780184249251306`}, {8.897834175673825, 
+         12.183281069670574`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 12.323799910437668}, \
+{1, 1}], LineBox[{{13.500000000007276`, 15.500000000005457`}, {
+         10.000000000003638`, 9.500000000001819}}], 
+        PolygonBox[{{11.447677384685548`, 11.98173265946094}, {
+         11.706811054955079`, 13.219815750748694`}, {12.397834175673825`, 
+         12.816718930329426`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.484057296392571, 12.323799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 15.5}], PointBox[{10., 6.}], 
+         PointBox[{13.5, 15.5}], PointBox[{16.5, 5.5}], PointBox[{10., 9.5}]},
+         InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T19", " ", "P2", " ", "N38"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdiei/gigjfhfjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdiei/gigjfhfjhj.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.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215292793713`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"c482892d-792f-4e01-b976-eeed43c2c366"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgeg/igfhfihi.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 1, " ", "afbg/chdgeg/igfhfihi.m", ", ", "2 diagrams"],
+  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.775821529296563*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"cbf5c2a7-3746-451c-8624-4dcc1ba0f98a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdfef/ifghgihi.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 2, " ", "afbg/chdfef/ifghgihi.m", ", ", "2 diagrams"],
+  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.7758215293061647`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"02a3bd31-6e06-4496-88e2-ef8766bb9783"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "3", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbf/cgdhef/ifghgihi.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 3, " ", "afbf/cgdhef/ifghgihi.m", ", ", "2 diagrams"],
+  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.7758215293174543`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"292815c1-45f3-475a-af82-00590959c16e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "4", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbf/cgdfeh/ifghgihi.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 4, " ", "afbf/cgdfeh/ifghgihi.m", ", ", "2 diagrams"],
+  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.775821529327404*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"b7fee54b-6209-40f6-9f9f-10e497c197b6"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "5", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbf/cgdheh/fihjgigjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 5, " ", "afbf/cgdheh/fihjgigjij.m", ", ", "2 diagrams"],
+  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.775821529335308*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"3209f1ad-6ea9-4357-8176-10429fe11391"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "6", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbf/cgdhei/fhhjgigjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 6, " ", "afbf/cgdhei/fhhjgigjij.m", ", ", "2 diagrams"],
+  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.775821529342211*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"ca352abb-fe11-410e-8322-2ce39234b094"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "7", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbf/cgdhei/fiijghgjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 7, " ", "afbf/cgdhei/fiijghgjhj.m", ", ", "2 diagrams"],
+  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.7758215293490543`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"82a695c0-088f-4d5c-a5cb-a74ed23247f0"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "8", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdfeg/figjhihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 8, " ", "afbg/chdfeg/figjhihjij.m", ", ", "2 diagrams"],
+  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.7758215293558702`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"236565b3-b8de-4303-a786-5a1eba9e724c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "9", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdfei/fggjhihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 9, " ", "afbg/chdfei/fggjhihjij.m", ", ", "2 diagrams"],
+  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.77582152936271*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"bd1bea21-d72e-4cdb-9908-2050fcfe40c6"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "10", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdfei/fiijghgjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 10, " ", "afbg/chdfei/fiijghgjhj.m", ", ", "2 diagrams"],
+  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.775821529369566*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"68f1074d-bfb0-4efb-999b-0e7171b699b7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "11", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgef/figjhihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 11, " ", "afbg/chdgef/figjhihjij.m", ", ", "2 diagrams"],
+  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.775821529376359*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"8a199273-bda5-4d42-8036-88f37eb9501a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "12", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgei/fgfjhihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 12, " ", "afbg/chdgei/fgfjhihjij.m", ", ", "2 diagrams"],
+  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.775821529383153*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"358e2294-9ad6-4cba-a0e6-1abe99c3a81d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "13", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgei/giijfhfjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 13, " ", "afbg/chdgei/giijfhfjhj.m", ", ", "2 diagrams"],
+  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.775821529389979*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"b9e4bcd6-09db-4bc8-b80b-aa538dcb9b0a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "14", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdief/fggjhihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 14, " ", "afbg/chdief/fggjhihjij.m", ", ", "2 diagrams"],
+  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.775821529396763*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"eb0c65aa-ec7b-4af6-9ab9-7fa32a82700f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "15", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdief/fiijghgjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 15, " ", "afbg/chdief/fiijghgjhj.m", ", ", "2 diagrams"],
+  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.775821529404859*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"cc147248-5fca-42ca-9d42-9a980b81cec1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "16", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdieg/fgfjhihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 16, " ", "afbg/chdieg/fgfjhihjij.m", ", ", "2 diagrams"],
+  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.775821529416059*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"ef08089c-f83c-4e58-8d38-e68e658256b1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "17", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdieg/giijfhfjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 17, " ", "afbg/chdieg/giijfhfjhj.m", ", ", "2 diagrams"],
+  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.7758215294269123`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"cf5dd067-e0f0-407d-b633-37054a8867c6"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "18", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdiei/fifjghgjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 18, " ", "afbg/chdiei/fifjghgjhj.m", ", ", "2 diagrams"],
+  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.775821529437599*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"cd06af1e-5509-4375-a93a-10e11a0dc383"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "19", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdiei/gigjfhfjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 19, " ", "afbg/chdiei/gigjfhfjhj.m", ", ", "2 diagrams"],
+  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.775821529449108*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"f70a5eee-b194-4c18-9fcc-167674d51a44"]
+}, Open  ]],
+
+Cell[BoxData["\.1c"], "Output",
+ CellChangeTimes->{3.769409682147449*^9, 3.7694098202822733`*^9, 
+  3.769411576455082*^9, 3.7694193356910152`*^9, 3.76941969430898*^9, 
+  3.774370761349127*^9, 3.774370837493993*^9, 3.775821532143385*^9},
+ CellLabel->"Out[20]=",ExpressionUUID->"d79637b0-08aa-4536-8506-f77a2a16d880"],
+
+Cell[CellGroupData[{
+
+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.775821532171977*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"ffc82ff7-24b1-486f-8187-c620cc49f0a2"],
+
+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.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215321816807`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"3879e29b-3cbf-499a-acff-3e595c73e21f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 1, ": ", "2 Particles amplitudes"],
+  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.7758215322501087`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"d14582c8-ff1f-4330-b15b-1b0b4c6b2338"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 2, ": ", "2 Particles amplitudes"],
+  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.775821532262566*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"7a2e3214-e4b7-4bdb-aaac-88fe2f119c09"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "3", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 3, ": ", "2 Particles amplitudes"],
+  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.775821532272553*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"14cee031-2ab7-4213-b8fe-7cd4db9f8e50"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "4", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 4, ": ", "2 Particles amplitudes"],
+  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.775821532329216*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"a6c38bb8-17f6-49ee-995f-2490e32591c4"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "5", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 5, ": ", "2 Particles amplitudes"],
+  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.775821532340156*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"c9a29be3-1aa2-4ec5-a895-fc4d0bb48a02"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "6", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 6, ": ", "2 Particles amplitudes"],
+  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.775821532351162*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"b45fecbe-c3a4-47cd-9b84-68df6f7a7d43"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "7", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 7, ": ", "2 Particles amplitudes"],
+  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.7758215323601027`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"9fb38ea0-c59c-4024-9276-0feec3269214"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "8", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 8, ": ", "2 Particles amplitudes"],
+  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.775821532413371*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"c133bf4e-7342-4327-af7c-6ebd1c82cbb7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "9", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 9, ": ", "2 Particles amplitudes"],
+  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.775821532423524*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"42e40ad8-c10a-499a-8e9b-084087384d9e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "10", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 10, ": ", "2 Particles amplitudes"],
+  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.77582153247992*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"aa04af00-2f0d-4e9b-9a69-98d7d903733e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "11", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 11, ": ", "2 Particles amplitudes"],
+  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.7758215325298223`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"53a06575-6e80-458a-8d62-e74f9e799a3f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "12", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 12, ": ", "2 Particles amplitudes"],
+  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.7758215325843782`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"5e24b5ad-ca75-4b07-81a9-d95671dfdf70"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "13", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 13, ": ", "2 Particles amplitudes"],
+  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.775821532648321*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"9fc90ed5-3cbe-4e65-ad36-e39efb75c512"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "14", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 14, ": ", "2 Particles amplitudes"],
+  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.775821532662293*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"7f04687e-cb41-45fd-b3cf-75433702c44d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "15", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 15, ": ", "2 Particles amplitudes"],
+  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.775821532672018*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"43fee89e-d6b1-431c-9b0e-3d45e037713a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "16", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 16, ": ", "2 Particles amplitudes"],
+  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.7758215326802397`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"6af18cf1-9e62-45cd-924d-71e32334ce4b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "17", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 17, ": ", "2 Particles amplitudes"],
+  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.775821532745768*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"6bcbb518-d9d0-48cd-b271-3652bf782e86"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "18", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 18, ": ", "2 Particles amplitudes"],
+  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.7758215327573023`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"06df76bd-e0a2-4f71-8bc0-605fffff985c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "19", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 19, ": ", "2 Particles amplitudes"],
+  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.775821532767949*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"1efec01c-2547-4c04-ae9e-3ed797ff56c7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"in total: \"\>", 
+   "\[InvisibleSpace]", "\<\"38 Particles amplitudes\"\>"}],
+  SequenceForm["in total: ", "38 Particles amplitudes"],
+  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.775821532779902*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"d7db2bea-f18c-4745-a892-ad163359c203"],
+
+Cell[BoxData["\<\"\\npreparing FORM code in \
+/Users/josegabrielreyes/Documents/Higgs/Mathematica \
+Scripts/ggHgg/FinalSetUp/fc-amp-2.frm\"\>"], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215329689293`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"f7d40fa0-2e81-44cb-b977-19fca6fe9eb3"],
+
+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.7758215330312862`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"32e1d87b-fe20-40c4-895a-065869fb386b"],
+
+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.77582154164139*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"86e8c25e-d826-44d9-84d0-dec075063487"]
+}, Open  ]]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"Clear", "[", 
+   RowBox[{
+   "box1", ",", "box2", ",", "box3", ",", "box4", ",", "dB1", ",", "dB2", ",",
+     "dB3", ",", "dB4"}], "]"}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{"Print", "[", "\"\<Boxes\>\"", "]"}], "\n", 
+ RowBox[{
+  RowBox[{"topsB", " ", "=", " ", 
+   RowBox[{"CreateTopologies", "[", 
+    RowBox[{"1", ",", 
+     RowBox[{"2", "\[Rule]", "3"}], ",", "BoxesOnly"}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"insB", " ", "=", " ", 
+   RowBox[{"InsertFields", "[", 
+    RowBox[{"topsB", ",", "process", ",", 
+     RowBox[{"InsertionLevel", "\[Rule]", 
+      RowBox[{"{", "Particles", "}"}]}], ",", 
+     RowBox[{"Restrictions", "\[Rule]", 
+      RowBox[{"{", "NoLightFHCoupling", "}"}]}]}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"Paint", "[", "insB", "]"}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"DoPaint", "[", 
+   RowBox[{"insB", ",", "\"\<box\>\""}], "]"}], ";", 
+  "\.1c"}], "\[IndentingNewLine]", 
+ 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[{"Keep", "[", 
+     RowBox[{"box", "[", 
+      RowBox[{"[", "n", "]"}], "]"}], "]"}], ";", "\[IndentingNewLine]", 
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<Abbr_ggHgg_box_\>\"", "<>", 
+       RowBox[{"ToString", "[", "n", "]"}], "<>", 
+       "\"\<FeynAmp_9diags.m\>\""}], ",", 
+      RowBox[{"box", "[", 
+       RowBox[{"[", "n", "]"}], "]"}]}], "]"}], ";", "\[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", "]"}]}], "}"}]}], 
+  "]"}], "\[IndentingNewLine]"}], "Input",
+ CellChangeTimes->{{3.76940829547766*^9, 3.769408317037019*^9}, {
+   3.769408387805746*^9, 3.7694085001096697`*^9}, {3.769408546101728*^9, 
+   3.769408639433099*^9}, {3.769408855108705*^9, 3.769408915246937*^9}, {
+   3.769408979966034*^9, 3.769409234338009*^9}, {3.7694092668494873`*^9, 
+   3.76940929288006*^9}, {3.769409345328158*^9, 3.769409377005896*^9}, {
+   3.769409431575429*^9, 3.769409446282214*^9}, 3.7694094895308657`*^9, {
+   3.769409721883926*^9, 3.7694097778463583`*^9}, {3.7694099723583097`*^9, 
+   3.769409975431435*^9}, 3.769410121545998*^9, {3.769419371159957*^9, 
+   3.76941938284577*^9}, {3.769419700066349*^9, 3.7694197384987097`*^9}},
+ CellLabel->"In[23]:=",ExpressionUUID->"6db5e1ce-d298-4829-9b87-57793191d1ff"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["\<\"Boxes\"\>"], "Print",
+ CellChangeTimes->{3.769419767873272*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"d7665995-5b38-4120-864a-216b5be8a360"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{3.7694197680450163`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"67c9fb12-783d-4c5a-86dc-486c8bf67ee8"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Excluding \"\>", "\[InvisibleSpace]", "18", 
+   "\[InvisibleSpace]", "\<\" field point(s) (incl. charge-conjugate \
+ones)\"\>"}],
+  SequenceForm[
+  "Excluding ", 18, " field point(s) (incl. charge-conjugate ones)"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197680552063`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"7119e816-c5e9-4981-9e2d-f65be7c0e570"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{3.769419768062174*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"1c682e20-40d1-4dec-9202-a3530a13ffaa"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"inserting at level(s) \"\>", "\[InvisibleSpace]", 
+   RowBox[{"{", "Particles", "}"}]}],
+  SequenceForm["inserting at level(s) ", {FeynArts`Particles}],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197680696697`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"357774aa-48ca-497b-a2b0-d9e0e0411f61"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 1, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197680789833`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"b3ed0818-0a18-48a5-bd83-961ac488432d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 2, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768087954*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"a8cd2652-f78d-4dda-98a0-1a4f36fb6be7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "3", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 3, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197680969563`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"0d57b7aa-3abc-4b65-9bbc-f278967af523"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "4", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 4, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197681054363`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"67624f7f-4342-4ae2-a7ca-011b41653683"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "5", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 5, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768113914*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"06403b8a-f28c-4d35-8662-5be9cd241ac1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "6", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 6, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768122939*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"8d069dbc-972a-4606-b916-420e9649f4a1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "7", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 7, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768130316*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"b7bdb7e3-2cab-4534-bcb4-2f6b75ffcc9e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "8", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 8, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197681375723`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"9c046f14-91b4-4a0d-a90e-e2cbd55888a4"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "9", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 9, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768144348*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"dbc52e95-3dbd-48f5-8519-d6d2e9bb9c0e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "10", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 10, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768151458*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"bb636163-f263-4c9c-87f0-711e80330b4b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "11", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 11, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197681583147`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"a0686b78-ee49-4f11-baca-9b5848c0ad03"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "12", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 12, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197681652412`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"ba894d17-c186-4106-8d12-7666f4860452"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "13", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 13, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768172043*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"d83ab526-a801-47a1-9900-89a8118f30ff"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "14", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 14, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768179027*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"38549d4b-1beb-4050-aa0f-07f0fd654af3"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "15", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 15, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768185875*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"6ece42c0-706e-442e-92c2-737b95ae7a52"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "16", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 16, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768192442*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"2559847a-4207-4de3-942a-c10316ee3c14"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "17", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 17, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768197235*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"2ff8cda3-b3d4-4a45-a687-5020b59824e5"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "18", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 18, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768248375*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"28d8203b-6a33-49e5-8a4c-10be6dd4b472"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "19", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 19, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768253455*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"bc05dcd6-f8fa-4722-bd47-3a3c0d8d5b1b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "20", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 20, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768258329*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"bf2e2165-1a49-445d-af8a-841f01b52c3f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "21", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 21, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76941976826364*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"3ed27a96-2350-4395-98b5-4918682bc638"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "22", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 22, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197682691402`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"1a598280-c3c8-495d-be24-9d11966bc96f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "23", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 23, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768274597*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"8a78dd65-5af2-4e1b-973a-6576f9de479c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "24", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 24, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768279916*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"b4e28a3e-fb4f-40ed-bc81-1a254c57368a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "25", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 25, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768285191*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"97aeba55-6dd0-46ea-886b-51055bf92eab"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "26", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 26, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768290215*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"eecaa652-f260-49fe-bf45-4ba9ba10398d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "27", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 27, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768295643*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"ad542275-ffa7-47cf-8fc2-adc45c19d68c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "28", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 28, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768301161*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"a5137e25-aa17-4ab8-a7cd-42f746873514"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "29", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 29, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768306416*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"160f3722-c0d4-40c5-88d0-0116fec82483"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "30", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 30, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197683114967`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"69acbb0d-07e1-4e21-9f3a-8a861cc7cb0a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "31", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 31, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768316627*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"32062fb6-7d5a-4431-86ed-d4145f64b283"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "32", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 32, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768364999*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"4a5dd41b-30a2-4d33-b8ae-b714067bfad5"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "33", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 33, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768370344*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"7dcb4b17-950e-45da-93c6-f6461f82a320"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "34", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 34, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768375827*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"a44c2779-0733-40b0-9bf1-e4c603a6ea81"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "35", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 35, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768381678*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"6791ef6b-c94d-424f-824d-9cf43afcd817"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "36", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 36, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197683871803`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"bae5aeba-ba1c-4fae-8077-33f4aef558b2"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "37", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 37, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768392717*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"cd833297-8239-403c-8ad9-a1c5860aca35"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "38", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 38, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197683985243`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"98db6214-067b-4c9e-8017-6ac3ad09a81d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "39", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 39, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76941976840521*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"3bdf4e83-bd51-4fed-ab7b-075118a2aa06"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "40", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 40, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768410801*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"fcf1a58b-4031-420a-8f1b-df4b6112e548"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "41", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 41, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197684164543`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"b34baa65-3299-4305-b15b-ebc9cc8f9554"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "42", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 42, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768422155*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"1f3e0b9e-8944-4952-9a41-b5d487a7b7b8"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "43", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 43, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197684280157`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"5df6cea2-df7e-4395-90dd-95dc73a4845e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "44", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 44, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768433721*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"63756f13-8f17-4af9-adbd-295261c9312f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "45", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 45, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768482436*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"635e32cf-a783-4e2e-a5d6-75d616e9d537"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "46", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 46, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768487527*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"5a19dbbf-8457-4a41-b7a2-4e44c1bdd2b8"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "47", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 47, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768492621*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"cd07cf2e-46ec-42f4-8eb9-47b3a1fe4603"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "48", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 48, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768497655*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"d2df5218-4f23-4c0e-8100-9147a518998c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "49", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 49, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768503105*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"d5ce00ca-5692-41db-ba2e-60c0f5b93227"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "50", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 50, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768508177*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"478fa217-805d-41a6-8dcb-30e4e26bdfcb"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "51", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 51, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197685132103`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"4ecce0b5-2ed6-48e1-b377-c1fd9d735c92"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "52", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 52, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768518325*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"c16fa650-2b43-4dca-99e1-5337341c0d9f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "53", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 53, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768523552*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"12de3db1-44f2-4303-b41c-26c8d0d1cbc2"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "54", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 54, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768528515*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"6a84b3ff-5868-4a11-879b-834cc9e7a917"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "55", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 55, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768533568*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"3fc90174-0d41-48bf-9c50-9e1da7082a38"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "56", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 56, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768538742*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"fc1d47fc-1dcd-4fe5-9ec2-c4508e93a889"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "57", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 57, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197685439568`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"48347fc7-5023-4097-90f4-faaec3020269"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "58", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 58, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768583765*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"e07e5d66-ab18-4047-97bf-4c6644046707"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "59", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 59, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768589476*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"619dc925-96f5-414f-9f86-527e4f08adca"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "60", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 60, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197685958776`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"de4bd8c1-3a36-47cb-901c-e9c922c31b87"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "61", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 61, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768648973*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"19beddf1-613e-4efe-b086-d97b97eda1be"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "62", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 62, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768699093*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"a3629449-4ecd-4110-ae35-3950d64c1003"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "63", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 63, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768751234*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"7ca4ccc9-a800-4a94-a2b6-5b119e12c156"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "64", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 64, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768784747*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"d444d9de-70e7-4691-b1db-d71bdfcef946"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "65", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 65, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768833028*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"94c93543-0587-4e98-9afa-ce44e151b889"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "66", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 66, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197688383303`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"e4532781-8059-42b6-bc04-ffa41119502a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "67", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 67, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768883196*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"7beaf51f-4c24-4952-8c78-4b480c656c58"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "68", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 68, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768888548*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"4951bb34-c816-40f5-aeef-010adab576e3"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "69", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 69, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768933756*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"d8facc23-89df-4b2a-a74e-7dfa3d234eca"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "70", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 70, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768982822*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"6fb26224-367e-4f3e-a991-6d85a6124d0f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "71", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 71, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419769029752*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"a5135887-51ee-4b81-9af6-6a9acc78eea0"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "72", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 72, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419769088135*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"704cca61-2b8a-4142-a74b-9f65295cdcc9"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "73", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 73, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197691442633`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"d890d246-9fee-449f-bddf-019c3c250f78"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "74", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 74, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419769204152*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"332180fd-80ec-4766-ae62-e8bfa48b554d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "75", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 75, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197692825947`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"983d895e-8b21-442f-940a-7a0add8cf449"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "76", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 76, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419769365759*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"8d879242-0fab-439a-b678-a1092c3b0400"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "77", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 77, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419769371777*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"9949c074-3b76-4c60-8188-ad3f724c1594"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "78", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 78, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197693778477`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"5056b01c-7bea-4d14-b393-9756e5b57c78"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "79", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 79, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419769466263*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"45872de8-cad7-423b-93b4-18588bc83a2b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "80", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 80, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197695838137`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"2c82be28-dfd2-42e1-a633-b4f3e502ec05"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "81", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 81, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197695903053`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"02b1d7a6-3f16-44ad-ac81-351b908c41f9"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "82", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 82, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197696218033`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"9e0068b8-515c-4c16-ac68-0808e51885d9"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "83", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 83, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419769663519*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"d5d53c86-b600-417f-ad78-14d06668024b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "84", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 84, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197697232437`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"895877a0-6836-438c-a01d-0423117f6574"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "85", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 85, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419769752304*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"0ebc1075-914a-477c-9d7f-fcbec7b2d39a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "86", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 86, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197697811613`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"e042d911-9291-47cc-975a-238003128fb7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "87", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 87, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419769817305*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"50944f14-3ee9-42da-979a-5172021b8cb7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "88", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 88, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197698717737`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"1b507f01-fd8a-46bb-9780-f763478ec943"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "89", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 89, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419769929172*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"a5a35299-81d0-4fbb-b0a1-d8f542dc6070"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "90", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 90, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419769985559*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"28983f92-0aee-4863-a944-050b4adde8f6"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "91", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 91, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197699912367`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"0893dc70-aa9f-4a03-b651-7f21ded2c37a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "92", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 92, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197699966993`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"074366cb-c61a-4889-a983-a179b0621ba9"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "93", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 93, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76941977000231*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"5a848af4-e0fb-42f5-8423-3472b969ed21"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "94", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 94, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419770007799*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"986ddbcb-d7c6-4df6-b4db-9b43f6cc21dd"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "95", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 95, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419770013418*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"3fa42382-223a-4bfb-8bc6-e279ad07fc8a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "96", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 96, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419770019102*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"5f4b52f1-e247-476e-a54c-781493e8cb6f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "97", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 97, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419770025353*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"9a91a84a-19eb-42a5-a7b0-9f37e72209c3"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "98", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 98, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419770031722*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"0c831a3a-d006-4b30-9ec8-281f948859fb"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "99", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 99, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419770037841*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"29f514fc-72cb-4d6d-a8fc-a490a60ee46e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "100", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 100, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76941977004362*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"9dc03715-efa6-454f-ba2a-24cdeb417e0b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "101", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 101, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419770049534*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"5b3d912c-484e-41ce-8511-796aeb1f52c4"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "102", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 102, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197700555763`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"68d56b4e-f5a2-412f-98e7-46068d844ac2"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "103", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 103, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419770061208*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"7641702a-ceea-47fa-b168-d111beb3cd8b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "104", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 104, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419770066761*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"796af381-fa0e-480b-b3dc-da3e547ac0e7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "105", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 105, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76941977007226*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"bfa7760a-852d-4046-b5da-a2ea841c2f56"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "106", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 106, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197700779247`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"8b33e52d-1f2f-4c3a-b046-b1b09abf4127"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "107", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 107, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197700837803`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"8ad33386-ec91-4e7b-bc54-9fb871896c31"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "108", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 108, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197700897408`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"5d266ec0-5529-4ea4-b8fe-49b14db1bd90"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "109", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 109, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419770095449*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"8775bc1b-23b9-4068-89f9-4c039a369567"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "110", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 110, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197701018963`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"7c69cb31-6e0c-4048-891e-f229a2b37c3e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "111", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 111, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76941977010845*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"38d4bc27-71d6-477b-b8b1-85c15ee8e247"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "112", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 112, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197701152143`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"929dfbd2-c745-43c7-a269-531beb85c2f7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "113", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 113, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419770121669*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"2a4b661c-93e4-41c5-b6ed-30fc494f59f3"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "114", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 114, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419770128109*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"a2d64867-0f1b-4d5f-969c-28aefa5581d0"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "115", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 115, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419770134653*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"07253675-1d8c-4c3c-aa33-e88ff8eaef19"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "116", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 116, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76941977014109*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"72db5043-c184-4464-88a0-11e92b63e50a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "117", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 117, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197701474333`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"3a017fc0-8a53-4a29-9251-12ae21ebafbf"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "118", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 118, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419770153709*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"4845b75d-47ca-4bfa-8faa-c7fa8666bbbf"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "119", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 119, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197701600113`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"3fff6dc3-1cb7-423d-9c53-e5c4ef91f300"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "120", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 120, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197701662607`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"49fd2ce2-5024-40a2-9ec5-2363bbca7a13"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{3.769419770172454*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"6404ceef-d342-45ea-9662-82ae93a425c2"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Restoring \"\>", "\[InvisibleSpace]", "18", 
+   "\[InvisibleSpace]", "\<\" field point(s)\"\>"}],
+  SequenceForm["Restoring ", 18, " field point(s)"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419770178927*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"1bf236cc-5ac1-45ea-a75d-d7eccb1d0763"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"in total: \"\>", 
+   "\[InvisibleSpace]", "\<\"36 Particles insertions\"\>"}],
+  SequenceForm["in total: ", "36 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197701854343`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"51fb3dec-4b3e-4c81-9c24-85b57bd4ff1b"],
+
+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.76941977019176*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"d10fd181-1351-4d5d-a097-d55dcd4f9cd7"],
+
+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.769419770198029*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"b8317f05-e1a0-4750-9f00-06c0b79e2292"],
+
+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.769419770204391*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"a78601d9-d1c0-442a-b234-c8c46bec6200"],
+
+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.769419770210783*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"c8e35b33-ebd2-47e6-8c1c-d7758727728e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "5", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdfei/fjghgjhiij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 5, " ", "afbg/chdfei/fjghgjhiij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197702170563`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"3d2be911-6f81-4f0c-896d-56183aed70d9"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "6", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdfei/fjgigjhihj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 6, " ", "afbg/chdfei/fjgigjhihj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419770223379*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"39342352-8933-449d-ba88-dec7dd6882d5"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "7", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgei/gjfhfihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 7, " ", "afbg/chdgei/gjfhfihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419770229751*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"3c27eb42-ad52-4225-be2d-66f31fa0e9ef"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "8", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgei/gjfhfjhiij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 8, " ", "afbg/chdgei/gjfhfjhiij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197702361*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"36a27991-21e8-4661-b5ff-e47e384bc63c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "9", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgei/gjfifjhihj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 9, " ", "afbg/chdgei/gjfifjhihj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419770242469*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"f40b6e5f-7daf-42c5-91df-70dfe1e4585c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "10", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdief/fjghgihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 10, " ", "afbg/chdief/fjghgihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419770248949*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"dcb7564d-06ed-44d0-9e10-47793b600ad2"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "11", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdief/fjghgjhiij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 11, " ", "afbg/chdief/fjghgjhiij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419770255588*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"f7a25ea9-8723-4dce-ba66-04f741f73756"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "12", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdief/fjgigjhihj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 12, " ", "afbg/chdief/fjgigjhihj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197702619553`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"0e01dd7d-dfd6-44a9-88fc-124eed1955cf"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "13", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdieg/gjfhfihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 13, " ", "afbg/chdieg/gjfhfihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76941977026838*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"d73394dc-51bb-407f-b290-6762e02597a3"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "14", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdieg/gjfhfjhiij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 14, " ", "afbg/chdieg/gjfhfjhiij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419770274775*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"2aa34850-4118-451e-9bbe-beffa4ca11d1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "15", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdieg/gjfifjhihj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 15, " ", "afbg/chdieg/gjfifjhihj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197702813053`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"dba7da10-584e-4a36-9120-5fe8fd695e9d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "16", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdiei/ijfgfhgjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 16, " ", "afbg/chdiei/ijfgfhgjhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197702876883`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"87ac91e2-e101-43e7-a9a1-76c38598030e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "17", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdiei/ijfgfjghhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 17, " ", "afbg/chdiei/ijfgfjghhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197702939587`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"61aec5f2-7a78-4dc4-a944-4cb69ee78fde"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "18", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdiei/ijfhfjghgj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 18, " ", "afbg/chdiei/ijfhfjghgj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419770300264*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"2b5675aa-44f7-492b-a6f2-e4e03aa81c82"],
+
+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.769419770651333*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"70a06fb7-ad3a-4c53-a702-68cc4b24ca3c"],
+
+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[{"T5", " ", "P2", " ", "N10"}],
+            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[{"T6", " ", "P1", " ", "N11"}],
+            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[{"T6", " ", "P2", " ", "N12"}],
+            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[{"T7", " ", "P1", " ", "N13"}],
+            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[{"T7", " ", "P2", " ", "N14"}],
+            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[{"T8", " ", "P1", " ", "N15"}],
+            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[{"T8", " ", "P2", " ", "N16"}],
+            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[{"T9", " ", "P1", " ", "N17"}],
+            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[{"T9", " ", "P2", " ", "N18"}],
+            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.769419770848486*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"80f68548-0b73-4548-b02e-48df91477fdf"],
+
+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[{"T10", " ", "P1", " ", "N19"}],
+            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[{"T10", " ", "P2", " ", "N20"}],
+            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[{"T11", " ", "P1", " ", "N21"}],
+            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[{"T11", " ", "P2", " ", "N22"}],
+            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[{"T12", " ", "P1", " ", "N23"}],
+            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[{"T12", " ", "P2", " ", "N24"}],
+            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[{"T13", " ", "P1", " ", "N25"}],
+            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[{"T13", " ", "P2", " ", "N26"}],
+            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[{"T14", " ", "P1", " ", "N27"}],
+            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.769419771050458*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"4909787c-6f76-40ff-ab6e-5078194faf99"],
+
+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[{"T14", " ", "P2", " ", "N28"}],
+            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[{"T15", " ", "P1", " ", "N29"}],
+            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[{"T15", " ", "P2", " ", "N30"}],
+            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[{"T16", " ", "P1", " ", "N31"}],
+            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[{"T16", " ", "P2", " ", "N32"}],
+            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[{"T17", " ", "P1", " ", "N33"}],
+            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[{"T17", " ", "P2", " ", "N34"}],
+            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[{"T18", " ", "P1", " ", "N35"}],
+            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[{"T18", " ", "P2", " ", "N36"}],
+            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.769419771215928*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"a1d695a8-6b7f-4c0c-b5a0-efde83f82c9d"],
+
+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.769419771235794*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"8289f544-f4e9-49a0-afb4-d0518ee201dc"],
+
+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.769419771242425*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"5dfb408f-578a-4763-bae2-57be854ace19"],
+
+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.7694197712490377`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"7997a7d7-02c3-4b7a-bb30-60f55297c0c4"],
+
+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.7694197712553473`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"815a1deb-5e75-4989-a9ce-dedb92a3c6fa"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "5", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdfei/fjghgjhiij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 5, " ", "afbg/chdfei/fjghgjhiij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197712619123`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"9a588a87-148a-45d7-b829-ee521fc8b534"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "6", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdfei/fjgigjhihj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 6, " ", "afbg/chdfei/fjgigjhihj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419771268382*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"a619c015-fc96-4bed-9e7c-47615ff8c958"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "7", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgei/gjfhfihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 7, " ", "afbg/chdgei/gjfhfihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419771275031*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"943d135c-d0e8-458a-b10f-5896bb7dfc5a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "8", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgei/gjfhfjhiij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 8, " ", "afbg/chdgei/gjfhfjhiij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197712821083`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"906b9afa-4404-4b7a-9fbf-54b554fa3b3c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "9", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgei/gjfifjhihj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 9, " ", "afbg/chdgei/gjfifjhihj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419771288517*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"f96d0ac0-d312-45fb-b70e-6f30a2c318a1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "10", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdief/fjghgihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 10, " ", "afbg/chdief/fjghgihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419771295043*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"bd269577-c1b8-4067-9282-d248754ce10f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "11", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdief/fjghgjhiij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 11, " ", "afbg/chdief/fjghgjhiij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197713016567`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"7e2210b4-20c6-47cb-b765-6186e5f55ff0"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "12", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdief/fjgigjhihj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 12, " ", "afbg/chdief/fjgigjhihj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76941977130822*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"3160068d-dbe9-48d1-96e7-eb84163e5c78"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "13", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdieg/gjfhfihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 13, " ", "afbg/chdieg/gjfhfihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419771314443*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"df6e3fcb-7ddc-42ca-be0b-6d95b9fd38f5"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "14", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdieg/gjfhfjhiij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 14, " ", "afbg/chdieg/gjfhfjhiij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197713210487`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"f8825dd2-2c0d-456a-b45b-af739b0ca4ab"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "15", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdieg/gjfifjhihj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 15, " ", "afbg/chdieg/gjfifjhihj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419771327628*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"f5437035-851f-445e-915f-3f5dea41ad12"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "16", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdiei/ijfgfhgjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 16, " ", "afbg/chdiei/ijfgfhgjhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197713341093`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"fcc3444c-88de-4ae3-90fb-897d0944fba2"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "17", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdiei/ijfgfjghhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 17, " ", "afbg/chdiei/ijfgfjghhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419771341064*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"015c0356-7120-4005-9972-9c500e5040d7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "18", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdiei/ijfhfjghgj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 18, " ", "afbg/chdiei/ijfhfjghgj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76941977134765*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"986c3431-dc35-445a-b2ab-4041a3dd5e52"]
+}, Open  ]],
+
+Cell[BoxData["\.1c"], "Output",
+ CellChangeTimes->{3.769419773083962*^9},
+ CellLabel->"Out[28]=",ExpressionUUID->"ff3afdd3-458e-4a26-a454-93ab7fe359f9"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{3.769419773096052*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"6cf863c8-4577-4392-9dde-2ad752a77806"],
+
+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.769419773102675*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"1513ec06-85f4-4e9e-9a33-ca2cf384a552"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 1, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197731129513`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"81dcff6a-5b08-4a52-a0fb-8e2d5e543a72"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 2, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419773138116*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"1a9ed642-45c0-4e59-a831-a38cfb39daf9"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "3", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 3, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419773145261*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"0c955cdc-047d-4aa7-9736-b65399fcec78"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "4", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 4, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419773152411*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"900260b3-c99c-4adf-965e-4f55b8e6dc4c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "5", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"1 Particles amplitude\"\>"}],
+  SequenceForm["> Top. ", 5, ": ", "1 Particles amplitude"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419773168891*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"27078933-f3a9-41d6-803f-89ee056ea1d4"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"in total: \"\>", 
+   "\[InvisibleSpace]", "\<\"9 Particles amplitudes\"\>"}],
+  SequenceForm["in total: ", "9 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419773174801*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"0e2b189f-4e20-458b-a8fd-02cf4f4d9b77"],
+
+Cell[BoxData["\<\"\\npreparing FORM code in \
+/Users/josegabrielreyes/Documents/Higgs/Mathematica \
+Scripts/ggHgg/FinalSetUp/fc-amp-2.frm\"\>"], "Print",
+ CellChangeTimes->{3.769419773209095*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"469abe51-6516-4a0b-9037-7f4be311eee7"],
+
+Cell[BoxData["\<\"running FORM... \"\>"], "Print",
+ CellChangeTimes->{3.769419773227894*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"714c3095-a8df-44e8-ad5f-c168cb4bee85"],
+
+Cell[BoxData["\<\"ok\\n\"\>"], "Print",
+ CellChangeTimes->{3.7694197793302937`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"82db79c3-91d2-4d15-8361-00b63715f011"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"loading \"\>", 
+   "\[InvisibleSpace]", "\<\"keep/6707686115368009465.m\"\>"}],
+  SequenceForm["loading ", "keep/6707686115368009465.m"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419779336658*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"18364dc7-e343-4295-9070-6190387cbb70"]
+}, Open  ]],
+
+Cell[BoxData[
+ TemplateBox[{
+  "RegisterAbbr","conflict",
+   "\"Conflict of definitions for \
+\\\\!\\\\(\\\\*RowBox[{\\\"Abb400\\\"}]\\\\).\"",2,35,5,17439211854332621036,
+   "Alternate Kernel","FormCalc`RegisterAbbr"},
+  "MessageTemplate2"]], "Message", "MSG",
+ CellChangeTimes->{3.769419779461619*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"e0744e9d-e2ef-4a76-bd2f-fa7b3575d7ef"],
+
+Cell[BoxData[
+ TemplateBox[{
+  "RegisterAbbr","conflict",
+   "\"Conflict of definitions for \
+\\\\!\\\\(\\\\*RowBox[{\\\"Abb441\\\"}]\\\\).\"",2,35,6,17439211854332621036,
+   "Alternate Kernel","FormCalc`RegisterAbbr"},
+  "MessageTemplate2"]], "Message", "MSG",
+ CellChangeTimes->{3.769419779561949*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"23b07601-e675-4ee5-8f25-8b0bdf7a5ad5"],
+
+Cell[BoxData[
+ TemplateBox[{
+  "RegisterAbbr","conflict",
+   "\"Conflict of definitions for \
+\\\\!\\\\(\\\\*RowBox[{\\\"Abb444\\\"}]\\\\).\"",2,35,7,17439211854332621036,
+   "Alternate Kernel","FormCalc`RegisterAbbr"},
+  "MessageTemplate2"]], "Message", "MSG",
+ CellChangeTimes->{3.769419779653287*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"ac70579a-eda8-480d-92eb-abd167b49968"],
+
+Cell[BoxData[
+ TemplateBox[{
+  "General","stop",
+   "\"Further output of \\\\!\\\\(\\\\*StyleBox[RowBox[{\\\"RegisterAbbr\\\", \
+\\\"::\\\", \\\"conflict\\\"}], \\\"MessageName\\\"]\\\\) will be suppressed \
+during this calculation.\"",2,35,8,17439211854332621036,"Alternate Kernel"},
+  "MessageTemplate"]], "Message", "MSG",
+ CellChangeTimes->{3.769419779734187*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"2479bce6-8bad-4ae2-89c6-44e875b32ef3"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{3.7694197937044153`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"bf220334-165a-42a0-a103-0f1f677641c5"],
+
+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.769419793711794*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"1a507720-2dd7-4c46-b79b-33d9b6e1b3a7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"1 Particles amplitude\"\>"}],
+  SequenceForm["> Top. ", 1, ": ", "1 Particles amplitude"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419793727751*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"216509b2-4e52-4995-986f-23fb433e820c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 2, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197937377567`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"2de11935-a6c3-4459-8353-525a400a8178"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "3", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 3, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419793774415*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"24add32f-f221-4043-9ba1-b50bc64ab4e9"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "4", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 4, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197937817583`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"a29ca9a1-308e-4cdd-b809-7c30d8140fd8"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "5", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 5, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419793791811*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"c3e78189-1864-4e59-aeac-543d34077095"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"in total: \"\>", 
+   "\[InvisibleSpace]", "\<\"9 Particles amplitudes\"\>"}],
+  SequenceForm["in total: ", "9 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197937990093`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"fc8813f9-37c9-4faa-b480-3462c870c98e"],
+
+Cell[BoxData["\<\"\\npreparing FORM code in \
+/Users/josegabrielreyes/Documents/Higgs/Mathematica \
+Scripts/ggHgg/FinalSetUp/fc-amp-2.frm\"\>"], "Print",
+ CellChangeTimes->{3.769419793837657*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"9217e22f-3c3c-4953-b200-3c4a85426d3a"],
+
+Cell[BoxData["\<\"running FORM... \"\>"], "Print",
+ CellChangeTimes->{3.769419793847934*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"351c5b47-65a4-4e20-b498-26d08f7d90d7"],
+
+Cell[BoxData["\<\"ok\\n\"\>"], "Print",
+ CellChangeTimes->{3.769419799083416*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"aeeb27bc-4328-4853-8228-60cacec4bb3f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"loading \"\>", 
+   "\[InvisibleSpace]", "\<\"keep/6707686115368009465.m\"\>"}],
+  SequenceForm["loading ", "keep/6707686115368009465.m"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419799089582*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"5269c6ed-3df5-4066-9bd6-3c08e140fa43"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{3.769419815156547*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"012e7324-2342-4b04-9c6e-e4803478b0fd"],
+
+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.769419815163783*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"37772824-a3ef-4df4-a3fe-095b9db5eb3a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 1, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694198151746073`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"e41fe5f0-abca-4c39-97c7-b65021b6cbc0"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 2, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694198152068787`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"481aa61d-33cf-4ab0-830e-394581885c18"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "3", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 3, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419815213922*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"2b52494c-de6d-4411-aa24-ae7abf19eb80"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "4", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 4, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694198152254066`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"3e2644c3-b340-4924-9e27-7aa4c88e1d0e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "5", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"1 Particles amplitude\"\>"}],
+  SequenceForm["> Top. ", 5, ": ", "1 Particles amplitude"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419815257728*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"7ea3683b-d2ef-41c2-81db-a798cbd96880"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"in total: \"\>", 
+   "\[InvisibleSpace]", "\<\"9 Particles amplitudes\"\>"}],
+  SequenceForm["in total: ", "9 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419815264596*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"6268c551-ec3d-4a51-918d-d957323dae49"],
+
+Cell[BoxData["\<\"\\npreparing FORM code in \
+/Users/josegabrielreyes/Documents/Higgs/Mathematica \
+Scripts/ggHgg/FinalSetUp/fc-amp-2.frm\"\>"], "Print",
+ CellChangeTimes->{3.769419815293236*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"287c4d08-7c5a-4014-8c80-8a3b9f294681"],
+
+Cell[BoxData["\<\"running FORM... \"\>"], "Print",
+ CellChangeTimes->{3.7694198153050823`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"6054ade0-a12f-4486-a7a3-3112838ef665"],
+
+Cell[BoxData["\<\"ok\\n\"\>"], "Print",
+ CellChangeTimes->{3.7694198214280577`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"59bd80a3-15bc-4109-b529-32a6c770941d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"loading \"\>", 
+   "\[InvisibleSpace]", "\<\"keep/6707686115368009465.m\"\>"}],
+  SequenceForm["loading ", "keep/6707686115368009465.m"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419821433963*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"c46d6c33-f2c4-4939-a37a-221437c48baf"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{3.7694198454318113`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"64769fd3-9b86-4f6a-a5c8-cfb3b4d05e36"],
+
+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.769419845438033*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"51968f08-7c0e-44c0-89d7-63e7acced7f7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"1 Particles amplitude\"\>"}],
+  SequenceForm["> Top. ", 1, ": ", "1 Particles amplitude"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694198454523582`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"bcf17787-5bbe-475f-8b8e-43b0e63f8fb7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 2, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419845484919*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"51aa54ee-8217-42b7-abc5-3a62d1cc56cf"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "3", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 3, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694198454908943`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"83fbe4e6-8bde-467d-bfc3-4eb8cccdea4c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "4", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 4, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419845497279*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"c0845eda-e096-4b18-9a25-47c98d66758f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "5", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 5, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419845503302*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"6f0ccfaa-b550-4a1d-9f04-376ab888f4a0"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"in total: \"\>", 
+   "\[InvisibleSpace]", "\<\"9 Particles amplitudes\"\>"}],
+  SequenceForm["in total: ", "9 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419845509502*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"633e97f8-2861-4517-98a3-ca3924e2bfa5"],
+
+Cell[BoxData["\<\"\\npreparing FORM code in \
+/Users/josegabrielreyes/Documents/Higgs/Mathematica \
+Scripts/ggHgg/FinalSetUp/fc-amp-2.frm\"\>"], "Print",
+ CellChangeTimes->{3.7694198455476513`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"a9a7575c-dcca-4d0f-adbc-fc54ab994943"],
+
+Cell[BoxData["\<\"running FORM... \"\>"], "Print",
+ CellChangeTimes->{3.76941984557095*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"aa22d876-477a-4f12-9023-89205c2d7246"],
+
+Cell[BoxData["\<\"ok\\n\"\>"], "Print",
+ CellChangeTimes->{3.7694198504583263`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"0ef1e206-18e1-40aa-9988-1ecb055deeb3"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"loading \"\>", 
+   "\[InvisibleSpace]", "\<\"keep/6707686115368009465.m\"\>"}],
+  SequenceForm["loading ", "keep/6707686115368009465.m"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419850465218*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"b0637faf-f999-4bac-aca0-345cf1afd638"]
+}, Open  ]]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"dTri", "=", 
+   RowBox[{"DiagramExtract", "[", 
+    RowBox[{"insT", ",", 
+     RowBox[{"{", "1", "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"dBox", " ", "=", " ", 
+   RowBox[{"DiagramExtract", "[", 
+    RowBox[{"insB", ",", 
+     RowBox[{"{", "31", "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"DoPaint", "[", 
+   RowBox[{"dTri", ",", "\"\<Triangle_Sample\>\"", ",", 
+    RowBox[{"SheetHeader", "\[Rule]", "None"}], ",", 
+    RowBox[{"ColumnsXRows", "\[Rule]", "1"}], ",", 
+    RowBox[{"Numbering", "\[Rule]", "None"}]}], "]"}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"DoPaint", "[", 
+   RowBox[{"dBox", ",", "\"\<Box_Sample\>\"", ",", 
+    RowBox[{"SheetHeader", "\[Rule]", "None"}], ",", 
+    RowBox[{"ColumnsXRows", "\[Rule]", "1"}], ",", 
+    RowBox[{"Numbering", "\[Rule]", "None"}]}], "]"}], ";"}]}], "Input",
+ CellLabel->"In[34]:=",ExpressionUUID->"02aec05b-cb5c-48e4-bef3-28ea0e943234"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgeg/igfhfihi.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"1 diagram\"\>"}],
+  SequenceForm["> Top. ", 1, " ", "afbg/chdgeg/igfhfihi.m", ", ", "1 diagram"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694115028873034`*^9, 3.769411694448295*^9},
+ CellLabel->
+  "During evaluation of \
+In[34]:=",ExpressionUUID->"ab1aed8a-ccf7-4a1c-91c7-8a08c7ebf458"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdiei/ijfgfhgjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"1 diagram\"\>"}],
+  SequenceForm[
+  "> Top. ", 1, " ", "afbg/chdiei/ijfgfhgjhj.m", ", ", "1 diagram"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694115028873034`*^9, 3.769411694619399*^9},
+ CellLabel->
+  "During evaluation of \
+In[34]:=",ExpressionUUID->"f526f36d-a5f7-41a6-b836-cc63614c6630"]
+}, Open  ]]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
+  "\[IndentingNewLine]", "\[IndentingNewLine]", 
+  "\[IndentingNewLine]"}]], "Input",
+ CellChangeTimes->{{3.775231658034355*^9, 
+  3.775231658759864*^9}},ExpressionUUID->"3d70a43d-88f7-4edd-9914-\
+fdec294abd06"],
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"process", " ", "=", " ", 
+   RowBox[{
+    RowBox[{"{", 
+     RowBox[{
+      RowBox[{"V", "[", "5", "]"}], ",", 
+      RowBox[{"V", "[", "5", "]"}]}], "}"}], "\[Rule]", 
+    RowBox[{"{", 
+     RowBox[{"S", "[", "1", "]"}], "}"}]}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"name", " ", "=", " ", "\"\<ggHgg-SM\>\""}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"SetOptions", "[", 
+   RowBox[{"InsertFields", ",", 
+    RowBox[{"Model", "\[Rule]", "\"\<SMQCD\>\""}]}], "]"}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"$PaintSE", " ", "=", " ", 
+   RowBox[{"MkDir", "[", 
+    RowBox[{"name", " ", "<>", " ", "\"\<.diagrams\>\""}], "]"}]}], 
+  ";"}], "\n", 
+ RowBox[{
+  RowBox[{"DoPaint", "[", 
+   RowBox[{"diags_", ",", " ", "file_", ",", " ", "opt___"}], "]"}], " ", ":=",
+   " ", 
+  RowBox[{"Paint", "[", 
+   RowBox[{"diags", ",", " ", "opt", ",", "\n", "  ", 
+    RowBox[{"DisplayFunction", " ", "->", " ", 
+     RowBox[{"(", 
+      RowBox[{
+       RowBox[{"Export", "[", 
+        RowBox[{
+         RowBox[{"ToFileName", "[", 
+          RowBox[{"$PaintSE", ",", " ", 
+           RowBox[{"file", " ", "<>", " ", "\"\<.png\>\""}]}], "]"}], ",", 
+         " ", "#"}], "]"}], "&"}], ")"}]}]}], 
+   "]"}]}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"ClearProcess", "[", "]"}], ";"}], "\[IndentingNewLine]"}], "Input",\
+
+ CellChangeTimes->{3.775231666527814*^9},
+ CellLabel->"In[5]:=",ExpressionUUID->"8a1b2c8b-00d6-46e3-89a1-77170c10da2a"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"topsT", " ", "=", " ", 
+   RowBox[{"CreateTopologies", "[", 
+    RowBox[{"1", ",", 
+     RowBox[{"2", "\[Rule]", "1"}], ",", "TrianglesOnly"}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"insT", " ", "=", " ", 
+   RowBox[{"InsertFields", "[", 
+    RowBox[{"topsT", ",", "process", ",", 
+     RowBox[{"InsertionLevel", "\[Rule]", 
+      RowBox[{"{", "Particles", "}"}]}], ",", 
+     RowBox[{"Restrictions", "\[Rule]", 
+      RowBox[{"{", "NoLightFHCoupling", "}"}]}]}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"Paint", "[", "insT", "]"}], ";", "\.1c"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"amp", " ", "=", " ", 
+   RowBox[{"CalcFeynAmp", "[", 
+    RowBox[{
+     RowBox[{"CreateFeynAmp", "[", "insT", "]"}], ",", 
+     RowBox[{"SortDen", "\[Rule]", "True"}]}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"amp", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"amp", "//.", " ", 
+      RowBox[{"Abbr", "[", "]"}]}], " ", "//.", 
+     RowBox[{"Subexpr", "[", "]"}]}], "//.", 
+    RowBox[{"Abbr", "[", "]"}]}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"Export", "[", 
+   RowBox[{"\"\<ggH.m\>\"", ",", 
+    RowBox[{"amp", "[", 
+     RowBox[{"[", "1", "]"}], "]"}]}], "]"}], 
+  ";"}], "\[IndentingNewLine]"}], "Input",
+ CellChangeTimes->{{3.775231713578854*^9, 3.775231765949194*^9}, {
+  3.775231808435851*^9, 3.775231846020644*^9}},
+ CellLabel->"In[23]:=",ExpressionUUID->"f40f6a8e-04da-4014-9f19-bcf1eb59b485"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{
+  3.775231768106307*^9, {3.7752318298241873`*^9, 3.775231846786357*^9}},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"e86efd00-6823-4cd9-9daf-a89335a65f3e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Excluding \"\>", "\[InvisibleSpace]", "18", 
+   "\[InvisibleSpace]", "\<\" field point(s) (incl. charge-conjugate \
+ones)\"\>"}],
+  SequenceForm[
+  "Excluding ", 18, " field point(s) (incl. charge-conjugate ones)"],
+  Editable->False]], "Print",
+ CellChangeTimes->{
+  3.775231768106307*^9, {3.7752318298241873`*^9, 3.775231846796583*^9}},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"c8555bd9-4bcb-4cff-9067-1d158370696e"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{
+  3.775231768106307*^9, {3.7752318298241873`*^9, 3.775231846806231*^9}},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"2ff04487-325a-4813-864b-0a881fc6d69e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"inserting at level(s) \"\>", "\[InvisibleSpace]", 
+   RowBox[{"{", "Particles", "}"}]}],
+  SequenceForm["inserting at level(s) ", {FeynArts`Particles}],
+  Editable->False]], "Print",
+ CellChangeTimes->{
+  3.775231768106307*^9, {3.7752318298241873`*^9, 3.775231846810871*^9}},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"062f6f1e-ea19-451e-90bd-4a60a3d17abf"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 1, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{
+  3.775231768106307*^9, {3.7752318298241873`*^9, 3.775231846815652*^9}},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"b370f17d-a61b-41c1-baf2-aae267a96506"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 2, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{
+  3.775231768106307*^9, {3.7752318298241873`*^9, 3.775231846822872*^9}},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"44455adc-9860-4adc-bf43-c0802a41d8c0"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "3", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 3, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{
+  3.775231768106307*^9, {3.7752318298241873`*^9, 3.7752318468314857`*^9}},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"4e379aec-32bc-49d2-8e78-b8b97b40991c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "4", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 4, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{
+  3.775231768106307*^9, {3.7752318298241873`*^9, 3.775231846838798*^9}},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"e4de9e92-d325-4aa2-9ee1-30abab4b31b7"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{
+  3.775231768106307*^9, {3.7752318298241873`*^9, 3.775231846845894*^9}},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"baa47514-8f48-4385-ba7e-f0d1f32d15ce"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Restoring \"\>", "\[InvisibleSpace]", "18", 
+   "\[InvisibleSpace]", "\<\" field point(s)\"\>"}],
+  SequenceForm["Restoring ", 18, " field point(s)"],
+  Editable->False]], "Print",
+ CellChangeTimes->{
+  3.775231768106307*^9, {3.7752318298241873`*^9, 3.775231846852942*^9}},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"97a4f371-d445-44d5-8099-3bc8f8da4051"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"in total: \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["in total: ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{
+  3.775231768106307*^9, {3.7752318298241873`*^9, 3.775231846860085*^9}},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"6605c97c-6971-414b-9a6e-3e00d855a020"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"adbe/cf/dedfef.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm["> Top. ", 1, " ", "adbe/cf/dedfef.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{
+  3.775231768106307*^9, {3.7752318298241873`*^9, 3.77523184686703*^9}},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"57924dd8-adab-41e2-b09b-0f4893d6c7a8"],
+
+Cell[BoxData[
+ GraphicsBox[{InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt1gs41GseB/C/SzUHRcbECDvlkhS5VKbtMv+EM8lRyaokjZZnR2mojZwu
+GomQELFjHyRH0ekoIqarSZ3OSNl5IqaSa03kXia60H7fszvPM888n+ed/+/6
+zvPMvN0RvqGaFEWl4U0+KdV3vObS1J+vxTQlu5jZfgBmRNqbNi+iKZMXpqoW
+U5qit6ZsrobdD0atdYZleQFHSuGql6qc02yairHVT7kCB5nHXe4zoSmOxtPj
+tbCXcmjCF7Yd9xH1wFbqbyFPjWmqM97yJAv59BYwXu6E5T4pNlvgPRZjOgw4
+5i9xc3JhoeXZVY1zUN/rkYIe2HBGoHUFXH44rN7BHvF0dvdcgznJsTnRcICq
+hSGHt90oWl4DG5mV3lPDkuLt9CDsac756oL4E7/c7WQ50FSjWXr9UVgqKtFa
+AjO0pgrqYdstq/e7wlV/d61hon5usUeHA+x35ttBP1j5k6eaPH/LwECWANOD
+y9cNIf6QYfuOIlj4r/WLbsHSgI9Ol+BO9TTZUditg5OaRuYRKpGsgOv6DFYG
+wI7suvwx9CddYVvyAxzDpZ9VwKqs+48LyLySZewoOE/NnGMOU0bpGm7wkP/m
+Ncnoz+CuftpcOLWj8ksvi6YEXc/0tWHfFU6VbrCypkRzEvP3y9lmnW9EU6Xc
+uInpOO+tCNf+zqQpvnr72XnwHaH+v0UwZ2OKeAPMlzwJHzVEPIbH+ROwMz92
+9DRMf3bWfQhrL+vbsBZmOB/eqEf6yTaez4SFub3ZW+HAYwMnNeBNwsTXF+CH
+11cO68Am1kku7+Cgeft3LIY7HaL7LTHPzFmZomDYNmBvkx88puFSXQzLOuKD
+D8EB60bUwzD/+afWZLjTZq54Feotn/9i52n41/vXzsXDXKad7lF41fhP9+/B
+he6x7wLhL2Xdq3ph6Ysdr8i+U137V3yFJQPG2eOoJ8W+zm4MHmmu3k3uT7XS
+bkwBlzIHNf8JC1QbdM+S+B/bIsj9M3y779gymGGeeGkQ83CrmdklI/PK1BVV
+we6HWE6uMGfi07xEuNDN41z+bOSvjzoRCgfKh5lfDLC/edwzfvBAiJnnFthR
+2yKYmPr5cscufewv2NOBfF96pmS9/SzEv7zbhcSTznrTZDoT9WtGyW/Ai/kz
+ap31cL5YED0KG2W1jhzVxX0685m9HPWmZqjip3SwH/dfDcRwm4fm8Ztw+Wyr
+8Aa4lxcp/Q1WCr3sjDCfbU1JqiZY7LdU5A8bFNW1LUA8KtKsJg2OufZotAAW
+tzoZ3oLzatuT7JGfepvg3gJT/qY1j2BhQ937LrIv36kvgahXsbM3tQ3WG0j9
+1g1PnPpU/Ag2Wzrl5Y3+NtXYSC7AvZFFM9Ng+X6jXyKIS8wLzhNrDd90gUuv
+h2sdgR3pmKBRcr+S2j3N4cht1qLf4KT7PxYkknwNNv1CWLKNFXYL9STphz6w
+g99IQ6ha1M9oyZOoyf1//igwH/3KZ1anPoFLB6/mCH7Afb22lHUdLn5zgc9i
+0FTGidXKErJPdv8r+XTM4TEn+yrMKG6sT5qGfLel7Edw+Zfnr4K1YWMXD3I/
+Am26onZpYS72Fibzkb88e+5YiibqudGsCIYNylut+zUwr8+VhpfJeUnNQDxs
+wh5ijcFc/ZPT/GHG1MbXa9C/9/Z7k0Ew/92kKAHmWIr9c+HOrO96D+GDFyuf
+fYMFfYf2jJN5X1w/EIt8JrFZL82WIE7fuzAmqac/M9oZNtOv1SuDBXQz1xW2
+re30XoP6M0J36C4i/kcR+xbs2KZTPwuWP92VZYR+M+KOOL1BfNmkT9U6uFCL
+oyiDN1nO6ODBDG+WUgRLflZ4acNyy6JPdnB5nPTHdMTb1DJgoUJ/SstC/27k
+V3g2bi6GZYfeMzXhjL91hYTBMRXjajX6kcdPNHDhgTK9nj8ozEuhIWSR/RYx
+18/4zqO4pcwgDZiTmxAb/o1Hmdzpm5jE/OVVZw++/MyjMvRP5uiS37Nr7529
+4zzKoH2waCF5/sP9D1w1XBpd6A9H9jwO3PqRRzlu7F2VAYunR99rHeVRDLfU
+A00k/te0sN9HeNTE1YWVZuR+vubnW8PyNompEFY0RR4aGuZR4mlmlypgkxOt
+L5xxzgjYs08N8y0WLGyAR96ufbkE8xRb6dwoQ3yF/Z5XO8l+0n36HnzgUUlB
+vgbHYHqv95Yx1GNr3PH+NMxxeahrhXrlIad+T4YFn0OXcT/xqN7yxIFouNTw
+j8PG6C/yY2GuH+xonx19BVZ43Oi2gifW63zogh0PzMl7j3oKu8felcHcLh/H
+y6Qf/uhqBnn+3umIENLPk1MLR5BP+iF4O4fs2yt15d4x9DNrpKcT8zA5Pmd2
+AuqVvU94QO6vojriqg/6K8/5uCyWzFPkanq7H+dr9jUL4Iyk583nVDyK8j0n
+2kIsZv9nVxfqm6wcIfMXsJV/LVbyKIHsvP9eMn/muqzYRh5Fjw9dSSc2PfDw
+5m0exTHMZNfZ//9/TObd/3060P8FjtJEEA==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.818198051533946, 16.122586360737625}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1gs8lOkeB/DXMBFiYtxZQ8olNKizJLxbue05ao5sOS0aIrYQx1ZssdNh
+HbetSTZ1XHbOshMtNZuaiEpoiS6yw8ntmJTWYjQoqVjn93zOfD4+7+f7Pu/z
+f/7///O+z4dV1OHgGAZFUafwR67U+DJ+ZjSlJFcjmor/eNr4DEzb2LhlwZt/
+i9HShgXTw3ssYTojuOmIKU1JBD61fYY01fbYfIXMhKZEH2Kf1RLviIlxgqlK
+u2ExrKHXUJpjjPnpA1V3YWu96JApxOE5/XZoEW7Zd7MxAub3av1zF64DU+Yu
+Y7hPmcvb78I/aJe/yYT5Y61XacQprc1UesHyE0YjHTC3nZHNhpNayvjBWHd3
+QnqmOnn+haN7L5x3ba+1ASzMP3gvEHk7eu6w2gx3v/zErRrOOCmeTYabI1f1
+K2CdOZ0lKSy4r5Ovj7o1xxwnGSRf59u9RjA7rIa5E2bdquS8x/PSo7cKi2DR
+5zJpI7zdXbrpISzvyry2Dw62zAucI89fkw1MIJ+wsdUuDORNabn/ZT/M6qg9
+P49xQYPLpm7cb6ZLf3xE5ofvOuAB/ykjipVH5mcZj4lxXfR7aOdA+lXencbB
+lZu5s/Vn5MvhKWjS/z9m7rHWEjcN+u7CtbJwMCrXAPMtNZyM4FMXIuQv2BhP
+/XXmA+5zjRqdvOEknm0Tg/S1Kk2nVB95iFS7HWBTWzUmExaozxSTPs23as5n
+6CHeTy33e+ApxRWZDiz6trQiAPn8cXtNWP1quKbf6wGs2Vo8kA4L/bcrPkM9
+owknWHyYOu8gGYbFgqdrI2CuOi36HP2YNeZJj8Ac1bdRHfDWB85zP8D8eoNC
+C/Rzq+h0v5yMd0kNd8MBqaI0ez3yPlYlJ5J+a2n/+ShM9a1VRJuS92wwtxnm
+Lq677gGbO4nPqaAeSc8r2TTi+03fCXEj9doum+TA3F85J3mw8NGHYU14y4LX
+UghMLX5/Mx35MhwrV3rDXNeh9eOo74EtO0GTzJ+NXRtM6t84+81N0p9D1f9u
+RX+q4nV9eSSfvVu422Euw0DvMenHhgN5A+i/rNa4xJP4WLJbAbwiRbOwhIXv
+segTh3BYwyzixoQu6mUel+yE1fT++sX3OogT8YVDNDxl71ERtQr7YxZvcgF+
+4FeyTGtj/RoPl0mYfXHinK8W2f/O7M+wvo13fWSaJvanOKjvCTx+1KphdCX2
+XfLpUCjyVws6u5gF8wXKplG4bc9oJH8l2f//psSi/rZT4bPJsPC5nd8ILOxS
+uV4HixKDuNvIOaCfomqB+EpdReC3pJ81KswKWNDYbdJA3vfqsQAP5NN87pve
+VphNWx3rgalOrdwaeCPPQycS+Ssv77f5Ei4N91rzFKbk7okWcIjjMRNH1EtV
+xw3VkHzunPbfBUueFIXYwbKGJYEfzF8T8PQc8uccNjmhAnfnhFhR8Pl4O91M
+xJObzrnFk+/8xgL9EOtLQpunRtGv10ozxzHky2VOCA8RJ4dKe1Bfc/C9A9pw
+TfZujkgDz7cWhHXiu5Ftak/5mzreM40tLVXwQiLnqdYKrLs1ybSajKcd+U+b
+GvI5O6nWBdus7i07o4pzVKnYRuI5nnnhlcFAfBujoTi4YJMN8zsV9GmzdtAg
+PO4a9/swhe/zZcNIGPKld1wyioBp2wHmS/h85fFLRnB3dcK9RNRXJLQvWAlz
++zc4vILrKzZnb4D5dTek+9Cfjauj0/9B5ucuPmqAQ0+I+hZI/HUhhgvw1M/3
+l7OxPt/3aqMh+r2QasnmID/hJcUVfbjtw4WzUlhwR711Gs/njA5ae6Ee3rU+
+cTWJ12QReBGWhE/1+cMFF3KsJmDOp6xYcq4tqtnOL8Kibu3GbbCdrLuxH252
+fbL+CjmvvnOKS4ep6NflxjDvsKrFONZLmo0xzEE/OI8PrLOAJaw8byY5v5yf
+dVkjX7qcrVKM/g6VrHurgnqEE3XW22ANcdnB/CUfipfMmFkFs0w93d6896Ek
+h3cy3+O7tTvJNQhbgFt+tNTAuKji5orBNz4U6ytL849hpZ3kYv6cD6W0/Ug1
+C66/8k6WNeNDNeufdJsg56bz7V+uvvKh5EmCyv3Ih76cauuswHquWZ6/wyK1
+d+X5k3An1yXFkMSLSXo0gfmTWoJ3ZD9jda0UxM5nd39Jzv3Ur5ef4HnBQEL2
+EDn3i8xCwxBPUlIwsR79ZD3b7heF9ZIC8m+Hw+5z6ln9SsQXfzWaCHMKWvu1
+ZzE+vEM9goznfa3PRf5y/+N3yXyN0/uY9q99KG5gnWAA8ZUxlUMjsOSgbwJ5
+fzr6jv2dRv203pKjAvmxnp8+6Anz3/QUhsP1yY2r2vG8suGZVzvqE2RtkI2Q
++N4MJ1d4IXKkOAfrC8rYQWL0p8NBO74T+UnU/TXWw/wtue5xqIeeLhv6hZyb
++m/rro7DjH8tZ8As+/sBFc8Rn/cRew/MaagaHxxCPR7X58m5TMUHl5/pgS+z
+K+LJ/K0/OVXexX7J926sIuPkJ7z1//9n9On/AWcfJf4=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.71920310216783, 4.570378284825192}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000002036`, 10.}, {13.500000000002405`, 10.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.75, 10.6952}, {0, -1}], 
+        LineBox[{{7., 14.000000000000908`}, {7., 6.000000000000008}}], 
+        PolygonBox[{{7., 10.6}, {6.6, 9.4}, {7.4, 9.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {6.0548, 10.}, {1, 0}], 
+        LineBox[{{6.999999999989086, 14.000000000007276`}, {
+         13.499999999987267`, 10.000000000007276`}}], 
+        PolygonBox[{{10.760994990022727`, 11.6855415446014}, {
+         9.529366039711539, 11.973795128716784`}, {9.948643980243007, 
+         12.655121782080418`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10.45755100977972, 12.715270390892044}, \
+{-1, -1}], LineBox[{{7.000000000001819, 6.}, {13.5, 9.999999999996362}}], 
+        PolygonBox[{{9.739005009977273, 7.685541544601399}, {
+         10.970633960288461`, 7.973795128716783}, {10.551356019756993`, 
+         8.655121782080418}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10.45755100977972, 7.2847296091079565}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{7., 14.}], PointBox[{7., 6.}], 
+         PointBox[{13.5, 10.}]}, 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}]},
+       "\"adbe/cf/dedfef.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "adbe/cf/dedfef.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:eJwt1gs41GseB/C/SzUHRcbECDvlkhS5VKbtMv+EM8lRyaokjZZnR2mojZwu
+GomQELFjHyRH0ekoIqarSZ3OSNl5IqaSa03kXia60H7fszvPM888n+ed/+/6
+zvPMvN0RvqGaFEWl4U0+KdV3vObS1J+vxTQlu5jZfgBmRNqbNi+iKZMXpqoW
+U5qit6ZsrobdD0atdYZleQFHSuGql6qc02yairHVT7kCB5nHXe4zoSmOxtPj
+tbCXcmjCF7Yd9xH1wFbqbyFPjWmqM97yJAv59BYwXu6E5T4pNlvgPRZjOgw4
+5i9xc3JhoeXZVY1zUN/rkYIe2HBGoHUFXH44rN7BHvF0dvdcgznJsTnRcICq
+hSGHt90oWl4DG5mV3lPDkuLt9CDsac756oL4E7/c7WQ50FSjWXr9UVgqKtFa
+AjO0pgrqYdstq/e7wlV/d61hon5usUeHA+x35ttBP1j5k6eaPH/LwECWANOD
+y9cNIf6QYfuOIlj4r/WLbsHSgI9Ol+BO9TTZUditg5OaRuYRKpGsgOv6DFYG
+wI7suvwx9CddYVvyAxzDpZ9VwKqs+48LyLySZewoOE/NnGMOU0bpGm7wkP/m
+Ncnoz+CuftpcOLWj8ksvi6YEXc/0tWHfFU6VbrCypkRzEvP3y9lmnW9EU6Xc
+uInpOO+tCNf+zqQpvnr72XnwHaH+v0UwZ2OKeAPMlzwJHzVEPIbH+ROwMz92
+9DRMf3bWfQhrL+vbsBZmOB/eqEf6yTaez4SFub3ZW+HAYwMnNeBNwsTXF+CH
+11cO68Am1kku7+Cgeft3LIY7HaL7LTHPzFmZomDYNmBvkx88puFSXQzLOuKD
+D8EB60bUwzD/+afWZLjTZq54Feotn/9i52n41/vXzsXDXKad7lF41fhP9+/B
+he6x7wLhL2Xdq3ph6Ysdr8i+U137V3yFJQPG2eOoJ8W+zm4MHmmu3k3uT7XS
+bkwBlzIHNf8JC1QbdM+S+B/bIsj9M3y779gymGGeeGkQ83CrmdklI/PK1BVV
+we6HWE6uMGfi07xEuNDN41z+bOSvjzoRCgfKh5lfDLC/edwzfvBAiJnnFthR
+2yKYmPr5cscufewv2NOBfF96pmS9/SzEv7zbhcSTznrTZDoT9WtGyW/Ai/kz
+ap31cL5YED0KG2W1jhzVxX0685m9HPWmZqjip3SwH/dfDcRwm4fm8Ztw+Wyr
+8Aa4lxcp/Q1WCr3sjDCfbU1JqiZY7LdU5A8bFNW1LUA8KtKsJg2OufZotAAW
+tzoZ3oLzatuT7JGfepvg3gJT/qY1j2BhQ937LrIv36kvgahXsbM3tQ3WG0j9
+1g1PnPpU/Ag2Wzrl5Y3+NtXYSC7AvZFFM9Ng+X6jXyKIS8wLzhNrDd90gUuv
+h2sdgR3pmKBRcr+S2j3N4cht1qLf4KT7PxYkknwNNv1CWLKNFXYL9STphz6w
+g99IQ6ha1M9oyZOoyf1//igwH/3KZ1anPoFLB6/mCH7Afb22lHUdLn5zgc9i
+0FTGidXKErJPdv8r+XTM4TEn+yrMKG6sT5qGfLel7Edw+Zfnr4K1YWMXD3I/
+Am26onZpYS72Fibzkb88e+5YiibqudGsCIYNylut+zUwr8+VhpfJeUnNQDxs
+wh5ijcFc/ZPT/GHG1MbXa9C/9/Z7k0Ew/92kKAHmWIr9c+HOrO96D+GDFyuf
+fYMFfYf2jJN5X1w/EIt8JrFZL82WIE7fuzAmqac/M9oZNtOv1SuDBXQz1xW2
+re30XoP6M0J36C4i/kcR+xbs2KZTPwuWP92VZYR+M+KOOL1BfNmkT9U6uFCL
+oyiDN1nO6ODBDG+WUgRLflZ4acNyy6JPdnB5nPTHdMTb1DJgoUJ/SstC/27k
+V3g2bi6GZYfeMzXhjL91hYTBMRXjajX6kcdPNHDhgTK9nj8ozEuhIWSR/RYx
+18/4zqO4pcwgDZiTmxAb/o1Hmdzpm5jE/OVVZw++/MyjMvRP5uiS37Nr7529
+4zzKoH2waCF5/sP9D1w1XBpd6A9H9jwO3PqRRzlu7F2VAYunR99rHeVRDLfU
+A00k/te0sN9HeNTE1YWVZuR+vubnW8PyNompEFY0RR4aGuZR4mlmlypgkxOt
+L5xxzgjYs08N8y0WLGyAR96ufbkE8xRb6dwoQ3yF/Z5XO8l+0n36HnzgUUlB
+vgbHYHqv95Yx1GNr3PH+NMxxeahrhXrlIad+T4YFn0OXcT/xqN7yxIFouNTw
+j8PG6C/yY2GuH+xonx19BVZ43Oi2gifW63zogh0PzMl7j3oKu8felcHcLh/H
+y6Qf/uhqBnn+3umIENLPk1MLR5BP+iF4O4fs2yt15d4x9DNrpKcT8zA5Pmd2
+AuqVvU94QO6vojriqg/6K8/5uCyWzFPkanq7H+dr9jUL4Iyk583nVDyK8j0n
+2kIsZv9nVxfqm6wcIfMXsJV/LVbyKIHsvP9eMn/muqzYRh5Fjw9dSSc2PfDw
+5m0exTHMZNfZ//9/TObd/3060P8FjtJEEA==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.818198051533946, 16.122586360737625}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1gs8lOkeB/DXMBFiYtxZQ8olNKizJLxbue05ao5sOS0aIrYQx1ZssdNh
+HbetSTZ1XHbOshMtNZuaiEpoiS6yw8ntmJTWYjQoqVjn93zOfD4+7+f7Pu/z
+f/7///O+z4dV1OHgGAZFUafwR67U+DJ+ZjSlJFcjmor/eNr4DEzb2LhlwZt/
+i9HShgXTw3ssYTojuOmIKU1JBD61fYY01fbYfIXMhKZEH2Kf1RLviIlxgqlK
+u2ExrKHXUJpjjPnpA1V3YWu96JApxOE5/XZoEW7Zd7MxAub3av1zF64DU+Yu
+Y7hPmcvb78I/aJe/yYT5Y61XacQprc1UesHyE0YjHTC3nZHNhpNayvjBWHd3
+QnqmOnn+haN7L5x3ba+1ASzMP3gvEHk7eu6w2gx3v/zErRrOOCmeTYabI1f1
+K2CdOZ0lKSy4r5Ovj7o1xxwnGSRf59u9RjA7rIa5E2bdquS8x/PSo7cKi2DR
+5zJpI7zdXbrpISzvyry2Dw62zAucI89fkw1MIJ+wsdUuDORNabn/ZT/M6qg9
+P49xQYPLpm7cb6ZLf3xE5ofvOuAB/ykjipVH5mcZj4lxXfR7aOdA+lXencbB
+lZu5s/Vn5MvhKWjS/z9m7rHWEjcN+u7CtbJwMCrXAPMtNZyM4FMXIuQv2BhP
+/XXmA+5zjRqdvOEknm0Tg/S1Kk2nVB95iFS7HWBTWzUmExaozxSTPs23as5n
+6CHeTy33e+ApxRWZDiz6trQiAPn8cXtNWP1quKbf6wGs2Vo8kA4L/bcrPkM9
+owknWHyYOu8gGYbFgqdrI2CuOi36HP2YNeZJj8Ac1bdRHfDWB85zP8D8eoNC
+C/Rzq+h0v5yMd0kNd8MBqaI0ez3yPlYlJ5J+a2n/+ShM9a1VRJuS92wwtxnm
+Lq677gGbO4nPqaAeSc8r2TTi+03fCXEj9doum+TA3F85J3mw8NGHYU14y4LX
+UghMLX5/Mx35MhwrV3rDXNeh9eOo74EtO0GTzJ+NXRtM6t84+81N0p9D1f9u
+RX+q4nV9eSSfvVu422Euw0DvMenHhgN5A+i/rNa4xJP4WLJbAbwiRbOwhIXv
+segTh3BYwyzixoQu6mUel+yE1fT++sX3OogT8YVDNDxl71ERtQr7YxZvcgF+
+4FeyTGtj/RoPl0mYfXHinK8W2f/O7M+wvo13fWSaJvanOKjvCTx+1KphdCX2
+XfLpUCjyVws6u5gF8wXKplG4bc9oJH8l2f//psSi/rZT4bPJsPC5nd8ILOxS
+uV4HixKDuNvIOaCfomqB+EpdReC3pJ81KswKWNDYbdJA3vfqsQAP5NN87pve
+VphNWx3rgalOrdwaeCPPQycS+Ssv77f5Ei4N91rzFKbk7okWcIjjMRNH1EtV
+xw3VkHzunPbfBUueFIXYwbKGJYEfzF8T8PQc8uccNjmhAnfnhFhR8Pl4O91M
+xJObzrnFk+/8xgL9EOtLQpunRtGv10ozxzHky2VOCA8RJ4dKe1Bfc/C9A9pw
+TfZujkgDz7cWhHXiu5Ftak/5mzreM40tLVXwQiLnqdYKrLs1ybSajKcd+U+b
+GvI5O6nWBdus7i07o4pzVKnYRuI5nnnhlcFAfBujoTi4YJMN8zsV9GmzdtAg
+PO4a9/swhe/zZcNIGPKld1wyioBp2wHmS/h85fFLRnB3dcK9RNRXJLQvWAlz
++zc4vILrKzZnb4D5dTek+9Cfjauj0/9B5ucuPmqAQ0+I+hZI/HUhhgvw1M/3
+l7OxPt/3aqMh+r2QasnmID/hJcUVfbjtw4WzUlhwR711Gs/njA5ae6Ee3rU+
+cTWJ12QReBGWhE/1+cMFF3KsJmDOp6xYcq4tqtnOL8Kibu3GbbCdrLuxH252
+fbL+CjmvvnOKS4ep6NflxjDvsKrFONZLmo0xzEE/OI8PrLOAJaw8byY5v5yf
+dVkjX7qcrVKM/g6VrHurgnqEE3XW22ANcdnB/CUfipfMmFkFs0w93d6896Ek
+h3cy3+O7tTvJNQhbgFt+tNTAuKji5orBNz4U6ytL849hpZ3kYv6cD6W0/Ug1
+C66/8k6WNeNDNeufdJsg56bz7V+uvvKh5EmCyv3Ih76cauuswHquWZ6/wyK1
+d+X5k3An1yXFkMSLSXo0gfmTWoJ3ZD9jda0UxM5nd39Jzv3Ur5ef4HnBQEL2
+EDn3i8xCwxBPUlIwsR79ZD3b7heF9ZIC8m+Hw+5z6ln9SsQXfzWaCHMKWvu1
+ZzE+vEM9goznfa3PRf5y/+N3yXyN0/uY9q99KG5gnWAA8ZUxlUMjsOSgbwJ5
+fzr6jv2dRv203pKjAvmxnp8+6Anz3/QUhsP1yY2r2vG8suGZVzvqE2RtkI2Q
++N4MJ1d4IXKkOAfrC8rYQWL0p8NBO74T+UnU/TXWw/wtue5xqIeeLhv6hZyb
++m/rro7DjH8tZ8As+/sBFc8Rn/cRew/MaagaHxxCPR7X58m5TMUHl5/pgS+z
+K+LJ/K0/OVXexX7J926sIuPkJ7z1//9n9On/AWcfJf4=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.71920310216783, 4.570378284825192}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000002036`, 10.}, {13.500000000002405`, 10.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.75, 10.6952}, {0, -1}], 
+        LineBox[{{7., 14.000000000000908`}, {7., 6.000000000000008}}], 
+        PolygonBox[{{7., 9.4}, {6.6, 10.6}, {7.4, 10.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {6.0548, 10.}, {1, 0}], 
+        LineBox[{{6.999999999989086, 14.000000000007276`}, {
+         13.499999999987267`, 10.000000000007276`}}], 
+        PolygonBox[{{9.739005009977273, 12.3144584553986}, {
+         10.551356019756993`, 11.344878217919582`}, {10.970633960288461`, 
+         12.026204871283216`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10.45755100977972, 12.715270390892044}, \
+{-1, -1}], LineBox[{{7.000000000001819, 6.}, {13.5, 9.999999999996362}}], 
+        PolygonBox[{{10.760994990022727`, 8.3144584553986}, {
+         9.948643980243007, 7.3448782179195815`}, {9.529366039711539, 
+         8.026204871283216}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10.45755100977972, 7.2847296091079565}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{7., 14.}], PointBox[{7., 6.}], 
+         PointBox[{13.5, 10.}]}, 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}]},
+       "\"adbe/cf/dedfef.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "adbe/cf/dedfef.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`]& ], {26.25, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {30.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["\[RightArrow]",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {35.25, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["H",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {39.75, 69.96}, {0, 0}]},
+  AspectRatio->1.0999999999999999`,
+  ImageSize->{288, 288},
+  PlotRange->{{0, 66}, {0, 72.6}}]], "Print",
+ CellChangeTimes->{
+  3.775231768106307*^9, {3.7752318298241873`*^9, 3.775231846880787*^9}},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"abfd3b28-08fb-4ab2-b36b-1643831733fb"]
+}, Open  ]],
+
+Cell[BoxData["\.1c"], "Output",
+ CellChangeTimes->{
+  3.7752317684344378`*^9, {3.775231829908722*^9, 3.775231846895412*^9}},
+ CellLabel->"Out[25]=",ExpressionUUID->"450770ee-1fbc-44c1-9c95-2cefa29d85a9"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{
+  3.775231768106307*^9, {3.7752318298241873`*^9, 3.77523184690742*^9}},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"c2d54618-f2ab-488c-a248-dedc0fcfba78"],
+
+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.775231768106307*^9, {3.7752318298241873`*^9, 3.775231846912942*^9}},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"0a69aef8-78a8-4cf8-b66d-a37014e7be9d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 1, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{
+  3.775231768106307*^9, {3.7752318298241873`*^9, 3.775231846924202*^9}},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"9a16ae74-376e-4d33-9575-b8580e1dda90"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"in total: \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["in total: ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{
+  3.775231768106307*^9, {3.7752318298241873`*^9, 3.7752318469290953`*^9}},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"8e0c3466-f808-4bca-b876-18a2b1476dd5"],
+
+Cell[BoxData["\<\"\\npreparing FORM code in \
+/Users/josegabrielreyes/Documents/Higgs/Mathematica \
+Scripts/ggHgg/FinalSetUp/fc-amp-2.frm\"\>"], "Print",
+ CellChangeTimes->{
+  3.775231768106307*^9, {3.7752318298241873`*^9, 3.77523184693394*^9}},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"35ee2603-e9bb-4b7e-a519-e78710c52746"],
+
+Cell[BoxData["\<\"running FORM... \"\>"], "Print",
+ CellChangeTimes->{
+  3.775231768106307*^9, {3.7752318298241873`*^9, 3.7752318469386873`*^9}},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"2ee79172-4eea-4f37-b17b-c22e5621d3bb"],
+
+Cell[BoxData["\<\"ok\\n\"\>"], "Print",
+ CellChangeTimes->{
+  3.775231768106307*^9, {3.7752318298241873`*^9, 3.77523184694348*^9}},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"611d5430-681d-49d4-b788-84164592a054"]
+}, Open  ]]
+}, Open  ]],
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"process", " ", "=", " ", 
+   RowBox[{
+    RowBox[{"{", 
+     RowBox[{
+      RowBox[{"V", "[", "5", "]"}], ",", 
+      RowBox[{"V", "[", "5", "]"}]}], "}"}], "\[Rule]", 
+    RowBox[{"{", 
+     RowBox[{
+      RowBox[{"S", "[", "1", "]"}], ",", 
+      RowBox[{"V", "[", "5", "]"}]}], "}"}]}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"name", " ", "=", " ", "\"\<ggHgg-SM\>\""}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"SetOptions", "[", 
+   RowBox[{"InsertFields", ",", 
+    RowBox[{"Model", "\[Rule]", "\"\<SMQCD\>\""}]}], "]"}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"$PaintSE", " ", "=", " ", 
+   RowBox[{"MkDir", "[", 
+    RowBox[{"name", " ", "<>", " ", "\"\<.diagrams\>\""}], "]"}]}], 
+  ";"}], "\n", 
+ RowBox[{
+  RowBox[{"DoPaint", "[", 
+   RowBox[{"diags_", ",", " ", "file_", ",", " ", "opt___"}], "]"}], " ", ":=",
+   " ", 
+  RowBox[{"Paint", "[", 
+   RowBox[{"diags", ",", " ", "opt", ",", "\n", "  ", 
+    RowBox[{"DisplayFunction", " ", "->", " ", 
+     RowBox[{"(", 
+      RowBox[{
+       RowBox[{"Export", "[", 
+        RowBox[{
+         RowBox[{"ToFileName", "[", 
+          RowBox[{"$PaintSE", ",", " ", 
+           RowBox[{"file", " ", "<>", " ", "\"\<.png\>\""}]}], "]"}], ",", 
+         " ", "#"}], "]"}], "&"}], ")"}]}]}], 
+   "]"}]}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"ClearProcess", "[", "]"}], ";"}], "\[IndentingNewLine]"}], "Input",\
+
+ CellChangeTimes->{{3.775232524365862*^9, 3.775232526573709*^9}},
+ CellLabel->"In[5]:=",ExpressionUUID->"e57cdab3-afd9-427f-89f7-863e6dfd567d"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"topsT", " ", "=", " ", 
+   RowBox[{"CreateTopologies", "[", 
+    RowBox[{"1", ",", 
+     RowBox[{"2", "\[Rule]", "2"}], ",", "TrianglesOnly"}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"insT", " ", "=", " ", 
+   RowBox[{"InsertFields", "[", 
+    RowBox[{"topsT", ",", "process", ",", 
+     RowBox[{"InsertionLevel", "\[Rule]", 
+      RowBox[{"{", "Particles", "}"}]}], ",", 
+     RowBox[{"Restrictions", "\[Rule]", 
+      RowBox[{"{", "NoLightFHCoupling", "}"}]}]}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"Paint", "[", "insT", "]"}], ";", "\.1c"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"amp", " ", "=", " ", 
+   RowBox[{"CalcFeynAmp", "[", 
+    RowBox[{
+     RowBox[{"CreateFeynAmp", "[", "insT", "]"}], ",", 
+     RowBox[{"SortDen", "\[Rule]", "True"}]}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"amp", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"amp", "//.", " ", 
+      RowBox[{"Abbr", "[", "]"}]}], " ", "//.", 
+     RowBox[{"Subexpr", "[", "]"}]}], "//.", 
+    RowBox[{"Abbr", "[", "]"}]}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"Export", "[", 
+   RowBox[{"\"\<ggHg.m\>\"", ",", 
+    RowBox[{"amp", "[", 
+     RowBox[{"[", "1", "]"}], "]"}]}], "]"}], ";"}]}], "Input",
+ CellChangeTimes->{{3.775233566129477*^9, 3.775233572343359*^9}},
+ CellLabel->"In[11]:=",ExpressionUUID->"25cf9944-5be2-40ab-999c-e1a6d72c9b57"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{3.775233573905937*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"f2cd56db-9151-48dc-a86e-a305e8a23ac8"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"\"\>", "\[InvisibleSpace]", "\<\"loading \"\>", 
+   "\[InvisibleSpace]", "\<\"generic\"\>", 
+   "\[InvisibleSpace]", "\<\" model file \"\>", 
+   "\[InvisibleSpace]", \
+"\<\"/Users/josegabrielreyes/Documents/Higgs/FeynArts-3.10/Models/Lorentz.gen\
+\"\>"}],
+  SequenceForm[
+  "", "loading ", "generic", " model file ", 
+   "/Users/josegabrielreyes/Documents/Higgs/FeynArts-3.10/Models/Lorentz.gen"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233573910882*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"97366807-d64a-4614-a114-c78895336738"],
+
+Cell[BoxData["\<\"> $GenericMixing is OFF\"\>"], "Print",
+ CellChangeTimes->{3.775233573919277*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"591c4cb2-c53e-4379-b00f-15b18c85f807"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"generic model \"\>", "\[InvisibleSpace]", 
+   RowBox[{"{", "\<\"Lorentz\"\>", "}"}], 
+   "\[InvisibleSpace]", "\<\" initialized\"\>"}],
+  SequenceForm["generic model ", {"Lorentz"}, " initialized"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.77523357392411*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"5ac74ad6-1dcc-4352-9c5b-20885c358649"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{3.77523357392915*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"058cb2f3-6cb5-4bc1-b0ac-3ecaa2465aef"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"\"\>", "\[InvisibleSpace]", "\<\"loading \"\>", 
+   "\[InvisibleSpace]", "\<\"classes\"\>", 
+   "\[InvisibleSpace]", "\<\" model file \"\>", 
+   "\[InvisibleSpace]", \
+"\<\"/Users/josegabrielreyes/Documents/Higgs/FeynArts-3.10/Models/SMQCD.mod\"\
+\>"}],
+  SequenceForm[
+  "", "loading ", "classes", " model file ", 
+   "/Users/josegabrielreyes/Documents/Higgs/FeynArts-3.10/Models/SMQCD.mod"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233573933951*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"18d6278c-bfd9-4a02-853c-aea62833816a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"  \"\>", "\[InvisibleSpace]", "\<\"loading \"\>", 
+   "\[InvisibleSpace]", "\<\"classes\"\>", 
+   "\[InvisibleSpace]", "\<\" model file \"\>", 
+   "\[InvisibleSpace]", \
+"\<\"/Users/josegabrielreyes/Documents/Higgs/FeynArts-3.10/Models/SM.mod\"\>"}\
+],
+  SequenceForm[
+  "  ", "loading ", "classes", " model file ", 
+   "/Users/josegabrielreyes/Documents/Higgs/FeynArts-3.10/Models/SM.mod"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.77523357393896*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"322604d9-27bf-4686-837f-2e0ee3a20bc7"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{3.775233573943948*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"444bbc44-83b9-4831-a0f3-7a477ec669d5"],
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+    {GridBox[{
+       {
+        RowBox[{"$CKM", "=", "False"}]}
+      },
+      BaselinePosition->{Baseline, {1, 1}},
+      GridBoxAlignment->{
+       "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
+        "RowsIndexed" -> {}},
+      GridBoxItemSize->{"Columns" -> {{
+           Scaled[0.999]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, 
+        "RowsIndexed" -> {}}]}
+   },
+   BaselinePosition->{Baseline, {1, 1}},
+   GridBoxAlignment->{
+    "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
+     "RowsIndexed" -> {}}],
+  Definition[$CellContext`$CKM],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233573949139*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"0c1ace26-0d15-4f70-8b7e-791b9f20a92d"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{3.775233573954011*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"b6554e42-f28d-4abd-9e59-35185c0b9ab4"],
+
+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.775233573961372*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"52b22c0d-1be7-45e1-b26f-62f56c686ad5"],
+
+Cell[BoxData["\<\"> $CounterTerms are ON\"\>"], "Print",
+ CellChangeTimes->{3.775233573968718*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"ae0fac83-3d76-4603-870c-b303847faecf"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> \"\>", "\[InvisibleSpace]", "93", 
+   "\[InvisibleSpace]", "\<\" vertices\"\>"}],
+  SequenceForm["> ", 93, " vertices"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233573975807*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"515c0d38-9447-4913-81fa-858854a1a8ad"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> \"\>", "\[InvisibleSpace]", "121", 
+   "\[InvisibleSpace]", "\<\" counterterms of order 1\"\>"}],
+  SequenceForm["> ", 121, " counterterms of order 1"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233573982625*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"ade41026-c5c4-4a87-a9d5-f1626f0db59b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> \"\>", "\[InvisibleSpace]", "6", 
+   "\[InvisibleSpace]", "\<\" counterterms of order 2\"\>"}],
+  SequenceForm["> ", 6, " counterterms of order 2"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233573989883*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"1919b7af-dc1f-4958-b112-78516e8bb11d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"classes model \"\>", "\[InvisibleSpace]", 
+   RowBox[{"{", "\<\"SMQCD\"\>", "}"}], 
+   "\[InvisibleSpace]", "\<\" initialized\"\>"}],
+  SequenceForm["classes model ", {"SMQCD"}, " initialized"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233573994588*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"56d8aaeb-9e82-4924-9b7f-f1007e7a6c7f"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{3.775233574052476*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"218173f8-e193-4643-bda7-22c3083dfd5d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Excluding \"\>", "\[InvisibleSpace]", "18", 
+   "\[InvisibleSpace]", "\<\" field point(s) (incl. charge-conjugate \
+ones)\"\>"}],
+  SequenceForm[
+  "Excluding ", 18, " field point(s) (incl. charge-conjugate ones)"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233574057172*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"ebc16c22-4a15-418d-9994-36b4211d3203"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{3.775233574061633*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"a99734f3-02af-46cd-8ecc-2d966df3a023"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"inserting at level(s) \"\>", "\[InvisibleSpace]", 
+   RowBox[{"{", "Particles", "}"}]}],
+  SequenceForm["inserting at level(s) ", {FeynArts`Particles}],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7752335740664682`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"b0191d8f-94e2-456f-a6e0-8db9f1df6e93"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 1, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233574089262*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"b684a907-4f41-4c15-a472-b20c034f079d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 2, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233574107688*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"406616fe-23e8-4694-bf2e-20f1f1b67dbc"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "3", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 3, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7752335741252737`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"d8cef9f3-3f74-42d8-811a-bce0f43cc9e3"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "4", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 4, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7752335741599607`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"521d1396-1d63-4409-9f36-5ac0d3e55cb8"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "5", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 5, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233574198525*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"3e5ad14a-0e0d-484f-a305-2fd4096b9b65"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "6", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 6, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7752335742141953`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"25104315-57c2-41f9-a314-a74813661958"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "7", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 7, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233574218885*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"368fc5f5-f94b-4e7d-9101-a74064024813"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "8", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 8, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233574223363*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"0e31a2e1-23f1-49b2-a288-8b5329eec172"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "9", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 9, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233574227847*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"21aa083d-9546-402b-af2c-d4b21724e2e0"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "10", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 10, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233574232497*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"2c68120c-9a00-402f-a9fc-f12eb5ecfcd5"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "11", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 11, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7752335742370033`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"c973d02d-6dae-41b9-b0b9-074885ba0203"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "12", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 12, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233574241647*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"b9cc82c2-c3a0-431c-9b12-55a74a2fd48d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "13", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 13, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233574246243*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"ad1a85cd-ece0-4b7e-b4e4-4008725176c1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "14", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 14, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.77523357425105*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"f0b9c82a-174d-4ab4-9c52-2b68fa304f92"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "15", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 15, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233574255945*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"e18e5077-47a7-4f5c-8a26-d7dc4748f769"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "16", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 16, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233574261004*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"b67cdebb-2aa1-4b69-b4e6-edfcc425accb"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "17", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 17, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7752335742660837`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"85a8efca-f6b4-43ea-9018-d1eda30136cd"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "18", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 18, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233574271112*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"51e6d271-ea79-4e14-9388-5d433aa4ea91"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "19", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 19, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233574276095*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"599d632e-30f4-4141-b230-cbbc57d098f6"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "20", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 20, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233574281044*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"efd668bc-7019-44b6-929d-cb0275ea466b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "21", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 21, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233574285932*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"57935798-9fc4-4d1b-8f4b-51e3b78d497b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "22", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 22, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233574291098*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"dca33d91-02ee-4ea3-8cfe-dd8d7ee51ac7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "23", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 23, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.77523357429628*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"fb00eab7-4540-432c-bf2b-aabd8d52e80c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "24", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 24, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233574300679*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"cb8cb0d0-43ad-4a8b-9a92-3917da9ea54f"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{3.775233574305369*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"2a91fd5c-e55f-4c43-a3b8-465708e93b22"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Restoring \"\>", "\[InvisibleSpace]", "18", 
+   "\[InvisibleSpace]", "\<\" field point(s)\"\>"}],
+  SequenceForm["Restoring ", 18, " field point(s)"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7752335743100977`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"560f3c5e-5408-4bbe-9b17-97e16eaa19ca"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"in total: \"\>", 
+   "\[InvisibleSpace]", "\<\"6 Particles insertions\"\>"}],
+  SequenceForm["in total: ", "6 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233574315154*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"f4458dab-a0e9-44a7-a3c1-2ed4232044e1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"aebe/cfdg/ehfgfhgh.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm["> Top. ", 1, " ", "aebe/cfdg/ehfgfhgh.m", ", ", "2 diagrams"],
+  
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233574320011*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"b3135132-833f-4e4c-9589-e9c3503078f0"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"aebf/cgde/ehfgfhgh.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm["> Top. ", 2, " ", "aebf/cgde/ehfgfhgh.m", ", ", "2 diagrams"],
+  
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233574325057*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"4f78b7ae-5549-42fc-9314-36c2c698fa96"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "3", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"aebf/cgdf/fhegehgh.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm["> Top. ", 3, " ", "aebf/cgdf/fhegehgh.m", ", ", "2 diagrams"],
+  
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233574329958*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"71f57b0a-511e-41a4-ae1e-8b4f43f11a60"],
+
+Cell[BoxData[
+ GraphicsBox[{InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwV0w9YzHccB/DvVdMfFCKpixNKujhL1Irfz5br1OQkNrTck0My9Fx/xNO2
+X6Z1PNecnkpatZv0x2TOaqtVm6tlpT+cEK20Q+ZQ60wUK7f3956n557X8/n+
+vp/P+/Pr5sYciNhpQQhJwx/9JiYzPg4ssaGYzxJ2vhfvjj1LUud+nOAAq8d5
+strJLBHm8lZ4w9rEDHHVJJbIjaW3I2DRgq/6OiayZIznsjEdNuk+eWIPm0aV
+Kxro89bNuz+zY4ng+6UaqwUs0fQrN7nBVUO3I9fBhkMeqSZbnHMbM+TB2oDj
+0a9gfWDvxX6Yy8tZJcT5dqd6r8UeLJEZNgVlwnKbT28oYJPqcOY09JM65Mi0
+MInNaa2EY2W59/thaWlV+G7My33RfsXeE/cXOJW4I09FZ/CIEJ5yzIn0wLK6
+6Y9WwdwB26p05I/ybTkWDBuacrTODjTHt3tpnex0f3EcNvJzc31g3XrJ4C1a
+z+TUjvR+Sd2fJripszrkXzrv590WPXBwnud4Gyz66fWDk3CV6odFxbDg4CnG
+CdYHjew6DGvez3fdi/55XTaSSJonxyU3B/P17upb4wur5V7aAuSJGo0omkXv
+c1wyrkRekfm7QFtaXxm3Wo79iEKKiixpfq8HFgHYJz/lVAetE2Pt1Gk2LFHZ
+X5Lw6f50gZPfTGBJUPUSq0BYm/L26Zt3WHJr1tvYnXQ+29J0t3fofTu25dP5
+nD3891ixpGZ/UchdmLs54/hDS5bcldz1daP7tGg2nYCn3Cvs2kXdOlh2AK4v
+6df+CItWnS5Og527Dix6C0v38gsaYX/VxovihegnkPn64P5svrjjGKz3G15a
+C+ssFeuvUF9e2C3DPIn+qo9GYG6NUjwT8zddnZow2wv9VOL+Trj+RN35AFid
+eva+0polBcJ9WRLYlDN0YTHyG7fMCw6D4wNL42thtuxc7Pv0vPveQ/OwLyuF
+h/cSWHD++pkYeHr7DaEj9Y2sYgVc4b9fYUJ/3d+/hErhoxc2rbsKG07dLX6D
++7JT56zWwJp3B3gJcCRn9/ggnV8fbqrHPKNR8foION5zn10f5lXWndzjC2s/
+sqm/h3w1edZ9rrDo6zsDTcjvvNiR2FPXhXxTiH19mvrIdyKsbrsTp7BgSXl8
+6/bpsGmc7x3OQ5+JA/e96PmBa1GBBL+Xte6qMDqfqjgx4y1DYgvMJSl03yOu
+WX+NMWS0zeLlRZgt4T1X/ceQAqO6dYieF5wvPf2GIVOWO89cjvxcpKNqIjw8
+40gaB+tORPz38DVDWl4b09phw42VujmoC1bFfD5zEe7f1hNUDUuCs43RsME8
+SVeE+/nClq0aWNOTbdeM/socYWU3zG4+NuaG+eqVjkJbb/y/JqftOGFmSM0M
+53gf2BDmaTqCPB/2i8+tgfVNEwb9kJdfXnh8A6yZeT+gC65oTNpIrUtoDdqK
+/cj3VbbT8+qs7MJfYJsvuhkRLJryw9lBuGXZ7thpsNaVy3gO80Uesn/ovILH
+RY2wZIsk4w9Y3bktXQbXPJHvKaR1h2TXDvRTHs7QJMGm0FzFJJiMn67eAEsL
+y4rmY17Zi0OTl9F9vLZ/8B7yaa/zamfDspgQhiC/XByQ7Ejzx3M1F7BPUl6n
+pBbYODV8PIL38aVv9Ry6r0tio9NLhph4J1f607rU/HDsXzy/fHtbFLVwbYnb
+c4aoHm/OUMH44fEchxgStWLCLDo/t2vD0/wB7PuDOTXWyMsVX/Z59JQhurjL
+7Hrq+XihTxgikrSE5dP9Ryfo78EVc/1C/6b13/rtjuK8+hu/MyIh6m38yt5n
+DIlMamxPhnVKXua1Qbzfq9sUP8OCuNnNfBNDeofPpQ/CnDlqQSrm477s3Ori
+g7re67oJ8yttU2oDYU14DLtzmCFWAZlDUlq3Vo78jrzl4dHXt8CyO9K40VcM
+uVWdVLcZNrQuHxrCfvS54kIJfX64/GT+KEOCk6/1iGBuu6L5GSx6VRw2Fdbt
+CDX/CZ/9ytNlAPOw0kALOaxNa6z6HTYEZM7LwH15nesu5MOahukr16Jf0E/d
+BQnUSQ4plZhPXeo+YQPNd8bc34n5reIsA/zoPl4ueFyNvP6mhf7udB/i7cNP
+se9hue+ZWbRfQl0Va8S8LZJv+fR8Q+LSgocMybZ6dtOb7ic84pS0jyHOXNmW
+EOrRwoOuXTivffHrfnr+tqvdlQ6G2NR+YP0d9dfuLi0N2Ac7V9dLHW2ZtfoS
+QxKXNVkLkJcIQvmp2XgfGfFlsdRs3s28HZdJxdES7ypq+lH/SibR78Xs/1a3
+8aQ=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.3944533453633028, 12.136522676290642}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwV1Q1Qk0caB/BFUPALoQhEpBDEIkqwcQANNfKuAilTTsBiQT6ESBVRFCIS
+pE7LxU/ChxrwC6kcORWFcrZpQUHFgkglgGiAa0HlxlhQqBaIQr2US+X+m5lM
+5je77+7z/N/diVtS+qfbphFCDuDLfolhCp95lBjZrzslwxlOe6fZUFJyuMKr
+Fpamtlr2YnziqOxKCmzzPH1cDu/ybbHkw/zezTkD1pToqFtT/yJK1OsSvnOH
+LW4GWv4TbqJzisRzKanXjN9Ogw3X7Ef85lBCFFdiPoZ1Dy+M82ZTorJ41ePF
+xhd1dY/NpKRBG1LuDAuXD6/7yYqSvq0+FxbAsum751yypERg8BQtgvkfKo6d
+mUGJ1U5zfz+YBhsDL0+n5PDlRTM2wKRcvuWJBSWe1x6d38v2S/JPE8OHu9df
+LWXrRf/6rtOcEuWB5tq7bLwzVlEMf3l0idPvsEIncc6HxW8vhtqiX80Rr7of
+YFHWgydClk/pVisrrFd/RlIWAutO9rYfgv9VJ78VBStMqy1cUI86LOFhDKzu
+e5DYCZtEx8Yi2HqOqSW5qD9zZvbN1TBVbBhZi/6yD3XHOsGkQ3b+NaybqDoy
+wvIta4wvRB4WbXEZ12GbTlGPFfKi8ub7WbBUJ/krAVZ+7XdByMY9BwqUcKGb
+3ycv3CjRr4z3OgAvDtGGlsI6B1WtBL60s5GGM1ekBj/C+psCXest4SbVGW41
+HLRqxoJ7fHhHnPce1CMbisotZI4mxw+g/oiViR3xzJf7CzLRn9asaI0IJqbM
+8kjkUXLIp84V5msb3ZcivzmVt5R2sCwsXj9lhnwl/lnM0kPG478SSiofmt10
+gdUtmubrUxwRj38x1xemO3uchv7iiNF0rm4Ds96ubZuJI4r9uWo52y825I+A
+/3FE9dvWHWWsntsrmvdPckQYE5LL6le0Thmc4eEPPaSjrJ6nF68vhmt9t6e8
+h37Vj39pKYQNOY84IcznpR4NxXoRu2vuB7ux87CmMBL7lTTLIzewPOVvPjiF
+eqwqy/KZ+Snfu06+40jIoKSKzVcFcWEi9KOy58m8Yc3GW2avWX9KO8FMWFp8
+bf959K86Lah5xPpR/FkunIb3I9DGqlk/nxZvucQcdGo4AbZxfOZqgJ0DknIc
+YV1d1DRr5Ckd7zI/54r78tlb/0mMZ3tZmJvBqvRvBDWwzS7h8l0uyNv777n+
+sGeX2+mn78MWb1aqsH/f2ekvE2Gp/7fBDahPLZoKfe2M/DySJHnIP7s4iHcW
+Vljcq/oc/Woc++5GwtKUiGULkQ/v2alGTzZfKWtrMXJEaWzf7gCTwQiPrLcc
+EcV7EGc2P2IsN2iCI3TFvIZVzJoPXgW+4Yg2y70nmc1PSHI9auBI/Q29ugKm
+fuFGn1HkTewfjLHx8jKZ/e8c6TMGHKSol2zl/fzjS47oY6tLi2F6q3aPHxyx
+p39Qz7zxTqYcFpVcjPFA/wp5pFPGK5yfgb9FJTDbbl/jMMKRTWGRXYdhUrU2
+JHgM56NGojwDN82oE48a2Pl5vLgI1g9lrIpFvTLXfdF7YXXmWEbXOJ4/6f5C
+DEsV364P+AP1yHjfjbI8TzmeL0D/2ZaD/8hn9TZy5yr+i/pFhaV2bHxpa+t+
+5CXlXUk4hv7UBzvrTbC++ulG00LMT12s4f/JEc/Qti3bYGra46LHuPDm6qud
+Tng+5t+vRHBTkWb7R8wPak54Y/2Q/4hPaBbAIzUTLahHdPzedV9Yb22+bBby
+1/iYutp5OK85yuezWT9piVZZsCJh/o069K91TioSwTRu38RC5EUNy7+2g4lV
+9GTaC7zv4+I1lsw/BM7uf4Z63gXue4/5cW2O0xO8f0OF2Id5k1d4ZA/262wo
+SGbujpOEteG+XLVVVTI72M4V3UY+X4x2TjBXFq/NrcZ+CzZ/JkG9REVP5hSj
+fmH45FlmdVreJzm47xXpJwaZjb1xeadxX53M3Jagf9KQvCrwKur3F3jHMUd9
+PPJbA/K2Duj9ktlyR+OlVo6ok1V2ecw3QqeWdHFEl7W0/StYwQvtffkLR/gV
+eaMxbPx+bP5P/Rh/V1LwPkwTv/lZiH7VTYK7bdifdti3XxvgSIrLsjtSuOmr
+SuuO5zivNn0XnrN+yqqmhw8hX+/syHiWJ6/3iMcw5u+rT2xzxHyH5HkBsO4j
+450VsGJXf1U+5tOn1VWlDvCzAeks5C3a+DmdyWxSxrZgP+1r2/SD9vDOoSNa
+Pd6/ue/lWczRLR2bHyNP3frqivmwnWFK0I37IDBPi5rP+t09cqIZz6/TvHBh
+Zh/VbTLM/v/t6P8BMRH5/w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.6055466546366968, 7.136522676290642}, \
+{-1, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000003638`, 15.}, {16.000000000005457`, 13.5}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.543539525935092, 14.862427930839758}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1A841HccB/Df/A9xODkX7TbsTsb8KVR77LdOWPmvNGM9DisrDZMZtp2e
+jsLouMZSjciU1NAx1XLS/Jl/U9h6Jutw/nQkkh6M7P3ds9/z3N3zej6f3/f7
++Xx+39+9EREb+IkKRVHB+JBf6jXyZU9T/11smlK17vHkwnJXUdZ2+MtQvswf
+TtP+kbsX7tpApaeQfLuXx3bDL8SrtaUwXT7MNYcDGg+ktpH4kplhjylNiVX7
++BOw/d8aGgL4iyTlHcoBflJ+fpBFU/XaymVDuLewVu4O7w1/nmwOV5s1jF4y
+oamHGaXvcGBKWspXgwMUzRkbYf+tryqObKAp/oWZEAYczi13GzWmqa9szo+v
+YT9G5uX3Poc/jN19awpuiu4QboK7ds0WDZB+VjRZ00yaKo1ixsjg2aA47hBc
+UGNleBWOm1uonYMb8lr3FZH8zRblXNz/tWdjey7MeVr3NAV+Ebn5eiZcssKX
+jcFb9EMmsmGx4P2JcNTHi/5s/DtST4HjDgUcLCmuqCDzPZ3PPIR+rD49XNNE
+9vMx7pfD0rHWjXJSj4cw6gPMY7lx7IIa+pMr/erOwptMqy6+DccNLVp1wXMm
+LaHBsHhy1+Aj+K7bo3EhyU9WLP0Ga4VEhleQeUnzmiVwzaKdeifMMOXnvgvr
+Djt7PyH2EVW2Y391xegq5Yh+Y7ksN3ibeaaHAcyx4dlfQv39C8+aTUnc3XqL
+Kukv2zWDDfvfsb4fif5jc+pYTLg36PG5HszP9qOBWE04TkOUuwc++YPk8QL2
+41R2nx42oqlvFP4aw2R/yx3aBXCM105pB4k3Ks/GwMX2M79LSX+2fw4chAs/
+3r/tIsk/fNNFBCfEZ1/LI3Fq1aIZZqu4V52ES5J8Dcywn8UDa4EIbgqL6c6G
+X//VMP8UnDbBHVyHejubPSVnSFxVTZED1xeIdl4m563qZ2d99Pegb1XrHlk/
+ibknHVaW+SpGSXxYyJ+E2cK2xHXob1YjMMoB84rTcTZxJP3mqKeEwrVWU/Oh
+sHiAx4uEh46dsEwnzhKYecJbW7o6r8J0deqbWrC3t4FTD8woCmJdwfrzi2yF
+Em7KCWy2g52+jZRRToi7GJ0oRr2sCM56fdhfN3lZBbbW454yhuX7lvME6Jcl
+Vo9gwk1nllbuYT7xfgxaF+bclkkd4e91JA6vsD51SJlUZ0hTYZa3iqeIw6b7
+A+H8hzzXP0i9RgWt+rB73fE+GWyfmBX9zADP60ZkSCVcPcNqfw5n/iUqKyT1
+l3n2s5Bvk1AiyCTzaFg7egDOsx1ZSyPuPFjYCN+UB+QJyXpLhTJST/VMhozM
+h75Gv3UD9kosapKQ8zS4PcCFvK/zs0FXYDnDNqcePp6s29pC5v9SHM9D//fH
+bf+ZgEu6vcPT4apUyzQ9Mo8R36VWuI/tU+IC07f9Uifhc78kCAWwOHVVZ4Kc
+h3A95yw47qjX6F14UGE58xM8u+i2n7zv7dft1npJ/vqWNiN4pMNNc5o8D4/Q
+IxLUs0Yup///T5n0v/Ty6cU=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.20997225642612, 4.248059350469649}, \
+{0, 1}], LineBox[CompressedData["
+1:eJw9lXs0lGkcxydbi5VLmdHMuI73fV1ySUUrWv0q16jccltlGmy0aWVV7rkl
+tI6w5DJMknAoiUpIZYWULlqVmmRzz4bKMF2wj/3jec+ZM+dz3vM8z/v8fr/v
+98vh/ebsL0Gj0cLRb/F/f+8Cegig/f+Q0HDT6HvGX4i5y1w6HxAQwrw1mx6N
+WLxWy7SUAEZqyETPWsTwwtzuFAFiuTpH/ltNoOVGTjvEEmDQs6/9biZix4Pe
+TxIJ0LKMH9tkhVjhp/mCXAIc0q3iHn7jAK3827OqBgKWKH5yXtaEOHjWyn6M
+gPv2XWbSJxBPJTuqaJLAq0uzT/BE/LiLtYVHgs5FpluyGeL6we+iLpAQPCGc
+TNVBLGWb7zVOgsBZtWo3gdhDrMUzoKC12qRbdjVijQc1mwIpSDqjGmRhjrj/
+KzFYQMEu+wxy3HXxPF3evRYK8nVaxitCEScH+4peofd6PhtbzixyZ57mMAU8
+ItjEsRHx6HHfrn4K6pVPKR0QIuaq15g9oKC6teO+lRixkVpqaAUFjnMysnuW
+o/v3sws3RVDw8l3DQpoS4tvcFBFQQBqu6NzAQCylJ5lIo+Do2bDL2yURi7dF
+6zaR4B6fVunzL9ovrHjE8xgJPcZFbbWti/tbr0k3IaHfKIO2OgOxbZ+xyhdU
+3/KBZxYuiGOzny7pIKBWyV9OtHyxXnZSHcUEzNx4U9N4WwNozNvr96QQMKz+
+OWfnYcQvstXnjhNwx/IKLYuD2HSrNCeJgEmHbufBcnVU/+tx4QUE+FqL1+1n
+IU6eDv7YTAD/ZJ7flTw1dF6K9J0JAqpsAmPmDBBDwmyEDgkGnwK50b2qaH1h
+kUkgCUOrjZvNihDHBj2tvEjCjoxHPbNRiLle2gEfSaCuSl/QOoI41+z8h/Wo
+fwIBZyoR8dRUnfgQBVHHbtEcKhCfdZqJO0uB4UDnV+0+xAENbcvbKMjJ4/7O
+V0Pni8eKa19TsHYnX6jnj9j2zQVL1D83ib6b0lWIR1/94PSGgvux0mX+7xGf
+Hq1Zd4+CUs1p72sEuh/39HnJUgrMbTWDlmxHXB9RWBJKgUG1aZqyN+LR9MAw
+MwomsrST+twQX56yP/qZhMIfOz84mSL2sJkfqiNh+XBsY+sC2j9AYGoRjPpn
+OMZ8dhFx2IuhGUMSHOz3ngiyRFw/a+M9TQBFL9M614buA2mOfkiHx/zmnmea
+LtaHtju5iIAw6/w3RgIVVB87udKTBLjyF/WrjNZD/FvUPyfw13jEVcbvnTUl
+dILa2Xh9IunRu2cjG+8fbV4ckdnIwudPuyuN6Dqz8PcVOcdYmtNY+Pv1d5nI
+XWpn4vsJPz4P51Qw8f1jUtpCBkuYuD7pFq8z568ycf20/GRK7IRMXN/+6yKP
+/JUsXP/QRM7WGRcW7k++qS/xdz4L948hKPrD9x8W7i+/xHjpCw4b93+nPCzU
+urHxfAzn+vTJR7Lx/JQ+EXn2prLxfEWL1qyWSmDj+bsre3/L3X1sPJ/8rGxB
+vBYbz6/q5pw4iW4Wnm/ZGv+CHb+w8Pz7g2RX7jAT66NhXP+isjsT60erOn++
+t2kV1te8tWw3T3UV1l9T62Z+cowS1uc2GZMBxjAD69dog6lzvCcD6/vdM+F8
+5Ws61v/Cw5aQ3KN07A8q8YPloE3H/tE8Kys48EER+wtPKPw1s0cR+49STQpt
+sFsR+5OMxciQ1Ygi9i+H6qCAUHk69jevXWPdejZ07H+jH9SyfVLo2B9l30Ja
+5GM69s8ck0idKiUG9le5c8Jrum4M7L/N7q1UQgoD+/M27T9/HqxkYP8+mNVa
+5nqDgf19vMJK490lBvb/cP2HLpOpDJwPQ48GAj47MHB+GE/6pb4X0XG+dHBZ
+XqKTdJw/CuzQOd73dJxPUfNf9JOOKOL8OiQ0Pxz6ciXOtxvsM3vbzVbi/BOE
+sAlX/gqcj8O74xT6l67A+bnhZuGnnnAFnK+iskX9yuP8/Q9W7QZF
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7., 11.645199999999999}, {0, -1}], 
+        LineBox[{{16., 13.500000000002307`}, {16., 6.499999999998607}}], 
+        PolygonBox[{{16., 10.6}, {15.6, 9.4}, {16.4, 9.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.9452, 10.}, {-1, 0}], 
+        LineBox[{{16.000000000007276`, 13.500000000003638`}, {
+         10.000000000005457`, 10.}}], 
+        PolygonBox[{{12.48173265946094, 11.447677384685548`}, {
+         13.316718930329426`, 12.397834175673825`}, {13.719815750748694`, 
+         11.706811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.823799910437668, 12.484057296392571}, \
+{1, -1}], 
+        LineBox[{{16., 6.499999999996362}, {10.000000000001819`, 
+         9.999999999996362}}], 
+        PolygonBox[{{13.51826734053906, 7.947677384685548}, {
+         12.683281069670574`, 8.897834175673825}, {12.280184249251306`, 
+         8.206811054955079}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.823799910437668, 7.515942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{4., 10.}], PointBox[{16., 13.5}], 
+         PointBox[{16., 6.5}], PointBox[{10., 10.}]}, 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}]},
+       "\"aebe/cfdg/ehfgfhgh.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "aebe/cfdg/ehfgfhgh.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:eJwV0w9YzHccB/DvVdMfFCKpixNKujhL1Irfz5br1OQkNrTck0My9Fx/xNO2
+X6Z1PNecnkpatZv0x2TOaqtVm6tlpT+cEK20Q+ZQ60wUK7f3956n557X8/n+
+vp/P+/Pr5sYciNhpQQhJwx/9JiYzPg4ssaGYzxJ2vhfvjj1LUud+nOAAq8d5
+strJLBHm8lZ4w9rEDHHVJJbIjaW3I2DRgq/6OiayZIznsjEdNuk+eWIPm0aV
+Kxro89bNuz+zY4ng+6UaqwUs0fQrN7nBVUO3I9fBhkMeqSZbnHMbM+TB2oDj
+0a9gfWDvxX6Yy8tZJcT5dqd6r8UeLJEZNgVlwnKbT28oYJPqcOY09JM65Mi0
+MInNaa2EY2W59/thaWlV+G7My33RfsXeE/cXOJW4I09FZ/CIEJ5yzIn0wLK6
+6Y9WwdwB26p05I/ybTkWDBuacrTODjTHt3tpnex0f3EcNvJzc31g3XrJ4C1a
+z+TUjvR+Sd2fJripszrkXzrv590WPXBwnud4Gyz66fWDk3CV6odFxbDg4CnG
+CdYHjew6DGvez3fdi/55XTaSSJonxyU3B/P17upb4wur5V7aAuSJGo0omkXv
+c1wyrkRekfm7QFtaXxm3Wo79iEKKiixpfq8HFgHYJz/lVAetE2Pt1Gk2LFHZ
+X5Lw6f50gZPfTGBJUPUSq0BYm/L26Zt3WHJr1tvYnXQ+29J0t3fofTu25dP5
+nD3891ixpGZ/UchdmLs54/hDS5bcldz1daP7tGg2nYCn3Cvs2kXdOlh2AK4v
+6df+CItWnS5Og527Dix6C0v38gsaYX/VxovihegnkPn64P5svrjjGKz3G15a
+C+ssFeuvUF9e2C3DPIn+qo9GYG6NUjwT8zddnZow2wv9VOL+Trj+RN35AFid
+eva+0polBcJ9WRLYlDN0YTHyG7fMCw6D4wNL42thtuxc7Pv0vPveQ/OwLyuF
+h/cSWHD++pkYeHr7DaEj9Y2sYgVc4b9fYUJ/3d+/hErhoxc2rbsKG07dLX6D
++7JT56zWwJp3B3gJcCRn9/ggnV8fbqrHPKNR8foION5zn10f5lXWndzjC2s/
+sqm/h3w1edZ9rrDo6zsDTcjvvNiR2FPXhXxTiH19mvrIdyKsbrsTp7BgSXl8
+6/bpsGmc7x3OQ5+JA/e96PmBa1GBBL+Xte6qMDqfqjgx4y1DYgvMJSl03yOu
+WX+NMWS0zeLlRZgt4T1X/ceQAqO6dYieF5wvPf2GIVOWO89cjvxcpKNqIjw8
+40gaB+tORPz38DVDWl4b09phw42VujmoC1bFfD5zEe7f1hNUDUuCs43RsME8
+SVeE+/nClq0aWNOTbdeM/socYWU3zG4+NuaG+eqVjkJbb/y/JqftOGFmSM0M
+53gf2BDmaTqCPB/2i8+tgfVNEwb9kJdfXnh8A6yZeT+gC65oTNpIrUtoDdqK
+/cj3VbbT8+qs7MJfYJsvuhkRLJryw9lBuGXZ7thpsNaVy3gO80Uesn/ovILH
+RY2wZIsk4w9Y3bktXQbXPJHvKaR1h2TXDvRTHs7QJMGm0FzFJJiMn67eAEsL
+y4rmY17Zi0OTl9F9vLZ/8B7yaa/zamfDspgQhiC/XByQ7Ejzx3M1F7BPUl6n
+pBbYODV8PIL38aVv9Ry6r0tio9NLhph4J1f607rU/HDsXzy/fHtbFLVwbYnb
+c4aoHm/OUMH44fEchxgStWLCLDo/t2vD0/wB7PuDOTXWyMsVX/Z59JQhurjL
+7Hrq+XihTxgikrSE5dP9Ryfo78EVc/1C/6b13/rtjuK8+hu/MyIh6m38yt5n
+DIlMamxPhnVKXua1Qbzfq9sUP8OCuNnNfBNDeofPpQ/CnDlqQSrm477s3Ori
+g7re67oJ8yttU2oDYU14DLtzmCFWAZlDUlq3Vo78jrzl4dHXt8CyO9K40VcM
+uVWdVLcZNrQuHxrCfvS54kIJfX64/GT+KEOCk6/1iGBuu6L5GSx6VRw2Fdbt
+CDX/CZ/9ytNlAPOw0kALOaxNa6z6HTYEZM7LwH15nesu5MOahukr16Jf0E/d
+BQnUSQ4plZhPXeo+YQPNd8bc34n5reIsA/zoPl4ueFyNvP6mhf7udB/i7cNP
+se9hue+ZWbRfQl0Va8S8LZJv+fR8Q+LSgocMybZ6dtOb7ic84pS0jyHOXNmW
+EOrRwoOuXTivffHrfnr+tqvdlQ6G2NR+YP0d9dfuLi0N2Ac7V9dLHW2ZtfoS
+QxKXNVkLkJcIQvmp2XgfGfFlsdRs3s28HZdJxdES7ypq+lH/SibR78Xs/1a3
+8aQ=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.3944533453633028, 12.136522676290642}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwV1Q1Qk0caB/BFUPALoQhEpBDEIkqwcQANNfKuAilTTsBiQT6ESBVRFCIS
+pE7LxU/ChxrwC6kcORWFcrZpQUHFgkglgGiAa0HlxlhQqBaIQr2US+X+m5lM
+5je77+7z/N/diVtS+qfbphFCDuDLfolhCp95lBjZrzslwxlOe6fZUFJyuMKr
+Fpamtlr2YnziqOxKCmzzPH1cDu/ybbHkw/zezTkD1pToqFtT/yJK1OsSvnOH
+LW4GWv4TbqJzisRzKanXjN9Ogw3X7Ef85lBCFFdiPoZ1Dy+M82ZTorJ41ePF
+xhd1dY/NpKRBG1LuDAuXD6/7yYqSvq0+FxbAsum751yypERg8BQtgvkfKo6d
+mUGJ1U5zfz+YBhsDL0+n5PDlRTM2wKRcvuWJBSWe1x6d38v2S/JPE8OHu9df
+LWXrRf/6rtOcEuWB5tq7bLwzVlEMf3l0idPvsEIncc6HxW8vhtqiX80Rr7of
+YFHWgydClk/pVisrrFd/RlIWAutO9rYfgv9VJ78VBStMqy1cUI86LOFhDKzu
+e5DYCZtEx8Yi2HqOqSW5qD9zZvbN1TBVbBhZi/6yD3XHOsGkQ3b+NaybqDoy
+wvIta4wvRB4WbXEZ12GbTlGPFfKi8ub7WbBUJ/krAVZ+7XdByMY9BwqUcKGb
+3ycv3CjRr4z3OgAvDtGGlsI6B1WtBL60s5GGM1ekBj/C+psCXest4SbVGW41
+HLRqxoJ7fHhHnPce1CMbisotZI4mxw+g/oiViR3xzJf7CzLRn9asaI0IJqbM
+8kjkUXLIp84V5msb3ZcivzmVt5R2sCwsXj9lhnwl/lnM0kPG478SSiofmt10
+gdUtmubrUxwRj38x1xemO3uchv7iiNF0rm4Ds96ubZuJI4r9uWo52y825I+A
+/3FE9dvWHWWsntsrmvdPckQYE5LL6le0Thmc4eEPPaSjrJ6nF68vhmt9t6e8
+h37Vj39pKYQNOY84IcznpR4NxXoRu2vuB7ux87CmMBL7lTTLIzewPOVvPjiF
+eqwqy/KZ+Snfu06+40jIoKSKzVcFcWEi9KOy58m8Yc3GW2avWX9KO8FMWFp8
+bf959K86Lah5xPpR/FkunIb3I9DGqlk/nxZvucQcdGo4AbZxfOZqgJ0DknIc
+YV1d1DRr5Ckd7zI/54r78tlb/0mMZ3tZmJvBqvRvBDWwzS7h8l0uyNv777n+
+sGeX2+mn78MWb1aqsH/f2ekvE2Gp/7fBDahPLZoKfe2M/DySJHnIP7s4iHcW
+Vljcq/oc/Woc++5GwtKUiGULkQ/v2alGTzZfKWtrMXJEaWzf7gCTwQiPrLcc
+EcV7EGc2P2IsN2iCI3TFvIZVzJoPXgW+4Yg2y70nmc1PSHI9auBI/Q29ugKm
+fuFGn1HkTewfjLHx8jKZ/e8c6TMGHKSol2zl/fzjS47oY6tLi2F6q3aPHxyx
+p39Qz7zxTqYcFpVcjPFA/wp5pFPGK5yfgb9FJTDbbl/jMMKRTWGRXYdhUrU2
+JHgM56NGojwDN82oE48a2Pl5vLgI1g9lrIpFvTLXfdF7YXXmWEbXOJ4/6f5C
+DEsV364P+AP1yHjfjbI8TzmeL0D/2ZaD/8hn9TZy5yr+i/pFhaV2bHxpa+t+
+5CXlXUk4hv7UBzvrTbC++ulG00LMT12s4f/JEc/Qti3bYGra46LHuPDm6qud
+Tng+5t+vRHBTkWb7R8wPak54Y/2Q/4hPaBbAIzUTLahHdPzedV9Yb22+bBby
+1/iYutp5OK85yuezWT9piVZZsCJh/o069K91TioSwTRu38RC5EUNy7+2g4lV
+9GTaC7zv4+I1lsw/BM7uf4Z63gXue4/5cW2O0xO8f0OF2Id5k1d4ZA/262wo
+SGbujpOEteG+XLVVVTI72M4V3UY+X4x2TjBXFq/NrcZ+CzZ/JkG9REVP5hSj
+fmH45FlmdVreJzm47xXpJwaZjb1xeadxX53M3Jagf9KQvCrwKur3F3jHMUd9
+PPJbA/K2Duj9ktlyR+OlVo6ok1V2ecw3QqeWdHFEl7W0/StYwQvtffkLR/gV
+eaMxbPx+bP5P/Rh/V1LwPkwTv/lZiH7VTYK7bdifdti3XxvgSIrLsjtSuOmr
+SuuO5zivNn0XnrN+yqqmhw8hX+/syHiWJ6/3iMcw5u+rT2xzxHyH5HkBsO4j
+450VsGJXf1U+5tOn1VWlDvCzAeks5C3a+DmdyWxSxrZgP+1r2/SD9vDOoSNa
+Pd6/ue/lWczRLR2bHyNP3frqivmwnWFK0I37IDBPi5rP+t09cqIZz6/TvHBh
+Zh/VbTLM/v/t6P8BMRH5/w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.6055466546366968, 7.136522676290642}, \
+{-1, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000003638`, 15.}, {16.000000000005457`, 13.5}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.543539525935092, 14.862427930839758}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1A841HccB/Df/A9xODkX7TbsTsb8KVR77LdOWPmvNGM9DisrDZMZtp2e
+jsLouMZSjciU1NAx1XLS/Jl/U9h6Jutw/nQkkh6M7P3ds9/z3N3zej6f3/f7
++Xx+39+9EREb+IkKRVHB+JBf6jXyZU9T/11smlK17vHkwnJXUdZ2+MtQvswf
+TtP+kbsX7tpApaeQfLuXx3bDL8SrtaUwXT7MNYcDGg+ktpH4kplhjylNiVX7
++BOw/d8aGgL4iyTlHcoBflJ+fpBFU/XaymVDuLewVu4O7w1/nmwOV5s1jF4y
+oamHGaXvcGBKWspXgwMUzRkbYf+tryqObKAp/oWZEAYczi13GzWmqa9szo+v
+YT9G5uX3Poc/jN19awpuiu4QboK7ds0WDZB+VjRZ00yaKo1ixsjg2aA47hBc
+UGNleBWOm1uonYMb8lr3FZH8zRblXNz/tWdjey7MeVr3NAV+Ebn5eiZcssKX
+jcFb9EMmsmGx4P2JcNTHi/5s/DtST4HjDgUcLCmuqCDzPZ3PPIR+rD49XNNE
+9vMx7pfD0rHWjXJSj4cw6gPMY7lx7IIa+pMr/erOwptMqy6+DccNLVp1wXMm
+LaHBsHhy1+Aj+K7bo3EhyU9WLP0Ga4VEhleQeUnzmiVwzaKdeifMMOXnvgvr
+Djt7PyH2EVW2Y391xegq5Yh+Y7ksN3ibeaaHAcyx4dlfQv39C8+aTUnc3XqL
+Kukv2zWDDfvfsb4fif5jc+pYTLg36PG5HszP9qOBWE04TkOUuwc++YPk8QL2
+41R2nx42oqlvFP4aw2R/yx3aBXCM105pB4k3Ks/GwMX2M79LSX+2fw4chAs/
+3r/tIsk/fNNFBCfEZ1/LI3Fq1aIZZqu4V52ES5J8Dcywn8UDa4EIbgqL6c6G
+X//VMP8UnDbBHVyHejubPSVnSFxVTZED1xeIdl4m563qZ2d99Pegb1XrHlk/
+ibknHVaW+SpGSXxYyJ+E2cK2xHXob1YjMMoB84rTcTZxJP3mqKeEwrVWU/Oh
+sHiAx4uEh46dsEwnzhKYecJbW7o6r8J0deqbWrC3t4FTD8woCmJdwfrzi2yF
+Em7KCWy2g52+jZRRToi7GJ0oRr2sCM56fdhfN3lZBbbW454yhuX7lvME6Jcl
+Vo9gwk1nllbuYT7xfgxaF+bclkkd4e91JA6vsD51SJlUZ0hTYZa3iqeIw6b7
+A+H8hzzXP0i9RgWt+rB73fE+GWyfmBX9zADP60ZkSCVcPcNqfw5n/iUqKyT1
+l3n2s5Bvk1AiyCTzaFg7egDOsx1ZSyPuPFjYCN+UB+QJyXpLhTJST/VMhozM
+h75Gv3UD9kosapKQ8zS4PcCFvK/zs0FXYDnDNqcePp6s29pC5v9SHM9D//fH
+bf+ZgEu6vcPT4apUyzQ9Mo8R36VWuI/tU+IC07f9Uifhc78kCAWwOHVVZ4Kc
+h3A95yw47qjX6F14UGE58xM8u+i2n7zv7dft1npJ/vqWNiN4pMNNc5o8D4/Q
+IxLUs0Yup///T5n0v/Ty6cU=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.20997225642612, 4.248059350469649}, \
+{0, 1}], LineBox[CompressedData["
+1:eJw9lXs0lGkcxydbi5VLmdHMuI73fV1ySUUrWv0q16jccltlGmy0aWVV7rkl
+tI6w5DJMknAoiUpIZYWULlqVmmRzz4bKMF2wj/3jec+ZM+dz3vM8z/v8fr/v
+98vh/ebsL0Gj0cLRb/F/f+8Cegig/f+Q0HDT6HvGX4i5y1w6HxAQwrw1mx6N
+WLxWy7SUAEZqyETPWsTwwtzuFAFiuTpH/ltNoOVGTjvEEmDQs6/9biZix4Pe
+TxIJ0LKMH9tkhVjhp/mCXAIc0q3iHn7jAK3827OqBgKWKH5yXtaEOHjWyn6M
+gPv2XWbSJxBPJTuqaJLAq0uzT/BE/LiLtYVHgs5FpluyGeL6we+iLpAQPCGc
+TNVBLGWb7zVOgsBZtWo3gdhDrMUzoKC12qRbdjVijQc1mwIpSDqjGmRhjrj/
+KzFYQMEu+wxy3HXxPF3evRYK8nVaxitCEScH+4peofd6PhtbzixyZ57mMAU8
+ItjEsRHx6HHfrn4K6pVPKR0QIuaq15g9oKC6teO+lRixkVpqaAUFjnMysnuW
+o/v3sws3RVDw8l3DQpoS4tvcFBFQQBqu6NzAQCylJ5lIo+Do2bDL2yURi7dF
+6zaR4B6fVunzL9ovrHjE8xgJPcZFbbWti/tbr0k3IaHfKIO2OgOxbZ+xyhdU
+3/KBZxYuiGOzny7pIKBWyV9OtHyxXnZSHcUEzNx4U9N4WwNozNvr96QQMKz+
+OWfnYcQvstXnjhNwx/IKLYuD2HSrNCeJgEmHbufBcnVU/+tx4QUE+FqL1+1n
+IU6eDv7YTAD/ZJ7flTw1dF6K9J0JAqpsAmPmDBBDwmyEDgkGnwK50b2qaH1h
+kUkgCUOrjZvNihDHBj2tvEjCjoxHPbNRiLle2gEfSaCuSl/QOoI41+z8h/Wo
+fwIBZyoR8dRUnfgQBVHHbtEcKhCfdZqJO0uB4UDnV+0+xAENbcvbKMjJ4/7O
+V0Pni8eKa19TsHYnX6jnj9j2zQVL1D83ib6b0lWIR1/94PSGgvux0mX+7xGf
+Hq1Zd4+CUs1p72sEuh/39HnJUgrMbTWDlmxHXB9RWBJKgUG1aZqyN+LR9MAw
+MwomsrST+twQX56yP/qZhMIfOz84mSL2sJkfqiNh+XBsY+sC2j9AYGoRjPpn
+OMZ8dhFx2IuhGUMSHOz3ngiyRFw/a+M9TQBFL9M614buA2mOfkiHx/zmnmea
+LtaHtju5iIAw6/w3RgIVVB87udKTBLjyF/WrjNZD/FvUPyfw13jEVcbvnTUl
+dILa2Xh9IunRu2cjG+8fbV4ckdnIwudPuyuN6Dqz8PcVOcdYmtNY+Pv1d5nI
+XWpn4vsJPz4P51Qw8f1jUtpCBkuYuD7pFq8z568ycf20/GRK7IRMXN/+6yKP
+/JUsXP/QRM7WGRcW7k++qS/xdz4L948hKPrD9x8W7i+/xHjpCw4b93+nPCzU
+urHxfAzn+vTJR7Lx/JQ+EXn2prLxfEWL1qyWSmDj+bsre3/L3X1sPJ/8rGxB
+vBYbz6/q5pw4iW4Wnm/ZGv+CHb+w8Pz7g2RX7jAT66NhXP+isjsT60erOn++
+t2kV1te8tWw3T3UV1l9T62Z+cowS1uc2GZMBxjAD69dog6lzvCcD6/vdM+F8
+5Ws61v/Cw5aQ3KN07A8q8YPloE3H/tE8Kys48EER+wtPKPw1s0cR+49STQpt
+sFsR+5OMxciQ1Ygi9i+H6qCAUHk69jevXWPdejZ07H+jH9SyfVLo2B9l30Ja
+5GM69s8ck0idKiUG9le5c8Jrum4M7L/N7q1UQgoD+/M27T9/HqxkYP8+mNVa
+5nqDgf19vMJK490lBvb/cP2HLpOpDJwPQ48GAj47MHB+GE/6pb4X0XG+dHBZ
+XqKTdJw/CuzQOd73dJxPUfNf9JOOKOL8OiQ0Pxz6ciXOtxvsM3vbzVbi/BOE
+sAlX/gqcj8O74xT6l67A+bnhZuGnnnAFnK+iskX9yuP8/Q9W7QZF
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7., 11.645199999999999}, {0, -1}], 
+        LineBox[{{16., 13.500000000002307`}, {16., 6.499999999998607}}], 
+        PolygonBox[{{16., 9.4}, {15.6, 10.6}, {16.4, 10.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.9452, 10.}, {-1, 0}], 
+        LineBox[{{16.000000000007276`, 13.500000000003638`}, {
+         10.000000000005457`, 10.}}], 
+        PolygonBox[{{13.51826734053906, 12.052322615314452`}, {
+         12.280184249251306`, 11.793188945044921`}, {12.683281069670574`, 
+         11.102165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.823799910437668, 12.484057296392571}, \
+{1, -1}], 
+        LineBox[{{16., 6.499999999996362}, {10.000000000001819`, 
+         9.999999999996362}}], 
+        PolygonBox[{{12.48173265946094, 8.552322615314452}, {
+         13.719815750748694`, 8.293188945044921}, {13.316718930329426`, 
+         7.602165824326175}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.823799910437668, 7.515942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{4., 10.}], PointBox[{16., 13.5}], 
+         PointBox[{16., 6.5}], PointBox[{10., 10.}]}, 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}]},
+       "\"aebe/cfdg/ehfgfhgh.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "aebe/cfdg/ehfgfhgh.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:eJwt1ws4VOkfB/BDaRBiV5Z1zXXKNZdSW81BomINsaYNqVYJyW1FksGICt20
+ppQoCt2kjVFLKkQ3U2Hxd123calImDL4f8/+//M8nnk+z/ue9/1d3nPOWLb7
+oJufOEEQ9fijvom+eXx0SOLfjzFJLDiW/kslLOybpjcYkWRc5oX9ETBrOLm9
+yIisatZ36dCF5SMYCueNSCKG5ZT7TpskBA3aM+lGJNts4dp6NmV68gwX7p7g
+7DGHx5qEWSW4fu9mL+bwMpKIig7JaMO4T6Wa6k1Y+WJiuxz2N2w2aYmET38s
+rHWCtZS1pVzgHJflumeMyarG6JgUS5hlVXuwxZgkh8LsjxrAzNEZkYYJWeWS
+9s2bcjHNbvkuE5L0yu3/YA4L9N6mZpmQRMUPGZ6O8BhzI/0lxodosaQftf69
+ptQPJiSbufHs0DGY/lgoIkxJYrOYonsRLCy9l7jQlGRzUsr3v4LNLgWICbFf
+3pyiPpUP/+VF43Z4qpX2mEC+3VMr0kpgT+MVL2Rhpq2STyzW18w39V4C0znb
+oxkYH/mWabAQ5p94ZiRCfpOr3TgjWK/b4bpcmTHJJl75JdTAVT0PX4cjX1a+
+Ud9Zar+6inkr1EdpyGCpB5UvY/s4+sc+83VKSQ4O8euN/hv98cw6uLdKiyRa
+Lto0PUL97XoYbcGw4OFY0l2YPNd6RA22/q2avI9+0JKcnnM1SaLA9EBvLaz/
+3GXxAphNs48cwnrr1+wxiNVAfIc2r1HB/le6Lhcshosrzj/ahv0bnsZIl6gj
+v+BlovOwjbFhShhsvUbmbDvmJ7/Pm3OGiUW/tumgHpIfNHrsYPJ1Od0ffvgi
+gnSDQwbrhPlwhIJG/+8wV3+Dehv6lyTDOlwEt2zlDIuhH5991tcNwzmPUn5V
+Rb/Ga6u+miEeQUKngR7G33V0D0fC/sSLTg2MH1ScPVwKM+uYvZLwPrXZziEq
+fo4osA/rO++a+7gY+fLFM0PvY/9wsUOByrCyT3lGFGxSarpKBuZmn/62CvO/
+4yof6cf1kmLF2p+Rr4vs89fX4BB3fd5t2NRhm54jzIrb6nsA5qvbtzZS+U22
+HreEmyw2xFL1YCv2bVgEvzq0sKRUDftrLxH1of6GFw4OLoV5MqtPvUP9eeKH
+vw9VRbzZa+dxfxJDGx13v/kR51HN6mgH7Mtj9VrALLXOvd/g2T8srG+ooB9D
+5vZ6qP/F9C5HY5inNDm0A/u1qSmIv1BGP64Ik7NgAyJFiw1r0Xmt3fBIopeM
+KyzQWu1MR76nFem162DmP30WwbB93MJBG2o8aG7iDuojG+x73xsmw1qsB2F9
+9ZuMVLhb/4SmIvpxMmI4r466XvKqtwXqr/4k2lYW8fCfd+y0g4+mxUm5w9YF
+m//1BS+DN3/AYza3AjGfXWS382IDHEK7H4D1CBuNmlkhZe7wYgH2G6nL+EUO
++QsVdUuKYY5F7RIZuMAjclsoPBP649tPmM9qSXY1Rvxt0ueyeXDdHSsnAeqz
+MuJW/15YEDg9lg/LzhYcEiFes+GT9fvhTxqrQ4/ABYkcmdXwdAJPfuQHnC8/
+wzB51Cs9gBXrDAt+ockLUX/NC6PxhUqYf3lg3Sf0M+gnkiEBC0nB0SlYSqO9
+de9SnK+3ERxZrPfblksGjYqol1QS3QLr2c747XKDhf2ieD/40HKVjv7vsZ/I
+aTYXrlcNeH8GJtXF4/rhVqm7liy4zjU8zQj59ZztS18D8yZ94sKRf8DvGxdZ
+wfxkidul8Md9fF9HmEg1zf2M+VFNlrohMFcxzUEX9bXYHVp9g5pvKaa0GfVX
+ednYPUSt13DXZCfGf9L+MdUM8flvl4j2w3hFf3fW73CL6v7iHXDmes+ZEpi5
+pGmfLbzH9JnoH1hLU0cc9yt7Vf71fAL5F8xGXsF5IcLIhHEaPHa+griJ+I5o
+8WhTmG/2XdVuPB+IxU2PdtVT6+0td8Pzg3h8Ir0rHib3/Xm0C/lXhYXXa1H1
+0lrJyYFLpKsrC6h6sG48Rv/YRkvrz6rDkrwQzQ2od09ZsArnO1yfdkikifG1
+hokDPQqY/7z8G/pJuFX2ia+Hxxo2TSjAjjEns7Lkcf8Vdgm0Md/86u07C2B/
+hXc0O4w7p9+NnJTDeYyTvxdCXd/o+0kall/2+VQh/OXjcR0XWdS7IbJ8GJZP
+8hXVyuC8/xr43gz50OR870TALYO+NlHU+VSozvKEx6TUPCrgTW/bvILguo7x
+OBH84UHFh1uwQD82wRz9MMimzctjfXqZIdcLTshw8kuH+Y5el6LggZiYXBXE
+4+usapAEpxtIxFyHWadmr8TD24+WXaMvQVyE2qZgeFNFuVcGbP2gxsgJ1lKR
+VOyClXcoGqvDaforP8/DfDfd172Ih3g4xByD2afXaVyDmw1sFG/Bxe9vnvOB
+n6TX9ayEWdcTGlXgQsvn5olUfU79cQLvc2JmhkPmIV5WwM6V2bC6RfHLLOQX
+NW8ziOcn8TH6/ZOwxYjnyEO7LfBkErfGQhr1suJaUu/D9nT1nGFJxOGs3mcK
+u2u0XL1GQ72OexeuhXnaTPHARTgfG+4s8IC/9vuYO0mgfmG/5cbC9arHnVwX
+Yr2aY6El8HVGYkrCAowfT3o8BuP3xet+cfT3K8fTCvH7D/n7HYUF8W73jsBP
+pZRfOcFkabXmMzg5+crtn2Hr7dLiEqjXiLz5gjiY0Nv2ZQMcKf29ZzPc8sZ+
+9gD1PkorpG/FfuSLngen4Oj48cB3MMuydP9VeKb2srov4uPSK43z4W1rV/QN
+wsU6xaOZcNt/Dj7wRj51car+MfCunxWiSmF5JXsTV/iv085cAcxr25JEvS+f
+DgSnjMLKs/lOHYjXco+afgUcZZbXfAHWy9ww7wk7JrU/codVnrWGVVD7E5NF
+CnC/lvatMSreQsbqRtQn010qahr55ATXFFyBt7BjplvFEJ+DLT8SfifhbX6V
+QL20d/Xg/UNMnRQtK5tjEIJYcw8m1R9HvWO6IgbB+iGg2R2eO7PbOv8rg1AW
+BllTz992l4F25jSD4A/eiE6FLxmW/b1ukkGQA3Jv/6LuN42HxjETmB8hXzsN
+dzYT51Q+MwjuikeuaxFvUTjtvtY4g+BVsmjxJtRzhv3XuTEGkXPc27YO5kw8
+WRUCMzdv9JRBfUqEi3TuwCHltdV4/hER2jX7SFxfN9q5Oxauzj7AXor16ctV
+0/JgbuIef2Xs79shs6kClpto/nPlFwaRUjPtWgt38p++cUS8UXk7HB7Dbv7Z
+6+ynGMTpL4czCuCp5wnDS5BfNzsjOhFOLePuzID9N6kLqf6l6GTzn8ApPv8p
+U4KLynTEUmHmzi29jYj/hEzp4AjWqwrVnz0Fs7o8ZLqp/Rw8722FO585XApC
+PDlrSq4thuWjDM2zEH/BtAHjPeqVPmnrcRj5cm+OJlPvv41j9gfWjDIIsyKx
+CQ5V7/q5ILNBBiFfxLAPp/p1KShW6h8G0dKbFRMKSxaN00ZbGYTW1YGKODgq
+d+aJE59BFFs88LoMd0/zrX6qRL3Wn2urM/7//x0XKv73bUL+F2Hoviw=
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.112359638123757, 16.39239276247515}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1g881GccB/AfGSbp5ggtukYS7e4ajVR3p41E6iJz2bWudOVfRNE/rRuS
+vJibiOTsKrUs6kqTxOVPCaUuyp/EjjalxMVQ+mOfZ7vXy+v3enue5/t8v9/n
++d3r5myO9BVrUxSVgD/ypNom8bHgUf99ZvAopkr75lFYPTDXNMeUR7U7B802
+gyXhDpLlcF3ntfg0cx6lMahs1IYDQn5/NWHGo9gn/NM6TXiUi0dDTRAsOSzz
+vQd/sFiWfRdxJS9Cksh4uONXlCtMszKLIuv5Ez4iBZ6q6dFcNzyVh/lXHYkN
+OmZk4dniMxFzG+ukD/9wmoAzxbMEETC7ctQsHHE4D2I87GGFYenlv+HA04Vu
+7+kYv0Gd2oQ8qD2LAv6CNde+CnkMv2X1yHtgiSDughfqyBIXrx6GFayemGK4
+I6K5nI548qMLBB/hcxPDScth2twDJYvRB082r3ofGQ/ltwhh5tDo9DJY5Oxv
+tBX++AW/Z5SM+1W0r4OP6vbLWMhbfnZZ43x48oJ/pwjWZKZn9yH+4ZSW1EMw
+W5ozSfoaeHKQlQvTptoXW8PnjzqNnIAZ/AyjIuS/VrbyUTJZX1ZjswCOzNS/
+vhHekW+zqhD1ewiv7WcQGx/Qmg+ztrT23kE+VbphZ0ifK/pX/RYEa4w+d3OH
+w+uyBS9QP69Eufol/h9YnLg8iPRrwCH5LLxl8LFnszGcdqtyL3yxdFfFElik
+G311KxzmXuBQ8Bnui+E4g5xLXdEwiwbzxjPi0+GDekFLEmk4z9i5Hg3wZWHo
+Nh2Y13Sh3hz73+2ITrebjng/bNm9D1YXHzu03QjnUWIx3g8/1Gl/2jkN98TQ
+e91m1OPq86VJLMzbfnVxNzyr21+2FBa1sxwE6Ict09SSCat06TWN8FbTAwEr
+yPqLj5+z0c8xI1lgAhm/PZ+eBBtNM/yDxBd1v46sI+c9OVzhif2pp0n0IXim
+JvmvalhS+cCM3AdF7wZzDvJljHIuDcO5k2LrK7DiQbxzE6xSLEmZhvoYoc1z
+0uGdsRH8RTDN7fqYK/x2sfqGD8yP8mY/RH7JezhdfmQ+s9J0I9x0auFud1j6
+0jtVTd6TgTTOHLhq3LVnA+xy6OfCJuzHF4vSn6A/Pytp8i9h1aUy7c1wK+PH
+EDHyZWyUCUfQb876+oa9qI/RunBJFuyqFzE1yhD15MYmecN24s/Lfaei7wVO
+7hZw5r2oNfMMcB+5efspeEZK6qNxfYzX6plqw/rtXglNeuh/aVuHJZzybdF3
+l3SRp017lC9Zf+jkpfOfkP6Z7JTBu1pzPtTqYD+tvXHv4GizmvUUzM6jfx+M
+fH1Z0gDxFPSvZavLn3Bu4sb6UW3ct1fV9wNRb3NDWP5lmJoeeO4RfHkipDcX
+3nFdvtYL/TJUOCvPwwol59cSeM9huzw1sa1VryH67eSXvd4R8TXpRrN84bjh
+1JQ8mCFrdJDAdt0Zd+jIR/HT3qFMOLTbwUoK74hhC8n52Ye88dYn9VhGHYmE
+iwaWr9oJi/i2iq/h0uas3+ph1TZ7y2fY3yvc+BGFfrCPvDRLhF1CEtNMYZWf
+u/IzmPlFPk0bFrlatWWinoruTetrSbxzFTJjuGZVDFcA08LMk6XoR7zXYEI1
+yWdhgYEJXCYyaNCC1TrzhKfQT2aDfYwl6lHrLVvKg8/d9oufifqrit4qX+M9
+Fh5zX0ppIR+zV7PL4dSPBuriSS7FH4nLPwFXsfIZaz5wKbnzTHE2vE5adWZs
+gkvxwsVxxbCNpjar9A3Gg+83PoFzVuR/Kh/jUlVnyhnW2M985Dt+zT9cSuGZ
+zT8Ar2M4ediPcCm1amjtM3IfHg7W9bzmUhr50+1C5D8rQd9tSIP5J2x2tsFO
+NwYj/GEpx3XIF/WHV4y70GF1bkZoA/w+82C1NRlXNhYsQv8UFbLcH2FVd9a9
+DJg/hWFtjvjU6E3lE3L+++p1e2Geny2DhvNxebfiyZ1h7Hfhm2P2sEmw3eNa
+5Ce6E9L2n//syr2K/Hl6neVkPkOV/ixzFPVtlrp2IV5en1rihXrZpTHBZD9p
+vnFXPbxDkR3gCKt6/Vu0xzFfnztRi3xTDz5fMIhxuW/EmCes06c0TYQlT09G
+30a99T7d26oRn39ct+tbWHpz7r2z2F+16/jFOtK/wimVLsiPZnvTkbxPgvYt
+bgdRjzqW5jmA/gvCNWumDiHfX2Lsj5Pv6X6m1pUXqCchfaUQLhOKdS36MH/B
+LSsXMj+p89qGHvTH56MxExYl5Fzx6eBSjK4ZkRxYetz25UIV8hVeFwST+1BS
+f75UifEyVWch/f/fBZLTlf//PjDh/QvVffZ3
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.368879573271343, 4.309365547472549}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000003638`, 15.000000000003638`}, {
+          13.500000000003638`, 5.500000000001819}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.245034441796587, 11.605529856236451}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwt2Hs4lFv7B/CR0VGackhIyqGhk1Maoaa2pCiUdpNTkjSVRIYkhZ1ErzKk
+cs6Wc9LsUhSKIqNN6B2anEKmiDKpNA7p913v9Zs/zPWZ9ax73fe9nmc912Wp
+x4ldh6ZRKBQFKQqFfFOo5I8Wk/K/zyomJebSE+cdsLXBuvixlUyK/jYHmyQ4
+lVfm/AEWJr1Y1UPGzTcFv4CjOgXcZdqYLz6elgx3vJm9wxmuNBuZOgizF2Sm
+R8MhU0ccteDicYFpIWx8O7+scwWT0r3s1b5nZP59p8x4+LtLRN2/8OQ5SsEW
+2Dti8Qc+XJqSFz2mx6Qw/ipPfgzrn7n1hQdryQ7uyYSt1xa5+sDdLovGwmFl
+f7GiMSzYNfKM5EMJU/spDfuOnF1rSOZvbT/2Thf5XDQfmwFHBYfsq4U5Ry8+
+eYf6hk7lKJbDsisT1cvhycAQjwpYWZh89iYctu6w30t4ZoPm8H9g28XuQz3w
+5EIr9fPEDbtlpmE9fT/X9ZGkvw6Dl+gknzfsgWtk/t/1UrvhSX488x5sPFu/
+6hwcRbV43kb6yw6fnw8HfUlmyyE/3s1Cm0aYaZKcawNb8gt/foHpvdwoLuw9
++qtfBv2i+4jK2ki/KvL3LoArHQuLl+swKWpXG74T2xbMfMGBXayLxqbDjIhf
+m57CiVkF+iQeW3tHInU59uFl9k8+LKFP42yGFcIazBJh4+U7WwNhd6nPPq5k
+P35eXJUBZ1yvDVSBaXuYhytgLdH6G83ohz0rdbIB9jbXZl2Am8wPS5rhlR3m
+bAYZv3BttA623E8/95mO+2zNxsUlMPO0uWkuPFPFY14KXK25VZoNR52UaTsF
+mytVfzeAExpvdNjBvDOPy6fD5n8l3tEm8ZP2Xf6Ib9nttZMTqK/Qy0iuBaZJ
+DDgt8KTPfcdGEtc/IqmYOJb+nozrB07yUmBekncRmR9jZ3crBg552K8rjfh5
+tKKPUfCQm/c+Hbhpqu9kHByWMat/J2wcxCrMgasfDG8Ohr+Pux7hwxoDciXZ
+sKRHZ/gHWS9On/sKFvTpTKzCOnnqixkj8FDLtWYfuIN1xFEO/bF8c8jhIRxy
+8mqPBqzvzZedRuJuXredDkuY9EN2sJriztOacFTSnvwUWOFU7of5cN77aOM+
+uE9pTto3fFsrdsbo4PcMYblpHfn9WUOoO2xdyBZdhbNG4s245LmoqbXaA0fk
+ynsWw1lbkk7Mg7lW8cvqYfeWuupq5CWQ37vmDZxq3tlL9qXQ9pOghYzPFYau
+gJUflg7xYR6DatuLuo0521r+Idf7Sl6nw0EmgR7xuiTOVreDsETozPeGbfV1
+2g1gb+/R8D9gZsPG6jmw1vHLxovg+rJ82gju84xo0zgx8tJo4NNFMFXl/dp6
+uGPFzZ4+cg45q8cWkfvqWdk5MTknDjPLk2CaW/Hj6YjH1/0SGEvGp9W1aMPK
+Nzb85pJ9mj+zwAbuTnOce5PsS8yc6gBYEKZU94j0+1/D0L9h94ED/G6y743y
+WvXkOTvZLC+P/ELKa2Z8I/n3dhjYwWzZ1AJ59INqJlh3lZwjvmIB6c+k/ci7
+DlJP9F2eKXnuZkbf0sVzpNAT3mUGV/5cJAyExeOpFwzgLA/ZV1WwxrxIVxUy
+vy19eAae47zCPf+MYj1Gx90uKzgi7k+XWtKvBdO5IbA4W6fyMulvfqdHLjl3
+Jf8Wk/q+U28bvYCZbgH+0rDwwPojQjjrRXtICfoVoXJtgpzTzNpjIUdhjR8u
+nDdwacN53SUwLTypv4aMn9WlC3FuJapuHCqAfUvTP92A6xN/h0bBqdnG19zJ
+OehlMu4Oa838W2QExziMD5qQc7/mq7q8FrnP/yM9F+aayExMaaJv3/w+i8i5
+t2N15k84gfPP2mr4e5Fn/iSsnOOvVwCnBikunIv5/eVnqpLIe8Ha1Wc5XMxM
+CE+A6/frVW6DBZ3jvil65HwOr/KDm/wSZt2F7d0+ilJhlzl+RuSc7b5QGsKH
+y6XebZkg59xOetNXmNpNmWeI/Dq4pyyVyLk8daXHj/SzRSrQiNxfeTp5pXBM
+bLXjVtj8vvUvabz3GHs1ze1h/ulvVg5wzPw3MjvI9ZxkQRr8PXLVQgvYhbVs
+irxnsy5S2BqwwtOQzXp4L2voKZz/ifVpl/7yPARHtbwJfQ7znCojrsNitdc/
+LsDMuDnrymFJpPUnJqzV/SG+BW56N1o6in4J945Z9MLW2b2SfLhj3RJfYseP
+591cYd4dkbgV5qakpMrDGreuyFXBgnPqWxqXoU/u1NhMmMNNvh0PV949mnIW
+LqV6v9wPR200zXWEKbTRFQyYvm9qN8k/JlUkVIPz/ObtloLpX7bZysFDLyOs
+OlBvt6ysjyys4SbKrIAVoqgJSnCpSXd8Lqw241b0CliSy+pKgUMSGtO2wY4B
+fS3/889DD31gVkvuH3kwnXKMnQizQyw8qmCuuUi+Gg5xkG8j/WWmK08bhlMZ
+TjULSb7SdRFKqNelxvnxLtg2XVWRAWfQnrZfI/04e9/XAWZkSH3pgvlpj+67
+w1luq/xWrMZ1x7J8POH68lsVQXAM5/lDZ9g++N6yarjapUnfilzfHCczZw32
+ZckcRS2YJvL6vR3mKd9bOYp8OMFiSTgspn7jV8ArRembi2BLdsX9EDiMIZX3
+Cq4M1VZdC5fn5Z7thWPObQkaWIr5X9vyBmDHxicnU+HJF40ZfXCCSPOZPVwY
+Y31EQEy/LTcL1tr3PvIxXJ929XWtBuq3S/mcCNs2p1jEwpKVWz/5wRGh/1U9
+ANOylWdaw4zagcoNMF9p57fFZL5YJKHDVGe20yjqpQSPTy2BxXu3Nv4XNm9v
+D9aEC2fE5ZfCarGPIgxh1t8lgzkwNf32XRs4zK5lRQbMf6Cmchzm8A6HZ8O8
+Cf/zCXCpZUVQCSx2k/F6Cg/5ZMu2wt0jixUGSX53b+dQkE/3aGerAurjXWzX
+NoGrHc7OXQ8L/3w6yIGjWPE2LLi/kjpM6nf8/YtzHF6gGTQwTR/5xJm1noKn
+K28L14WjYifWBcLpgk0f7eDJK8s/H4ZfVn+q4cDC7XfabOEuM6+31+EsycMg
+bdh7AXWqGBbf29wwgvwmqzwsXhGz9ro/hPOuRr7tgfs+u+mdhFO/ee0ZhvNm
+nzxL+nl9U2zwKKx/2bilZAlsFO/8E2YPhFqrwxtijHaPwO5m+k+i1ZkUz7cO
+lH6Ycvnrod+LmZRLPk83vIUrV/0YOw/r6LkuroVpGaFRqnDBmoHme3BTi9GW
+OjUmZbWh3O00uFRjrWcsXE5xlIom9b2tpZyA+9vTlwfCrFMJNDZ8ZanY2Qtm
+HF7ieRq2ervwkROsvMq3OAOWq5vQdSTxcrZXtMF9/tP37yb5NNR7aGL9LO66
+FyxYsr6yOwCu3GwQ6Qn7UkOlGuBk6pkQsp4y4/s+TdSnbiu38QrMWy8T5Q9b
+aakuvU3i77jmWwrv/Nqwvp7U18QK/gxTp1X4i0l/Nrx+Jod+jYxdiFUywDrT
+lGwWwQn9s8wt4JkV9ipzYJUVWRoH4abscMf3mP9ne+HnSDiK52GZCTsqJhzL
+hfljc1jb4CLxx6jnMHfVaVo78m09fcurjYz/KOpzglcXMzwG4QybhkUNqN+7
+tUdtlPiP9jgTWJ8lCh2HNZrPX01VxfN4M6VCAnevt71MhTMv6dl9hcOGKG/8
+VbCf8vOH+8h4ti5neBHuv/EqroDMF21rOwOrHy3aU0XisyMr1GC54Q1hhXDQ
+8ymRQBn7JuNw6AaJV1AzLwduO9Ltch62tulv5cLmn2Lu+cH6Fkd5CbD+YNF1
+0g/69UjxXbjvYA7NCRYv+tL5DtbolPq2B2ZoaDdrYD3jZzKv95L13BLdfGAl
+CeXXftLfMxHRz+GVAWXBPnB/gdcvFdSz4NPyWWR94cYDNidgHVkXjTTS/+3N
+9DK499AdSRksCbEsHIM/HC282kWuF9IiddCfVxev10obIn67lOEGmB5aZqsH
++1p0LSEe6TWrt4et20aatGBBb+BwAJzxZMfAV8TL5AWcSISFwb1GOXDQi0zN
+Elj/2eGkP2DuIc15zXBT7t7ZDcif5mTqLTIk+0NztYJXP9Z98I2sb5mytBj9
+WPl1U8EEXGmoelwV9sl54PgLDrtodjN8Id47AcbTx2BJx1atISU8X9vN9wyT
++HL3Tdzhxx92KfXATIOuzF5FJmX8AWdXI1lPKIg9Bfd6LTcrgzWEwXbL4C+1
+j9RyYPo9B4ZIAXX729nFkfoCLl+qgmcmey4/R+KfKzpQAvO3hnw4DvOvbblf
+A0dE5BcegN2DxE6f4KG6pGNOsLidakTiZww+aGeR+EtfMY7AHn+1+ruSfgrK
+Hz+Gu60GD7LhoGTOlfnIf6Trdfxp0v/w7bZsmPXjzE0uWU8YefkRHHh7s6gQ
+ts9P06OgHzEWrPMNcL90XOA62LDknddXOK+2ieMMVx622bvQCOMVejOOwIwG
+b+oGmGbyaL4bHDH/mqIn3BRtcNWUuGehaRTMGD/Nm8B6rX1njfLhoAVS97Nh
+p4KSzzVk/MbAmClcaH8nvBMWSz/sKkM9gbOTLYdh5a6iK2vgBGr5q3GYrl3V
+lqTw//8nMcb+/cZHnvl/WbJfLQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.168383585437326, 12.327367955153331}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJw9k30sVXEYx09Gu2RhKP64ZOec4RyEZI2Lp3mrFK7krXB3S/NS3VW3pel6
+y2LMuiZU6JpYmbmsYaQ15S2Eq8RNpuvOSLaiqUuMfme139nOnn322zm/5/k+
+36+dWBKRpEcQhA96ufrvoWDBiqv2QMhvGFcPkuCR53YgV4A45uTlrhoSTJYt
+PipzEasnAzrySagfTXcoGkNsGjpmkE1Czhyf7rR1AOJY2oZlIQmGiuWWBgni
+8LbB0/UkZFUX+Y13Ia6x3WZVJEwXR4XPEI5AFEQmUDwKVP73mzTeiNcdUogT
+FOhlRJQWpCLOXvJZLaHAeKvb93AR4pW5zZHPFLRJGxf2VSO2ij4jJGkITll4
+caQGcXp0f8wFGjr6Db2yyxC3tA/YVdIwP5T0VZGJGOTSnF4aVOJe5+14xIRB
+mvksDTvV5aMlnojVfe7xCzR0CvP2tu9BrJrkz8/QoHhy1GBDg/oHQuTxhgaf
+MSP9xU7ELSZr6goaht0SLCcfcvN19weIaFB78hStdzg9dOlKGxrOJV8jZm8h
+Xgkb10xSQLXqlDoZYnlmlV4xBStvVRNqOWL1tFdsIAWE2HRG9hzxs7RkQ30K
+8kJ4Cp6Wu//Q4qd3JEzUxQhG+Nz8oxWbtSRExb0cTz2PuMNXMF1AgqyC3/K9
+GbGrvGY9i4RQG26/DD4vL9GGmYUz+Psgrb9LWRWD/++X97THXcvg+61WdSId
+n8X9mQ/8IHNPsbj/xusHWXsJi+dbkfKEvFwWzw8TxTt2d1msj+CnThRym8X6
+qYxqvzleZLG+U7G/Nq2CWKz/1oNXf3bbsng/cVMZq8fXGLy/qscpblcGGbzf
+gH7v97tqGbz/jquP9otyGOyPs+LffVmpDPZP5AfrwIFEBvsrsTXSeknMYP/d
+A7/XQ1IG+9NM2XTpZhmD/Tu8nhZh28tgf3tVNjSTOwz2P18h7XYJYHE+jAot
+wqLkLM5PabB2OkjD4nxJ4vKnpK5OOH/6vsuMUOaE86mpG/0i60H8P7/Oplx1
+hr8PJnw6
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.154900000000001, 13.}, {1, 0}], 
+        LineBox[{{6.4999999999976925`, 5.5}, {13.49999999999251, 5.5}}], 
+        PolygonBox[{{9.4, 5.5}, {10.6, 5.1}, {10.6, 5.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 4.5548}, {0, 1}], 
+        LineBox[{{6.499999999996362, 5.499999999998181}, {9.999999999996362, 
+         11.500000000001819`}}], 
+        PolygonBox[{{8.552322615314452, 9.01826734053906}, {8.293188945044921,
+          7.780184249251306}, {7.602165824326175, 8.183281069670574}}], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 8.676200089562332}, \
+{1, -1}], LineBox[{{13.5, 5.5}, {10., 11.500000000001819`}}], 
+        PolygonBox[{{12.052322615314452`, 7.98173265946094}, {
+         11.793188945044921`, 9.219815750748694}, {11.102165824326175`, 
+         8.816718930329426}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.800156843998153, 7.716069211607572}, 
+         {-1, -1}], 
+        {PointSize[0.04], PointBox[{10., 14.5}], PointBox[{6.5, 5.5}], 
+         PointBox[{13.5, 5.5}], PointBox[{10., 11.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}]},
+       "\"aebf/cgde/ehfgfhgh.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "aebf/cgde/ehfgfhgh.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:eJwt1ws4VOkfB/BDaRBiV5Z1zXXKNZdSW81BomINsaYNqVYJyW1FksGICt20
+ppQoCt2kjVFLKkQ3U2Hxd123calImDL4f8/+//M8nnk+z/ue9/1d3nPOWLb7
+oJufOEEQ9fijvom+eXx0SOLfjzFJLDiW/kslLOybpjcYkWRc5oX9ETBrOLm9
+yIisatZ36dCF5SMYCueNSCKG5ZT7TpskBA3aM+lGJNts4dp6NmV68gwX7p7g
+7DGHx5qEWSW4fu9mL+bwMpKIig7JaMO4T6Wa6k1Y+WJiuxz2N2w2aYmET38s
+rHWCtZS1pVzgHJflumeMyarG6JgUS5hlVXuwxZgkh8LsjxrAzNEZkYYJWeWS
+9s2bcjHNbvkuE5L0yu3/YA4L9N6mZpmQRMUPGZ6O8BhzI/0lxodosaQftf69
+ptQPJiSbufHs0DGY/lgoIkxJYrOYonsRLCy9l7jQlGRzUsr3v4LNLgWICbFf
+3pyiPpUP/+VF43Z4qpX2mEC+3VMr0kpgT+MVL2Rhpq2STyzW18w39V4C0znb
+oxkYH/mWabAQ5p94ZiRCfpOr3TgjWK/b4bpcmTHJJl75JdTAVT0PX4cjX1a+
+Ud9Zar+6inkr1EdpyGCpB5UvY/s4+sc+83VKSQ4O8euN/hv98cw6uLdKiyRa
+Lto0PUL97XoYbcGw4OFY0l2YPNd6RA22/q2avI9+0JKcnnM1SaLA9EBvLaz/
+3GXxAphNs48cwnrr1+wxiNVAfIc2r1HB/le6Lhcshosrzj/ahv0bnsZIl6gj
+v+BlovOwjbFhShhsvUbmbDvmJ7/Pm3OGiUW/tumgHpIfNHrsYPJ1Od0ffvgi
+gnSDQwbrhPlwhIJG/+8wV3+Dehv6lyTDOlwEt2zlDIuhH5991tcNwzmPUn5V
+Rb/Ga6u+miEeQUKngR7G33V0D0fC/sSLTg2MH1ScPVwKM+uYvZLwPrXZziEq
+fo4osA/rO++a+7gY+fLFM0PvY/9wsUOByrCyT3lGFGxSarpKBuZmn/62CvO/
+4yof6cf1kmLF2p+Rr4vs89fX4BB3fd5t2NRhm54jzIrb6nsA5qvbtzZS+U22
+HreEmyw2xFL1YCv2bVgEvzq0sKRUDftrLxH1of6GFw4OLoV5MqtPvUP9eeKH
+vw9VRbzZa+dxfxJDGx13v/kR51HN6mgH7Mtj9VrALLXOvd/g2T8srG+ooB9D
+5vZ6qP/F9C5HY5inNDm0A/u1qSmIv1BGP64Ik7NgAyJFiw1r0Xmt3fBIopeM
+KyzQWu1MR76nFem162DmP30WwbB93MJBG2o8aG7iDuojG+x73xsmw1qsB2F9
+9ZuMVLhb/4SmIvpxMmI4r466XvKqtwXqr/4k2lYW8fCfd+y0g4+mxUm5w9YF
+m//1BS+DN3/AYza3AjGfXWS382IDHEK7H4D1CBuNmlkhZe7wYgH2G6nL+EUO
++QsVdUuKYY5F7RIZuMAjclsoPBP649tPmM9qSXY1Rvxt0ueyeXDdHSsnAeqz
+MuJW/15YEDg9lg/LzhYcEiFes+GT9fvhTxqrQ4/ABYkcmdXwdAJPfuQHnC8/
+wzB51Cs9gBXrDAt+ockLUX/NC6PxhUqYf3lg3Sf0M+gnkiEBC0nB0SlYSqO9
+de9SnK+3ERxZrPfblksGjYqol1QS3QLr2c747XKDhf2ieD/40HKVjv7vsZ/I
+aTYXrlcNeH8GJtXF4/rhVqm7liy4zjU8zQj59ZztS18D8yZ94sKRf8DvGxdZ
+wfxkidul8Md9fF9HmEg1zf2M+VFNlrohMFcxzUEX9bXYHVp9g5pvKaa0GfVX
+ednYPUSt13DXZCfGf9L+MdUM8flvl4j2w3hFf3fW73CL6v7iHXDmes+ZEpi5
+pGmfLbzH9JnoH1hLU0cc9yt7Vf71fAL5F8xGXsF5IcLIhHEaPHa+griJ+I5o
+8WhTmG/2XdVuPB+IxU2PdtVT6+0td8Pzg3h8Ir0rHib3/Xm0C/lXhYXXa1H1
+0lrJyYFLpKsrC6h6sG48Rv/YRkvrz6rDkrwQzQ2od09ZsArnO1yfdkikifG1
+hokDPQqY/7z8G/pJuFX2ia+Hxxo2TSjAjjEns7Lkcf8Vdgm0Md/86u07C2B/
+hXc0O4w7p9+NnJTDeYyTvxdCXd/o+0kall/2+VQh/OXjcR0XWdS7IbJ8GJZP
+8hXVyuC8/xr43gz50OR870TALYO+NlHU+VSozvKEx6TUPCrgTW/bvILguo7x
+OBH84UHFh1uwQD82wRz9MMimzctjfXqZIdcLTshw8kuH+Y5el6LggZiYXBXE
+4+usapAEpxtIxFyHWadmr8TD24+WXaMvQVyE2qZgeFNFuVcGbP2gxsgJ1lKR
+VOyClXcoGqvDaforP8/DfDfd172Ih3g4xByD2afXaVyDmw1sFG/Bxe9vnvOB
+n6TX9ayEWdcTGlXgQsvn5olUfU79cQLvc2JmhkPmIV5WwM6V2bC6RfHLLOQX
+NW8ziOcn8TH6/ZOwxYjnyEO7LfBkErfGQhr1suJaUu/D9nT1nGFJxOGs3mcK
+u2u0XL1GQ72OexeuhXnaTPHARTgfG+4s8IC/9vuYO0mgfmG/5cbC9arHnVwX
+Yr2aY6El8HVGYkrCAowfT3o8BuP3xet+cfT3K8fTCvH7D/n7HYUF8W73jsBP
+pZRfOcFkabXmMzg5+crtn2Hr7dLiEqjXiLz5gjiY0Nv2ZQMcKf29ZzPc8sZ+
+9gD1PkorpG/FfuSLngen4Oj48cB3MMuydP9VeKb2srov4uPSK43z4W1rV/QN
+wsU6xaOZcNt/Dj7wRj51car+MfCunxWiSmF5JXsTV/iv085cAcxr25JEvS+f
+DgSnjMLKs/lOHYjXco+afgUcZZbXfAHWy9ww7wk7JrU/codVnrWGVVD7E5NF
+CnC/lvatMSreQsbqRtQn010qahr55ATXFFyBt7BjplvFEJ+DLT8SfifhbX6V
+QL20d/Xg/UNMnRQtK5tjEIJYcw8m1R9HvWO6IgbB+iGg2R2eO7PbOv8rg1AW
+BllTz992l4F25jSD4A/eiE6FLxmW/b1ukkGQA3Jv/6LuN42HxjETmB8hXzsN
+dzYT51Q+MwjuikeuaxFvUTjtvtY4g+BVsmjxJtRzhv3XuTEGkXPc27YO5kw8
+WRUCMzdv9JRBfUqEi3TuwCHltdV4/hER2jX7SFxfN9q5Oxauzj7AXor16ctV
+0/JgbuIef2Xs79shs6kClpto/nPlFwaRUjPtWgt38p++cUS8UXk7HB7Dbv7Z
+6+ynGMTpL4czCuCp5wnDS5BfNzsjOhFOLePuzID9N6kLqf6l6GTzn8ApPv8p
+U4KLynTEUmHmzi29jYj/hEzp4AjWqwrVnz0Fs7o8ZLqp/Rw8722FO585XApC
+PDlrSq4thuWjDM2zEH/BtAHjPeqVPmnrcRj5cm+OJlPvv41j9gfWjDIIsyKx
+CQ5V7/q5ILNBBiFfxLAPp/p1KShW6h8G0dKbFRMKSxaN00ZbGYTW1YGKODgq
+d+aJE59BFFs88LoMd0/zrX6qRL3Wn2urM/7//x0XKv73bUL+F2Hoviw=
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.112359638123757, 16.39239276247515}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1g881GccB/AfGSbp5ggtukYS7e4ajVR3p41E6iJz2bWudOVfRNE/rRuS
+vJibiOTsKrUs6kqTxOVPCaUuyp/EjjalxMVQ+mOfZ7vXy+v3enue5/t8v9/n
++d3r5myO9BVrUxSVgD/ypNom8bHgUf99ZvAopkr75lFYPTDXNMeUR7U7B802
+gyXhDpLlcF3ntfg0cx6lMahs1IYDQn5/NWHGo9gn/NM6TXiUi0dDTRAsOSzz
+vQd/sFiWfRdxJS9Cksh4uONXlCtMszKLIuv5Ez4iBZ6q6dFcNzyVh/lXHYkN
+OmZk4dniMxFzG+ukD/9wmoAzxbMEETC7ctQsHHE4D2I87GGFYenlv+HA04Vu
+7+kYv0Gd2oQ8qD2LAv6CNde+CnkMv2X1yHtgiSDughfqyBIXrx6GFayemGK4
+I6K5nI548qMLBB/hcxPDScth2twDJYvRB082r3ofGQ/ltwhh5tDo9DJY5Oxv
+tBX++AW/Z5SM+1W0r4OP6vbLWMhbfnZZ43x48oJ/pwjWZKZn9yH+4ZSW1EMw
+W5ozSfoaeHKQlQvTptoXW8PnjzqNnIAZ/AyjIuS/VrbyUTJZX1ZjswCOzNS/
+vhHekW+zqhD1ewiv7WcQGx/Qmg+ztrT23kE+VbphZ0ifK/pX/RYEa4w+d3OH
+w+uyBS9QP69Eufol/h9YnLg8iPRrwCH5LLxl8LFnszGcdqtyL3yxdFfFElik
+G311KxzmXuBQ8Bnui+E4g5xLXdEwiwbzxjPi0+GDekFLEmk4z9i5Hg3wZWHo
+Nh2Y13Sh3hz73+2ITrebjng/bNm9D1YXHzu03QjnUWIx3g8/1Gl/2jkN98TQ
+e91m1OPq86VJLMzbfnVxNzyr21+2FBa1sxwE6Ict09SSCat06TWN8FbTAwEr
+yPqLj5+z0c8xI1lgAhm/PZ+eBBtNM/yDxBd1v46sI+c9OVzhif2pp0n0IXim
+JvmvalhS+cCM3AdF7wZzDvJljHIuDcO5k2LrK7DiQbxzE6xSLEmZhvoYoc1z
+0uGdsRH8RTDN7fqYK/x2sfqGD8yP8mY/RH7JezhdfmQ+s9J0I9x0auFud1j6
+0jtVTd6TgTTOHLhq3LVnA+xy6OfCJuzHF4vSn6A/Pytp8i9h1aUy7c1wK+PH
+EDHyZWyUCUfQb876+oa9qI/RunBJFuyqFzE1yhD15MYmecN24s/Lfaei7wVO
+7hZw5r2oNfMMcB+5efspeEZK6qNxfYzX6plqw/rtXglNeuh/aVuHJZzybdF3
+l3SRp017lC9Zf+jkpfOfkP6Z7JTBu1pzPtTqYD+tvXHv4GizmvUUzM6jfx+M
+fH1Z0gDxFPSvZavLn3Bu4sb6UW3ct1fV9wNRb3NDWP5lmJoeeO4RfHkipDcX
+3nFdvtYL/TJUOCvPwwol59cSeM9huzw1sa1VryH67eSXvd4R8TXpRrN84bjh
+1JQ8mCFrdJDAdt0Zd+jIR/HT3qFMOLTbwUoK74hhC8n52Ye88dYn9VhGHYmE
+iwaWr9oJi/i2iq/h0uas3+ph1TZ7y2fY3yvc+BGFfrCPvDRLhF1CEtNMYZWf
+u/IzmPlFPk0bFrlatWWinoruTetrSbxzFTJjuGZVDFcA08LMk6XoR7zXYEI1
+yWdhgYEJXCYyaNCC1TrzhKfQT2aDfYwl6lHrLVvKg8/d9oufifqrit4qX+M9
+Fh5zX0ppIR+zV7PL4dSPBuriSS7FH4nLPwFXsfIZaz5wKbnzTHE2vE5adWZs
+gkvxwsVxxbCNpjar9A3Gg+83PoFzVuR/Kh/jUlVnyhnW2M985Dt+zT9cSuGZ
+zT8Ar2M4ediPcCm1amjtM3IfHg7W9bzmUhr50+1C5D8rQd9tSIP5J2x2tsFO
+NwYj/GEpx3XIF/WHV4y70GF1bkZoA/w+82C1NRlXNhYsQv8UFbLcH2FVd9a9
+DJg/hWFtjvjU6E3lE3L+++p1e2Geny2DhvNxebfiyZ1h7Hfhm2P2sEmw3eNa
+5Ce6E9L2n//syr2K/Hl6neVkPkOV/ixzFPVtlrp2IV5en1rihXrZpTHBZD9p
+vnFXPbxDkR3gCKt6/Vu0xzFfnztRi3xTDz5fMIhxuW/EmCes06c0TYQlT09G
+30a99T7d26oRn39ct+tbWHpz7r2z2F+16/jFOtK/wimVLsiPZnvTkbxPgvYt
+bgdRjzqW5jmA/gvCNWumDiHfX2Lsj5Pv6X6m1pUXqCchfaUQLhOKdS36MH/B
+LSsXMj+p89qGHvTH56MxExYl5Fzx6eBSjK4ZkRxYetz25UIV8hVeFwST+1BS
+f75UifEyVWch/f/fBZLTlf//PjDh/QvVffZ3
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.368879573271343, 4.309365547472549}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000003638`, 15.000000000003638`}, {
+          13.500000000003638`, 5.500000000001819}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.245034441796587, 11.605529856236451}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwt2Hs4lFv7B/CR0VGackhIyqGhk1Maoaa2pCiUdpNTkjSVRIYkhZ1ErzKk
+cs6Wc9LsUhSKIqNN6B2anEKmiDKpNA7p913v9Zs/zPWZ9ax73fe9nmc912Wp
+x4ldh6ZRKBQFKQqFfFOo5I8Wk/K/zyomJebSE+cdsLXBuvixlUyK/jYHmyQ4
+lVfm/AEWJr1Y1UPGzTcFv4CjOgXcZdqYLz6elgx3vJm9wxmuNBuZOgizF2Sm
+R8MhU0ccteDicYFpIWx8O7+scwWT0r3s1b5nZP59p8x4+LtLRN2/8OQ5SsEW
+2Dti8Qc+XJqSFz2mx6Qw/ipPfgzrn7n1hQdryQ7uyYSt1xa5+sDdLovGwmFl
+f7GiMSzYNfKM5EMJU/spDfuOnF1rSOZvbT/2Thf5XDQfmwFHBYfsq4U5Ry8+
+eYf6hk7lKJbDsisT1cvhycAQjwpYWZh89iYctu6w30t4ZoPm8H9g28XuQz3w
+5EIr9fPEDbtlpmE9fT/X9ZGkvw6Dl+gknzfsgWtk/t/1UrvhSX488x5sPFu/
+6hwcRbV43kb6yw6fnw8HfUlmyyE/3s1Cm0aYaZKcawNb8gt/foHpvdwoLuw9
++qtfBv2i+4jK2ki/KvL3LoArHQuLl+swKWpXG74T2xbMfMGBXayLxqbDjIhf
+m57CiVkF+iQeW3tHInU59uFl9k8+LKFP42yGFcIazBJh4+U7WwNhd6nPPq5k
+P35eXJUBZ1yvDVSBaXuYhytgLdH6G83ohz0rdbIB9jbXZl2Am8wPS5rhlR3m
+bAYZv3BttA623E8/95mO+2zNxsUlMPO0uWkuPFPFY14KXK25VZoNR52UaTsF
+mytVfzeAExpvdNjBvDOPy6fD5n8l3tEm8ZP2Xf6Ib9nttZMTqK/Qy0iuBaZJ
+DDgt8KTPfcdGEtc/IqmYOJb+nozrB07yUmBekncRmR9jZ3crBg552K8rjfh5
+tKKPUfCQm/c+Hbhpqu9kHByWMat/J2wcxCrMgasfDG8Ohr+Pux7hwxoDciXZ
+sKRHZ/gHWS9On/sKFvTpTKzCOnnqixkj8FDLtWYfuIN1xFEO/bF8c8jhIRxy
+8mqPBqzvzZedRuJuXredDkuY9EN2sJriztOacFTSnvwUWOFU7of5cN77aOM+
+uE9pTto3fFsrdsbo4PcMYblpHfn9WUOoO2xdyBZdhbNG4s245LmoqbXaA0fk
+ynsWw1lbkk7Mg7lW8cvqYfeWuupq5CWQ37vmDZxq3tlL9qXQ9pOghYzPFYau
+gJUflg7xYR6DatuLuo0521r+Idf7Sl6nw0EmgR7xuiTOVreDsETozPeGbfV1
+2g1gb+/R8D9gZsPG6jmw1vHLxovg+rJ82gju84xo0zgx8tJo4NNFMFXl/dp6
+uGPFzZ4+cg45q8cWkfvqWdk5MTknDjPLk2CaW/Hj6YjH1/0SGEvGp9W1aMPK
+Nzb85pJ9mj+zwAbuTnOce5PsS8yc6gBYEKZU94j0+1/D0L9h94ED/G6y743y
+WvXkOTvZLC+P/ELKa2Z8I/n3dhjYwWzZ1AJ59INqJlh3lZwjvmIB6c+k/ci7
+DlJP9F2eKXnuZkbf0sVzpNAT3mUGV/5cJAyExeOpFwzgLA/ZV1WwxrxIVxUy
+vy19eAae47zCPf+MYj1Gx90uKzgi7k+XWtKvBdO5IbA4W6fyMulvfqdHLjl3
+Jf8Wk/q+U28bvYCZbgH+0rDwwPojQjjrRXtICfoVoXJtgpzTzNpjIUdhjR8u
+nDdwacN53SUwLTypv4aMn9WlC3FuJapuHCqAfUvTP92A6xN/h0bBqdnG19zJ
+OehlMu4Oa838W2QExziMD5qQc7/mq7q8FrnP/yM9F+aayExMaaJv3/w+i8i5
+t2N15k84gfPP2mr4e5Fn/iSsnOOvVwCnBikunIv5/eVnqpLIe8Ha1Wc5XMxM
+CE+A6/frVW6DBZ3jvil65HwOr/KDm/wSZt2F7d0+ilJhlzl+RuSc7b5QGsKH
+y6XebZkg59xOetNXmNpNmWeI/Dq4pyyVyLk8daXHj/SzRSrQiNxfeTp5pXBM
+bLXjVtj8vvUvabz3GHs1ze1h/ulvVg5wzPw3MjvI9ZxkQRr8PXLVQgvYhbVs
+irxnsy5S2BqwwtOQzXp4L2voKZz/ifVpl/7yPARHtbwJfQ7znCojrsNitdc/
+LsDMuDnrymFJpPUnJqzV/SG+BW56N1o6in4J945Z9MLW2b2SfLhj3RJfYseP
+591cYd4dkbgV5qakpMrDGreuyFXBgnPqWxqXoU/u1NhMmMNNvh0PV949mnIW
+LqV6v9wPR200zXWEKbTRFQyYvm9qN8k/JlUkVIPz/ObtloLpX7bZysFDLyOs
+OlBvt6ysjyys4SbKrIAVoqgJSnCpSXd8Lqw241b0CliSy+pKgUMSGtO2wY4B
+fS3/889DD31gVkvuH3kwnXKMnQizQyw8qmCuuUi+Gg5xkG8j/WWmK08bhlMZ
+TjULSb7SdRFKqNelxvnxLtg2XVWRAWfQnrZfI/04e9/XAWZkSH3pgvlpj+67
+w1luq/xWrMZ1x7J8POH68lsVQXAM5/lDZ9g++N6yarjapUnfilzfHCczZw32
+ZckcRS2YJvL6vR3mKd9bOYp8OMFiSTgspn7jV8ArRembi2BLdsX9EDiMIZX3
+Cq4M1VZdC5fn5Z7thWPObQkaWIr5X9vyBmDHxicnU+HJF40ZfXCCSPOZPVwY
+Y31EQEy/LTcL1tr3PvIxXJ929XWtBuq3S/mcCNs2p1jEwpKVWz/5wRGh/1U9
+ANOylWdaw4zagcoNMF9p57fFZL5YJKHDVGe20yjqpQSPTy2BxXu3Nv4XNm9v
+D9aEC2fE5ZfCarGPIgxh1t8lgzkwNf32XRs4zK5lRQbMf6Cmchzm8A6HZ8O8
+Cf/zCXCpZUVQCSx2k/F6Cg/5ZMu2wt0jixUGSX53b+dQkE/3aGerAurjXWzX
+NoGrHc7OXQ8L/3w6yIGjWPE2LLi/kjpM6nf8/YtzHF6gGTQwTR/5xJm1noKn
+K28L14WjYifWBcLpgk0f7eDJK8s/H4ZfVn+q4cDC7XfabOEuM6+31+EsycMg
+bdh7AXWqGBbf29wwgvwmqzwsXhGz9ro/hPOuRr7tgfs+u+mdhFO/ee0ZhvNm
+nzxL+nl9U2zwKKx/2bilZAlsFO/8E2YPhFqrwxtijHaPwO5m+k+i1ZkUz7cO
+lH6Ycvnrod+LmZRLPk83vIUrV/0YOw/r6LkuroVpGaFRqnDBmoHme3BTi9GW
+OjUmZbWh3O00uFRjrWcsXE5xlIom9b2tpZyA+9vTlwfCrFMJNDZ8ZanY2Qtm
+HF7ieRq2ervwkROsvMq3OAOWq5vQdSTxcrZXtMF9/tP37yb5NNR7aGL9LO66
+FyxYsr6yOwCu3GwQ6Qn7UkOlGuBk6pkQsp4y4/s+TdSnbiu38QrMWy8T5Q9b
+aakuvU3i77jmWwrv/Nqwvp7U18QK/gxTp1X4i0l/Nrx+Jod+jYxdiFUywDrT
+lGwWwQn9s8wt4JkV9ipzYJUVWRoH4abscMf3mP9ne+HnSDiK52GZCTsqJhzL
+hfljc1jb4CLxx6jnMHfVaVo78m09fcurjYz/KOpzglcXMzwG4QybhkUNqN+7
+tUdtlPiP9jgTWJ8lCh2HNZrPX01VxfN4M6VCAnevt71MhTMv6dl9hcOGKG/8
+VbCf8vOH+8h4ti5neBHuv/EqroDMF21rOwOrHy3aU0XisyMr1GC54Q1hhXDQ
+8ymRQBn7JuNw6AaJV1AzLwduO9Ltch62tulv5cLmn2Lu+cH6Fkd5CbD+YNF1
+0g/69UjxXbjvYA7NCRYv+tL5DtbolPq2B2ZoaDdrYD3jZzKv95L13BLdfGAl
+CeXXftLfMxHRz+GVAWXBPnB/gdcvFdSz4NPyWWR94cYDNidgHVkXjTTS/+3N
+9DK499AdSRksCbEsHIM/HC282kWuF9IiddCfVxev10obIn67lOEGmB5aZqsH
++1p0LSEe6TWrt4et20aatGBBb+BwAJzxZMfAV8TL5AWcSISFwb1GOXDQi0zN
+Elj/2eGkP2DuIc15zXBT7t7ZDcif5mTqLTIk+0NztYJXP9Z98I2sb5mytBj9
+WPl1U8EEXGmoelwV9sl54PgLDrtodjN8Id47AcbTx2BJx1atISU8X9vN9wyT
++HL3Tdzhxx92KfXATIOuzF5FJmX8AWdXI1lPKIg9Bfd6LTcrgzWEwXbL4C+1
+j9RyYPo9B4ZIAXX729nFkfoCLl+qgmcmey4/R+KfKzpQAvO3hnw4DvOvbblf
+A0dE5BcegN2DxE6f4KG6pGNOsLidakTiZww+aGeR+EtfMY7AHn+1+ruSfgrK
+Hz+Gu60GD7LhoGTOlfnIf6Trdfxp0v/w7bZsmPXjzE0uWU8YefkRHHh7s6gQ
+ts9P06OgHzEWrPMNcL90XOA62LDknddXOK+2ieMMVx622bvQCOMVejOOwIwG
+b+oGmGbyaL4bHDH/mqIn3BRtcNWUuGehaRTMGD/Nm8B6rX1njfLhoAVS97Nh
+p4KSzzVk/MbAmClcaH8nvBMWSz/sKkM9gbOTLYdh5a6iK2vgBGr5q3GYrl3V
+lqTw//8nMcb+/cZHnvl/WbJfLQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.168383585437326, 12.327367955153331}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJw9k30sVXEYx09Gu2RhKP64ZOec4RyEZI2Lp3mrFK7krXB3S/NS3VW3pel6
+y2LMuiZU6JpYmbmsYaQ15S2Eq8RNpuvOSLaiqUuMfme139nOnn322zm/5/k+
+36+dWBKRpEcQhA96ufrvoWDBiqv2QMhvGFcPkuCR53YgV4A45uTlrhoSTJYt
+PipzEasnAzrySagfTXcoGkNsGjpmkE1Czhyf7rR1AOJY2oZlIQmGiuWWBgni
+8LbB0/UkZFUX+Y13Ia6x3WZVJEwXR4XPEI5AFEQmUDwKVP73mzTeiNcdUogT
+FOhlRJQWpCLOXvJZLaHAeKvb93AR4pW5zZHPFLRJGxf2VSO2ij4jJGkITll4
+caQGcXp0f8wFGjr6Db2yyxC3tA/YVdIwP5T0VZGJGOTSnF4aVOJe5+14xIRB
+mvksDTvV5aMlnojVfe7xCzR0CvP2tu9BrJrkz8/QoHhy1GBDg/oHQuTxhgaf
+MSP9xU7ELSZr6goaht0SLCcfcvN19weIaFB78hStdzg9dOlKGxrOJV8jZm8h
+Xgkb10xSQLXqlDoZYnlmlV4xBStvVRNqOWL1tFdsIAWE2HRG9hzxs7RkQ30K
+8kJ4Cp6Wu//Q4qd3JEzUxQhG+Nz8oxWbtSRExb0cTz2PuMNXMF1AgqyC3/K9
+GbGrvGY9i4RQG26/DD4vL9GGmYUz+Psgrb9LWRWD/++X97THXcvg+61WdSId
+n8X9mQ/8IHNPsbj/xusHWXsJi+dbkfKEvFwWzw8TxTt2d1msj+CnThRym8X6
+qYxqvzleZLG+U7G/Nq2CWKz/1oNXf3bbsng/cVMZq8fXGLy/qscpblcGGbzf
+gH7v97tqGbz/jquP9otyGOyPs+LffVmpDPZP5AfrwIFEBvsrsTXSeknMYP/d
+A7/XQ1IG+9NM2XTpZhmD/Tu8nhZh28tgf3tVNjSTOwz2P18h7XYJYHE+jAot
+wqLkLM5PabB2OkjD4nxJ4vKnpK5OOH/6vsuMUOaE86mpG/0i60H8P7/Oplx1
+hr8PJnw6
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.154900000000001, 13.}, {1, 0}], 
+        LineBox[{{6.4999999999976925`, 5.5}, {13.49999999999251, 5.5}}], 
+        PolygonBox[{{10.6, 5.5}, {9.4, 5.1}, {9.4, 5.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 4.5548}, {0, 1}], 
+        LineBox[{{6.499999999996362, 5.499999999998181}, {9.999999999996362, 
+         11.500000000001819`}}], 
+        PolygonBox[{{7.947677384685548, 7.98173265946094}, {8.897834175673825,
+          8.816718930329426}, {8.206811054955079, 9.219815750748694}}], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 8.676200089562332}, \
+{1, -1}], LineBox[{{13.5, 5.5}, {10., 11.500000000001819`}}], 
+        PolygonBox[{{11.447677384685548`, 9.01826734053906}, {
+         12.397834175673825`, 8.183281069670574}, {11.706811054955079`, 
+         7.780184249251306}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.800156843998153, 7.716069211607572}, \
+{-1, -1}], 
+        {PointSize[0.04], PointBox[{10., 14.5}], PointBox[{6.5, 5.5}], 
+         PointBox[{13.5, 5.5}], PointBox[{10., 11.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}]},
+       "\"aebf/cgde/ehfgfhgh.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "aebf/cgde/ehfgfhgh.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:eJwt1wk81HkfB/B/jpUjR+4RjeOpRO1UK6LMn4gtaqhcZc0KW4ihrKdc07Ll
+KhN2i20zZTt0aFRscjRSrQhDJKuiErrWIDnj+fye5/F6ef1fb7/f/3v9/jP/
+Mg6M9AyWoSjqIX7JlRqbxY8pTf33R4empvxz02phzsFFpce1afELE2leAsz9
+IbTcVpum86PFBSyYdmqMm9WiqXEr893dJjQl+st67BXsocmayISZ25LS+7Ro
++o7QYs9amLNNtk9Rm6bWnPEulRrTFMu7U20T4tcIbuddgTmDWxLPYz1SITY8
+Gqb3Bbno6tD8p+tjZtbDPceKA0/AvvaKySYw/7Xb5EJdmm5K7UpShQXVuQ+K
+dGn+AbsP9xVg9aqyyGV6NNU6oLJ/HizJtJUW6tHi9+evyRjB4jnmI1/p0/ye
+leE+1jDz7egSD32aaj63uM8Llrr+eSwRTjMOfniAxMsYLMzUp8WcrJHhU+T+
+2/qZB7E+3214SxWp13M141t9mo7ZoTDSQerrrLo/qUfz25gFdu9I/uijaTmo
+Z2vN4okhWJidWqyHeiw/RqZ+JPdrVqQIUP9mjYK3XTAvoURVRpem1N4UNFaS
+eW3/sXC/Dk1PVLjmC4gHmJmDmFcsQzHYh+R7ZHj2AFxntatXm8Rv3jKih/le
+ujri08DEfmknr1WLFj/2souMg0XL264UwWERYgNzWDIVdEmI8/sQ39JXvBB2
+vnv3TziQ7SinCXOyUoQf4fTtU+tTjFDv83QPtjbN1xr8p0gB5nsmRVyEXY1y
+NpwxRL4577ab4rxGb3CpbTBfqTy2CM+XXdNQuDEs5bpeXYV+F2XWVSiS/ZOb
+8m7DsdadN5RhXukvStaYn5fPWK0ZzLRM33kWHtBw/ZcHLJhdLfmMeX736t28
+TJjjwu38Gufhs2DFUDOJ5xG/YyPOV4+tUK+D+kS7wx87wcZrLof5kXpza8MW
+wvkHf2zLJeu/Z0x2If78sZBEMUxtPD+QAGusZRU9hXnXteSUkO/85EheJ3F4
+Gvswzsc4Y1Mj2S+WPRc4gX67b8noH4Ulw4rXQtGvDLe6wp5YUznpJc6nMKrC
+twP1iTLmvQ7CvJ5mSvp8YcmbOscpLZpv8U9HYv0CzCdhp8Il+LI0Z/lymK9Z
+4RmD+TNshq6lG2A9z7YuAO6qXGXYx0C8MNaeUOx/4ahTsAHmje8/kot1l77F
+jOuYi3QmuakLfnqoqnsZLGqrDlyL/CuDT4VUoy+m0TLtEtQXc8tA7QdY5CZf
+tAr1/x7WPWoOcy94L66C200yOhRgyvjA2g04Lzq8/ysKFpxzzf8L83AemYpR
+h1llS/xsMb9eZmGLFcwLzfA9CV+kzYrDSD7KJvMZruKwhLtXcBUaTbFlcR6v
+HBy/HiF/z1+9WQl1bij1bbTBVXj8ls0Q7q9hxfNjYU6EN6sc+7rNjNOKYIn7
+pFwwvPJEdstDWFDxenYc9Q18NlzZBvdo2lw6CCePN1+8T+I11/wkxXm5VzUf
+OgXzbj45/z36mzfXLsIHpk5/jG7HfK78siV1ktTr2LtwK8y1uej0MyyZYQa+
+xLzP+nt6TKNvickfaocxX3bK/qAgmLv1Tosz1pMdDL7cRdyegqN9prBbW7y+
+ESzI2jdqjP2fXI73xWHufMbgOBvrfu9W7yXfoxTvpX08rqajdg7euApKNic9
+xlX7aObqbk2cp0PgXAfcpxMTxUyE+U27v1TD9UudTq+GhY+iz21Af0rdLuOK
+MMeMf1+CvEF3ElTH56Mei7g5XpgHx8/XbxbmTH20b4ajJGtlDbGftt8gtxp9
+SmsuyrmTeEaXmlMwf13GwqB0WGTdyv0Tdnv+Zl8zLLmuNFyP/ZXfWCzUQZ28
+ggB/8lxt+/2YnQ+pf4+MZTb2+y9t6MqCWeaMLFf45ImvC8j3DKUX4PgG+UPT
+KybqYaGast9ezPF8uEHUAxLvfdVMH+qfHuU0XCDxCvsYvuhPufcXywiYbys3
+U4/+v3vSZ8KAJeN5k+txXtly+aevknk1TMg2kHmW7npqAYs1lTxC4EcvTRfl
+oX/W2bdzDTB/xr074kkN7D8k+fIB+8pCNBO9YI5d44EXmjR/PPfCT9fVEf+q
+KlMKv4h3GdQirvfqZSLeiprjhgpqmJ+Coj6p67h8sbqCKp6HNt0ccn5XdC58
+s3Ie8nf88xLvP2rsbefdYyroxz/spATWN2jwZ8IikVqhH/o9c3JfT78y8l/+
+cP4V+fztfeL5Gu4xdw36HvMxr42RU8X+Hla7rgTe/m+HBi6xakj7Esz/mXPJ
+rlbiZJ+OELi4l/rojfw8Tk71YbgtXiXuDSzMqrhDnKNjURaBeoXqThVkf829
+In4/LHLXYpN4AlN2nhP64/eKopqQL4UaWxEPizun+/3hjCfX9h2Ghfce/vAM
+9VqPbej3J+sOEfkc2H92sHoW8WgO70YN+vW9/3wqDKbsh9SsyfvsFR1xjtS3
+7N1j8lyIWk5mlaB+Tmtw+kb43bHNa06if5FNZeMnnM/TmEi7XUqYr03o9G34
+9IRyp6EivC5mpgDe1shc0aaAePoRRufgH9XGfsv+CvU5G40/hGdPJMsHy+O8
+l9QlqCB+ZG2Mu5cc5vXuhuYeeFOUb2mkLPLN/Cr+mzyHvVFBt2SwftGNtwP1
+HmluUrCC1WW4zr1wSbYwp38Onqd1xqN70e+9aQ3zZuLKaPMheP9aWZMBWCC/
+/HUI5vXsgbyjJe7nKk501MGNT+SVcmCh4MwDDcxb3sl+6Xzkl1C5VevguqhE
+ldPE8lVbNsLmDj9HLkW9dKxGKfm8Cvu2KF+GRSfmtsvCi57VWmmhP5Z7vO1N
+xLcK1UnaAfc0HR/aBH8xu7vu3zA/f58H+X445VMmEwRTKjdvusCZfxQNMmBe
+tJ5ZOfpTOTj3/W+Iz3nmOG4Bt7DvFQ+gHk6cRSz5XLKOrimRh8WD2dEr4Roe
+9+0E+qXU0j+0Yt6nRkOimijsD/j7wVHyvRS8Sn/BLJvi1aUeCoFtRqnladNs
+ShLzUjmAnKdZ8qPpCTYlskq+FAsLVri6Zo1hvf7BSDF8sUzs5T3KprhJ11/N
+QT6/x/kvdo+w8b6Imw2DPQtaPjweYlP82pjf+uEI+4jnhVLEy3IzjED90i38
+w1WD2K99xHccpi/JL1OCOXNvDCeif0tzf39Tsp5iWTkJP9r5k9onWPxxOyMY
+82Mp+TQXI57whNWOW/Bk+arrp5CPa9MuI4VVRgMCrg6zKeneXQqK5N+jz/be
+qEN9nMShiTmwklh3uv0Tm2Ltuqzfhf0RDgHrq9BPz5lUzq+w7UirYPdn5Nt0
+Vt8afpJroX4f5qod9iTvldaQtnn3YOHTsYl1sIhlVrkDFoVmdovQz4J1g2VH
+EI8u8HQ1gWfc0+y/RT7151uP5mEeS5UZiy+gPtY3CuWGsMlNw4Sr6Ec63LOk
+FPNlVYv+6vyAeV8esg6G/6gICB/phz1Ux1bAqftt37e/ggucP5P3Bt/EwCuo
+i00xBxJNlsK8eY2PoltQT5ta+Xa458B3O0PFiP9w0OO05v//35Gx7n9XLfo/
+Yw2y2w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.077403306263033, 4.30673387473934}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.00000000000432, 15.}, {13.500000000004775`, 14.5}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.650294551449843, 15.441370831152057}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1wk41dkbB/CfvWS5lquU5U7KZGlcS1T/lkOShKiYKLpTkVK5tjGiuqKN
+jKsia+6g1dKdUsKoSwzVTG7LqElymag/ihZStv/3zPP3PD09n+c99z3ved/f
++V2+2Rq2LkieYZi7+Ef/l4xP4seEMP/+6BHJy9jwS45zCMOyZ5X/AG8NCc5M
+gb0sBl0u6xEy72/x7DZYNj2h/S89wgRcuBY4fy5huLzqqV1w42ij/UHq8vdT
+HuDzb6fF5f1JvUGjOQefz7pRdIVtivzqxk/dEA9z/OfVBlh6f8Sli00EErOH
+3x6HB2eXRgTDxa/bh8WwhFdW2a5LiMKRpJj7sFdGJGetLmG6T1QnPIN5305R
+rtchzMkIpUJq0WBs2VI4InCm9p8wqQjoadYmROtN6MVKmBMYc2WnNmHURg7d
+zqH7523omQPn1uzRi4XFCRrKE1qEyZ7oK/Gh9Z7MGxnWIpLVMS6ZtjR/k/m4
+pjYR2Mr1/U3Pww+5V7wK+TvnjpBJnJdoX+7OQb7kR38t+ADz4h6vUNIhpN5f
+WjgIiz+7qyfoEMmkYsizURrv/em8Cs7T31QWp0vPx7/WlQ732ebsXwwLliRv
+n8EmkoP+j2ftoefdm8ScZiOf3rPey7RegYfhBGymPPW/72HugkVq3uhv8nZh
+9vJvke9evM8xPSKoMZLMTYe5yUafRIif2W2a+A8sdIg5kI35xNX65dnOQz7R
+3EURiDsbbNx3AGbeR+vMR3zFNs/ddTBh7Un9E/VMaP5q8ZWuT3pybCPmdcao
+/qupGWxSq/JEl0jcdvbWuMDC1NdtLrB1ZhnjBzOf1qy5iX7sOM7XDIQFQSfK
+rXSIICmnscMX5ljv1ahAf5nPfPWVsPRqYuMaOOXL43pzmBfy2XwM8wj06sxV
+hSXH3rndxbwi84wTX6Me7lcn8XVYLT0tuYF6MtSpHq6ITqgvhnlhgYve4fN1
+4QmsFFg0rDzPAfmtWwRT9sH8rw8NsjFPo4PO9yJh6YrUVg3UWzbnzatY6vqX
+qifh4WsfHVPhwfGC6lmY1+JYA/1ymPP9tbRiPK9um33ftsFecjuXz0V/FMID
+TrHp+dju/ZmY19tuniPtB+upw6GPiL+8M36+mJ6vulPFHvfJ3dZVbYj2rye9
+0x/zC5lw+nGVOeqtT5bjIR7T3vYgi7opQ2El5vWsaL1GD+zVtMJmGtb72fVs
+s7RAf+bnRF/HfhkLhZt2wsJHbEtX+ED454kcmKnXGGzGfDonawZu0/VX0tyX
+of6u2oexT2FyKz3oCp7X7KG+vE6Y9x/7LBPYQrJfrYPGTRVmFOJ5b2tea/oQ
+Fsxa+7M1+ukZbi6rgr2u9kmeahHBlcbkslz6+YEa52zMw974TmAsNd+ZxGoR
+Yr+IjPrQ+q7sdoQFKd79WXYwJ/7CPKwnXwKkNjOo32eb03xv+IYJCtQt5m+s
+tIlkY+71JyM4P6e1Mvcs9jfuMRj5Aos36PgZ4vl6/nvE9Cm0nrWDm8/Bx/bd
+EJvA/MLTO6xw3ruNZqnu9DzztIwq0A/vBIuGBFhk8Wa3Jfrlwd/eVEf7MzLc
+kw4H3yqKUbWk9+3SrA7cB+G99Y5+1Oved2hiHkHXpi4vgcUNNke+wbxmdG3h
+jcOsA1byOnD7oNYp9/l4ngL0Pr9Cvrzn1v0ZMOkfKs9GPnt5j5ZWmGOnPGbH
+JoxHaKSW+nfIrxKs9Bvq/fjeTc8BFjSOyi1AvRP7Lnavh/mb9bvPYz4BN1IX
+boOFuk5y+ngfksb2+CCYN/jp3En0p/f+mZZNMPNGVDsTz/uKjO63q2Bpaze/
+Ev1u9mwytKTrM8cf70G/Q3IyNKfRfDxRoSNc/e5D1WvUx/UYUl+AeSqkato0
+wl7N8wtcEZf/YcOh8zCv04cbh/tmEHI24WdYUlc1ivtKzMosyw7CYkXtOi72
+L+hYphJPz/skaeIS6isaMBlLovG2g4vxfmCC2bPX5tJ8tqn+VZhfQfVC1m1Y
+YH1G3hH3b6+LS+4AzLqV//kWnPc1X2RB++H5qwDzkzhG59qH0/MKjeoS0c/R
+ItePtbR/3SwVCe6f865bappWWM8/ofoS8SpR6oEfYA4vQv8FbOe02OYqLCol
+31XDL767NG8C5rZvGoxlE46lhrn3N1ysl+vIN2ITHr9bp3AZLKudJSvFfBTq
+f57lCzNbtVPNUZ/bQCRnByxaY+Z3VodwLCZsd4XDPO6y/Zo6hHd7/1G1aJqv
+v8nnsDYRtZ3bHhUB850NGBX0x2y169ZdMPeq0mgO+r1czVgWAIvTL7a4aBGZ
+7x5fW0+ab++qJg30O0wovb8EJkF3fx1iEc6kfwHXAvbqVJSMsYhkLut430xa
+72RTpIkW4S1rDolSh4UZUed3aBFR69gBQ0VYuvrpuUbkM26rkmNoPf6VQQtx
+/643dw3J0fN1HLlThfr6n8fsV6Xn23jxmZMOkem8+/2OPt3v2lffPzBPD/0L
+2VZ0v85HvZ66hBfHG4hZQ+MWjvl36Py+HD+yG2bJxVvPQT8vCRsvpNN6VFJ+
+CsV9cRhwP1pF159uycxgExHbc6yki64PbnQQYb3FWHHKNGvMt9+5LJlNZNmj
+1wtsYNahohEfxIlJRawvzJ3pUKuIfDtf7G2Nhr2iPhjk6hKZUtZAeRqN938S
+GOG+LS0nLkXU6sNeGZhXddc6WzFMxvzzlXWI6OZEfPANut+pHyWx6MdUTXdz
+aqFH3+gQnv8HtdnGdD1zw2/6IS3CKTxruOAc3W9rlNIczMv1QW9OJl0fuuS0
+DPOoa0m4epjGz5yyrGERnt4q97FIWFqeWHwd8byb+xS2weKbBaZSFiFJiutW
+b4D5zF2rqZiXWes4dzUsexxdFIB5/eMx3O9E87vtGmrG/qomH/ZSS5Uqgldq
+E15y5JJNrrQ/BZXr/kD945YzGB96niGXY76YV1JTsXcIzTfBvvwC338tNXG9
+CTReJkj/HvPa9tcE6xdYMju6XILnvSuNVdcAi/hxW7TRf+stFVV9tH/VS5fi
++4dDHGSpujawYq7PFtw/Xkl+5VKY99BivS/u6/PW2NIgWKppmjYf920kx/pD
+Mo1zxWqvMR+SmmRTCgtsuwKOYH/5wDkezXT99I5IFuJHP7QEv6S+fHxzCt4X
+pcdaPr2FhYc8349rE1nmsEPDMI33O8eFweWyU2MjNP+eGO/X6F+YsMVwiNaX
+GvHjbrzfJGWJX/rofqZOi5VwPzRMv1yg+SVld7tvsIjgalNs7AOYrOyJPIz5
+3BVeffUbPBjF2hzJIrLXj3QiS2BWpSt+8yCSUH370lxYpqf6tJxFmMOPv5dL
+o5+faFX7gnlGRilXH6H7RzZqbsb8ag2HuxJpPqfVwkfYP7zh7fKjMN8xdJEv
+vn8dCpIc02l9BteUZHifMoWLJ3+h+4V754dgfjcT/2NfRes9kXvzDe5jmGu7
+eyssZokT/HQJ55S0xJ+eX3rRdBDff7Kd0gw7I1vES8b0hxEvmJoV7wLLSgTR
++rg/crm6FWGw18LmKYaY74pFsrVZsKTGJonB/KK0Rv64BYuyMlwa8TzIW91r
+6KT5Dv/tthf5//27w+7/f3/okv8Bh3rOqQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.887640361876242, 3.60760723752485}, \
+{0, 1}], LineBox[CompressedData["
+1:eJxTTMoPSmViYGCwBWIQDQEqDlp8IFrRgaGg63OSmYrDmepz92sPKzgwrNg8
+ySVexUEw+bVWYC2Qr6G5271CxSE7ov16iQGQ/2Gjwa96FQf9TUe29h6Qd2DY
+MYXtVamKw78XGvPWKAD5G7zM1kSpOCgLv2yI7ZBzYEh4wHhFX8WhJjI43v2f
+rANDxeqFt78rO/S/vb7ErgPI57g+7f9WZYc/nNE332kB+Q1ih/jylB3Ea+ua
+pr6UcWAQkGMxUlF22J6y0ujSUSD/xYpV6+4oOSxaZNzVtx/I71hhuXy2ksP8
+mW+6/18B8gM8Le6lKDlE7jDRP8AENO9AfnedtZLDhPXlS5hdgHyG31PeKCo5
+CL2+lHRnEpCvYXV2kaSSw7pV3x9NfgHkG2g+klZWcvigW/uV1w7o/gP/55+2
+VXLYdu3Vd8MeID/gA7d6hpJD5yvnq8FnQP6zt9w9X8khYef7g9N+APk7ONoD
+Hyo5VCyR/u/MAwwPgQ168prKDi94BBcJsAD5BY3Jf4uUHfwfx4X53QOq11A9
+umyXsgODzX13ltlAfsSU6d9+KztIbH9/8J01yP4zEmrGKg4VLP7tqUeA7nth
+mMESq+JQOrM9RssSyPc4eFi1XMVBTf7ofKUFQP9fyI9nb1BxmGoBil8ZuPwT
+ZuuEu/HScP1TOisWXz0mBTd/ktzGilnWUnD7BXcJ2AkekYS7j+u5wo7fKZJw
+9++yX7hyo6Ik3H+KYu9j3/+WgPt/w5knDHs+S8DDZ2WmgF0muyQ8/Bos9mit
+MZaEh2+wjyjHuWJJePhbODdzfTooCY+f6AoO2RxxKXj8fTfXnaucKwWP38ri
+jug/u6Xg8X9hx+kL9n+l4Okjq1O4hEFbGp5+MhrOlBY6SMPTV/C+sLO6VtLw
+9Cf0pbE2S0wanj75JJeqCV6VgqffKlON6IPlUvD03XtyzYIdjFLw9M8WJ16/
+qFwSnj94rK4nBt+XgOefWwXWXkX2EvD8FXzgY4DYfHF4/uNYrbkqllUcnj8L
+tJMdWCrFHGD5dysbiBZzAABx72bD
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.354800000000001, 7.}, {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.499999999996362, 14.500000000005457`}, {10., 
+         8.500000000003638}}], 
+        PolygonBox[{{8.552322615314452, 10.98173265946094}, {
+         7.602165824326175, 11.816718930329426`}, {8.293188945044921, 
+         12.219815750748694`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 11.323799910437668}, \
+{1, 1}], LineBox[{{13.500000000007276`, 14.500000000005457`}, {
+         10.000000000003638`, 8.500000000001819}}], 
+        PolygonBox[{{12.052322615314452`, 12.01826734053906}, {
+         11.102165824326175`, 11.183281069670574`}, {11.793188945044921`, 
+         10.780184249251306`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.484057296392571, 11.323799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 14.5}], PointBox[{10., 5.5}], 
+         PointBox[{13.5, 14.5}], PointBox[{10., 8.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}]},
+       "\"aebf/cgdf/fhegehgh.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "aebf/cgdf/fhegehgh.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:eJwt1wk81HkfB/B/jpUjR+4RjeOpRO1UK6LMn4gtaqhcZc0KW4ihrKdc07Ll
+KhN2i20zZTt0aFRscjRSrQhDJKuiErrWIDnj+fye5/F6ef1fb7/f/3v9/jP/
+Mg6M9AyWoSjqIX7JlRqbxY8pTf33R4empvxz02phzsFFpce1afELE2leAsz9
+IbTcVpum86PFBSyYdmqMm9WiqXEr893dJjQl+st67BXsocmayISZ25LS+7Ro
++o7QYs9amLNNtk9Rm6bWnPEulRrTFMu7U20T4tcIbuddgTmDWxLPYz1SITY8
+Gqb3Bbno6tD8p+tjZtbDPceKA0/AvvaKySYw/7Xb5EJdmm5K7UpShQXVuQ+K
+dGn+AbsP9xVg9aqyyGV6NNU6oLJ/HizJtJUW6tHi9+evyRjB4jnmI1/p0/ye
+leE+1jDz7egSD32aaj63uM8Llrr+eSwRTjMOfniAxMsYLMzUp8WcrJHhU+T+
+2/qZB7E+3214SxWp13M141t9mo7ZoTDSQerrrLo/qUfz25gFdu9I/uijaTmo
+Z2vN4okhWJidWqyHeiw/RqZ+JPdrVqQIUP9mjYK3XTAvoURVRpem1N4UNFaS
+eW3/sXC/Dk1PVLjmC4gHmJmDmFcsQzHYh+R7ZHj2AFxntatXm8Rv3jKih/le
+ujri08DEfmknr1WLFj/2souMg0XL264UwWERYgNzWDIVdEmI8/sQ39JXvBB2
+vnv3TziQ7SinCXOyUoQf4fTtU+tTjFDv83QPtjbN1xr8p0gB5nsmRVyEXY1y
+NpwxRL4577ab4rxGb3CpbTBfqTy2CM+XXdNQuDEs5bpeXYV+F2XWVSiS/ZOb
+8m7DsdadN5RhXukvStaYn5fPWK0ZzLRM33kWHtBw/ZcHLJhdLfmMeX736t28
+TJjjwu38Gufhs2DFUDOJ5xG/YyPOV4+tUK+D+kS7wx87wcZrLof5kXpza8MW
+wvkHf2zLJeu/Z0x2If78sZBEMUxtPD+QAGusZRU9hXnXteSUkO/85EheJ3F4
+Gvswzsc4Y1Mj2S+WPRc4gX67b8noH4Ulw4rXQtGvDLe6wp5YUznpJc6nMKrC
+twP1iTLmvQ7CvJ5mSvp8YcmbOscpLZpv8U9HYv0CzCdhp8Il+LI0Z/lymK9Z
+4RmD+TNshq6lG2A9z7YuAO6qXGXYx0C8MNaeUOx/4ahTsAHmje8/kot1l77F
+jOuYi3QmuakLfnqoqnsZLGqrDlyL/CuDT4VUoy+m0TLtEtQXc8tA7QdY5CZf
+tAr1/x7WPWoOcy94L66C200yOhRgyvjA2g04Lzq8/ysKFpxzzf8L83AemYpR
+h1llS/xsMb9eZmGLFcwLzfA9CV+kzYrDSD7KJvMZruKwhLtXcBUaTbFlcR6v
+HBy/HiF/z1+9WQl1bij1bbTBVXj8ls0Q7q9hxfNjYU6EN6sc+7rNjNOKYIn7
+pFwwvPJEdstDWFDxenYc9Q18NlzZBvdo2lw6CCePN1+8T+I11/wkxXm5VzUf
+OgXzbj45/z36mzfXLsIHpk5/jG7HfK78siV1ktTr2LtwK8y1uej0MyyZYQa+
+xLzP+nt6TKNvickfaocxX3bK/qAgmLv1Tosz1pMdDL7cRdyegqN9prBbW7y+
+ESzI2jdqjP2fXI73xWHufMbgOBvrfu9W7yXfoxTvpX08rqajdg7euApKNic9
+xlX7aObqbk2cp0PgXAfcpxMTxUyE+U27v1TD9UudTq+GhY+iz21Af0rdLuOK
+MMeMf1+CvEF3ElTH56Mei7g5XpgHx8/XbxbmTH20b4ajJGtlDbGftt8gtxp9
+SmsuyrmTeEaXmlMwf13GwqB0WGTdyv0Tdnv+Zl8zLLmuNFyP/ZXfWCzUQZ28
+ggB/8lxt+/2YnQ+pf4+MZTb2+y9t6MqCWeaMLFf45ImvC8j3DKUX4PgG+UPT
+KybqYaGast9ezPF8uEHUAxLvfdVMH+qfHuU0XCDxCvsYvuhPufcXywiYbys3
+U4/+v3vSZ8KAJeN5k+txXtly+aevknk1TMg2kHmW7npqAYs1lTxC4EcvTRfl
+oX/W2bdzDTB/xr074kkN7D8k+fIB+8pCNBO9YI5d44EXmjR/PPfCT9fVEf+q
+KlMKv4h3GdQirvfqZSLeiprjhgpqmJ+Coj6p67h8sbqCKp6HNt0ccn5XdC58
+s3Ie8nf88xLvP2rsbefdYyroxz/spATWN2jwZ8IikVqhH/o9c3JfT78y8l/+
+cP4V+fztfeL5Gu4xdw36HvMxr42RU8X+Hla7rgTe/m+HBi6xakj7Esz/mXPJ
+rlbiZJ+OELi4l/rojfw8Tk71YbgtXiXuDSzMqrhDnKNjURaBeoXqThVkf829
+In4/LHLXYpN4AlN2nhP64/eKopqQL4UaWxEPizun+/3hjCfX9h2Ghfce/vAM
+9VqPbej3J+sOEfkc2H92sHoW8WgO70YN+vW9/3wqDKbsh9SsyfvsFR1xjtS3
+7N1j8lyIWk5mlaB+Tmtw+kb43bHNa06if5FNZeMnnM/TmEi7XUqYr03o9G34
+9IRyp6EivC5mpgDe1shc0aaAePoRRufgH9XGfsv+CvU5G40/hGdPJMsHy+O8
+l9QlqCB+ZG2Mu5cc5vXuhuYeeFOUb2mkLPLN/Cr+mzyHvVFBt2SwftGNtwP1
+HmluUrCC1WW4zr1wSbYwp38Onqd1xqN70e+9aQ3zZuLKaPMheP9aWZMBWCC/
+/HUI5vXsgbyjJe7nKk501MGNT+SVcmCh4MwDDcxb3sl+6Xzkl1C5VevguqhE
+ldPE8lVbNsLmDj9HLkW9dKxGKfm8Cvu2KF+GRSfmtsvCi57VWmmhP5Z7vO1N
+xLcK1UnaAfc0HR/aBH8xu7vu3zA/f58H+X445VMmEwRTKjdvusCZfxQNMmBe
+tJ5ZOfpTOTj3/W+Iz3nmOG4Bt7DvFQ+gHk6cRSz5XLKOrimRh8WD2dEr4Roe
+9+0E+qXU0j+0Yt6nRkOimijsD/j7wVHyvRS8Sn/BLJvi1aUeCoFtRqnladNs
+ShLzUjmAnKdZ8qPpCTYlskq+FAsLVri6Zo1hvf7BSDF8sUzs5T3KprhJ11/N
+QT6/x/kvdo+w8b6Imw2DPQtaPjweYlP82pjf+uEI+4jnhVLEy3IzjED90i38
+w1WD2K99xHccpi/JL1OCOXNvDCeif0tzf39Tsp5iWTkJP9r5k9onWPxxOyMY
+82Mp+TQXI57whNWOW/Bk+arrp5CPa9MuI4VVRgMCrg6zKeneXQqK5N+jz/be
+qEN9nMShiTmwklh3uv0Tm2Ltuqzfhf0RDgHrq9BPz5lUzq+w7UirYPdn5Nt0
+Vt8afpJroX4f5qod9iTvldaQtnn3YOHTsYl1sIhlVrkDFoVmdovQz4J1g2VH
+EI8u8HQ1gWfc0+y/RT7151uP5mEeS5UZiy+gPtY3CuWGsMlNw4Sr6Ec63LOk
+FPNlVYv+6vyAeV8esg6G/6gICB/phz1Ux1bAqftt37e/ggucP5P3Bt/EwCuo
+i00xBxJNlsK8eY2PoltQT5ta+Xa458B3O0PFiP9w0OO05v//35Gx7n9XLfo/
+Yw2y2w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.077403306263033, 4.30673387473934}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.00000000000432, 15.}, {13.500000000004775`, 14.5}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.650294551449843, 15.441370831152057}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1wk41dkbB/CfvWS5lquU5U7KZGlcS1T/lkOShKiYKLpTkVK5tjGiuqKN
+jKsia+6g1dKdUsKoSwzVTG7LqElymag/ihZStv/3zPP3PD09n+c99z3ved/f
++V2+2Rq2LkieYZi7+Ef/l4xP4seEMP/+6BHJy9jwS45zCMOyZ5X/AG8NCc5M
+gb0sBl0u6xEy72/x7DZYNj2h/S89wgRcuBY4fy5huLzqqV1w42ij/UHq8vdT
+HuDzb6fF5f1JvUGjOQefz7pRdIVtivzqxk/dEA9z/OfVBlh6f8Sli00EErOH
+3x6HB2eXRgTDxa/bh8WwhFdW2a5LiMKRpJj7sFdGJGetLmG6T1QnPIN5305R
+rtchzMkIpUJq0WBs2VI4InCm9p8wqQjoadYmROtN6MVKmBMYc2WnNmHURg7d
+zqH7523omQPn1uzRi4XFCRrKE1qEyZ7oK/Gh9Z7MGxnWIpLVMS6ZtjR/k/m4
+pjYR2Mr1/U3Pww+5V7wK+TvnjpBJnJdoX+7OQb7kR38t+ADz4h6vUNIhpN5f
+WjgIiz+7qyfoEMmkYsizURrv/em8Cs7T31QWp0vPx7/WlQ732ebsXwwLliRv
+n8EmkoP+j2ftoefdm8ScZiOf3rPey7RegYfhBGymPPW/72HugkVq3uhv8nZh
+9vJvke9evM8xPSKoMZLMTYe5yUafRIif2W2a+A8sdIg5kI35xNX65dnOQz7R
+3EURiDsbbNx3AGbeR+vMR3zFNs/ddTBh7Un9E/VMaP5q8ZWuT3pybCPmdcao
+/qupGWxSq/JEl0jcdvbWuMDC1NdtLrB1ZhnjBzOf1qy5iX7sOM7XDIQFQSfK
+rXSIICmnscMX5ljv1ahAf5nPfPWVsPRqYuMaOOXL43pzmBfy2XwM8wj06sxV
+hSXH3rndxbwi84wTX6Me7lcn8XVYLT0tuYF6MtSpHq6ITqgvhnlhgYve4fN1
+4QmsFFg0rDzPAfmtWwRT9sH8rw8NsjFPo4PO9yJh6YrUVg3UWzbnzatY6vqX
+qifh4WsfHVPhwfGC6lmY1+JYA/1ymPP9tbRiPK9um33ftsFecjuXz0V/FMID
+TrHp+dju/ZmY19tuniPtB+upw6GPiL+8M36+mJ6vulPFHvfJ3dZVbYj2rye9
+0x/zC5lw+nGVOeqtT5bjIR7T3vYgi7opQ2El5vWsaL1GD+zVtMJmGtb72fVs
+s7RAf+bnRF/HfhkLhZt2wsJHbEtX+ED454kcmKnXGGzGfDonawZu0/VX0tyX
+of6u2oexT2FyKz3oCp7X7KG+vE6Y9x/7LBPYQrJfrYPGTRVmFOJ5b2tea/oQ
+Fsxa+7M1+ukZbi6rgr2u9kmeahHBlcbkslz6+YEa52zMw974TmAsNd+ZxGoR
+Yr+IjPrQ+q7sdoQFKd79WXYwJ/7CPKwnXwKkNjOo32eb03xv+IYJCtQt5m+s
+tIlkY+71JyM4P6e1Mvcs9jfuMRj5Aos36PgZ4vl6/nvE9Cm0nrWDm8/Bx/bd
+EJvA/MLTO6xw3ruNZqnu9DzztIwq0A/vBIuGBFhk8Wa3Jfrlwd/eVEf7MzLc
+kw4H3yqKUbWk9+3SrA7cB+G99Y5+1Oved2hiHkHXpi4vgcUNNke+wbxmdG3h
+jcOsA1byOnD7oNYp9/l4ngL0Pr9Cvrzn1v0ZMOkfKs9GPnt5j5ZWmGOnPGbH
+JoxHaKSW+nfIrxKs9Bvq/fjeTc8BFjSOyi1AvRP7Lnavh/mb9bvPYz4BN1IX
+boOFuk5y+ngfksb2+CCYN/jp3En0p/f+mZZNMPNGVDsTz/uKjO63q2Bpaze/
+Ev1u9mwytKTrM8cf70G/Q3IyNKfRfDxRoSNc/e5D1WvUx/UYUl+AeSqkato0
+wl7N8wtcEZf/YcOh8zCv04cbh/tmEHI24WdYUlc1ivtKzMosyw7CYkXtOi72
+L+hYphJPz/skaeIS6isaMBlLovG2g4vxfmCC2bPX5tJ8tqn+VZhfQfVC1m1Y
+YH1G3hH3b6+LS+4AzLqV//kWnPc1X2RB++H5qwDzkzhG59qH0/MKjeoS0c/R
+ItePtbR/3SwVCe6f865bappWWM8/ofoS8SpR6oEfYA4vQv8FbOe02OYqLCol
+31XDL767NG8C5rZvGoxlE46lhrn3N1ysl+vIN2ITHr9bp3AZLKudJSvFfBTq
+f57lCzNbtVPNUZ/bQCRnByxaY+Z3VodwLCZsd4XDPO6y/Zo6hHd7/1G1aJqv
+v8nnsDYRtZ3bHhUB850NGBX0x2y169ZdMPeq0mgO+r1czVgWAIvTL7a4aBGZ
+7x5fW0+ab++qJg30O0wovb8EJkF3fx1iEc6kfwHXAvbqVJSMsYhkLut430xa
+72RTpIkW4S1rDolSh4UZUed3aBFR69gBQ0VYuvrpuUbkM26rkmNoPf6VQQtx
+/643dw3J0fN1HLlThfr6n8fsV6Xn23jxmZMOkem8+/2OPt3v2lffPzBPD/0L
+2VZ0v85HvZ66hBfHG4hZQ+MWjvl36Py+HD+yG2bJxVvPQT8vCRsvpNN6VFJ+
+CsV9cRhwP1pF159uycxgExHbc6yki64PbnQQYb3FWHHKNGvMt9+5LJlNZNmj
+1wtsYNahohEfxIlJRawvzJ3pUKuIfDtf7G2Nhr2iPhjk6hKZUtZAeRqN938S
+GOG+LS0nLkXU6sNeGZhXddc6WzFMxvzzlXWI6OZEfPANut+pHyWx6MdUTXdz
+aqFH3+gQnv8HtdnGdD1zw2/6IS3CKTxruOAc3W9rlNIczMv1QW9OJl0fuuS0
+DPOoa0m4epjGz5yyrGERnt4q97FIWFqeWHwd8byb+xS2weKbBaZSFiFJiutW
+b4D5zF2rqZiXWes4dzUsexxdFIB5/eMx3O9E87vtGmrG/qomH/ZSS5Uqgldq
+E15y5JJNrrQ/BZXr/kD945YzGB96niGXY76YV1JTsXcIzTfBvvwC338tNXG9
+CTReJkj/HvPa9tcE6xdYMju6XILnvSuNVdcAi/hxW7TRf+stFVV9tH/VS5fi
++4dDHGSpujawYq7PFtw/Xkl+5VKY99BivS/u6/PW2NIgWKppmjYf920kx/pD
+Mo1zxWqvMR+SmmRTCgtsuwKOYH/5wDkezXT99I5IFuJHP7QEv6S+fHxzCt4X
+pcdaPr2FhYc8349rE1nmsEPDMI33O8eFweWyU2MjNP+eGO/X6F+YsMVwiNaX
+GvHjbrzfJGWJX/rofqZOi5VwPzRMv1yg+SVld7tvsIjgalNs7AOYrOyJPIz5
+3BVeffUbPBjF2hzJIrLXj3QiS2BWpSt+8yCSUH370lxYpqf6tJxFmMOPv5dL
+o5+faFX7gnlGRilXH6H7RzZqbsb8ag2HuxJpPqfVwkfYP7zh7fKjMN8xdJEv
+vn8dCpIc02l9BteUZHifMoWLJ3+h+4V754dgfjcT/2NfRes9kXvzDe5jmGu7
+eyssZokT/HQJ55S0xJ+eX3rRdBDff7Kd0gw7I1vES8b0hxEvmJoV7wLLSgTR
++rg/crm6FWGw18LmKYaY74pFsrVZsKTGJonB/KK0Rv64BYuyMlwa8TzIW91r
+6KT5Dv/tthf5//27w+7/f3/okv8Bh3rOqQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.887640361876242, 3.60760723752485}, \
+{0, 1}], LineBox[CompressedData["
+1:eJxTTMoPSmViYGCwBWIQDQEqDlp8IFrRgaGg63OSmYrDmepz92sPKzgwrNg8
+ySVexUEw+bVWYC2Qr6G5271CxSE7ov16iQGQ/2Gjwa96FQf9TUe29h6Qd2DY
+MYXtVamKw78XGvPWKAD5G7zM1kSpOCgLv2yI7ZBzYEh4wHhFX8WhJjI43v2f
+rANDxeqFt78rO/S/vb7ErgPI57g+7f9WZYc/nNE332kB+Q1ih/jylB3Ea+ua
+pr6UcWAQkGMxUlF22J6y0ujSUSD/xYpV6+4oOSxaZNzVtx/I71hhuXy2ksP8
+mW+6/18B8gM8Le6lKDlE7jDRP8AENO9AfnedtZLDhPXlS5hdgHyG31PeKCo5
+CL2+lHRnEpCvYXV2kaSSw7pV3x9NfgHkG2g+klZWcvigW/uV1w7o/gP/55+2
+VXLYdu3Vd8MeID/gA7d6hpJD5yvnq8FnQP6zt9w9X8khYef7g9N+APk7ONoD
+Hyo5VCyR/u/MAwwPgQ168prKDi94BBcJsAD5BY3Jf4uUHfwfx4X53QOq11A9
+umyXsgODzX13ltlAfsSU6d9+KztIbH9/8J01yP4zEmrGKg4VLP7tqUeA7nth
+mMESq+JQOrM9RssSyPc4eFi1XMVBTf7ofKUFQP9fyI9nb1BxmGoBil8ZuPwT
+ZuuEu/HScP1TOisWXz0mBTd/ktzGilnWUnD7BXcJ2AkekYS7j+u5wo7fKZJw
+9++yX7hyo6Ik3H+KYu9j3/+WgPt/w5knDHs+S8DDZ2WmgF0muyQ8/Bos9mit
+MZaEh2+wjyjHuWJJePhbODdzfTooCY+f6AoO2RxxKXj8fTfXnaucKwWP38ri
+jug/u6Xg8X9hx+kL9n+l4Okjq1O4hEFbGp5+MhrOlBY6SMPTV/C+sLO6VtLw
+9Cf0pbE2S0wanj75JJeqCV6VgqffKlON6IPlUvD03XtyzYIdjFLw9M8WJ16/
+qFwSnj94rK4nBt+XgOefWwXWXkX2EvD8FXzgY4DYfHF4/uNYrbkqllUcnj8L
+tJMdWCrFHGD5dysbiBZzAABx72bD
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.354800000000001, 7.}, {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.499999999996362, 14.500000000005457`}, {10., 
+         8.500000000003638}}], 
+        PolygonBox[{{7.947677384685548, 12.01826734053906}, {
+         8.206811054955079, 10.780184249251306`}, {8.897834175673825, 
+         11.183281069670574`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 11.323799910437668}, \
+{1, 1}], LineBox[{{13.500000000007276`, 14.500000000005457`}, {
+         10.000000000003638`, 8.500000000001819}}], 
+        PolygonBox[{{11.447677384685548`, 10.98173265946094}, {
+         11.706811054955079`, 12.219815750748694`}, {12.397834175673825`, 
+         11.816718930329426`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           
+           9.996694214876033]& ], {12.484057296392571, 11.323799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 14.5}], PointBox[{10., 5.5}], 
+         PointBox[{13.5, 14.5}], PointBox[{10., 8.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}]},
+       "\"aebf/cgdf/fhegehgh.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "aebf/cgdf/fhegehgh.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 22}, {0, 0}, {22, 22}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {24., 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       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["H",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {37.5, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {42., 69.96}, {0, 0}]},
+  AspectRatio->1.0999999999999999`,
+  ImageSize->{288, 288},
+  PlotRange->{{0, 66}, {0, 72.6}}]], "Print",
+ CellChangeTimes->{3.7752335744414377`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"fb392009-4d65-47bd-85eb-5629d05d45e3"]
+}, Open  ]],
+
+Cell[BoxData["\.1c"], "Output",
+ CellChangeTimes->{3.7752335744543953`*^9},
+ CellLabel->"Out[13]=",ExpressionUUID->"9cc9531b-8eb7-4ab5-818b-9de5d93d28ed"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{3.775233574462344*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"16617bf1-e485-4970-88b3-06adc5190045"],
+
+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.775233574467429*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"394af361-158b-41d5-8cd7-253e4ec5f5e3"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 1, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233574475355*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"d486de6c-574d-4a9c-a677-357f07b8f393"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 2, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233574479745*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"bc32190a-6d1c-4aa4-b572-8d25596cf0e8"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "3", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 3, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.77523357448415*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"11dd4fac-4a90-4b87-acef-17bdc660ca09"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"in total: \"\>", 
+   "\[InvisibleSpace]", "\<\"6 Particles amplitudes\"\>"}],
+  SequenceForm["in total: ", "6 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7752335744885674`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"6bcd2aae-e83c-4de2-b882-bcc1277d3ab4"],
+
+Cell[BoxData["\<\"\\npreparing FORM code in \
+/Users/josegabrielreyes/Documents/Higgs/Mathematica \
+Scripts/ggHgg/FinalSetUp/fc-amp-2.frm\"\>"], "Print",
+ CellChangeTimes->{3.7752335745347023`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"519e3348-ebb1-4930-b680-2df877dc8d2b"],
+
+Cell[BoxData["\<\"running FORM... \"\>"], "Print",
+ CellChangeTimes->{3.775233574553753*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"c08d212b-cfe1-49af-ad05-d1c765cfd252"],
+
+Cell[BoxData["\<\"ok\\n\"\>"], "Print",
+ CellChangeTimes->{3.7752335746942177`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"8bbcd19c-afb7-45e9-8ae8-52caa8b873eb"]
+}, Open  ]]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"Clear", "[", "triangle", "]"}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{"Print", "[", "\"\<Triangles\>\"", "]"}], "\n", 
+ RowBox[{
+  RowBox[{"topsT", " ", "=", " ", 
+   RowBox[{"CreateTopologies", "[", 
+    RowBox[{"1", ",", 
+     RowBox[{"2", "\[Rule]", "3"}], ",", "TrianglesOnly"}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"insT", " ", "=", " ", 
+   RowBox[{"InsertFields", "[", 
+    RowBox[{"topsT", ",", "process", ",", 
+     RowBox[{"InsertionLevel", "\[Rule]", 
+      RowBox[{"{", "Particles", "}"}]}], ",", 
+     RowBox[{"Restrictions", "\[Rule]", 
+      RowBox[{"{", "NoLightFHCoupling", "}"}]}]}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"Paint", "[", "insT", "]"}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"DoPaint", "[", 
+   RowBox[{"insT", ",", "\"\<triangle\>\""}], "]"}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"dT", " ", "=", " ", 
+   RowBox[{"DiagramExtract", "[", 
+    RowBox[{"insT", ",", 
+     RowBox[{"{", 
+      RowBox[{"1", ",", "2"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"triangle", "=", 
+   RowBox[{"CalcFeynAmp", "[", 
+    RowBox[{
+     RowBox[{"CreateFeynAmp", "[", "dT", "]"}], ",", 
+     RowBox[{"SortDen", "\[Rule]", "True"}]}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"triangle", " ", "=", " ", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"triangle", " ", "//.", " ", 
+      RowBox[{"Abbr", "[", "]"}]}], " ", "//.", 
+     RowBox[{"Subexpr", "[", "]"}]}], "//.", 
+    RowBox[{"Abbr", "[", "]"}]}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{
+   RowBox[{"Export", "[", 
+    RowBox[{"\"\<ggHgg_triangle_FeynAmp_2diags.m\>\"", ",", "triangle"}], 
+    "]"}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]"}], "Input",
+ CellChangeTimes->{{3.7754888855317173`*^9, 3.77548900549756*^9}, {
+  3.7754890445516376`*^9, 3.7754890459279118`*^9}, {3.775489201342444*^9, 
+  3.775489209477962*^9}, {3.775489710556233*^9, 3.775489713859892*^9}},
+ CellLabel->"In[11]:=",ExpressionUUID->"00b2ebfa-faf2-401d-8f84-2e8996fb70f1"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["\<\"Triangles\"\>"], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897151317663`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"482b7b69-f6b4-45f1-9a2c-0ab150cda602"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489715329784*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"0c57c097-c2e6-40bd-9ede-f2c4dc3c9965"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"\"\>", "\[InvisibleSpace]", "\<\"loading \"\>", 
+   "\[InvisibleSpace]", "\<\"generic\"\>", 
+   "\[InvisibleSpace]", "\<\" model file \"\>", 
+   "\[InvisibleSpace]", \
+"\<\"/Users/josegabrielreyes/Documents/Higgs/FeynArts-3.10/Models/Lorentz.gen\
+\"\>"}],
+  SequenceForm[
+  "", "loading ", "generic", " model file ", 
+   "/Users/josegabrielreyes/Documents/Higgs/FeynArts-3.10/Models/Lorentz.gen"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489715338504*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"7b632676-1202-4f79-a69d-8d737bde6c17"],
+
+Cell[BoxData["\<\"> $GenericMixing is OFF\"\>"], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489715342578*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"efc9d648-68f3-4c34-96f0-b963370877bd"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"generic model \"\>", "\[InvisibleSpace]", 
+   RowBox[{"{", "\<\"Lorentz\"\>", "}"}], 
+   "\[InvisibleSpace]", "\<\" initialized\"\>"}],
+  SequenceForm["generic model ", {"Lorentz"}, " initialized"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897153829613`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"465fc068-514c-4e6f-8a5c-4d5fed7eff58"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489715394668*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"15604b7f-08c1-4262-927e-197c4eb46a1c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"\"\>", "\[InvisibleSpace]", "\<\"loading \"\>", 
+   "\[InvisibleSpace]", "\<\"classes\"\>", 
+   "\[InvisibleSpace]", "\<\" model file \"\>", 
+   "\[InvisibleSpace]", \
+"\<\"/Users/josegabrielreyes/Documents/Higgs/FeynArts-3.10/Models/SMQCD.mod\"\
+\>"}],
+  SequenceForm[
+  "", "loading ", "classes", " model file ", 
+   "/Users/josegabrielreyes/Documents/Higgs/FeynArts-3.10/Models/SMQCD.mod"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897154020844`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"92ab9642-e7a8-40b2-a260-4fb5048c8e9f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"  \"\>", "\[InvisibleSpace]", "\<\"loading \"\>", 
+   "\[InvisibleSpace]", "\<\"classes\"\>", 
+   "\[InvisibleSpace]", "\<\" model file \"\>", 
+   "\[InvisibleSpace]", \
+"\<\"/Users/josegabrielreyes/Documents/Higgs/FeynArts-3.10/Models/SM.mod\"\>"}\
+],
+  SequenceForm[
+  "  ", "loading ", "classes", " model file ", 
+   "/Users/josegabrielreyes/Documents/Higgs/FeynArts-3.10/Models/SM.mod"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489715410214*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"6c7d441d-fe7c-4fc0-9501-ad4b5c30c80d"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489715415415*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"37f80417-15b7-48cf-8bf2-cf4f12f655ee"],
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+    {GridBox[{
+       {
+        RowBox[{"$CKM", "=", "False"}]}
+      },
+      BaselinePosition->{Baseline, {1, 1}},
+      GridBoxAlignment->{
+       "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
+        "RowsIndexed" -> {}},
+      GridBoxItemSize->{"Columns" -> {{
+           Scaled[0.999]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, 
+        "RowsIndexed" -> {}}]}
+   },
+   BaselinePosition->{Baseline, {1, 1}},
+   GridBoxAlignment->{
+    "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
+     "RowsIndexed" -> {}}],
+  Definition[$CellContext`$CKM],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489715423286*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"86eb6596-d624-463b-8591-7765cce1e4c8"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489715431004*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"20329460-4c5a-4694-95bf-5fce24890b13"],
+
+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.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897154418907`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"45504770-301f-4888-a0e5-648d6f27e060"],
+
+Cell[BoxData["\<\"> $CounterTerms are ON\"\>"], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897154982653`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"6f91bd5e-4a6b-4381-a2ae-1f4dc802e7c5"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> \"\>", "\[InvisibleSpace]", "93", 
+   "\[InvisibleSpace]", "\<\" vertices\"\>"}],
+  SequenceForm["> ", 93, " vertices"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897155146637`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"74c3926f-183a-4796-9f57-f03092638243"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> \"\>", "\[InvisibleSpace]", "121", 
+   "\[InvisibleSpace]", "\<\" counterterms of order 1\"\>"}],
+  SequenceForm["> ", 121, " counterterms of order 1"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897155765257`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"fc1dd8ec-c4f8-4f22-98fc-f8943764731a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> \"\>", "\[InvisibleSpace]", "6", 
+   "\[InvisibleSpace]", "\<\" counterterms of order 2\"\>"}],
+  SequenceForm["> ", 6, " counterterms of order 2"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489715591482*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"e8020980-812a-45ef-99b7-7d58bed40356"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"classes model \"\>", "\[InvisibleSpace]", 
+   RowBox[{"{", "\<\"SMQCD\"\>", "}"}], 
+   "\[InvisibleSpace]", "\<\" initialized\"\>"}],
+  SequenceForm["classes model ", {"SMQCD"}, " initialized"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489715597978*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"4233b12a-ff83-4b7d-993d-36f01140b6c8"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489715661771*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"47869948-ecd1-4af9-b875-01df3bf192d7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Excluding \"\>", "\[InvisibleSpace]", "18", 
+   "\[InvisibleSpace]", "\<\" field point(s) (incl. charge-conjugate \
+ones)\"\>"}],
+  SequenceForm[
+  "Excluding ", 18, " field point(s) (incl. charge-conjugate ones)"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489715666771*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"1ac59348-d86e-46cf-81f6-7f07deec8e69"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897156711273`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"be4046f4-afc7-46ab-9b4c-a12a208d214d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"inserting at level(s) \"\>", "\[InvisibleSpace]", 
+   RowBox[{"{", "Particles", "}"}]}],
+  SequenceForm["inserting at level(s) ", {FeynArts`Particles}],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489715675189*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"590ed1f5-2d5e-4d52-aa2a-521524e47125"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 1, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489715690103*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"b00f9b05-f586-43f6-a3ac-47ee5596a4a4"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 2, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489715733206*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"4c16b8a2-7923-47bc-bf55-a401337b086e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "3", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 3, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897157459908`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"9a4d1373-6745-46e2-bedf-084ceeeb3992"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "4", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 4, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897157703047`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"86eed2fa-2419-4af5-950e-468c5fc8760b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "5", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 5, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489715798156*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"a2282fbf-8887-4e98-9477-9d5f6d1b2b9b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "6", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 6, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897158151417`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"f91c9250-7da2-47b4-b52f-a65e91fecc0d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "7", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 7, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489715838214*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"3fd83e52-022c-4dbd-84be-a23f1b8c12e9"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "8", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 8, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489715866551*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"ed764292-1653-4656-a2ea-b82e47346fda"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "9", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 9, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897159079933`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"d5b36eaf-2487-4de7-82f2-b741d9ff15c6"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "10", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 10, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489715925074*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"fa11260b-327f-4c3a-9b78-8fac30899110"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "11", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 11, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489715968299*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"cf4549a7-9aec-4ae6-b884-a3b47e57e099"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "12", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 12, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489716009945*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"a0755672-a28d-4254-9cac-c3e536d5488a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "13", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 13, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897160770206`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"3d0c39fc-4140-4797-b15f-2a88b053444b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "14", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 14, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.77548971611657*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"52f23fe7-2ec8-44d5-b8e2-6d9fefdbcf5f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "15", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 15, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897161815*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"f84fac8b-9b5b-42cd-991e-5c15019c3cd9"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "16", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 16, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489716246056*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"44871153-0c3e-4261-b73e-52b51d05fc29"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "17", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 17, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489716285241*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"fe1e6cc7-5408-44e7-8eeb-74c2eb17bd31"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "18", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 18, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489716325119*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"cd8ba6ab-b5cd-4451-aa7a-29b82c645660"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "19", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 19, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.77548971636668*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"86b6b92f-22a6-41ea-a987-474e9174f33c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "20", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 20, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489716409329*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"442012e3-dd0e-4dd2-b282-d35c7ffd1a11"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "21", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 21, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897164482727`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"072923e0-44bc-4646-8b2b-8029d067181f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "22", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 22, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897164883423`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"40d18e24-52a9-42ea-b976-6b2bac192ef3"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "23", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 23, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489716530546*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"f741ced5-cc41-4bba-87d3-6967a7ce4de3"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "24", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 24, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489716572456*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"4a12258b-acbc-40e4-85d5-b71956bf9f9f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "25", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 25, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897166142893`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"26ee02c5-01be-4a5b-8e23-7b5740ecf00b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "26", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 26, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489716653975*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"909aa5cc-4cf1-4134-a6db-623eceea8f95"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "27", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 27, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489716694545*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"ab74d7c3-3bca-48f9-bf90-91962ad793e3"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "28", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 28, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489716734868*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"2c6d20cb-61d0-477f-9eff-cd5b3c58115b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "29", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 29, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489716802451*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"9e1d5d63-95ee-468c-a45a-47a173b62ea5"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "30", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 30, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489716844831*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"ea1b6e3c-1593-4687-9e7e-bca79b39d679"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "31", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 31, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897169211903`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"2a96830a-2747-4078-94d6-30d3e432c5ec"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "32", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 32, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489716962727*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"d8801fc7-5e71-4a0b-b0da-acd196653a94"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "33", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 33, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489717030937*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"49d5de5e-b904-4599-a241-7c89f29d1c18"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "34", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 34, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489717103894*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"c409cffb-eb72-4313-9ded-9e7646df22b8"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "35", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 35, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489717146905*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"a9c42256-77b6-4966-953f-996e7f4424fd"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "36", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 36, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489717215189*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"c971b94c-7055-46e8-8f42-92bf62b417a1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "37", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 37, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489717255866*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"fde8093f-3013-4f73-a87e-3fee062234c5"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "38", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 38, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489717325026*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"0d001629-ce93-4b92-a44e-6adbc7bbc315"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "39", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 39, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489717367073*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"9de29004-3c47-42de-97d9-7e5021721326"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "40", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 40, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.77548971740939*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"9e2c960c-02fe-4d54-9bf0-10ade211cdc6"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "41", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 41, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489717451429*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"f4d5c5bd-c09b-404f-83f1-6121f361aa55"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "42", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 42, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489717493026*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"c2b1216d-3ba1-4577-b3dd-8eb87edd64b9"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "43", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 43, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489717533836*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"ddae031d-a3a3-4573-a96f-d2a32183f65b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "44", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 44, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897176065063`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"83080bc6-77f6-41f9-a6f7-5d45b0a3f5ee"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "45", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 45, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489717647771*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"5940abce-ac3d-439e-a874-8677dc5b62f9"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "46", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 46, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897177169867`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"a2a7e806-c823-4891-89c9-0514dcb2ba9f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "47", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 47, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489717786447*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"eeda71c5-85db-4b6f-b072-1530f5f1b204"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "48", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 48, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489717824848*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"e6bbf982-d710-4652-a41f-fe78241c97ff"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "49", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 49, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897178933268`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"c2a7cf39-1dde-4342-bfba-3560297d5bf6"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "50", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 50, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489717932412*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"4a20e63b-cbef-4cce-83e8-c2c3f33bc1fd"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "51", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 51, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897179715776`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"c28ef418-a99d-4b61-8bda-90e9cd0dbc5d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "52", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 52, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897180129633`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"bfd191bf-55aa-4710-bfe9-d73cb6383e16"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "53", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 53, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718084612*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"808f6012-a961-4e65-bd29-7a53e0ee4e62"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "54", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 54, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718154158*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"e1e4a029-d8bb-42f1-8e4d-877284e9ddf5"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "55", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 55, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718194396*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"2f798775-721b-43c9-835a-b5ca45d457ac"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "56", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 56, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897182013197`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"80804efd-1ff8-442a-9e90-4a1205f6bd84"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "57", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 57, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718213079*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"fc10ef62-f7de-4da3-b483-c1d974b88f2b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "58", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 58, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718227118*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"b5069cbe-8912-484a-beff-19781e878655"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "59", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 59, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897182378473`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"0966a11d-4882-4b30-8b31-023a0b8dddaf"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "60", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 60, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897182420387`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"8cd6cb1b-0482-4344-8799-19acc4683bb7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "61", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 61, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.77548971825671*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"2549f2b3-f306-4cd4-a6f8-81daf0343e2a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "62", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 62, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718272978*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"e992dbcc-c3eb-496c-9aac-5a1569a2a1ea"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "63", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 63, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897182799463`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"096a688f-5ef8-479f-82e9-f640aa79a4aa"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "64", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 64, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718287404*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"22ac10c8-525d-4e43-8c86-670c84529870"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "65", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 65, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897182931843`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"a0290ced-13d0-4a1e-a400-7e3373d885a6"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "66", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 66, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718297657*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"bcfae30e-7bcd-4dd3-8dc6-32b6a9fbba88"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "67", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 67, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718301962*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"e0c9f492-f3f4-473f-b226-e2f4e1da03be"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "68", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 68, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718307991*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"4a28e937-cbb7-4ff2-8b85-030bc207001b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "69", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 69, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718315466*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"d43e20fa-75e4-44dc-bf1a-9a3930b2102f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "70", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 70, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897183216267`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"f3470329-cbfe-4aab-9a92-7fe3182802d3"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "71", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 71, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718328244*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"33e6d154-8864-4961-84af-7b088d0c1d6d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "72", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 72, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897183335733`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"0a1cc530-3504-4e6c-8ca2-108d9e0929dc"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "73", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 73, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897183378363`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"8859e214-8f28-458a-86f7-9845a83b59c6"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "74", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 74, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718350709*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"3494269d-7ca8-4840-94b7-7df30938c5c5"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "75", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 75, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718373087*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"64304681-dd46-4470-b392-15116814eed3"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "76", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 76, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718380456*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"b8bb4c71-bd91-47e1-85e7-7cc74ae339ea"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "77", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 77, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718387946*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"a9fc632b-ac2e-4d12-845f-6ba9bb0fb88a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "78", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 78, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718395114*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"14e5e342-04db-42f9-9dcd-e54b27381556"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "79", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 79, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718402483*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"68cbb07b-ff1b-41d2-9408-97a139ca04b4"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "80", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 80, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718409083*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"ade50005-dc22-4549-8c48-ca1c2f4f6179"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "81", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 81, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718415762*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"f19201e5-fa6c-4df3-8177-4f4d85a0deb0"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "82", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 82, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.77548971842268*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"376cdf29-de05-4896-8cd1-d653f4329951"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "83", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 83, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718429989*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"5d1726ba-e7c8-4ea5-8383-70a46e2dca56"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "84", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 84, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718435113*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"6289e36d-04de-4e90-8bc7-fea404ee7ae6"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "85", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 85, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718440336*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"1596e7c3-f4a0-4f54-b46b-5c85de8d227b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "86", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 86, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718447263*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"aa60764a-022f-4534-b590-7985930ab71d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "87", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 87, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718451652*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"a63d9a20-9fcd-42aa-8251-229ed14fcf0b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "88", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 88, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718455735*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"d5e47eff-33fd-4ab0-a3ec-3f56a6fef96b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "89", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 89, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897184735603`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"237304f0-3673-4c2d-afe8-3d7a7ebe249b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "90", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 90, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718490151*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"c829a173-07f8-4df8-8e1f-eb918a3bc6b1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "91", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 91, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718497551*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"e4453bd4-d618-4b7a-b024-d657ef4957f5"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "92", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 92, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718515517*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"933e4c6a-54c2-4415-a419-34b52bcef5e4"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "93", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 93, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718539221*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"3754f430-9482-4b0e-8e5a-78228e95e7b7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "94", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 94, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718546434*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"e5e28447-4da0-428d-adeb-3d0f178dc854"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "95", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 95, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.77548971855304*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"9e930076-0112-457d-9050-59d77b2c3f51"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "96", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 96, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718560438*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"83743332-28b4-4f4e-9a55-e7411e838cac"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "97", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 97, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897185764923`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"5a867892-be28-4a5c-913a-cd64118dc1aa"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "98", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 98, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718590556*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"29b71846-a025-4f89-ac63-d818a7f3b614"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "99", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 99, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897185975933`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"2bd90177-8624-44ca-892b-190c3a5e0d65"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "100", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 100, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718613126*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"989dc8a4-be6f-4994-baba-bfd5217241d3"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "101", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 101, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897186343307`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"1c9dc131-7797-4b61-86ac-5a0c1a0a4d7e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "102", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 102, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718651444*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"1d94d72f-145b-438f-8c3f-eff4ed502617"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "103", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 103, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718672349*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"5d87cb98-4c45-4ac9-8d66-d3bacef1ff18"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "104", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 104, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718676862*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"9a5bfff7-85c1-4ea1-ac44-b7fe9bc3fabd"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "105", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 105, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718692144*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"5465c028-f2a0-4734-a77c-141afa5f82a0"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "106", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 106, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718705859*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"c3ca4913-3ce5-4844-9e77-ce5def9e7fbc"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "107", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 107, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718723625*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"ae7ec018-75eb-4d88-8e45-5e2518b17411"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "108", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 108, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718739016*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"cd4cfb19-6da6-4b99-a609-cb200d0a907d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "109", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 109, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718745929*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"8751b8fd-1b76-40cd-a0f1-a95a97697501"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "110", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 110, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718760103*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"1e8c121e-fe1b-4f53-a047-bd73813541da"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "111", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 111, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.77548971877291*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"e66c3f4d-4baf-43ee-ad7d-f1cdb877d6d2"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "112", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 112, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718789297*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"307c1338-c863-48ee-ba46-8040507dbaf1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "113", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 113, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718806192*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"8428cf6f-dc5d-4ec1-bda1-2e9ec4425dc7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "114", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 114, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718812619*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"586bdfd8-dbe8-4cd4-ad63-16d68f420351"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "115", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 115, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718829645*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"1ce4b55a-4462-4f08-beec-bfc80aeafc16"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "116", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 116, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718850177*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"fbf84094-2be0-4b4e-b2a7-1f47a58f31a4"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "117", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 117, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718867133*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"c7c1d120-76e4-4976-bf75-6d286d33f0af"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "118", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 118, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718890278*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"40f00b9a-f076-4a98-b7fb-d2699bfe1e97"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "119", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 119, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718897571*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"9aea03ae-78fb-46a4-959c-a632ddd3daaa"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "120", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 120, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718905088*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"76d91400-d6dc-462b-b084-79572499fab2"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "121", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 121, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718910833*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"97422370-545d-42ab-bc13-4ee2d682e759"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "122", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 122, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718929118*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"b21763c2-bbe3-46ab-8865-385f591d934d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "123", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 123, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718949257*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"23d43de6-7477-4fc9-a2c8-82a3b7649e4c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "124", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 124, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718969486*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"996eb42f-d851-402a-836d-d4d08d0227e0"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "125", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 125, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897189876204`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"994f9d96-4be2-4fd5-956b-db163a49ff23"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "126", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 126, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897190077467`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"5f2069c4-cd84-4600-b781-1e0cf77be806"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "127", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 127, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897190144567`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"525bc282-fd37-467e-8572-423278fbcdd4"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "128", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 128, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719021163*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"8dbd8c81-2f54-4c1e-86e3-4068bebc0392"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "129", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 129, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719039714*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"de29cfe5-bd1d-4218-8f3c-2ad061965406"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "130", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 130, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719057173*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"d7bd272b-523a-4d0d-bdb9-13a8ab9c0035"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "131", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 131, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719063994*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"8b339b22-b856-40eb-bfaf-5abe17906184"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "132", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 132, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.77548971907968*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"c1418234-3828-4e6b-a7e3-10dc4d4fd069"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "133", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 133, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897191028757`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"19079ee2-5f3c-44db-ab1c-2276bd747d64"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "134", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 134, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719120647*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"184b99b6-3396-4806-8cc1-a8c97c30271e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "135", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 135, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719139132*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"9abf7886-0435-4716-adae-2b40526a092b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "136", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 136, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897191436787`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"4cdb8b07-6ea3-4251-aea9-de18730afe7d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "137", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 137, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719148692*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"362ddbbc-9592-4a4a-9415-8ae9c7f530ad"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "138", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 138, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897191615343`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"4b1a34ec-d25c-4125-9e16-fa0442261592"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "139", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 139, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.77548971917342*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"ae0838c5-1d04-4af1-8968-3e10ca495bbf"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "140", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 140, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719190353*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"1d9d9f94-eb7d-40a4-8e3f-2f0185517645"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "141", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 141, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897192054567`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"98b19f6e-57f2-4b12-8e98-66a70b62cffe"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "142", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 142, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897192099657`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"f51fe13e-3dc0-4302-91af-6b45682d4dc1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "143", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 143, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719215033*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"b8da9f1f-ca1b-4c13-9da7-68d2d30d181c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "144", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 144, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897192229967`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"d03f960d-a985-4724-b525-dd7047d7d869"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "145", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 145, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719236899*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"5fae7711-eb05-48a7-8e45-39de243c9901"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "146", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 146, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897192554407`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"9058a6ec-2677-4390-b62a-f7f1aa0bb92a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "147", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 147, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719259935*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"b0d7f8aa-1f5d-4d67-9741-4fc437add9f7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "148", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 148, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897192649927`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"e15ab415-af93-4c41-bc39-e22f0c3c38be"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "149", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 149, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719277667*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"e7d661ab-9386-45ff-8a04-87e1c95ff8b4"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "150", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 150, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719289123*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"9f9aa58f-3b1f-4808-b047-c967807c4e93"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "151", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 151, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897192936697`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"d959dcef-4e60-48c1-a7a6-aafa63b4148a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "152", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 152, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897193103456`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"ac11dbe3-d591-4f32-ad94-f779d0c8400b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "153", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 153, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719324011*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"ce4a7715-19ce-46fb-b822-28d77a0fabf1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "154", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 154, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719341488*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"6bb08b23-3c72-4e5b-abc7-73003c3fc261"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "155", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 155, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719356524*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"b20c75c7-1181-4a1b-b8ac-e72e92b50561"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "156", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 156, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.77548971937158*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"ebd998cf-24bb-4eb2-83c3-8ad397fb14cc"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "157", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 157, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719390924*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"bc838b1a-6863-4410-bda0-39dc771ed636"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "158", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 158, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.77548971939671*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"d9e7c7db-572d-4067-861e-cbf3afe77521"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "159", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 159, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719415822*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"ae8782cc-581e-4f76-a939-956fffe0ace6"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "160", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 160, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719433983*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"4a0d7cc3-4eba-4f89-a344-fd6a32562e1b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "161", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 161, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897194576263`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"35db92c4-0d44-4217-afab-d426be163229"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "162", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 162, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897194653807`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"2fdcf078-527a-4c0d-8e30-58706d244691"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "163", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 163, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719473246*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"fc6a23a1-f2b2-47b5-987d-323a5a88fd8b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "164", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 164, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719478553*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"5776850a-a04a-49e6-ac40-400c4f896b2d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "165", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 165, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719496035*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"e96f9759-0bef-4290-bd3b-3503f0b0a411"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "166", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 166, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719512887*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"5b70a5af-6e87-4b06-a20e-1410998f03dd"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "167", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 167, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719533362*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"7d094c60-e2f8-44a0-af91-9cf9d4e2fe15"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "168", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 168, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.77548971955414*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"3bf08d18-0602-4a03-909c-894e3bf74dcf"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "169", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 169, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719573248*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"ec417ae3-5f5e-4017-bd56-96061adde86f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "170", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 170, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719591024*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"02e9025d-b120-4019-95e1-46e1763691fa"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "171", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 171, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897195990953`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"b07ab67e-435a-4b6e-a82b-5f77a8e91d93"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "172", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 172, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719618421*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"938cd681-f9d7-4a43-81f2-07913fa20f2a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "173", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 173, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719635393*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"39c6fb30-8d6a-4d8d-9994-6f42bae345f9"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "174", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 174, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719658021*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"93ebc516-cebb-441b-98b8-8f4f1603bce9"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "175", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 175, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719666271*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"0cdd4c37-697f-4767-ad55-4f92221a433a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "176", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 176, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719673787*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"c99942db-c4ba-48f0-95e7-30dd8f17f0cd"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "177", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 177, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719697462*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"2335ac84-67b9-49a9-a017-09a8e0c4a6ae"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "178", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 178, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719756256*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"0eeed8f2-195e-40f1-802b-caf21bd038e7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "179", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 179, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.77548971977162*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"4d4b5c1c-d382-41d3-a5ac-52ae3f900f67"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "180", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 180, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719789381*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"9a772258-6339-4d3a-8514-d40583d2778f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "181", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 181, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719796521*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"9eb11ee9-9ac4-4873-b466-da4df949403c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "182", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 182, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897198142567`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"8f962adb-c1f8-419e-9021-a9d089c460ce"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "183", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 183, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719832803*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"de26d80c-4225-45fb-8024-3ad5d34d3057"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "184", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 184, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.77548971985709*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"1bbac5d9-41b5-41e7-9808-b25a5a990907"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "185", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 185, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897198624887`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"0efcbad6-30b2-45be-bf8e-31907797baec"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "186", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 186, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719869927*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"876194c4-d5d3-4a7e-8bd1-daf467109e1c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "187", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 187, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719885252*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"44f91fba-ff48-4310-a043-4f7922319abe"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "188", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 188, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719907349*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"1aaf8a65-c5ef-4f96-ab50-7955b095de96"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "189", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 189, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897199156*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"44adcac6-6fa2-4597-87be-3ffb65a19018"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "190", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 190, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719923448*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"8fb3435b-6e9e-4561-b825-6e9f204aa4f7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "191", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 191, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719928542*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"78a848a3-9036-4d5e-a10c-a330d2a260c8"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "192", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 192, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719945889*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"c8f2fbca-0008-4335-b6e6-c8697073261c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "193", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 193, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897199684563`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"1dd6fc8d-3779-4636-802a-4189f9f826a1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "194", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 194, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719990138*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"388b48db-dd6b-4f2b-b280-7b5ee2a4632a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "195", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 195, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719994883*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"eab3aa0a-50a8-41ee-8336-7f644178464a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "196", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 196, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720009742*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"94f1163a-105e-471d-8089-7dc3b1dd1730"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "197", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 197, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897200237637`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"a47290ef-0229-4a79-9948-295c1804c33a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "198", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 198, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720039979*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"03f29486-c7a6-4203-9a7c-53159274b2b7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "199", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 199, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897200580587`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"cbc2fb23-86f0-4eae-967b-646d27f0752f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "200", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 200, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720065681*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"02254409-5700-444c-96ee-cb7782f47981"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "201", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 201, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897200863523`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"9065b45d-d3e6-4550-9f25-f52c7ab5d2a1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "202", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 202, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.77548972010463*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"cdc4b55a-8a55-4374-922f-4330437d08ae"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "203", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 203, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897201226797`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"d487652f-a859-4abc-afba-90fda9a6d284"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "204", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 204, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720130175*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"e9a8016f-8abd-49e5-bd30-03487dac0600"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "205", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 205, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897201438828`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"f6627aa5-a63b-4689-a531-f9fd9f6ff3c1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "206", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 206, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.77548972016718*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"82f0b7e8-37ef-41e4-96d9-dbaad94cf023"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "207", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 207, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720189369*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"470836fa-a4ca-4f9b-bd23-4012d16256e0"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "208", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 208, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897201943617`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"7a3100cf-d9f4-4a9d-9228-68fb38a558fb"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "209", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 209, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720207704*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"659b8e73-896e-4f34-bc5c-02830044a3d5"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "210", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 210, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720221422*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"5e8da35f-7756-4964-a518-c013f255e3c4"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "211", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 211, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720241439*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"46a50121-a9bf-4d85-bf5d-dc7b652d1144"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "212", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 212, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720258441*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"0168d062-0bce-4e4b-9be3-0bceaac87900"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "213", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 213, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720266201*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"67e103d4-033a-44ed-88f2-b30d4465084d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "214", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 214, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897202847347`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"d896f028-eccb-4ef2-988b-6a7e9b0e3e27"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "215", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 215, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720304941*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"dbee16e9-9956-4c34-b23a-8fa37f409128"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "216", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 216, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897203215857`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"e676c012-a4c6-4953-90bd-224568353817"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "217", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 217, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720341267*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"dc5e52e2-92a9-45ec-8395-a9cf7f422b37"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "218", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 218, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897203469973`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"3ab2b64f-f0b7-4977-bf1d-7a0531297e92"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "219", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 219, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720362857*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"7d1e18f1-81b5-4def-902f-f07f5c784261"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "220", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 220, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720384502*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"4b5c0666-679b-45ab-8f9c-57ef999a253e"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720405278*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"d4b21011-912e-41ab-8f93-a111da7aa8f6"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Restoring \"\>", "\[InvisibleSpace]", "18", 
+   "\[InvisibleSpace]", "\<\" field point(s)\"\>"}],
+  SequenceForm["Restoring ", 18, " field point(s)"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720409787*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"16a9d063-9e47-4005-8b9a-4a83ec00a456"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"in total: \"\>", 
+   "\[InvisibleSpace]", "\<\"38 Particles insertions\"\>"}],
+  SequenceForm["in total: ", "38 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720414917*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"60607d17-8a34-4d71-8d39-5f6d6f4dc615"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgeg/igfhfihi.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 1, " ", "afbg/chdgeg/igfhfihi.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720419725*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"afa00712-e173-4895-a5f8-fa233ad4295b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdfef/ifghgihi.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 2, " ", "afbg/chdfef/ifghgihi.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720424492*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"37ce906d-2da6-487f-842b-f75452bcd614"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "3", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbf/cgdhef/ifghgihi.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 3, " ", "afbf/cgdhef/ifghgihi.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720429263*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"af97715b-8780-4377-88e2-aec6617418f0"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "4", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbf/cgdfeh/ifghgihi.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 4, " ", "afbf/cgdfeh/ifghgihi.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720437653*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"8957ac75-5a1e-4107-aa6f-de7b162718e5"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "5", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbf/cgdheh/fihjgigjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 5, " ", "afbf/cgdheh/fihjgigjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720445388*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"74454467-d658-4fc9-aa06-a309b7b0df38"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "6", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbf/cgdhei/fhhjgigjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 6, " ", "afbf/cgdhei/fhhjgigjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720453463*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"daf03625-85f6-44c4-a69b-3ca42a374fb1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "7", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbf/cgdhei/fiijghgjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 7, " ", "afbf/cgdhei/fiijghgjhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720461319*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"504ce6be-8fdf-43e3-aede-6d18388e9714"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "8", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdfeg/figjhihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 8, " ", "afbg/chdfeg/figjhihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720469675*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"a4d9beca-397c-4845-9373-6d4f19730fcc"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "9", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdfei/fggjhihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 9, " ", "afbg/chdfei/fggjhihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720477262*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"bc085677-7c1a-48f4-9cd5-dac4e0259c00"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "10", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdfei/fiijghgjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 10, " ", "afbg/chdfei/fiijghgjhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720485121*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"4610ee3c-edec-4f45-a932-7994ef64cd37"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "11", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgef/figjhihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 11, " ", "afbg/chdgef/figjhihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720492548*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"54d75cf0-4e08-413c-be98-fdfd4703d4d9"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "12", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgei/fgfjhihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 12, " ", "afbg/chdgei/fgfjhihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720498502*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"3a41706a-380e-454e-a7f2-692e44ff77cc"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "13", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgei/giijfhfjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 13, " ", "afbg/chdgei/giijfhfjhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.77548972050562*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"1d2a71d1-aaa2-4ad1-9129-b78664e7eab1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "14", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdief/fggjhihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 14, " ", "afbg/chdief/fggjhihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.77548972051326*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"074c3978-eaf7-434c-ba91-2c3141f81334"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "15", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdief/fiijghgjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 15, " ", "afbg/chdief/fiijghgjhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720518816*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"930c5b8f-719c-4dbf-958a-62d68fc46958"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "16", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdieg/fgfjhihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 16, " ", "afbg/chdieg/fgfjhihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720524228*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"e4634487-cc5a-4ab4-a1c6-1721aee36cc1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "17", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdieg/giijfhfjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 17, " ", "afbg/chdieg/giijfhfjhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720531748*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"530f44b3-f7af-4032-a329-45c7bc81f7e4"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "18", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdiei/fifjghgjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 18, " ", "afbg/chdiei/fifjghgjhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897205400553`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"12f670a2-9c97-4115-b9b4-bd4acc18878c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "19", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdiei/gigjfhfjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 19, " ", "afbg/chdiei/gigjfhfjhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.77548972054771*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"7b783d4c-0b65-4266-a396-41f3281ec481"],
+
+Cell[BoxData[
+ GraphicsBox[{InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt1gtQU1caB/AjtjwEIshDtlAQzAKuRUOX54rJpUKxksGAvCqMIiOIGiVF
+aYMiG4Uqsm4LiDa6FHkEDUIhIkKwyvAqRJYuEW1BsBApICLViFgDIuz/dDcz
+mczv5jz+35d77sQxPjksQY8QkoU3/STqRbz+xJA/XhyGjPyrNboQLu755pBq
+PUOazpZyXOBV9iuCLsDpaYrCMhuGmI2djjgMbw8uDbGCxS3EOAa2bKkVSlYy
+xMfqt/AQuIj11e4n1livwFlK/TDQ6/twWNpVVEXHd6RPDnZYMSTa1nKYrld7
+0XliE2x4t0onhVPO/pDTY8mQzdku/A446aqbWghry8xVc3C7p/e79rDqaZH+
+e8ivb+FZNGrBEGXUpnZvOH2fm0sLPH8hPigCtkv4beN1uPvFmN9nMCfV+3wj
+LCs5F58DW68aMuiFp+62FVyCB+Tul2dhxXeVAzUwd65l+AO6n2hBdBMeXWZX
+vgfWPF7b2wRLkoYKyuGCEya3bsE7/vPx2hHYJKvmwzo4x9rzpQ3q8xtbJymn
+eWe/rg+EZaoc9zy4UL5QuRtmX6w2E8MaG4PiFNqP2xrbGJh/rHflAZhzY/bI
+Bjjfz14YBgvu96XQ+rd87DHoCGt81tdMoz9TBi55g9hf/At/vha+qP69XAL7
+REljxLDcqc7cAm6W57ED4bkAh2/OoV7pgu8OW7j+TVW5MazOZVXMr0OOpV4e
+aSsY4toZ6zYJ9/ePnxsxx/2gqPlqFO41Dgjmw4rDw6NPYTud/92bZrh/uKzv
+F+H0rkzRh7Dg628tHbC+X8OV9w8uZ4jOffyLzTTvxiIjKQv7eXEX0mDxC/uX
+j02Rb6Qo6Roc+0vTP3bBYvYynylYZLqzWR9WcLeNWqD+OBlf1meC60LPBg5s
+Kf1C1AvLDpl/EgyrvDvPv4TnD6oS4+HmhMYJT8y/df62Xiqce1Lekw9rqgOZ
+E/CUJrxAD3lUU3rHTsMzaypq0+H2js4oer+0p7l56WAP3Y26LNjPiWsrRD18
+/QNN9Pdjm00oemB26obRRPiZvPSoKepvDk78aStdn7gdXQ1rHG6mecCiyEfv
+uMAmofWPrWCB9SLLGpYEHLk2iXpNGpQPh7CeujPPW077Me7ZkQA3PxOy9sCu
+se1ercgTPZRxfw2sjl6Ieo164pZkvp1G/038P18wok4bbGiHmRWbUgn6IRVq
+7hfDfJfLviPLcF4vOt7IhsXziooGI9wvXSLfY7BrxM6K04aYdzWqMQPWueh9
+tMuAIRMDcYtnYJsyKyZIH+OzYoOv0PkV393b9C7q6ju1vZuObz/lveMd9PMB
+N3UO5gxnxxcuxfWSsuPrkTdr65sOPVixVfTeXjj3QbBTgR7ytryRy+D+a4Kd
+obDP9sjjw/R5pIk54wt337z8d2P0K2Bf5tgnsMbrn6Fsen6Cq6ePwcrhj6x9
+YSHLQdkDF/ZXPtgMk0zha2/s90Gh/lAYnR/oklENy/6qK4uEmc6fM/6CvLGP
+pp9vg5PasrWlMP/Kre4tdH7NuJaF+nQBczn0PBZnVbATYYms7bYzrD4RsaIE
+5txL9DClz4eQhEONsKvwb7/S/HLDQ+KrsKKN7V8MC1qPvBXBZlF7zHbAhg1v
+K41hw09lc/Q8svn5Rkexv/hkjPwh+qfm+ae0IK/GykRWCscNPl0YQX1aq0Ku
+CBZtVEePLUG+Rc7nQXBSKCu9h2D8nRzNGjpfnN8XtsgjysruCzawoGFD/et5
+HlnVcNDHElYI/L+9NMcjuSGDHXaw9ssfD8fqeEQ+8bbVna7Xd9Kf9zuPKKY7
+V4fBqtr6/VEzPCL6OXl3Orzq15mVtdM8YvbkeUE1rIz+TPrpCx6JmzVPHocl
+4ifz4VqM73JKdkR9zVXLz2x9ziMaS//nsbDGoD+j7BmPiOMdAs5TlzxeWgRn
+7yUDXbBkIdyPg/Hq1dcFOtqvn1gHnLBedkLNFhb9/dtaMjVwVkzmPH0+KoI8
+f2jF/u2apBJH+vzPrTZWIp/4wJUhakY1FV/9kkcMD1pcsoWzS8z/fRb1qJbP
+WCyHlVqj+chXPMLZ358wi/3IvXWOE/DmU3O7aB7lubVf+qIfTOf1V/mw2d4h
+ZwYW2CkjIqgvj3BmMF6ZZz1nQfPPKkJCYfGf92Xepf3Krx+MxH7Ni6FFubSf
+jrsmDZBH2ZU4vo2ev21qp/3ILzk9ced9en7MXV9Zon5BTnSy1g3rSUzzxiZ5
+RMq1L/oR1rrXpSSO84i2xaOyHubcOR7R+Aj9Yl3fV+VG+z2gXjqA71d3O9dQ
+L6krUKmxnlZe2AQzxvf0Wc3oZyB38YHb//8nFN/+3+c65r9ilhyv
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.907871335428632, 17.11903631971389}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1wk81HkfB/B/jpUjR+4RjeOpRO1UK6LMn4gtaqhcZc0KW4ihrKdc07Ll
+KhN2i20zZTt0aFRscjRSrQhDJKuiErrWIDnj+fye5/F6ef1fb7/f/3v9/jP/
+Mg6M9AyWoSjqIX7JlRqbxY8pTf33R4empvxz02phzsFFpce1afELE2leAsz9
+IbTcVpum86PFBSyYdmqMm9WiqXEr893dJjQl+st67BXsocmayISZ25LS+7Ro
++o7QYs9amLNNtk9Rm6bWnPEulRrTFMu7U20T4tcIbuddgTmDWxLPYz1SITY8
+Gqb3Bbno6tD8p+tjZtbDPceKA0/AvvaKySYw/7Xb5EJdmm5K7UpShQXVuQ+K
+dGn+AbsP9xVg9aqyyGV6NNU6oLJ/HizJtJUW6tHi9+evyRjB4jnmI1/p0/ye
+leE+1jDz7egSD32aaj63uM8Llrr+eSwRTjMOfniAxMsYLMzUp8WcrJHhU+T+
+2/qZB7E+3214SxWp13M141t9mo7ZoTDSQerrrLo/qUfz25gFdu9I/uijaTmo
+Z2vN4okhWJidWqyHeiw/RqZ+JPdrVqQIUP9mjYK3XTAvoURVRpem1N4UNFaS
+eW3/sXC/Dk1PVLjmC4gHmJmDmFcsQzHYh+R7ZHj2AFxntatXm8Rv3jKih/le
+ujri08DEfmknr1WLFj/2souMg0XL264UwWERYgNzWDIVdEmI8/sQ39JXvBB2
+vnv3TziQ7SinCXOyUoQf4fTtU+tTjFDv83QPtjbN1xr8p0gB5nsmRVyEXY1y
+NpwxRL4577ab4rxGb3CpbTBfqTy2CM+XXdNQuDEs5bpeXYV+F2XWVSiS/ZOb
+8m7DsdadN5RhXukvStaYn5fPWK0ZzLRM33kWHtBw/ZcHLJhdLfmMeX736t28
+TJjjwu38Gufhs2DFUDOJ5xG/YyPOV4+tUK+D+kS7wx87wcZrLof5kXpza8MW
+wvkHf2zLJeu/Z0x2If78sZBEMUxtPD+QAGusZRU9hXnXteSUkO/85EheJ3F4
+Gvswzsc4Y1Mj2S+WPRc4gX67b8noH4Ulw4rXQtGvDLe6wp5YUznpJc6nMKrC
+twP1iTLmvQ7CvJ5mSvp8YcmbOscpLZpv8U9HYv0CzCdhp8Il+LI0Z/lymK9Z
+4RmD+TNshq6lG2A9z7YuAO6qXGXYx0C8MNaeUOx/4ahTsAHmje8/kot1l77F
+jOuYi3QmuakLfnqoqnsZLGqrDlyL/CuDT4VUoy+m0TLtEtQXc8tA7QdY5CZf
+tAr1/x7WPWoOcy94L66C200yOhRgyvjA2g04Lzq8/ysKFpxzzf8L83AemYpR
+h1llS/xsMb9eZmGLFcwLzfA9CV+kzYrDSD7KJvMZruKwhLtXcBUaTbFlcR6v
+HBy/HiF/z1+9WQl1bij1bbTBVXj8ls0Q7q9hxfNjYU6EN6sc+7rNjNOKYIn7
+pFwwvPJEdstDWFDxenYc9Q18NlzZBvdo2lw6CCePN1+8T+I11/wkxXm5VzUf
+OgXzbj45/z36mzfXLsIHpk5/jG7HfK78siV1ktTr2LtwK8y1uej0MyyZYQa+
+xLzP+nt6TKNvickfaocxX3bK/qAgmLv1Tosz1pMdDL7cRdyegqN9prBbW7y+
+ESzI2jdqjP2fXI73xWHufMbgOBvrfu9W7yXfoxTvpX08rqajdg7euApKNic9
+xlX7aObqbk2cp0PgXAfcpxMTxUyE+U27v1TD9UudTq+GhY+iz21Af0rdLuOK
+MMeMf1+CvEF3ElTH56Mei7g5XpgHx8/XbxbmTH20b4ajJGtlDbGftt8gtxp9
+SmsuyrmTeEaXmlMwf13GwqB0WGTdyv0Tdnv+Zl8zLLmuNFyP/ZXfWCzUQZ28
+ggB/8lxt+/2YnQ+pf4+MZTb2+y9t6MqCWeaMLFf45ImvC8j3DKUX4PgG+UPT
+KybqYaGast9ezPF8uEHUAxLvfdVMH+qfHuU0XCDxCvsYvuhPufcXywiYbys3
+U4/+v3vSZ8KAJeN5k+txXtly+aevknk1TMg2kHmW7npqAYs1lTxC4EcvTRfl
+oX/W2bdzDTB/xr074kkN7D8k+fIB+8pCNBO9YI5d44EXmjR/PPfCT9fVEf+q
+KlMKv4h3GdQirvfqZSLeiprjhgpqmJ+Coj6p67h8sbqCKp6HNt0ccn5XdC58
+s3Ie8nf88xLvP2rsbefdYyroxz/spATWN2jwZ8IikVqhH/o9c3JfT78y8l/+
+cP4V+fztfeL5Gu4xdw36HvMxr42RU8X+Hla7rgTe/m+HBi6xakj7Esz/mXPJ
+rlbiZJ+OELi4l/rojfw8Tk71YbgtXiXuDSzMqrhDnKNjURaBeoXqThVkf829
+In4/LHLXYpN4AlN2nhP64/eKopqQL4UaWxEPizun+/3hjCfX9h2Ghfce/vAM
+9VqPbej3J+sOEfkc2H92sHoW8WgO70YN+vW9/3wqDKbsh9SsyfvsFR1xjtS3
+7N1j8lyIWk5mlaB+Tmtw+kb43bHNa06if5FNZeMnnM/TmEi7XUqYr03o9G34
+9IRyp6EivC5mpgDe1shc0aaAePoRRufgH9XGfsv+CvU5G40/hGdPJMsHy+O8
+l9QlqCB+ZG2Mu5cc5vXuhuYeeFOUb2mkLPLN/Cr+mzyHvVFBt2SwftGNtwP1
+HmluUrCC1WW4zr1wSbYwp38Onqd1xqN70e+9aQ3zZuLKaPMheP9aWZMBWCC/
+/HUI5vXsgbyjJe7nKk501MGNT+SVcmCh4MwDDcxb3sl+6Xzkl1C5VevguqhE
+ldPE8lVbNsLmDj9HLkW9dKxGKfm8Cvu2KF+GRSfmtsvCi57VWmmhP5Z7vO1N
+xLcK1UnaAfc0HR/aBH8xu7vu3zA/f58H+X445VMmEwRTKjdvusCZfxQNMmBe
+tJ5ZOfpTOTj3/W+Iz3nmOG4Bt7DvFQ+gHk6cRSz5XLKOrimRh8WD2dEr4Roe
+9+0E+qXU0j+0Yt6nRkOimijsD/j7wVHyvRS8Sn/BLJvi1aUeCoFtRqnladNs
+ShLzUjmAnKdZ8qPpCTYlskq+FAsLVri6Zo1hvf7BSDF8sUzs5T3KprhJ11/N
+QT6/x/kvdo+w8b6Imw2DPQtaPjweYlP82pjf+uEI+4jnhVLEy3IzjED90i38
+w1WD2K99xHccpi/JL1OCOXNvDCeif0tzf39Tsp5iWTkJP9r5k9onWPxxOyMY
+82Mp+TQXI57whNWOW/Bk+arrp5CPa9MuI4VVRgMCrg6zKeneXQqK5N+jz/be
+qEN9nMShiTmwklh3uv0Tm2Ltuqzfhf0RDgHrq9BPz5lUzq+w7UirYPdn5Nt0
+Vt8afpJroX4f5qod9iTvldaQtnn3YOHTsYl1sIhlVrkDFoVmdovQz4J1g2VH
+EI8u8HQ1gWfc0+y/RT7151uP5mEeS5UZiy+gPtY3CuWGsMlNw4Sr6Ec63LOk
+FPNlVYv+6vyAeV8esg6G/6gICB/phz1Ux1bAqftt37e/ggucP5P3Bt/EwCuo
+i00xBxJNlsK8eY2PoltQT5ta+Xa458B3O0PFiP9w0OO05v//35Gx7n9XLfo/
+Yw2y2w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.077403306263033, 4.30673387473934}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000002274`, 17.}, {13.500000000002274`, 16.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.552325660469876, 17.180083206945802}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1ws4lPkeB/C3miJsOwkhakS55DIJsYVXsbkU4xanJJWkVpnSZrZSUxGl
+llp3ZSeVW9g52Fw3kyJTsxqlci1Jsi41KnFQzvd/jufB83n+l/f7+83/fXl1
+doZ77Z5JUVQnvslvikl+6NHU/77UaCosaOflpTCXPhgQBzv+4qPDgWUt81sY
+C2lqSiB/LZbMb819zIU/m4ekPIBZi05wG+FGjyz9ectoStRQUS2vTlM1UW/Z
+/4JZXqXVZvDGtr0BOTCnZyR5Ldxq+8vaT8TqwiQyrs4pCbFdTlNBrGxdBTJe
+/X3CaThxi5KoCftLK7OuiWBhx5tOPlwzLWobhbt12DV6cEDP6DOWPk3RtwPt
+a0k9Bzbl0jD/eZbQFx7qbu3wgQWW+bHDqvCsG2e2wYlfzxtfgNM0KPZWmPLS
+qbaC4/gGw+4wM3dAPKJCU/2b46x+gGV1RVZ3Yf8ten2LYc4ji8lcOCmqZ8k0
+8nA3UEp5sOxFik0XLPspZF0dmZ/zWlANU+sWeH+Br8TNFF2BpY+9m9fhesGv
+pD2k3qA9cvY3YediOW0uqa8l2kAT+fNKGatCYNbpNW5X4bVLp2OIu5OD6g1R
+f3fVb4xDMEd6eWMVHJfuzToHC/rn73VBP49PPGy8RdY3fyxphnsnVoe1wfy2
+6/PcNfD5pvzzlYl6RCaL+irhbuH0DE9iL7OA+ZrIFS+flQpLee2RnvDa83eL
+ekj9b8848WCldOUOMwPUG9o+FA03Bq+uOA4LBlyrImG9lSPtDTBzIG+RF8y6
+lDimaIj1waaJanCoYd6ECywMPnuhEdcvEzuzTsLcS4t8wuDPvXVyBbD0xwDx
+HFgWzbwnhoPmKK6+inqCYte87oIp8bSKJayktTGiD5bdGHn4FP2Q5cYp9pL5
+ql8iTsDM0u/LX8CCeVtv2sAXshZ8rCP7c7aumQtbP16TmkvmNwyYyNBvkf7b
+h7Ekn+qJcOLP9w3f7Cb5n9IvFEi/31dvciTj74oW2sNl5yoOL4NZ9p/uxsPG
+E4LrpF7pswnf9zCrvmB4nPRLujtwF/LKn4hW+wCL7tOpfaQe/aQTxAI/kXYE
+6m09eGHBJJnvJ8uZhX5Z18/+UZnkix2pukzcl8CwJPWvNfuouQg56iJqdsL8
+v16tTIUZRtpBGSSfnNHbmVrIfb/3UDtZ/4nL3gJrOd3W0DHCessYrQw41LnV
+LAwWmbeXi2D5waHASlh40cX4b1gyf7HNnBXIF3qwsRYWMDg+HJgT6DiVDl+4
+arg7GaZujDgHwq3r7/k/JfOL2/SYMG3U9ZO8McZ/F7eUIl+ZZrrdKljWYbbW
+HW516HjjBYs8d+T0kvrMcgZDjMn+PvHHYd7hb3vCYfayvV6LYBX+kqEwmJ8z
+pNqAfjk+VzgbBAvTJveegis6KkvcYFrV0dCTnO9NRzax4USPNy7WpL83Fhxj
+woIqhxriIMHIpffISy8P8vUm+5m0TEtgbnBcfSwsZf5pWkzq5YszW4g9a/cm
+wawY9c2rkUckyL53itQbtSOqEJZqBU5HwonP3SVmqK9w+9njPLL/CdXtNbD0
+zRv9aJhpZDawEf0RuqkdzFxBPt+s0Q7ifqHTHVhqulwzWBvPm8tyykNk/ap6
+225YReP6A13SL+0Widti3N+Gqv/sgqXV64azYYZ1bkYBGb9bkd8Dqx8yLB8l
+9cvfVp67BM+3uPF360wwf7m9jypsMG1cmwALubq1crDK2aYnbbBg5+H611jf
+mNX+YrEp8s3ePHAT9hd/qA6ABQVdN/3gG71RNZdgyv4Hu0nks3blHa2BWWFt
+qcmwf3jR3E4y/49r31bA0Tnqkx9g7mDOwD1yXl5W7RiHhQdH6nbCjMj7zaMw
+5zPj2nfEdRpb/oH5ppKFYvQvqf8orwWWftxDpcN6JU/lK4kdFnvw4cTm/ex0
+sn6u20di/w3vnSLJuNn9mkxY3d6o3Jfsdyw7QAob/2ds2Irk8XgeqI3rpdWu
+sNQm9awIsufD0oUfshTgxPjImFFy3nddGqZIP4J3D/BQj1Lms5MzYHbZ9nOz
+0Q+DrnSH72CRzF0tBa4Zjb6mB8t+U9dYhv6qPzC5sIHk8XthVAQHGX8K+5ns
+/8UwXYWFenSPWRTB479dcHeFjbMSg4dh2tJL/DPcubiDZWGG59ChqoRkmH23
+bP1J4gzFW3kw19jyiASmY7aVFMMpn1beVGKjD1z241w4w9rq1krY4MCV6iSy
+Pr9Z3wemqkyqjsDUX2rKEXCanjjWA1YKVD13ER4vsXLWIfm0hV3ZMPu9f2fn
+EvJ3b31GCRy0UGIfAQu3iWNrYEHImLkivC+FFoqIo85rFaAfT4RrAmth6bCd
+qi88Uz9LoxLmVEqKmXC2x61rxSSPpEFEznvfYH6vAGbyMm0b4dD6X0YTYVFL
++nwxfPhRwvRJMr867Lte2I56ZRNO5ssmO9Wx39CvdNt2mA7VUAyBXed9mulN
+5kc1zxfDW6jGWhdYVpB7xA55nygnyBzhbs3okbtwawvt6ETq9/Rw10f9pqp+
+bDfigtzkcFi+IW9wM6xe+IdyOUzrzgoLhbnmOsqTcL9BZgjJJ2yql7PRoanz
+Z7y8M0n/wqcKDsD9B24dqib5XrkyM2CvdoPnL+G8ks47lXD3WM0+xkrcV/e+
+iSSwcEMzYwWcF/uy+AmstG7Hfk+Y+0il9BFcI0oKP0Lc2hhXAX+pcuhLgxuH
++RFkfwXFO43lsOCvSXYEGa88aPWE7B/977eOcJN/Hv8dzDN+wVCG+7JXmY/B
+BrTMogv1vNQ+rzLDHLl6lprnw1OpBuazYfXFGX/wyPlT0Ho+C5bSm2zcYTXD
+yrivK8n/AScWGsPjYTlzP5HrO7AtyXkP3XRsw1tYGFKkIA+XbfbyfQaPj6ld
+JJ55uy7wPswRF+qqwbKcBxmlMH+d63U2PMfEwO4GGV/vwvEj51dnbH8q7Kx+
+uy+OfD7pdea/wuoNvLx7sPuimfvPwf7ez7izSb9MnB4RM6dCJW6wxC2xLgHu
+n5GmkgQLBm3PZZL+2dtc7IAptasqRaQfp1edWbIU535nqAbJ5z/5575tsMyB
++X03nHi8cvIynPek1JJCP5zXxLvdgbW2xGTpwnzG+p4u+OHWtVYucNxui0cy
+uMCS1RwOi2Kyf/9C5jvrWacQV9jFf4BdK09bVcONO+1dO2H+LtvcLphK0tMh
++/cUD5+agmVpZ5tS4DvvvPvUVuF+vngxMhQ+XK233BjmNw8lWMINDrmSNXAj
+N/wOBfcdbbruBHOnnWvJeaO2Jd92gWlOpNMVuNf8DMcZDn0c33kQNnq6bcKB
+jOebSjzgkErTw6thXlTGt9Xw0cGuQkPYeZ7p4AqYGS8q14BbU2adNYZfNieI
+5GER7WT5A9w5w+PbGPILv/0p8YGP3C+52Q9blwoSjsE8RnZHB5z2daFNEWzh
+sCfvCak33Eihn5zXMp2hv2F6S1iXIeoxF435NJH5RVN2XLiQx/NrMSfvK+Ox
+FfC3x6cMu0n/2w2mpuGArN7aEZh5KLt/vS7y675uIvkqfCfunoJZhUf+1oPZ
+affocjjbf8ekIyw1WHCsB7YeOr03lPTDbfg/M/DetHGvP+NXWBhaKFaBFWzl
+BGVk/r78aE3y3tVzdHYH6bd+sd8CMk7e0yxwbv//3vZfCgDy3g==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.318520523989797, 6.302976613356011}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwt1gk01WkfB/A/UrbJbSbLyHIlspMtpqG/JYQpW1PWsYWxhDaUqRtmDJP1
+teRa0qByUZYiMrqiV6GUUXJL7lCqmZabrqik9/vMeZ3Tuedznuc+z/f3/etf
+6iFxnrtFKYoaxh/ySS19xo8GTQnIpxxNLQ4JdzmvoylK6aaPgzxNObcrMIth
+fmxp4R7Yodf25AwctGFAMgUeuPr4k4UmTeV9cfJINKxdI7U7HXYXdptaw3tN
+bTWGYPqt+NQszmcfrr8lrYXzM7tqcuGh4MxQW/i2u9uIAvxM0BIQDefFhl7L
+W01TMXf7Bn+FqySsSylYkCvtVwrTXREPY7/CPTPFfhVk/R7PevJLmlI8atdV
+BDNU91n6weWhM0tpMLNZrOfpKnzfb4tmFMy6vPxjJtzZwylxgeNHaue3wAcZ
+ycu1Yf7MtlRVuMVY11kcNk764dNqeMEozvwJ5mFF1LjrwI4VZj8PwMbZv/3t
+A9u89+C0wwzGwp/VsGpu0YVzZP+qK3dFkSemutWiGY7XetuYQPI5h5hwYe6W
+AM+/4aVdFdIPyX7NB9+GY77Cu61py3C/e+fEH4/gR+cCuizJ/A+F7t+hj+Jf
+Wu0SYcHUN6/rYTevI+rdpA9Ott8czOHNv5dajzynb4dpot8c9151P5g6/kbJ
+CmbqV/fVk/VahtAQbmm1lfgA58W9m1wOl3s6Gdtr01TTTr7zVZznPDzHTYep
+A2yRMPi6bkFlF8ycv64uIHmjZLWfE/tojkTD7J6zrpI62H/YRnoC84WxwguV
+4SbXua0ucJfktJEGLPBIsO5EX4p2K16okPV+9l5TeG3jA/2VcJCMk0gXg6ZS
+Sl7z5kieVMPNPrDnTnPXMTj+eHKKLLx608/qF0m+9wnsXlma8mZ+a1QABwnn
++qphi1Nl2xNgLuP28yuww9+N9jtI3qh3PVL4vsPWA7k0bOwxVrYdlldU8zWH
+b3d6/8aBu6oGPYkpE+ExefL8R+3KbMm67JPSbPiEaHWHL8zyLwiSxHy+N7rz
+WSTfTR3tNDgl/Uh4C7lfZ5W/EL6+02z6FcyQVR39Hn1RSbH6ZpjX+Oi+tbUw
+Lz9m/igcr6x/nwdnXVt3Zpj0aR7zhxBOn3CMZerCK+Q/kP6p6u7YOJi/UsVg
+GOZoTU51kHVDj4Q8+JbIfvoTLJDZvX0jvJj+0WujHu67yK/oRx7e1YSgcJix
+vtjdEW763c0sE84LXLLqwHxKvALLk7AgvKRHC/5ebXvSWZjPeFpQhH76uCJV
+tXBQ89qtMqQ/C8W5Erhqzm3jWvQ9oje25RjMkuxQ9VpJU+c+p46EwtxHz4Mv
+fEFTMjNPje1gaq6nzQ1u4NXpqZH9Z4aVmHBM8ftKkp9W4FUZwcKDMd58mHV9
+W2gy7CLOnbwBV2VsKl+AJeQcj3TB3Ie1f9XiPs/pwg+kD3pmS1oi8kiM8Yt6
+YYZ1qugG5E3SUF0Yh4OCFHc1wC9Wt64n97mLqiutx7xdoesy9Uk/l9hn2PAh
+S+4M6YsbXNZJoa+c9KdHOcQdte1eMP3GTG2O9Lu/UJgD36v/0cJBH30Vlb49
+R/avubJUCBuHROQ2w4/blpU/hpkfveSL4bzcm7SxAWzB9AqA2QXTHgfg21Wz
+qeT3a1np5oxmWFAmblWJPPJ3HktMw5Ri3AYmed/pm/wiYYjnuMNGjjyfVzdS
+HdWJU56YiME2Wq4mBjCr+I3/FPrRtaJH9Yl3RvoNor9LPxzyJPvpEN6KWzLw
+sX9+kIEpf+O+OWm8P8f5WgKS7/JpFTdYtLjKYJhYIOV9XwrnD/1k0QBzPeSW
+KmF9v3fKWcQtu4dPwQWp/2mOhoPKPqdOwv9N3lHsRSzz/T9eOG9mR7SKA8y3
+UV6/ALtnPtDbTNa96YWryLN4Ilfdkcyrc82yDnm7O970+5D999oiKjGPw6YF
+p0Mw65iDUxGed8ussvYZ2D1S0Y7G/AcnfD0n4fhPOufr4JbRGfV/55V/tU4E
+/e0JfpcYRfrayOHawnRkzr1LZH6LCm4EHPVsOUvSCOuZaa3xsO/mi6U+ML/t
+cIkfeZ+5LHc/DQsGeme0yb8vgZs/vIDzus7l83CfWwujUs4Y/kZ1Zh95fzGm
+8o1g/tiewVnkPTiqcMoeprz6v/4L86iFdAd6wCzZCaUrmFc6cbBxF7FeIMVG
+H4+0j1/1IS6w0DiKvupFVzJ3wFzXG76H0e+TbTX5rsR6Bb5sSZpK7n/AtCH3
+hZipzkjQVNE7PwlDsn7SPjocvr7dv0aZrJ8UjWPC27ISgqVhZqkgRR4u1vx6
+xzzmqfIPeuME5yxXOTcBs0aPWzXDni/PmA4Zkb8HfZQb7nNsXPO4D6Z+3c+S
+RR4X6W3WN+AgpsJrARxo36DDg5l8tsRj5G+yqxWS81lLiXUPMN9U/UGNVeR+
+99H9A5hfJWO3nD5c5XHkp2r0o922RsaNuCb8uS/6O/+j8rJ40p9yesYMPK5q
+119M/NpfWw19R6UxFrthgXVTuCG87Ok1i6dwULJFI1m/4uAtvXID9ocMuJDv
+XwsNVDMhjqSnveEMlx2bPOEqc6UN+bh/3mXCJxZm8Uv/qEa+F13tF1LJ/kVq
+bQnyV89n38qHuc/SjyViPvsm9WQ2sdjwaw/MP3SicKwcZmZVDpqiL4sajn8p
+Oa++XU4Xfb63UbmWR/b/kjxEr8Dv229OK9PJ+YlW3qnLkWPk1I/74SBH/tt3
+4jRVVsExCIXptC0xNfBL58U+D3I+c9/5bHjpr7ByW3Kee+TlFrg2bYphBvP1
+TdgMnOd4MSJQl8wn7pNxCuZE2eZpEvffsAzA/VmN0/u0yPejfneyQr68tt4c
+A3Jf2MVWHeQv6rmisInk13U8rI75MtdECreR7/NZm7/C/K5zrp2RJP/N7Jdv
+4Nd/Wl3IIPfvnwltRl/1qRv+4ZDzv+qRdkKfA5xikzvEoZ8COXDCouTG92Qe
+SaHXXbJuaJCrboL5zUfr+mDjrp9uOsPcT9dXJcH8gLCCWJjfMGEyi/MPlRdW
+5JD1l3G/WsL3DvInOGS9874yef80drQf6YGZ4x0abshfa3h29g5MSc0nGWE+
+p1s+Hx7AVY2XpaQw/7H2c2cmybr5O/Pn6GuifNJ/AmaxA1R46DfAoKr/LnGR
+j9jzZTT10DTz/g2S10XkPBNWtjVv74TpkrHpTDGaGg4+3VpHzhMuzerCKkWN
+5idI3lH/6BVwyqBmfQbJl1XxQg2mX00dSCZ5RDzU9sLVKla8PeQ8vfSRBZjX
+v/Aqktg+2LoB990Zr8v911+yg1PJ819o9SD7qQFuZhzy99xZTDlELPCcCMfz
+tn7pI5FNbLhezA/zhuiKsWtJX/mWAzbkfZJOHe8leXqTboujr+hYP+ETkkc7
+Wq0WrolsaJI2Jf9/H2wjzz9sae9+U5ipErHkApu2pY77mZL3QdrXTvBWj4sJ
+acSbLimsgK9/Jzp+FmZl3aGycd7hWvn+AfJ9Z5XLE7j/o2iO2jOY+rj3JgX/
++2P2/08J+n/oho2Z
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.45429484366825, 2.671979374673003}, \
+{0, 1}], LineBox[CompressedData["
+1:eJxFlHtMU2cYxg8QkFERSFG59dDTc06lMCVOqsAQXic3I8xKQoqT65RRhImM
+gVoYFxGcCgPSIPwxucwLpKNctYMRZIyrDLlGbmFQjJAKbOpkOrPR7Gs0H01O
+vvzypt/lfZ/noT5PCok1JAjiJPr067sfA2quft0BRNXpgbbfaPhzTvt34UXE
+5RbPm27R8LS8t8HIeCcQlm2FJtdoSKwM4rrfRCw5eoibTUPniHVMqJcNEDYJ
+vZH5NJjFN3k7zSGuTZtQfE/D1wakOiXNFojom3fyumh4VPPVT37GdkD8sqzx
+eUVDdt2LHwJy9ZyyjXJloEWTWmayhpjYfVCXzEBkRnKTq5c9EIFGz4JbGVgi
+5WYdyYhb055IdQw0W0/aWBUgNj2vigMW4jtzNnTXEfO/VOnkLNTz+o93piAe
+2H7e6EdUHy00H/dHnF3av/qIhZkFV8eRDxBrBrTziyxIDn9xwOlXdH65rGl4
+iYWejiLuQiri1rbhvBkWivOaXdxcEJ/LuKHsYEErE1mGaNH7il94qhUsmJ+6
+/vxtM+LR9SlNBAvO1oMqcTFiS1GckSMLJ/NzldzLiC/c3Zs8ywBb8c9YUom+
+P/YPBxUMNMhmNENtiBv7nw19ykDbZLjWZwPxdNg8z4KBb6+dFSV9pj+f4DpM
+05DUbBR2exgx/+PUxjoaaoUNkpeh+v7IzHYV0eATf1wSu4o42nvCIoeGyZbv
+fj921QEIUFeLcmkYr8ieKRTx0P2lRFgpDSfKDG/N9SLmt7TcVtNA+/ot7Qkj
+kT6UXUFLNFzYUq3QzSI2XQmeJhmIX9/aXnbEEe3/oalXNAOtBU77wqoQa7zj
+DO8yMJhOjmrmEJvaXZKvMaDsakgX6xBrz2xdcWUhf3rtUKwhH3HeWGciC2t+
+UYmZf6E6382wp5KF8lR5efagfj9Z/+E+Fv7YRrLCEsTTO4bE8yyozGa9Go4i
+HlCOhC6zULBdr+fN+hm+sFtyj8T/d3Z4MjtzlsT7Z93Pi8sSk/h8l6UqRY45
+ie/HkQszxP/y8P0jPpFcHjQg8fuCGxZdHWkSvz+6YmqoJmqzP/X7X/nK1Jv9
+q6SjEg1YR9zf9eWf7cZqHHH/Fx5m1lvx+Hg+dJ8P1yOBj+dX3e5uFdbOx/Nd
+i56SBptReP7ul2qlW0IprI8hJ92EqpzC+gkcDUwYGKewvlyVY5xoAwHWn1uM
+osiWFmB9Xuwz2hl4QID1GxnywPn1QQHWdxrHXrSkr7/Xv/FpT9NcoQD7wyZm
+9c0kR4D90zMuXIldobC/lPvd0yx7Key/cE3Q09UKCvuzkpWds0mnsH+luz3e
+3ginsL/v5ztI+f4U9v+U2CeH8KRwPuzjlKa88aBwftiadMupAArnS7g0YJc2
+hsL58xHrd++/qxTOp6DOK3vCH1A4v+50+TMRGxTOt3Hrl0yfrwDnX1ZwjWa1
+RIDzsU6VeuzxogDn5+PeE69P7aVxvtod4TllfkPj/LWu4Rh7dCN+n8+NnHfr
+//aCKUQ=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.0548, 7.75}, {1, 0}], 
+        LineBox[{{6.4999999999976925`, 16.}, {13.49999999999251, 16.}}], 
+        PolygonBox[{{9.4, 16.}, {10.6, 15.6}, {10.6, 16.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 16.9452}, {0, -1}], 
+        LineBox[{{6.499999999996362, 16.000000000005457`}, {10., 
+         10.000000000003638`}}], 
+        PolygonBox[{{8.552322615314452, 12.48173265946094}, {
+         7.602165824326175, 13.316718930329426`}, {8.293188945044921, 
+         13.719815750748694`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 12.823799910437668}, \
+{1, 1}], LineBox[{{13.500000000007276`, 16.000000000005457`}, {
+         10.000000000003638`, 10.000000000001819`}}], 
+        PolygonBox[{{12.052322615314452`, 13.51826734053906}, {
+         11.102165824326175`, 12.683281069670574`}, {11.793188945044921`, 
+         12.280184249251306`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.484057296392571, 12.823799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 16.}], PointBox[{13.5, 16.}], 
+         PointBox[{10., 10.}], PointBox[{10., 5.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/chdgeg/igfhfihi.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdgeg/igfhfihi.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:eJwt1gtQU1caB/AjtjwEIshDtlAQzAKuRUOX54rJpUKxksGAvCqMIiOIGiVF
+aYMiG4Uqsm4LiDa6FHkEDUIhIkKwyvAqRJYuEW1BsBApICLViFgDIuz/dDcz
+mczv5jz+35d77sQxPjksQY8QkoU3/STqRbz+xJA/XhyGjPyrNboQLu755pBq
+PUOazpZyXOBV9iuCLsDpaYrCMhuGmI2djjgMbw8uDbGCxS3EOAa2bKkVSlYy
+xMfqt/AQuIj11e4n1livwFlK/TDQ6/twWNpVVEXHd6RPDnZYMSTa1nKYrld7
+0XliE2x4t0onhVPO/pDTY8mQzdku/A446aqbWghry8xVc3C7p/e79rDqaZH+
+e8ivb+FZNGrBEGXUpnZvOH2fm0sLPH8hPigCtkv4beN1uPvFmN9nMCfV+3wj
+LCs5F58DW68aMuiFp+62FVyCB+Tul2dhxXeVAzUwd65l+AO6n2hBdBMeXWZX
+vgfWPF7b2wRLkoYKyuGCEya3bsE7/vPx2hHYJKvmwzo4x9rzpQ3q8xtbJymn
+eWe/rg+EZaoc9zy4UL5QuRtmX6w2E8MaG4PiFNqP2xrbGJh/rHflAZhzY/bI
+Bjjfz14YBgvu96XQ+rd87DHoCGt81tdMoz9TBi55g9hf/At/vha+qP69XAL7
+REljxLDcqc7cAm6W57ED4bkAh2/OoV7pgu8OW7j+TVW5MazOZVXMr0OOpV4e
+aSsY4toZ6zYJ9/ePnxsxx/2gqPlqFO41Dgjmw4rDw6NPYTud/92bZrh/uKzv
+F+H0rkzRh7Dg628tHbC+X8OV9w8uZ4jOffyLzTTvxiIjKQv7eXEX0mDxC/uX
+j02Rb6Qo6Roc+0vTP3bBYvYynylYZLqzWR9WcLeNWqD+OBlf1meC60LPBg5s
+Kf1C1AvLDpl/EgyrvDvPv4TnD6oS4+HmhMYJT8y/df62Xiqce1Lekw9rqgOZ
+E/CUJrxAD3lUU3rHTsMzaypq0+H2js4oer+0p7l56WAP3Y26LNjPiWsrRD18
+/QNN9Pdjm00oemB26obRRPiZvPSoKepvDk78aStdn7gdXQ1rHG6mecCiyEfv
+uMAmofWPrWCB9SLLGpYEHLk2iXpNGpQPh7CeujPPW077Me7ZkQA3PxOy9sCu
+se1ercgTPZRxfw2sjl6Ieo164pZkvp1G/038P18wok4bbGiHmRWbUgn6IRVq
+7hfDfJfLviPLcF4vOt7IhsXziooGI9wvXSLfY7BrxM6K04aYdzWqMQPWueh9
+tMuAIRMDcYtnYJsyKyZIH+OzYoOv0PkV393b9C7q6ju1vZuObz/lveMd9PMB
+N3UO5gxnxxcuxfWSsuPrkTdr65sOPVixVfTeXjj3QbBTgR7ytryRy+D+a4Kd
+obDP9sjjw/R5pIk54wt337z8d2P0K2Bf5tgnsMbrn6Fsen6Cq6ePwcrhj6x9
+YSHLQdkDF/ZXPtgMk0zha2/s90Gh/lAYnR/oklENy/6qK4uEmc6fM/6CvLGP
+pp9vg5PasrWlMP/Kre4tdH7NuJaF+nQBczn0PBZnVbATYYms7bYzrD4RsaIE
+5txL9DClz4eQhEONsKvwb7/S/HLDQ+KrsKKN7V8MC1qPvBXBZlF7zHbAhg1v
+K41hw09lc/Q8svn5Rkexv/hkjPwh+qfm+ae0IK/GykRWCscNPl0YQX1aq0Ku
+CBZtVEePLUG+Rc7nQXBSKCu9h2D8nRzNGjpfnN8XtsgjysruCzawoGFD/et5
+HlnVcNDHElYI/L+9NMcjuSGDHXaw9ssfD8fqeEQ+8bbVna7Xd9Kf9zuPKKY7
+V4fBqtr6/VEzPCL6OXl3Orzq15mVtdM8YvbkeUE1rIz+TPrpCx6JmzVPHocl
+4ifz4VqM73JKdkR9zVXLz2x9ziMaS//nsbDGoD+j7BmPiOMdAs5TlzxeWgRn
+7yUDXbBkIdyPg/Hq1dcFOtqvn1gHnLBedkLNFhb9/dtaMjVwVkzmPH0+KoI8
+f2jF/u2apBJH+vzPrTZWIp/4wJUhakY1FV/9kkcMD1pcsoWzS8z/fRb1qJbP
+WCyHlVqj+chXPMLZ358wi/3IvXWOE/DmU3O7aB7lubVf+qIfTOf1V/mw2d4h
+ZwYW2CkjIqgvj3BmMF6ZZz1nQfPPKkJCYfGf92Xepf3Krx+MxH7Ni6FFubSf
+jrsmDZBH2ZU4vo2ev21qp/3ILzk9ced9en7MXV9Zon5BTnSy1g3rSUzzxiZ5
+RMq1L/oR1rrXpSSO84i2xaOyHubcOR7R+Aj9Yl3fV+VG+z2gXjqA71d3O9dQ
+L6krUKmxnlZe2AQzxvf0Wc3oZyB38YHb//8nFN/+3+c65r9ilhyv
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.907871335428632, 17.11903631971389}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1wk81HkfB/B/jpUjR+4RjeOpRO1UK6LMn4gtaqhcZc0KW4ihrKdc07Ll
+KhN2i20zZTt0aFRscjRSrQhDJKuiErrWIDnj+fye5/F6ef1fb7/f/3v9/jP/
+Mg6M9AyWoSjqIX7JlRqbxY8pTf33R4empvxz02phzsFFpce1afELE2leAsz9
+IbTcVpum86PFBSyYdmqMm9WiqXEr893dJjQl+st67BXsocmayISZ25LS+7Ro
++o7QYs9amLNNtk9Rm6bWnPEulRrTFMu7U20T4tcIbuddgTmDWxLPYz1SITY8
+Gqb3Bbno6tD8p+tjZtbDPceKA0/AvvaKySYw/7Xb5EJdmm5K7UpShQXVuQ+K
+dGn+AbsP9xVg9aqyyGV6NNU6oLJ/HizJtJUW6tHi9+evyRjB4jnmI1/p0/ye
+leE+1jDz7egSD32aaj63uM8Llrr+eSwRTjMOfniAxMsYLMzUp8WcrJHhU+T+
+2/qZB7E+3214SxWp13M141t9mo7ZoTDSQerrrLo/qUfz25gFdu9I/uijaTmo
+Z2vN4okhWJidWqyHeiw/RqZ+JPdrVqQIUP9mjYK3XTAvoURVRpem1N4UNFaS
+eW3/sXC/Dk1PVLjmC4gHmJmDmFcsQzHYh+R7ZHj2AFxntatXm8Rv3jKih/le
+ujri08DEfmknr1WLFj/2souMg0XL264UwWERYgNzWDIVdEmI8/sQ39JXvBB2
+vnv3TziQ7SinCXOyUoQf4fTtU+tTjFDv83QPtjbN1xr8p0gB5nsmRVyEXY1y
+NpwxRL4577ab4rxGb3CpbTBfqTy2CM+XXdNQuDEs5bpeXYV+F2XWVSiS/ZOb
+8m7DsdadN5RhXukvStaYn5fPWK0ZzLRM33kWHtBw/ZcHLJhdLfmMeX736t28
+TJjjwu38Gufhs2DFUDOJ5xG/YyPOV4+tUK+D+kS7wx87wcZrLof5kXpza8MW
+wvkHf2zLJeu/Z0x2If78sZBEMUxtPD+QAGusZRU9hXnXteSUkO/85EheJ3F4
+Gvswzsc4Y1Mj2S+WPRc4gX67b8noH4Ulw4rXQtGvDLe6wp5YUznpJc6nMKrC
+twP1iTLmvQ7CvJ5mSvp8YcmbOscpLZpv8U9HYv0CzCdhp8Il+LI0Z/lymK9Z
+4RmD+TNshq6lG2A9z7YuAO6qXGXYx0C8MNaeUOx/4ahTsAHmje8/kot1l77F
+jOuYi3QmuakLfnqoqnsZLGqrDlyL/CuDT4VUoy+m0TLtEtQXc8tA7QdY5CZf
+tAr1/x7WPWoOcy94L66C200yOhRgyvjA2g04Lzq8/ysKFpxzzf8L83AemYpR
+h1llS/xsMb9eZmGLFcwLzfA9CV+kzYrDSD7KJvMZruKwhLtXcBUaTbFlcR6v
+HBy/HiF/z1+9WQl1bij1bbTBVXj8ls0Q7q9hxfNjYU6EN6sc+7rNjNOKYIn7
+pFwwvPJEdstDWFDxenYc9Q18NlzZBvdo2lw6CCePN1+8T+I11/wkxXm5VzUf
+OgXzbj45/z36mzfXLsIHpk5/jG7HfK78siV1ktTr2LtwK8y1uej0MyyZYQa+
+xLzP+nt6TKNvickfaocxX3bK/qAgmLv1Tosz1pMdDL7cRdyegqN9prBbW7y+
+ESzI2jdqjP2fXI73xWHufMbgOBvrfu9W7yXfoxTvpX08rqajdg7euApKNic9
+xlX7aObqbk2cp0PgXAfcpxMTxUyE+U27v1TD9UudTq+GhY+iz21Af0rdLuOK
+MMeMf1+CvEF3ElTH56Mei7g5XpgHx8/XbxbmTH20b4ajJGtlDbGftt8gtxp9
+SmsuyrmTeEaXmlMwf13GwqB0WGTdyv0Tdnv+Zl8zLLmuNFyP/ZXfWCzUQZ28
+ggB/8lxt+/2YnQ+pf4+MZTb2+y9t6MqCWeaMLFf45ImvC8j3DKUX4PgG+UPT
+KybqYaGast9ezPF8uEHUAxLvfdVMH+qfHuU0XCDxCvsYvuhPufcXywiYbys3
+U4/+v3vSZ8KAJeN5k+txXtly+aevknk1TMg2kHmW7npqAYs1lTxC4EcvTRfl
+oX/W2bdzDTB/xr074kkN7D8k+fIB+8pCNBO9YI5d44EXmjR/PPfCT9fVEf+q
+KlMKv4h3GdQirvfqZSLeiprjhgpqmJ+Coj6p67h8sbqCKp6HNt0ccn5XdC58
+s3Ie8nf88xLvP2rsbefdYyroxz/spATWN2jwZ8IikVqhH/o9c3JfT78y8l/+
+cP4V+fztfeL5Gu4xdw36HvMxr42RU8X+Hla7rgTe/m+HBi6xakj7Esz/mXPJ
+rlbiZJ+OELi4l/rojfw8Tk71YbgtXiXuDSzMqrhDnKNjURaBeoXqThVkf829
+In4/LHLXYpN4AlN2nhP64/eKopqQL4UaWxEPizun+/3hjCfX9h2Ghfce/vAM
+9VqPbej3J+sOEfkc2H92sHoW8WgO70YN+vW9/3wqDKbsh9SsyfvsFR1xjtS3
+7N1j8lyIWk5mlaB+Tmtw+kb43bHNa06if5FNZeMnnM/TmEi7XUqYr03o9G34
+9IRyp6EivC5mpgDe1shc0aaAePoRRufgH9XGfsv+CvU5G40/hGdPJMsHy+O8
+l9QlqCB+ZG2Mu5cc5vXuhuYeeFOUb2mkLPLN/Cr+mzyHvVFBt2SwftGNtwP1
+HmluUrCC1WW4zr1wSbYwp38Onqd1xqN70e+9aQ3zZuLKaPMheP9aWZMBWCC/
+/HUI5vXsgbyjJe7nKk501MGNT+SVcmCh4MwDDcxb3sl+6Xzkl1C5VevguqhE
+ldPE8lVbNsLmDj9HLkW9dKxGKfm8Cvu2KF+GRSfmtsvCi57VWmmhP5Z7vO1N
+xLcK1UnaAfc0HR/aBH8xu7vu3zA/f58H+X445VMmEwRTKjdvusCZfxQNMmBe
+tJ5ZOfpTOTj3/W+Iz3nmOG4Bt7DvFQ+gHk6cRSz5XLKOrimRh8WD2dEr4Roe
+9+0E+qXU0j+0Yt6nRkOimijsD/j7wVHyvRS8Sn/BLJvi1aUeCoFtRqnladNs
+ShLzUjmAnKdZ8qPpCTYlskq+FAsLVri6Zo1hvf7BSDF8sUzs5T3KprhJ11/N
+QT6/x/kvdo+w8b6Imw2DPQtaPjweYlP82pjf+uEI+4jnhVLEy3IzjED90i38
+w1WD2K99xHccpi/JL1OCOXNvDCeif0tzf39Tsp5iWTkJP9r5k9onWPxxOyMY
+82Mp+TQXI57whNWOW/Bk+arrp5CPa9MuI4VVRgMCrg6zKeneXQqK5N+jz/be
+qEN9nMShiTmwklh3uv0Tm2Ltuqzfhf0RDgHrq9BPz5lUzq+w7UirYPdn5Nt0
+Vt8afpJroX4f5qod9iTvldaQtnn3YOHTsYl1sIhlVrkDFoVmdovQz4J1g2VH
+EI8u8HQ1gWfc0+y/RT7151uP5mEeS5UZiy+gPtY3CuWGsMlNw4Sr6Ec63LOk
+FPNlVYv+6vyAeV8esg6G/6gICB/phz1Ux1bAqftt37e/ggucP5P3Bt/EwCuo
+i00xBxJNlsK8eY2PoltQT5ta+Xa458B3O0PFiP9w0OO05v//35Gx7n9XLfo/
+Yw2y2w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.077403306263033, 4.30673387473934}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000002274`, 17.}, {13.500000000002274`, 16.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.552325660469876, 17.180083206945802}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1ws4lPkeB/C3miJsOwkhakS55DIJsYVXsbkU4xanJJWkVpnSZrZSUxGl
+llp3ZSeVW9g52Fw3kyJTsxqlci1Jsi41KnFQzvd/jufB83n+l/f7+83/fXl1
+doZ77Z5JUVQnvslvikl+6NHU/77UaCosaOflpTCXPhgQBzv+4qPDgWUt81sY
+C2lqSiB/LZbMb819zIU/m4ekPIBZi05wG+FGjyz9ectoStRQUS2vTlM1UW/Z
+/4JZXqXVZvDGtr0BOTCnZyR5Ldxq+8vaT8TqwiQyrs4pCbFdTlNBrGxdBTJe
+/X3CaThxi5KoCftLK7OuiWBhx5tOPlwzLWobhbt12DV6cEDP6DOWPk3RtwPt
+a0k9Bzbl0jD/eZbQFx7qbu3wgQWW+bHDqvCsG2e2wYlfzxtfgNM0KPZWmPLS
+qbaC4/gGw+4wM3dAPKJCU/2b46x+gGV1RVZ3Yf8ten2LYc4ji8lcOCmqZ8k0
+8nA3UEp5sOxFik0XLPspZF0dmZ/zWlANU+sWeH+Br8TNFF2BpY+9m9fhesGv
+pD2k3qA9cvY3YediOW0uqa8l2kAT+fNKGatCYNbpNW5X4bVLp2OIu5OD6g1R
+f3fVb4xDMEd6eWMVHJfuzToHC/rn73VBP49PPGy8RdY3fyxphnsnVoe1wfy2
+6/PcNfD5pvzzlYl6RCaL+irhbuH0DE9iL7OA+ZrIFS+flQpLee2RnvDa83eL
+ekj9b8848WCldOUOMwPUG9o+FA03Bq+uOA4LBlyrImG9lSPtDTBzIG+RF8y6
+lDimaIj1waaJanCoYd6ECywMPnuhEdcvEzuzTsLcS4t8wuDPvXVyBbD0xwDx
+HFgWzbwnhoPmKK6+inqCYte87oIp8bSKJayktTGiD5bdGHn4FP2Q5cYp9pL5
+ql8iTsDM0u/LX8CCeVtv2sAXshZ8rCP7c7aumQtbP16TmkvmNwyYyNBvkf7b
+h7Ekn+qJcOLP9w3f7Cb5n9IvFEi/31dvciTj74oW2sNl5yoOL4NZ9p/uxsPG
+E4LrpF7pswnf9zCrvmB4nPRLujtwF/LKn4hW+wCL7tOpfaQe/aQTxAI/kXYE
+6m09eGHBJJnvJ8uZhX5Z18/+UZnkix2pukzcl8CwJPWvNfuouQg56iJqdsL8
+v16tTIUZRtpBGSSfnNHbmVrIfb/3UDtZ/4nL3gJrOd3W0DHCessYrQw41LnV
+LAwWmbeXi2D5waHASlh40cX4b1gyf7HNnBXIF3qwsRYWMDg+HJgT6DiVDl+4
+arg7GaZujDgHwq3r7/k/JfOL2/SYMG3U9ZO8McZ/F7eUIl+ZZrrdKljWYbbW
+HW516HjjBYs8d+T0kvrMcgZDjMn+PvHHYd7hb3vCYfayvV6LYBX+kqEwmJ8z
+pNqAfjk+VzgbBAvTJveegis6KkvcYFrV0dCTnO9NRzax4USPNy7WpL83Fhxj
+woIqhxriIMHIpffISy8P8vUm+5m0TEtgbnBcfSwsZf5pWkzq5YszW4g9a/cm
+wawY9c2rkUckyL53itQbtSOqEJZqBU5HwonP3SVmqK9w+9njPLL/CdXtNbD0
+zRv9aJhpZDawEf0RuqkdzFxBPt+s0Q7ifqHTHVhqulwzWBvPm8tyykNk/ap6
+225YReP6A13SL+0Widti3N+Gqv/sgqXV64azYYZ1bkYBGb9bkd8Dqx8yLB8l
+9cvfVp67BM+3uPF360wwf7m9jypsMG1cmwALubq1crDK2aYnbbBg5+H611jf
+mNX+YrEp8s3ePHAT9hd/qA6ABQVdN/3gG71RNZdgyv4Hu0nks3blHa2BWWFt
+qcmwf3jR3E4y/49r31bA0Tnqkx9g7mDOwD1yXl5W7RiHhQdH6nbCjMj7zaMw
+5zPj2nfEdRpb/oH5ppKFYvQvqf8orwWWftxDpcN6JU/lK4kdFnvw4cTm/ex0
+sn6u20di/w3vnSLJuNn9mkxY3d6o3Jfsdyw7QAob/2ds2Irk8XgeqI3rpdWu
+sNQm9awIsufD0oUfshTgxPjImFFy3nddGqZIP4J3D/BQj1Lms5MzYHbZ9nOz
+0Q+DrnSH72CRzF0tBa4Zjb6mB8t+U9dYhv6qPzC5sIHk8XthVAQHGX8K+5ns
+/8UwXYWFenSPWRTB479dcHeFjbMSg4dh2tJL/DPcubiDZWGG59ChqoRkmH23
+bP1J4gzFW3kw19jyiASmY7aVFMMpn1beVGKjD1z241w4w9rq1krY4MCV6iSy
+Pr9Z3wemqkyqjsDUX2rKEXCanjjWA1YKVD13ER4vsXLWIfm0hV3ZMPu9f2fn
+EvJ3b31GCRy0UGIfAQu3iWNrYEHImLkivC+FFoqIo85rFaAfT4RrAmth6bCd
+qi88Uz9LoxLmVEqKmXC2x61rxSSPpEFEznvfYH6vAGbyMm0b4dD6X0YTYVFL
++nwxfPhRwvRJMr867Lte2I56ZRNO5ssmO9Wx39CvdNt2mA7VUAyBXed9mulN
+5kc1zxfDW6jGWhdYVpB7xA55nygnyBzhbs3okbtwawvt6ETq9/Rw10f9pqp+
+bDfigtzkcFi+IW9wM6xe+IdyOUzrzgoLhbnmOsqTcL9BZgjJJ2yql7PRoanz
+Z7y8M0n/wqcKDsD9B24dqib5XrkyM2CvdoPnL+G8ks47lXD3WM0+xkrcV/e+
+iSSwcEMzYwWcF/uy+AmstG7Hfk+Y+0il9BFcI0oKP0Lc2hhXAX+pcuhLgxuH
++RFkfwXFO43lsOCvSXYEGa88aPWE7B/977eOcJN/Hv8dzDN+wVCG+7JXmY/B
+BrTMogv1vNQ+rzLDHLl6lprnw1OpBuazYfXFGX/wyPlT0Ho+C5bSm2zcYTXD
+yrivK8n/AScWGsPjYTlzP5HrO7AtyXkP3XRsw1tYGFKkIA+XbfbyfQaPj6ld
+JJ55uy7wPswRF+qqwbKcBxmlMH+d63U2PMfEwO4GGV/vwvEj51dnbH8q7Kx+
+uy+OfD7pdea/wuoNvLx7sPuimfvPwf7ez7izSb9MnB4RM6dCJW6wxC2xLgHu
+n5GmkgQLBm3PZZL+2dtc7IAptasqRaQfp1edWbIU535nqAbJ5z/5575tsMyB
++X03nHi8cvIynPek1JJCP5zXxLvdgbW2xGTpwnzG+p4u+OHWtVYucNxui0cy
+uMCS1RwOi2Kyf/9C5jvrWacQV9jFf4BdK09bVcONO+1dO2H+LtvcLphK0tMh
++/cUD5+agmVpZ5tS4DvvvPvUVuF+vngxMhQ+XK233BjmNw8lWMINDrmSNXAj
+N/wOBfcdbbruBHOnnWvJeaO2Jd92gWlOpNMVuNf8DMcZDn0c33kQNnq6bcKB
+jOebSjzgkErTw6thXlTGt9Xw0cGuQkPYeZ7p4AqYGS8q14BbU2adNYZfNieI
+5GER7WT5A9w5w+PbGPILv/0p8YGP3C+52Q9blwoSjsE8RnZHB5z2daFNEWzh
+sCfvCak33Eihn5zXMp2hv2F6S1iXIeoxF435NJH5RVN2XLiQx/NrMSfvK+Ox
+FfC3x6cMu0n/2w2mpuGArN7aEZh5KLt/vS7y675uIvkqfCfunoJZhUf+1oPZ
+affocjjbf8ekIyw1WHCsB7YeOr03lPTDbfg/M/DetHGvP+NXWBhaKFaBFWzl
+BGVk/r78aE3y3tVzdHYH6bd+sd8CMk7e0yxwbv//3vZfCgDy3g==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.318520523989797, 6.302976613356011}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwt1gk01WkfB/A/UrbJbSbLyHIlspMtpqG/JYQpW1PWsYWxhDaUqRtmDJP1
+teRa0qByUZYiMrqiV6GUUXJL7lCqmZabrqik9/vMeZ3Tuedznuc+z/f3/etf
+6iFxnrtFKYoaxh/ySS19xo8GTQnIpxxNLQ4JdzmvoylK6aaPgzxNObcrMIth
+fmxp4R7Yodf25AwctGFAMgUeuPr4k4UmTeV9cfJINKxdI7U7HXYXdptaw3tN
+bTWGYPqt+NQszmcfrr8lrYXzM7tqcuGh4MxQW/i2u9uIAvxM0BIQDefFhl7L
+W01TMXf7Bn+FqySsSylYkCvtVwrTXREPY7/CPTPFfhVk/R7PevJLmlI8atdV
+BDNU91n6weWhM0tpMLNZrOfpKnzfb4tmFMy6vPxjJtzZwylxgeNHaue3wAcZ
+ycu1Yf7MtlRVuMVY11kcNk764dNqeMEozvwJ5mFF1LjrwI4VZj8PwMbZv/3t
+A9u89+C0wwzGwp/VsGpu0YVzZP+qK3dFkSemutWiGY7XetuYQPI5h5hwYe6W
+AM+/4aVdFdIPyX7NB9+GY77Cu61py3C/e+fEH4/gR+cCuizJ/A+F7t+hj+Jf
+Wu0SYcHUN6/rYTevI+rdpA9Ott8czOHNv5dajzynb4dpot8c9151P5g6/kbJ
+CmbqV/fVk/VahtAQbmm1lfgA58W9m1wOl3s6Gdtr01TTTr7zVZznPDzHTYep
+A2yRMPi6bkFlF8ycv64uIHmjZLWfE/tojkTD7J6zrpI62H/YRnoC84WxwguV
+4SbXua0ucJfktJEGLPBIsO5EX4p2K16okPV+9l5TeG3jA/2VcJCMk0gXg6ZS
+Sl7z5kieVMPNPrDnTnPXMTj+eHKKLLx608/qF0m+9wnsXlma8mZ+a1QABwnn
++qphi1Nl2xNgLuP28yuww9+N9jtI3qh3PVL4vsPWA7k0bOwxVrYdlldU8zWH
+b3d6/8aBu6oGPYkpE+ExefL8R+3KbMm67JPSbPiEaHWHL8zyLwiSxHy+N7rz
+WSTfTR3tNDgl/Uh4C7lfZ5W/EL6+02z6FcyQVR39Hn1RSbH6ZpjX+Oi+tbUw
+Lz9m/igcr6x/nwdnXVt3Zpj0aR7zhxBOn3CMZerCK+Q/kP6p6u7YOJi/UsVg
+GOZoTU51kHVDj4Q8+JbIfvoTLJDZvX0jvJj+0WujHu67yK/oRx7e1YSgcJix
+vtjdEW763c0sE84LXLLqwHxKvALLk7AgvKRHC/5ebXvSWZjPeFpQhH76uCJV
+tXBQ89qtMqQ/C8W5Erhqzm3jWvQ9oje25RjMkuxQ9VpJU+c+p46EwtxHz4Mv
+fEFTMjNPje1gaq6nzQ1u4NXpqZH9Z4aVmHBM8ftKkp9W4FUZwcKDMd58mHV9
+W2gy7CLOnbwBV2VsKl+AJeQcj3TB3Ie1f9XiPs/pwg+kD3pmS1oi8kiM8Yt6
+YYZ1qugG5E3SUF0Yh4OCFHc1wC9Wt64n97mLqiutx7xdoesy9Uk/l9hn2PAh
+S+4M6YsbXNZJoa+c9KdHOcQdte1eMP3GTG2O9Lu/UJgD36v/0cJBH30Vlb49
+R/avubJUCBuHROQ2w4/blpU/hpkfveSL4bzcm7SxAWzB9AqA2QXTHgfg21Wz
+qeT3a1np5oxmWFAmblWJPPJ3HktMw5Ri3AYmed/pm/wiYYjnuMNGjjyfVzdS
+HdWJU56YiME2Wq4mBjCr+I3/FPrRtaJH9Yl3RvoNor9LPxzyJPvpEN6KWzLw
+sX9+kIEpf+O+OWm8P8f5WgKS7/JpFTdYtLjKYJhYIOV9XwrnD/1k0QBzPeSW
+KmF9v3fKWcQtu4dPwQWp/2mOhoPKPqdOwv9N3lHsRSzz/T9eOG9mR7SKA8y3
+UV6/ALtnPtDbTNa96YWryLN4Ilfdkcyrc82yDnm7O970+5D999oiKjGPw6YF
+p0Mw65iDUxGed8ussvYZ2D1S0Y7G/AcnfD0n4fhPOufr4JbRGfV/55V/tU4E
+/e0JfpcYRfrayOHawnRkzr1LZH6LCm4EHPVsOUvSCOuZaa3xsO/mi6U+ML/t
+cIkfeZ+5LHc/DQsGeme0yb8vgZs/vIDzus7l83CfWwujUs4Y/kZ1Zh95fzGm
+8o1g/tiewVnkPTiqcMoeprz6v/4L86iFdAd6wCzZCaUrmFc6cbBxF7FeIMVG
+H4+0j1/1IS6w0DiKvupFVzJ3wFzXG76H0e+TbTX5rsR6Bb5sSZpK7n/AtCH3
+hZipzkjQVNE7PwlDsn7SPjocvr7dv0aZrJ8UjWPC27ISgqVhZqkgRR4u1vx6
+xzzmqfIPeuME5yxXOTcBs0aPWzXDni/PmA4Zkb8HfZQb7nNsXPO4D6Z+3c+S
+RR4X6W3WN+AgpsJrARxo36DDg5l8tsRj5G+yqxWS81lLiXUPMN9U/UGNVeR+
+99H9A5hfJWO3nD5c5XHkp2r0o922RsaNuCb8uS/6O/+j8rJ40p9yesYMPK5q
+119M/NpfWw19R6UxFrthgXVTuCG87Ok1i6dwULJFI1m/4uAtvXID9ocMuJDv
+XwsNVDMhjqSnveEMlx2bPOEqc6UN+bh/3mXCJxZm8Uv/qEa+F13tF1LJ/kVq
+bQnyV89n38qHuc/SjyViPvsm9WQ2sdjwaw/MP3SicKwcZmZVDpqiL4sajn8p
+Oa++XU4Xfb63UbmWR/b/kjxEr8Dv229OK9PJ+YlW3qnLkWPk1I/74SBH/tt3
+4jRVVsExCIXptC0xNfBL58U+D3I+c9/5bHjpr7ByW3Kee+TlFrg2bYphBvP1
+TdgMnOd4MSJQl8wn7pNxCuZE2eZpEvffsAzA/VmN0/u0yPejfneyQr68tt4c
+A3Jf2MVWHeQv6rmisInk13U8rI75MtdECreR7/NZm7/C/K5zrp2RJP/N7Jdv
+4Nd/Wl3IIPfvnwltRl/1qRv+4ZDzv+qRdkKfA5xikzvEoZ8COXDCouTG92Qe
+SaHXXbJuaJCrboL5zUfr+mDjrp9uOsPcT9dXJcH8gLCCWJjfMGEyi/MPlRdW
+5JD1l3G/WsL3DvInOGS9874yef80drQf6YGZ4x0abshfa3h29g5MSc0nGWE+
+p1s+Hx7AVY2XpaQw/7H2c2cmybr5O/Pn6GuifNJ/AmaxA1R46DfAoKr/LnGR
+j9jzZTT10DTz/g2S10XkPBNWtjVv74TpkrHpTDGaGg4+3VpHzhMuzerCKkWN
+5idI3lH/6BVwyqBmfQbJl1XxQg2mX00dSCZ5RDzU9sLVKla8PeQ8vfSRBZjX
+v/Aqktg+2LoB990Zr8v911+yg1PJ819o9SD7qQFuZhzy99xZTDlELPCcCMfz
+tn7pI5FNbLhezA/zhuiKsWtJX/mWAzbkfZJOHe8leXqTboujr+hYP+ETkkc7
+Wq0WrolsaJI2Jf9/H2wjzz9sae9+U5ipErHkApu2pY77mZL3QdrXTvBWj4sJ
+acSbLimsgK9/Jzp+FmZl3aGycd7hWvn+AfJ9Z5XLE7j/o2iO2jOY+rj3JgX/
++2P2/08J+n/oho2Z
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.45429484366825, 2.671979374673003}, \
+{0, 1}], LineBox[CompressedData["
+1:eJxFlHtMU2cYxg8QkFERSFG59dDTc06lMCVOqsAQXic3I8xKQoqT65RRhImM
+gVoYFxGcCgPSIPwxucwLpKNctYMRZIyrDLlGbmFQjJAKbOpkOrPR7Gs0H01O
+vvzypt/lfZ/noT5PCok1JAjiJPr067sfA2quft0BRNXpgbbfaPhzTvt34UXE
+5RbPm27R8LS8t8HIeCcQlm2FJtdoSKwM4rrfRCw5eoibTUPniHVMqJcNEDYJ
+vZH5NJjFN3k7zSGuTZtQfE/D1wakOiXNFojom3fyumh4VPPVT37GdkD8sqzx
+eUVDdt2LHwJy9ZyyjXJloEWTWmayhpjYfVCXzEBkRnKTq5c9EIFGz4JbGVgi
+5WYdyYhb055IdQw0W0/aWBUgNj2vigMW4jtzNnTXEfO/VOnkLNTz+o93piAe
+2H7e6EdUHy00H/dHnF3av/qIhZkFV8eRDxBrBrTziyxIDn9xwOlXdH65rGl4
+iYWejiLuQiri1rbhvBkWivOaXdxcEJ/LuKHsYEErE1mGaNH7il94qhUsmJ+6
+/vxtM+LR9SlNBAvO1oMqcTFiS1GckSMLJ/NzldzLiC/c3Zs8ywBb8c9YUom+
+P/YPBxUMNMhmNENtiBv7nw19ykDbZLjWZwPxdNg8z4KBb6+dFSV9pj+f4DpM
+05DUbBR2exgx/+PUxjoaaoUNkpeh+v7IzHYV0eATf1wSu4o42nvCIoeGyZbv
+fj921QEIUFeLcmkYr8ieKRTx0P2lRFgpDSfKDG/N9SLmt7TcVtNA+/ot7Qkj
+kT6UXUFLNFzYUq3QzSI2XQmeJhmIX9/aXnbEEe3/oalXNAOtBU77wqoQa7zj
+DO8yMJhOjmrmEJvaXZKvMaDsakgX6xBrz2xdcWUhf3rtUKwhH3HeWGciC2t+
+UYmZf6E6382wp5KF8lR5efagfj9Z/+E+Fv7YRrLCEsTTO4bE8yyozGa9Go4i
+HlCOhC6zULBdr+fN+hm+sFtyj8T/d3Z4MjtzlsT7Z93Pi8sSk/h8l6UqRY45
+ie/HkQszxP/y8P0jPpFcHjQg8fuCGxZdHWkSvz+6YmqoJmqzP/X7X/nK1Jv9
+q6SjEg1YR9zf9eWf7cZqHHH/Fx5m1lvx+Hg+dJ8P1yOBj+dX3e5uFdbOx/Nd
+i56SBptReP7ul2qlW0IprI8hJ92EqpzC+gkcDUwYGKewvlyVY5xoAwHWn1uM
+osiWFmB9Xuwz2hl4QID1GxnywPn1QQHWdxrHXrSkr7/Xv/FpT9NcoQD7wyZm
+9c0kR4D90zMuXIldobC/lPvd0yx7Key/cE3Q09UKCvuzkpWds0mnsH+luz3e
+3ginsL/v5ztI+f4U9v+U2CeH8KRwPuzjlKa88aBwftiadMupAArnS7g0YJc2
+hsL58xHrd++/qxTOp6DOK3vCH1A4v+50+TMRGxTOt3Hrl0yfrwDnX1ZwjWa1
+RIDzsU6VeuzxogDn5+PeE69P7aVxvtod4TllfkPj/LWu4Rh7dCN+n8+NnHfr
+//aCKUQ=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.0548, 7.75}, {1, 0}], 
+        LineBox[{{6.4999999999976925`, 16.}, {13.49999999999251, 16.}}], 
+        PolygonBox[{{10.6, 16.}, {9.4, 15.6}, {9.4, 16.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 16.9452}, {0, -1}], 
+        LineBox[{{6.499999999996362, 16.000000000005457`}, {10., 
+         10.000000000003638`}}], 
+        PolygonBox[{{7.947677384685548, 13.51826734053906}, {
+         8.206811054955079, 12.280184249251306`}, {8.897834175673825, 
+         12.683281069670574`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 12.823799910437668}, \
+{1, 1}], LineBox[{{13.500000000007276`, 16.000000000005457`}, {
+         10.000000000003638`, 10.000000000001819`}}], 
+        PolygonBox[{{11.447677384685548`, 12.48173265946094}, {
+         11.706811054955079`, 13.719815750748694`}, {12.397834175673825`, 
+         13.316718930329426`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.484057296392571, 12.823799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 16.}], PointBox[{13.5, 16.}], 
+         PointBox[{10., 10.}], PointBox[{10., 5.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/chdgeg/igfhfihi.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdgeg/igfhfihi.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:eJwl1ns8lNkfB/BHQ27TppIIRcktNGFF0UxRaQmlorLMMlsTilAuYUdXxbYq
+onaTXDKVJLeQy4gy5DJJ0ZaioiG5hBq6+H3O/vzzvN7Oec75fr/nzDmPtnfA
+lt+nURS1WIqiyJMam8LfYhalSjCbRVkap+sWwy6O0/OVYWFBoux+WDxVuJJF
+HH2i2wDmGXquOQJLL/1R/2ER/r/f8thz2HG0KrkI7ji1u8d2DouSa6loiYVF
+PDGvEn533C1pN8x/eK5hnTL6G5xJdYYFXm35T2EdnywjOzg2tFm0dy6LalT+
+Q55Yv0ou4TtMZTeecoIZl8Ve8Sosirt66rw3aZ8/9WbWPBY1dj/3ZjQs52ar
+cRreuktK6iqxwu8pI3BhVPDROhKfbtzZdarIQ2DzZQgOLKPTj8FjRyLoqshP
+qX2y/yYsjFIPtYFZ+tlfy2HuWPF0T5ivkvflLtz2/eeKUFjkGxWVCnNkw9/G
+wl3rDk8FwZFvNdQTSP2+Cm5YwlQ43z+evL/IcP0o4knzSNgcBadsslDMhiPz
++aXesH2wXYQ7nPm1UZHMz1AfWkqH3b8Wa8+AO3b6X32I/HmFy5htiN9S5vVc
+Ug/q/Lh0IlzSG7mFDds7vvYi9VLKdzm5HnaZ7AuRIfnnmRiugeMHqbh72ohP
+zaxzMyzt8ftoEFzyb+uv4eR95xsjxrBlsUnUXbj2tU3moBaLSjgu0VYk8bwL
+GiyG+QrtrkEk/rFBTizMYLQ698M5lRtsOKR/w2hmAPK3Kwtf40D614y6/YAZ
+TmV1NrBqfBT9nBrW65fJ3FWkf463qe587I9ea7YdXFLUY14Mi12K2rbDkrVm
+N2zUWZSWg1/aAThthmZMCczaJKHOk3Z3m6WLNbAvWLVDJbDIvbk6ArZPlF7R
+DbuzShZXwKwvGbHyyI8/larYB5eYLrmwDA5MVdT8AQtundLfDMsZGIi/wYmT
+tiv8YSX+4NteuLzF/ns0PHzxk2cl3LiNoxhL6id1fM8JmKOo4nYC5m2VzVlL
+HLFjXTjM6qrf+gXxCvQG8tik/68THXy4o6nlgzUZL2mnaBfsbjNx7ycyn2VB
+jTKcssTJtR3xd4kbv7ejHsILdrYpJP/wCc/rsKpdpr8raY/uMY+HG9NnDSjA
+4okdqkdh+zR3uSMLkZ+fS+tfsKRgPX14AdoFgRsLYMZ8TjAH1nIrDfsIu2/+
+dvqtJuI3zg/4r95jKcsPwPxtBh5XYZ55b64SLHdtzmUVUu/c/LO1eKY0N3Ve
+xJPr6Zd0Bk++JN1SD/0k/boJAXBXvqlXGcz+c3LvHjhQYU6dE+alTn/SPAh3
+vH/d8RqOVcisvQDzqloW7kXc/Lj+7HqyjiFdob2wsI/mpYBxRDQvDUOy7za+
+H9kKC7hPbrnBgabcaVlwTox3UwRsaXl4Ypzkc9qj9hwc1v7QwhbziFrynK+Q
+fXLpPCsWLhnKSE+DWT2GnwRw4v5yTjLZt4a11/pghuHXG8fIPjOx85qC5Z5l
+DeyFtVI2dBM3xswbsyfvX1rRTPpvdTRvXAxz34bfKYc7wnjbJxA/67O+TDgs
+SBbfvQkzZHSMteDhwSgHH2KX69xCxJuW7uirQ/L/d+Y9S1LHbJ7CKPpZWp9t
+zCN1Vtx+oRVOiNldq0XqU5wvfACznQSaf2KdJJMdCc2kvcMtfBLryst1//GR
+xP0gfN8+so/UZlqQ8YU9h7f343eopcwPDITT7p42OAhzxbenPYaHt2c4zIKp
+ZSPF2shHn+ezv5qco5kxNt6wXKFGyEn4mMUlYz4s+MXRgwNLc+7uGYEpHVsr
+d1j0cu2NVeR3YMdd5g2n1Y7zj8GML5rRPLjW6LpOA/ndKX48mwebD1+epoBz
+SxxhtXCInMtlv3ivhd1d/ewsEU+ib3PeAXIPeBvkn4TDQm1KL8AuXOmODlj1
+jvadPJh7u2aOHvItl73JqoLDHnC7Sf5aRdYn7sP2IxJ58juKVzGdew/WatRr
+aYONZMRD1+GugQWzB2EO1z4qgZy7qx4Hf4KHzewiAsk9yInb1wXz1VvfO8CU
+bQ37Lqy0zeizDrnXzh+5HAqzN+gMfifnTpyh1yKYGjmk9pycOzfuVJUiXobJ
+vJslpD3n9VUWLH3Wh58KJzzkni8j9ZY1b4sn9dqnyV8Ku8Sl/EPql1d10zkF
+567/6un0k3DKZLaeDDwsiq9MhMO0Sh4dwjn+0vrYi1tk/IjWrBHcq8PHx+a0
+knuAFi0IhwXzhVkUuTf1h/6ZDfOKsn0sSX47C36qwj09ttykOpTcm6GcBTGw
++O74m3JS//HzYzvgHH77HRlyjxYKmzbCicnJw86w/qSixBnmxKm6XoQpyYJ/
+fWFu99ILr8m92DtDOgVuk6Ula+ng/fQQ+zaYobN5707YPmh/pzriKfRb4RcH
+S6xfHPWFO/qNt+fDlNC74B4sLLdybIYFN/fVKyBfO3lx1ys4Qc3YyhUO/Jin
++Y70F1WVJZB7TyophrRrjcWFVpF7lTfx9b/3L00zfQknbpe8KYZVucv3vIPN
+7WJ7kmHLzofcZ7CYS58MJtaI3H8HFmZMbdykQ/bLstSDMH/NGXVdks88LwUd
+WNItU0bB/Ab57ErEq5o+05Pkn9Id9rM9nNN5Q6UWdjcp1KtF/h067QV5pH3B
+40gLmJ7VUHCNfIepxSVn4LtKdSjULJvUz7VVSQlWukt7m0++4+7rxfLId5tP
++o96Uu/OguCJWdjPJ/UcB8h3xiO5T9Ew4xpbUw3xpBwPuKIMd/UtcnOGSxoi
+AiuUMP5f9yP//K/enPOHYUflqKrHpH5xB3a4wOLlFrPmL4GZjgbWcK3JAysO
+zHjzPGI1nHNp/OMtWBxb9XIbHNnt+H4M5u53o/HIeA6pXy10kY99VFcpLFIO
+NwuCXVgra6bIeA6xrzJhbp9s9CbE5xgxK6sJjrXXPJcK68/uTPoAq36Q9hyE
+dYoky37AosUXN1kif//gwT0yeshv1UH5MDhHdRVfCtY3Gs64Dte2/mgcRf9A
+w5bqelinVVm9E84rVKh4CsfOGzStgsM2rxY8gjOD7k79DbN/yn5+A36nFp5x
+EBZbDEgHw/GJ39lOMGvUcekSMn8N55g+6f+OMb8G8QVmbHOYTmwTFegMcwMe
+NPWhHvy9AUebkG+eyE7cBofNVbFeAxtpFurXw0pdf3f+OpOsm25lHSwwfORh
+8RP2g8tl/8fEJ4Ks5s7AOI+Vj/fCLtXeB2l08v3KfEPm0+oyDJZXxD61l+lf
+Dis9MbliogBH1Z7fDXf5Fi4Kl8f5UCoTnAGn9UpnfpRjUd8amA97yfq8slL5
+Cx6wUzxlgvoxiq9f8oQtNymeCoPZPYyDu2Cj7fmR92HB4cdzjsL+uZ/nK+hj
+/L93GDyG6dpSZpvgPJVvz5lkvlVd908RG9IldbDH3G30StJfa7fTb4jPcfmb
+a2KY3cQbn4b4xZd/OyNngLweFd3OgD0844w1YVEDbeNK5OvvOOWjCyvl+H6u
+gN/JJp7UIf2TZe7ooj70yE62KnGJ2al9cO3ET4tpcFpF0GA83CaO9+rFfFQI
+rY83g3yX547XwEqTNNsNpP8396nLsMvK7VdeY3z+hOW9QyT+y79HOcCUwZGD
+LrBWXabBGcRn57sw0JiMd87n7xzkUzLd6dFMkk+655pbyDdQLylgAvXSSteo
+Sib1Wvpj4gPxo4bLIbI4n6fvuimGh6cejTpOx/mzyn7XMCzyPzPdUAb70+5A
+AI2Mtz60X1maRYWYBbVrw4E8oY4KjUUps2JmOMACbRfXn6ehf+xz9WiYsfJg
+Z5gUzjdh7rVSeDjq6Z0eCuspXDv5lcS/R2fOHzDd7bSGLerTtcfz0HpYVH2j
+Ox52Gc8NXgWLjQ9Payf1+5bVsAv+J0TLfKEh3h9MCM+ArYubmT5wYJP0ezrm
+EwSVqV2FlWT61c/CGocdPj+D2UdvK+ojPukVxR60pZhvbsl7IcwqXWmxBFaq
+SYvwRT4db/2er4JZ3bdO0pDvyy/yszbAadJHDONgQanBAmL2SqbZBJw4drbI
+mvT/w/3wetRrIMdXog+7eGct2weXl53iziDzqZbS98Ia3U87PpB4r9DjVsCW
+o7/tfAiLXphOtGM8dhJN7wrsck72qAMsZNqeDoPz+GeWJCG+ErfE+q1wgpxU
+Qini5xc/oluQfFU3jFYi34F44YYFcFrVs+ocisS5QncmTJmqPVCZYlLDcqxJ
+edL+yaag7huTKjn0NJe08y6xn0VPMqnIFYxKLdK+5+whJwmTYlW+MLIh7TTz
+Vxs+Myn9BydOcWBBvfBaxBiTamy6OJJExn9tNW/sE5MKk+PMF8GsK1aXKkeY
+FN3vD89ZyJ/yXb+le5hJ2dG6m91gQXhhixcsd+Dd+qukfhYVH6zg2AtHjnwg
+/ZlzGvzgnLlNP5sbYb3Z/dQgbK9zTyecOONJTxHGH5bZvLIEplydvxVhfrqj
+aeoQsc/FmFejGD+kqk7TGM6SUVowzqQY0hN/roG7Tmxy9UY+8dVHzXbCacMx
+D1O+MKnEos379xBXDwffRv6cJ2m+e2FWu9XtpAkmZe3KqGfD7AT6fWvUS7ij
+KsWJjOd59lgKvNVO1cGctL/d9uIKXC5RuzYH5gVlzt0Ei2bvvDOI+LpqD+mn
+YjwxbcHVOjit/GpNIuazFx2rSoNZQ54sC8Tj8qZpayRpNxbvjUP8rPz8vzxI
+e/1vi9KQX8oW4X5b4lvV74+gHgyvJzdNYZ7RzsOxgxg/7931paS9uUJ6oI9J
+aQRIdi8j7pX229bDpFTLcw6shgVrpA70dTEpqjnirTt5f50c68JzxB+R6xX9
+n0NKzVuxPyi9ebmkvt+3BDXUMal/tMtEvcQhFhud7jGpwDNvxnVJvWOftozz
+Mf80iwx/Yq3ohuHT2G8bJPeKiMkfr+L/TxPW/wCX74+H
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {6.573901114580226, 6.782664290660753}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt13s81Gn7B/B7FDmVUWJINcphpAOySgczu6UorSmJpKcpKomlZFHsM0mF
+ECHVpiZhC63DI6kcxqEQamxOUQyhlKSoCPl97n395h+v9+u6vvd9Xdd9D746
++7y37Zch+DAI+ffn4CQ+mjzSTX8u4xHmkdAJNS0eWaPC9rkL8/1SnWfCtjGJ
+HodgCev50m/IF+8xtZwHD271SCyH+1VyjZuW8ojw1xP5AbCnc8SBOOr2rDQW
+HFNOah1hnuNztzQW9hu4SfTgQZ3+LD04fsFXq/ElPCLqXN15RYNH2OumHm2H
+2TfqixRh8ZWA3hqYP5K07rg6j3CKwyIrqGUMjw3M5pGCob7GSliotHC+J5xX
+UFrWAEs2KWZ9U+ORqUXb+vtgEqnwPR5mTh+Ok8X+gnA5zY3wpX25d2k9vIvx
+G5iwZ0jDXGuYPWlU+WkW6mt0EXrQeu/cbHsP8/hRsRGwyDK4eAI+puY+L40+
+78DO1MPzAf4Gug9p/yfufBHAPsv+11MJM7uuz82E+W+X/HgC8yuVJ2RQr3ZQ
+o3c5HOMw9FEA2y5P/DsbFrtUyJXCi1e9Sb0AS/1VV89D/2avr94/BGe7maT6
+0nm4PSk1p/W+vZpdCEsWFzLG0K+xVqPtF9gp9b9aBbC0qoqlhXleahOOesNM
+m74zHNjTc6RcF/bR8xqZB4dpyIpbFqM/m6Sn43g+c8/+NdEwu9j3SBlc4NXg
+v5HGl1ltPgIXClTD5WCScfO+EpxiHmtdZ4S4tvZwPOrnZ1WvSYKlSS/7mLC0
+9U24P8xMztUIxTwq9ol6XGB+u47TEObpU/vn+S0wLyMuyxVOSXj2qw318ir1
+1pk8sn6f1NcOjjF4ZLULTonylf6Hxh0DTr5XxXkV6cz6HSbHDX6LhtdcjlgR
+R/dbEvd2A3z10SuLPLpf2OE36nCLm/yrJlgyuuvAJBPnaXPlnxHYuCRqF0F8
+sMb1uQb6EzQzC1hwZNqjeyawWNnAl64XGpkVvR4WFo9cPwNXODjl/krnI1cb
+2QhLXv3zgtrY+8i7pai31qhC/9/8up+/R8E+ubeWLqXxrDLxB1hUbDWpDEtl
+G1fZoP/hixrzOlEP28887k9Y27QsJIP2q6i1QwpnXi6J9KJx5xzRLMxTIrk/
+zIEH16RvMoXJ9sUPOhbhvtT3TFsFGyuozoiHBX+Qk4awmU7Qamsaz03ZS+j9
+jWOf/2GIebmouJRg/e2ZZZb3YZ/DIh13WPnLta3HYfLlMX8C9YbdLo1YBws5
+ijtDYE8L8x3qMF/JeccY+h8Zar4/xEE/Y8t6PGH5xQc2vYT59+w/tWHevBC+
+ngQW5m07uQXOPhX88SnND7/LiFLBfT3HetEM81YeYiXO4BHd6ZZpfbDYY+4f
+pdOx3kHDQhnsJ2BuVp0FK69zNNWB2ZstZsQqox/nnt5fYJHm/GZL2PizQ8J+
+Wu9seclc+KVsxcAZmKczYbcErqo7nZtC4xtVbnnAbq3mjwupC0e59fCIu6Ft
+HV3vmWGlM/YbzrC710D3X7ogYBLm11S11cPSXo/D+ai3Sn/vWDldv/TyVz/0
+k3dBWJcOG0cVK2ih3/EekxC6v4gbvd8XFnkvFDvS/EPK/DJY2eNu0ny6nv6P
+QBnMj20rSOig81sgMjGGid+A32VYUs+KsIa7HUzs7ODsqLzjNnBB7eSuKbAo
+N2nYBDY74/7ungHyRZwBBl3vhPo6b5h0rHJ9QPcXDMQYwT6q1Zt2w27n+6oH
+9JFnXTClDfWvLNe78gCW1o7tfIX+pgYrbIuBBS/+WvAE/Rd+Xt3iA5Mk5tN0
+zEscLCdyofHUp1vClXCem86k2MPCNZfSvRWRd7bT3YHmL9G/fFABfd0JnhDA
+4ll/zjwuj/lOmVTwo/vdKh7+exqes01rO099UfFvZVgyftQ/i+bryI8myuH7
+aWydVU/X8229bQ/HnDC1GP7XKjE8OFOvqVIN/QlGR7x2w0IdxkITWHjunexf
+cMFtZ+5GWBz/dA0L67d8Xb7dgfpoMj8dbgiMHdgJS8Pi2Q6oj5N3g2ynccfy
+Uyqo/2rNeP8vdJ6BJOMZ/PaNWZQ+3e9EaPg59KvGO7J8EvXw9przLJTo7zeZ
+v+qoT00/+0yJ/n2drR1H553MYW7A/AZlWvW30n4f+EsTYFZbRroCjbtbXbkP
+r89596hYD+tzT+XfgbP/u/vhUVhcfyzdB27pUGk1gEma/ogMPFyb4SbVxTn/
+xDA8iP0KFBwDr8G8gZzcG6jPU0F9zBUW95yrLED9DWppwaY0f+1utTz0m8dI
+M1OCBR5Bv13FPKrOlvYOLMTzQwF+JzC/FFv3nlewWGvP4l2yeH7+IYUW6nPN
+0VZT0X9EQt5LWKR0SX/9FHhiV8s7WOp9MXWPDH7vdKsyGLSesdXh1xn4vpUe
+2z+X7jf5+xMFODKxcHQtjbMmk5IJ+ivxPS2g8WjfjZ7wyMSihyG0/s2mjIMw
+J195azLN//Z2NAa+yrbRLIKlut8P9sKS7zs062H2wJucvVjfrI55/SWNa8xO
+H4PdM+u2tVNX7WnLQH2DsXlWjdTtbq/dUX9hRM6YmO7/0+0mDvrbHpbscwMW
+GgWld8LrT4ey/GHiZSgKxzx0h6+1/kLzExh3NDCvlnLpNDmaX97VegqWj260
+LaPzem+RVAk7hVZdD6TzKhhUb4fJhedGS2H2NZdfK+CRGQ8suhYgzpy6JZDe
+f9UzGpdgqVWv4Q/sF1naP7kVZqc0TzjA7FihzEyYZ+tddhr1ZednfXihg3yn
+N9rx6KdC5/jqDFiUZqARTs9D+w7jLEyOfKr2wjwC5mzp9aL5teKxzZhffMJt
+lgAW5nf57PrBJTH33Ox2w2IVRq3FOJe49J2qcaNeWXvX6juXVBi5C/yotzYO
+nx/hkuxhJ2EUXX/UKl//G5dYO87ZQvcX9l78qvaVSwo0uzNqadzdXnnfFy7h
+iZ7t+kidVLNTFXYv+ThdFf2ITUY4C+CWwoHgZTCJYP7vPJyZwYuwhoXhIfZb
+sV7hws5NzjS/enG3M/arkqbrudK4wlRuEurp9/Lp2Evnk1/UIYd6C5Ln33ag
+67mUXwsd45KV/7hyLGn+cEqwzASXeCZ4nJhD80NCgzzRv+6L5BUDqI+3KME7
+axLef8r1HixY/LrHBfOqmvLn4QA630R5k2LYp/g/s5bTeaTXCL/ArNlO+/rY
+iB95E/QDHm49EZ0EC3TSHjbBooaY7q2wdHZqWzBMxm9kybPp/wPVKu+x39vt
+sj+HzUd9HQM1IainxaPBUxnm5eq21+E8quR+sb8xD/Fppodb0Z+AsSHXhrpj
+xfL76D8s4Zv/NFj8raU9CPMSqny+0zYX+xC5lRbDXCL6/vNvj2HhuqIdMp+5
+RPqe30VNerQSmj9iPgvbNtN8YfblOJV+zK85WoNB15c52l77lkt8WqJGzKjd
+jbUX9XKJ0+oMJV/qAiXr1d2oL7Cf3IPJYMZL5ddcwoq6YDNO44nE7mYX1rtc
+Ym1J++vOaf8OrxzJCQ2AyXOD4mn0+dNnm9JoPDQoJr+HSyTScxcf0fjVOSs/
+vOES5nqL8nrqZ74fzr3D/TOz1amm+WvnX/jtA/qdFW+fTueVZay5YpBLOPEh
+fceoOX7bcj5xCbug3dWQ2vXRnJlDqOel+7JqWu/uoIwNmM9g2q2EHTBvckzF
+EveP430mpYHOQyOhuw82lsmbvpHayvy9Jb3f6rzJHG3M+7Z/6E+wddfIV02Y
+7CCMJ8gP6A28cGoO8j06qsaxPutZ9+4hvJeJd5g5/oP9nYrtb3pp0e/fdkV7
+nAepUVr7lb6nuXs/iUD9YRY7PWM06XlJ1FRpf8Z1+ZYwKTnGf4jzIAH8Ghka
+d9c6uArzWznFyOcV3svIwudhnh34flmIjz+lbj/ef6cJ/Ss41TdQR++dqlyH
++7On8/cBauYKzkAhl1zqWyai731k8EiIOAb91dfX21EHhO7J/7sE7zWWsrQe
+Ytt6QLeohHDUJc8bqKV+tZ5lJUQQWJKqqUX7d3hlVl5C+CLO653UaTEZMqUl
+RPiKqRdLbZ0frl1QQphee90eUg9KbuYll5DBzV26jdS3Xms9SuYSeYXDV9qo
+Mw81M0swv3lFj2upzVs+ratBfWHV0X9RS8wnk59jXpV/PD5MLXe+6/cXmI/2
+DVMt6inm85614/u08LIwj9ZrFLEop5NLRrLOm62l8zscnO2P+2q9KSH6HuYh
+rJ8rK8I82Y5DBw3ofIpsUmfjPlrHshRj8Z4ltL96sgZx3mgTGcV7E/ncFV6I
+592vtPW5Uj9c8vo91r+07cC6Jrw3ET3fyGrsL1Llr9lOPWmmcqwF98NYcLaT
+/p/fYJekWI/zdXi6/CR1k+WMS6V4niRG/kT9/x8pfd+fxfs/aePoPA==
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {0.4875589769853401, 8.878318388907438}, \
+{1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000002274`, 17.}, {13.500000000002274`, 16.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.552325660469876, 17.180083206945802}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1ws0lOkfB/A3USpqcp0Q41YaYhKbrNa4i1wrUZRKKalmc881bOWSJImi
+HZJLWaTkkrYhogs7CSG1UymWpYmKJP7fZ89/znGcz3luv9/3eWfOeVX3HHXd
+J0JR1Hv8kf/U5Cw+6mzqv48Um5KJzjmppMGmhOpWM6dhz5bjVyxg/phKj7g0
+m/KOlU0KhAUfa7eEw+wr25ilsPP8Pff74NTBTdRHMj+1VJ4pw6aKksKsDTXZ
+FE0yQ3s3zO3Wn4mC+XsVymJg6oyJ2GPYe7x842m4fGuntswKzG/ozAqFqxMd
+7XfAfP413c3w7XNWnjmwoKYhRAHuN85K6oY5G1aUPMP5jFxzh0UrUY/KUFEE
+zPvm6G8Al7/e8UiF1PfbVvnNMCXzreY++uvX/mdwPxl/qGm7G059Wjp8FPZu
+OMtaANPtR7OOwOwo09G7S9HP57zuvXDMrFNyJKzl+MuoM/El7QgXWKkkImgd
+TCuZ/tUYZoQ/37QMFtjW2xJ7r9CIm0S97GnVj2S+aN1x8xdwufkzrxNwI/dW
+TRXpR+LFxWY4W+SjWDbsbdh0Ww31mLyqVToJO18/9PksHEHvrAqBGR/ZLxeh
+v8bPbhbHSD79Hm5p5L7URP4KJvOvRL5XRl6ZOTZzyXr+YN6jEpgzFqbAJU6c
+MFwni/GAX183knq6gk/UwM4TtdfHST2blmzTk2NT7iXGAdroh1+77206zAqf
+afODU/V8Jz7APov588rJ+FnaWnV5NpX8+OOKbySPXrqMLcy2M5O21MK64aiF
+W2HhH/ScFJjR5xFpBwdaNmd1EbeWPVwFd+ybmVy2Cn2oR2l+wf4dmqq9bjCr
+Mq6gDA7MLfo9CeZ8rRP1IvVUtM/eIeNS3bFzYI33o0u7YeFpvfu56EfmHG/b
+KOy8VyreHC73udDwDU5l2mQMIg//ZX23puCYLy1xmXDLfsNvn2Da3ruBbrDO
+0MpGAcx3CqdWwO6VT3NayHj8KfGFMK1y3O0GOU+Ld0mU5Juw90siGZ/D6pMj
++Zt9vXKQ9GNh/INNnu9wv7iNxFThulhYtLe1SYfMN8jr6ibPt/DgflkyPrPd
+ltRbUiKvK0b6XXvG6K4s+V60Xf6BvJwD31WYol+uAatzFo6ZbLN/At++ef2S
+BKk3VM/RA3kqxVaaasDlPePD/bDM75xCa5KH772jB+k4X7/NKgBmv4o//BY+
+YLxes5jked5OaL+MTaVLRQs/kPGz3/Ly4Gq3C5Q2E+c96Bp7B3vW/XE4AOZ7
+0pmLFXBf2gNqf8Ic6bQTDLj6IH9cXBvnFd/XUoT7nr+qcIFpu3otZrE+/ss/
+NhmwQEdS0Aa3eHU3dcCMB2avk+FkvfCoRTqYn7m70wSmvo1Ir4d5Rb+MkHr7
+qipOesKc4Ku34mDWiVnTIDJf23pEHS7ntsvHkfm6v/m0oH9BQYrbSZgyGqoK
+gjkTkhXRMFsigMmC3TU3WXPIfuXJId+Rp9KwMMEDZkWeKumFtWb0TTfA3E9L
+F/DhzBulu5eT+XGzA33kPi4PL51G/bx59jfnYD/+rE/0S1g43d+5gXwfBF+f
+3YP54mGdZ2HbhCzpa8RTow5fYEraRfE8ccx8mUOovyWXeTwBZsfJbRmhk3oW
+HSJ2DkuoCUEeEsemm8h8bl3uZTHka6ngP1FEzlO8sDqN5B3y7HsLnFqmXk5X
+xO/Z9tZd4//Nz8tLhwUu7ZYrSV6jJz7NUcJ9qDD89pJ+lvgxvGC61Z31BbBz
+t9mRq3AMr6p7BPZ2yv/UTsb9M4yNVqO+XXklQ7BRpelPcTBtw9yLxN25R7Of
+wsKkrCvP4UBHC0cpXdxLc3FOITkvWXWzKxzDbrI5CPdZyY8kwsKyvyWVyHyv
+zuu1cKoKb+oB6q32zAgWkPXdJgn74NtWrrnfYb7eWJAYTMm1/rNID+MXXVOK
+0H+m+7ropXqk/wXRm+HsF1azEjD1vOLqQpKXVcfRWaynXnX2PEOegpwtBkMw
+o2fKvQTmuYTOtpH6qjjnsmEZZmF9GSwQLJfOhzXaJtNTYG7kzsgHcERcdOFh
+Un9fRugUXLeyUcMJppnX1djgPEbbDhVDmJ1XtqQYFgZGhavCrJOCMEXUny8W
+8VKW7B/raHMZ7sjrSZEm9XkUm2ggD//+pnhFmLN+Hu8mrGPEMdcl+8/sFzdd
+zqY+Hyt8ZU/yOKPl1AzfPjjxPYDU1+cxx1oZfbxx7LpG+uH9GL0DG20QNyN5
+0n5yCpZTwe/NuznVqiSvVtvi3bCz9cYjB2CW7vChDFgYfMe7AhakLEi8BRc9
+rvL7Qcbzax9Uw5uMfi5VZyF/m5G/Csh4VJW4DcxVm7c1Gu5aZffAF2bVtL+w
+hNtlkyfi4RiD2Nwp1FNgfeJdDixk3MzJh3V0/D/dhCmrgTU28NvyF/d4MM2H
+SRtAf9c7shQfw+z48HkJMHXqmmwbOU/UoHUNnC+VNfqUzHez6HqPvA40SCo3
+w4x/LVWK4bSkRvt7MOe4rXg0/PbsG9tyMn/iC8uPPI92EfNzYT4jyMsf3h/4
+MjWVrFdg+ZyE0z3qp6LJfIvVmtWwu/w6Tw7pJ84jicL5JrvtGvbAzpWVF73g
+jqX6mu4knxfjQU/h9JKNO13I+bvKsjaiv2B3exUnOFVZ+h0f/rBYffi/8eRj
+j7yQV+yGa7TtZP9y5cRhOPHyrkKS54G0RyXGDHwfja+lHIer86PtwmGF+38f
+SSN5jMmGVcIxv9DvlcJGywe2DsCXdM7zSF6huqZblqiyKTs/q0ufSN6TOx10
+4DTrTge5Nfjdm78neQM87fz4yc9wkWJypzlsnh077Q2zzlUcMIEvKUU8iYeF
+D4tmmHDDr5H6BbDRqsf1ZH+5FqZlI8xf8NHsX5zfEpdl+Bo+3W3r0wCXdkXv
+H4e7C546pcOJT274ztXH+qCvbj5wgUr0rCTM037ytwHsftdMRxqm6y+1F4cH
+h/U1iJ23RVfVIx+DevfNi2GOhqXpCZi5XmObGCx8bn7bFbZeLz85ifOoZUr9
+RvCRt3+oDsG8H/YPDWH9m6+7e2DvXb2+duT59ju/5hHMvh8jCIYzAk5Z1MDc
+HZUutXBU2IzyDTimoj1kAerZP9hc/zvJo0ewwBQevUlJZpLxTUt0IuBQox93
+02F3pvWrP2GtLTWeGTBt7uxbUeQ1Vqpkl0PW924U2MPJnY5FxfCg1E9HzpF8
+Jcz23oVbFK4aPIczGJF67XB5eqjIEjU2pfaedWYE5uTZ95vDrhNurRLoP9Tu
+lNFhWMa3ma4HcxNseMnwL4YDoZthrftGJVxYpDX7TSjJ0+FrfhHMjFAzuULW
+d55ry4ftflgfa4Anzyg3XyD73y0M6yfj95y4EbDWA87OuWtxP57+HdthXbe1
+DspwqNrCdfpw7anDlw3gFuHqt6Jw5hu/NiuYX5XO6EQ/GurruC4we7eY2zXY
+WZUj4g6zQrkfQmDvph5lDzimSEfZCWbZlW7dCmuZ7qKvhm1ZdesdYEGa7A1p
+kqfI8UQzMl/TezPJl7nEQWctqUddfQUFZ9e6qqjDjHdDjfNhiYRFQVKweK7v
+NkWSt6+rlQicWv48wZh8H5ZLXR1Hv6dzt6T6wPRjq88NwLRIA71M2PK8xORr
+8vyZXmkm96Nb93N2L3n+Vmw/IIt+g+dHyL2Eu1VfvSH5uCdltgpgyqmvL5fc
+zwXTsWHYNiJ8bABOWbgocprkPaTUxMR7nO2ep7qkPmfJdvoB+PPaZed14MEK
+zlAOzJSeEbUn+dJ2xj+GJxmFlf6k3+tGqf/C6SE1t1NhXsB1jbl4j/u6eP5U
+JcnbsKNNEk6uM+K8JPnVCzMk4Bny/rj2/++PGuz/AQ7UGzs=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.479517186987348, 5.883314205477544}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwt1wlUjfkbB/C3tN+0oGPmKm5TUkKFQQpvJYQUZUmr20iNVEyRGrwto6SS
+GoU56hYVow1ZC7fFMkq0GEupG2lPm5RC/+8z53/Pwfmc531/v+f5/t73Fm2h
+/6ad0gzDVOAP/ctI0V+6LPPfZxLLfDc2ybOGC2qd9znAJdFjZomwsfBVQyy8
+eI1mzzuq7yzouwi//7m5auFM+EK7JBOO/OdjYyTMnvp+MAIuHaub/xwWRMXp
+WsGGKT7Tp+jh+sRHNW3qLDOo3LtlA8wtvvE6CI5SMlU/BLMX2VsDaizjomf5
+YxrV4z5U/QIHRn9tvgYLnO9NzVJlGUl7XGwR2VBacEyFZXQcTrfeIGeOpXMT
+WSajJ8s9m+6f+yT0jDLLDHFrP8eTffgvGnks05nZqBUAizceiXWC5z22T7Wl
+euCrUlXYPjvBfzbZsyRGBq65G5OoCHuUzBEvhudPye3owXyizGVKWbDp4NdJ
+b2Buzmp5G+yX5JBvTfMzjgWiqehnW6f8zzWweJZfuBz6/TXp2xcJ5RU8kK+A
+eeJ1nsh8gxO+B05VwLzsS52petjPuDbcPQr2aPVd7Uzel792DNbkFSj/RXbu
+inZFfuq8p5vew31f4q9ehFccrjxlMgv9rfE/8Qq+WjQoHQGLC5w3dMKrWz+c
+q4PVumf/3QC3hXXs0tHH/g7+o/mw3inbKF9YXPF5nhcclN7mmwtzZzfekIb3
+VRUPvYclwfn2Mehnv8m0KBUD9Pnxl2ppODviis4cWGSWeuED5p2jmBBsTn7D
+u1OKPHga3s0rYObcBc3LyGtfZ43nYpjVddibgzxLnzSm68KC05+n1CqxzMyc
+pHJFqqe8PmgA9/4R495B/Ti6pN5UZJkv3cp2D2EmqPF8ONxtF5J4HmY32x6P
+hXUaJLqR5CeV/Dp46OizF7/S/QfrehyxnuCap+52qi/9mCeP/W+nHZjuSFae
+EfwO9rglsqY6x1fY/Br9Nt3xCN1D9TF1SSPmCbWPH4qDPbITBlow75fhOLMi
+qtfUub3F+a734eZ8onynbdjsinw0mjVUaF4mUs/jFjx5wsrzYXDC2b6HozAj
+KLSphiWel8sFyLtRZpemzmyWCbDvUtSHd2Q//DEQZn3M61VhfrbxuhK4L6CM
+/xr3r1Dr75I3hG3SzI/SeQhy4qzhANF5vWkwL3vrkmCYXW44aor+JuvPiEw1
+pPeHf08H/Q8ua7x8E5Z87jSUwnw1ActTymBx1plgCfKQ+T5YXwpzMw6JnyG/
+pn7FGzfIecW2DchX78T5YRHZN7lDHX60SLE/gtbP2W0RooDnl2++SUj1udG7
+NOF/akTyK2DRFcP9X+XxvCw/OVmL9rf6y2ka6gd8q7zGMZ+o4nvZfnimxpvb
+7bDA++91ilhfXmOBTz0sfmN99Qk8nLF2y2u63tlwYwH6y534pOo95cX3y8xF
+/718v9AxmNm37VMhztPlutNWAe3f2jt+E/Ouj9pUsJHyaTItvYg85Cd/MIqn
+fosyZoYgr1WPR7pr4QTpqG1qyLMzoidSMAee5XLCBm47ObJ0L9xXMWX3Tjjm
+ua5mGdXFB7WFcLStpt7kuXj/ut6FrYAbKov93GCuek/vN6zvyfdbmwFLQg/3
+roLlXC38G2DR/birQvQzwuNN5s1DPUd2qQv6Tfbukp5LPuFtw2KeGapq1yxg
+0U/B9zQxb9X9Jmsb8qOmN+PIZ9mF+TErYY9H96OHkaf67Py+hTBjf+e8Gqw6
+/jJYk+r6bXZbcB61deXJ32j/eudd1XIs41XcNKmePOGpbDSsbmX34SYsyLZY
+cgiuUvyokgIzGcN1BXBbxPO9oVRXjj40g9azcL+8i+pnjSpKYVff4X5Xmt95
+KOMk9tdrqRt2h8V73HI59FuyqLzOj/ZrPdYVjvMsE5cMx1A+kROFMZiv3sdK
+u5DWc3n6PBrz83OCvTrInKtfAPJZ8nbLMgPKJ9P23ELk9/dIbcJeWGygkvgE
+Dti9quE+za/cLjFA3sUG4evVjbBfV1H3eng0YbxFaETv97/GJvALY53sK2RZ
+NeFL3B+xI/32KMykHNlpRetHjD3UMsb61pZav09kuSPqslKmsODDwMTj6E/+
+wbTlG4zp+T7UHIr+FzrNY1xhj/Y7T50xn+cfv0zfCYtCi1qXKLKcVeyiR14w
+J8ncqY18ZEMUDgth1q2w5yd5lktt8Z7iRPult76ykWO5xQ7r09bRegdST4lk
+WSZEq9bbjOp2h7SM4HPdjk0GVOdiY0dlWG793YTwH8jX1BtlUNePGXmmQP19
+C6tZD9+tWOQ2QvN2d4w/hbW83O61weLpg7wwOXo+tj1thjmnOGUXnGfL4Sxe
+O+W3xFrJAf1yqclOY7CkP+XcNpxnTEXT0ETKI944zU2J5fz1dS/okgel3m3h
+sdyl/Ul6FjDTnNezAHlVFYal0bxcaE5+hzLLVcZ8642ifl1l+X4436yvsQ/z
+KY9Df2bfRt6fXCIKXlF+o133HqE+N0h5rpQJrl9b8zEZ9R0rBsSzYKbUVMoA
+/u3dD0rryJ9uvQ/H+v3CgmofWHLlthd+HnEDh+doRlC98dq/+ej3bIzxomQT
++v2kOPAMzkfL6cHdDKqL3F/g+4kLNPHIvgiL/uHNw/vDbRoMXk7mKpadtcb5
+HFO8qE3XS5ImCDchT6OkI0tTyCWu66Jl8L2x/PiVaFhwdf943wSWy6yb0nSA
+1tdMP54EC8RBpl5k2fMygXDAt7cWm2FWTnUj6kx2e2zAKlpP7KvVi7pqzhFt
+M7reuHI0DOsfG0kMX0h12/lZVrIsZ3RFOnIB3d+wMMgA/XUbT65cQtf7z3+n
+h/5nCo/mraR+Fn8ynofzdJxuq7+V5qu01jHB/L13cpv8ab1W80JtPL8ZMxr1
+48khic8HkFeW2QuVK7C48E/pM8jzrZHE/SW5s16Bh/Nteb/57jjlUzDB3hLu
+STqbqz+fzkvPxgznsdvxaL49LPG9eHoI70vJXKMN+8n7eviBWO+jxaSFp2HG
++sa9YuwffTXN/DrM2vIXv8LzZrXGMqKS1jusdawa/SdN0fJ/S/erPAi5juc1
+LqflThssvqTVdRLP89IB3+AuWi+vbloQzmfXSLFqB3lr2ZAv3pc9IddNm+n+
+WOVNR5G3dnLC5zpYFGCysVKa5RpHb3IPqH7z8ePV0vg+eJhqXkh1dedn36VY
+xn/nb1kZ1E/Ydt9PUiwXNHJmeSJdr28foI/r8/N6gyLnUx7rDqRgPcWlb86G
+wIK9gRpm2M9LQ/NxEPWr8JuhEs7zksDuX8pD9Lub2xfYU1huf5jWY2Vzx9D/
+Pktnv1i637WdPwHn+T4+TyWd9nfQ9pZCHsLbxUVFNN+kksp2uLx+KL/+v/UV
+8nKQn6W5h2Scrq+etdIS+aos2KA0awFcpaifjvP9cXV/mR0s2FBdUob69qN9
+8cGweOzXxGz4OTexO42uP7HD0RZ+tfaFXzksKl49cAvPj5zF9uctsOTSzw79
+2H+cPgv+//8TBfZ/11uc6w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.666233980906949, 2.1296932060463307}, \
+{0, 1}], LineBox[CompressedData["
+1:eJw9lQlQE2cUx7dQaURsyx0NJNnsrhU0ioBAKcWneJRDRUYq5VA8oBjEFMMl
+Rm4BE1shWEQUwVbKIai1pANoS7QEUTEYFC2HDqZaREektCgFRvptdb6dyez8
+Zr+8753/R26TBkUZEQQhRT/2/eahIWRqGj3mQNxK/Lm+nQKJq1mRONMC8Yaf
+4sspOPT90qxgG0sgAuu4bbkUELVp4cImxF/t9J2XQYHsafLQjm1WQHDD7MeV
+FHQ9Dw8qNrVG5yuvHKihILbfx9ejFjG3pJZzj4KVD+qWBHnaAJGv72k1pyF6
+CTeitwFxxbJXzp/TcPyZ9omFtS26/4LKrYIGvbS9qmsT4oLOLRHPaFg7cKRR
+vY9lVQnlwoDDjYx+50zEKYrYj2UM3E939T8iQRxp6aetYoDe1bPnzieIhQt4
+5TcZkCVaaiMn2PuftmYYGGjbbr6srQ5xRoPI4TEDpIPv+YBQxPBwnbSbgX12
+6hu5pux5he2qBgbiZz1pvt+K4rl1KaU6m4FXx95fLChA7LF4Mmc1A5N5nVqr
+PYiFDrpcggGXD/xnLpCy8RetM6hpCNcqtosViDXOWyxjaWipOWvHY+0JZyWU
+0DQsumYyaWuH7pu/NLH+T5SvuwbZ3sOIY5wrTNUUkDVlp1/MQfGM5G04o6LA
+8+Kx8qtqlsfnVWRS8PJxtIVPOBf5v9zrRRYFJRM6gjCZg+y5xuYUU7DW2CpE
+cgZx5NlM54sUZPUePOC0ai7ixlDtMAXuUdzZDR2ICZ9WahENJQNmoVIvHorv
+8kfpiTT88Jo+41eA+ImY+42GhvPi6uleLWJuDuhMGfjizm3vvH7E+TGXrq1H
++WpxjCzsZs8nnQ9TMiC/4G5q3IA4JMF4pImBEzG8O2lyxJr2Hc2/M5C9d/fE
+uCtiTnbQQ1SPmA75rbBHyJ/5moOlAwwc3RkaZ69iOXWh+zUGlJyQlx2s/4Fz
+DfxTDCR8WRtz0gTxQN2nzRIGrGZY9032onhHStVrHRh4vuaXflE74ozxqKsD
+qN98h/tv6xFzlaeyvqUhVxEm404gdkobfTeAhqY87Tv0cmRP01PQyKFhf1VG
+UWAl4g958upOCsZit4o9KORv5NaAFacpaCqYNh1Ss/womTxIwbRZRNWSTXao
+P+09BtMpkA+z82aHv493fheiq7bH//cOIMZs/PjYvnH8ya6r/Xx8vyI8fde5
+UAH2b73c83XfrwLsv8YrqO1vIyGOz+1+vrmNrRDHP3vzqcJhnhDnJzU90SLL
+Qojzd+RE8NGt/wpwfvdPVs10aRbg/MeXVqoMcQJcnwr37MWneQJcvwOKwhnv
+3eDj+sYef7QgM5uP639oQ/vYlD8f90fxyu7y3Y583D/lnIWXUyg+7q815zYR
+jCcf91/Qg96Naikf9+eWqdHKgt/4uH81yYOj/i4C3N9JRkmpnf/7/6b/I4iX
+t/0chXg+GnNKpqflQjw/Mw93JD3QC/F8RdMuTnYMiedPJv5RzJGReD4Nxe+v
+9mkk8fzGlcmN/vmLxPNN11fHj9qL8PwHl3uuG/IUYX2QpIbuk3wmwvph4s0t
+G1stwvrCUafEjLiLsP74TylFhay9t/rUJmNKL02QWL9kcX1VPV0k1rdjXskD
+J2pIrH9XXJLKOrNIrI8Sj6I2620k1s+vz0b1qv1IrK+D+S2F0ctIrL/BaWqK
+WUFifeZd59XZbCSxfruZlSmTEkms74FDMr2qksT6/1DlMHjXQOL9oLPc3PeH
+owjvj7lK/d2GVBHeL9fNVipv6kR4/xjXa/RSisL7ydvpsXd3AoX3l25wr9vO
+FsRv99s94zfv/wC2rKt2
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.844981764589882, 8.25073156171056}, \
+{-1, 0}], LineBox[{{6.4999999999976925`, 16.}, {13.49999999999251, 16.}}], 
+        PolygonBox[{{9.4, 16.}, {10.6, 15.6}, {10.6, 16.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 16.9452}, {0, -1}], 
+        LineBox[{{6.499999999996362, 16.000000000005457`}, {10., 
+         10.000000000003638`}}], 
+        PolygonBox[{{8.552322615314452, 12.48173265946094}, {
+         7.602165824326175, 13.316718930329426`}, {8.293188945044921, 
+         13.719815750748694`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 12.823799910437668}, \
+{1, 1}], LineBox[{{13.500000000007276`, 16.000000000005457`}, {
+         10.000000000003638`, 10.000000000001819`}}], 
+        PolygonBox[{{12.052322615314452`, 13.51826734053906}, {
+         11.102165824326175`, 12.683281069670574`}, {11.793188945044921`, 
+         12.280184249251306`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.484057296392571, 12.823799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 16.}], PointBox[{13.5, 16.}], 
+         PointBox[{10., 10.}], PointBox[{10., 4.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/chdfef/ifghgihi.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdfef/ifghgihi.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:eJwl1ns8lNkfB/BHQ27TppIIRcktNGFF0UxRaQmlorLMMlsTilAuYUdXxbYq
+onaTXDKVJLeQy4gy5DJJ0ZaioiG5hBq6+H3O/vzzvN7Oec75fr/nzDmPtnfA
+lt+nURS1WIqiyJMam8LfYhalSjCbRVkap+sWwy6O0/OVYWFBoux+WDxVuJJF
+HH2i2wDmGXquOQJLL/1R/2ER/r/f8thz2HG0KrkI7ji1u8d2DouSa6loiYVF
+PDGvEn533C1pN8x/eK5hnTL6G5xJdYYFXm35T2EdnywjOzg2tFm0dy6LalT+
+Q55Yv0ou4TtMZTeecoIZl8Ve8Sosirt66rw3aZ8/9WbWPBY1dj/3ZjQs52ar
+cRreuktK6iqxwu8pI3BhVPDROhKfbtzZdarIQ2DzZQgOLKPTj8FjRyLoqshP
+qX2y/yYsjFIPtYFZ+tlfy2HuWPF0T5ivkvflLtz2/eeKUFjkGxWVCnNkw9/G
+wl3rDk8FwZFvNdQTSP2+Cm5YwlQ43z+evL/IcP0o4knzSNgcBadsslDMhiPz
++aXesH2wXYQ7nPm1UZHMz1AfWkqH3b8Wa8+AO3b6X32I/HmFy5htiN9S5vVc
+Ug/q/Lh0IlzSG7mFDds7vvYi9VLKdzm5HnaZ7AuRIfnnmRiugeMHqbh72ohP
+zaxzMyzt8ftoEFzyb+uv4eR95xsjxrBlsUnUXbj2tU3moBaLSjgu0VYk8bwL
+GiyG+QrtrkEk/rFBTizMYLQ698M5lRtsOKR/w2hmAPK3Kwtf40D614y6/YAZ
+TmV1NrBqfBT9nBrW65fJ3FWkf463qe587I9ea7YdXFLUY14Mi12K2rbDkrVm
+N2zUWZSWg1/aAThthmZMCczaJKHOk3Z3m6WLNbAvWLVDJbDIvbk6ArZPlF7R
+DbuzShZXwKwvGbHyyI8/larYB5eYLrmwDA5MVdT8AQtundLfDMsZGIi/wYmT
+tiv8YSX+4NteuLzF/ns0PHzxk2cl3LiNoxhL6id1fM8JmKOo4nYC5m2VzVlL
+HLFjXTjM6qrf+gXxCvQG8tik/68THXy4o6nlgzUZL2mnaBfsbjNx7ycyn2VB
+jTKcssTJtR3xd4kbv7ejHsILdrYpJP/wCc/rsKpdpr8raY/uMY+HG9NnDSjA
+4okdqkdh+zR3uSMLkZ+fS+tfsKRgPX14AdoFgRsLYMZ8TjAH1nIrDfsIu2/+
+dvqtJuI3zg/4r95jKcsPwPxtBh5XYZ55b64SLHdtzmUVUu/c/LO1eKY0N3Ve
+xJPr6Zd0Bk++JN1SD/0k/boJAXBXvqlXGcz+c3LvHjhQYU6dE+alTn/SPAh3
+vH/d8RqOVcisvQDzqloW7kXc/Lj+7HqyjiFdob2wsI/mpYBxRDQvDUOy7za+
+H9kKC7hPbrnBgabcaVlwTox3UwRsaXl4Ypzkc9qj9hwc1v7QwhbziFrynK+Q
+fXLpPCsWLhnKSE+DWT2GnwRw4v5yTjLZt4a11/pghuHXG8fIPjOx85qC5Z5l
+DeyFtVI2dBM3xswbsyfvX1rRTPpvdTRvXAxz34bfKYc7wnjbJxA/67O+TDgs
+SBbfvQkzZHSMteDhwSgHH2KX69xCxJuW7uirQ/L/d+Y9S1LHbJ7CKPpZWp9t
+zCN1Vtx+oRVOiNldq0XqU5wvfACznQSaf2KdJJMdCc2kvcMtfBLryst1//GR
+xP0gfN8+so/UZlqQ8YU9h7f343eopcwPDITT7p42OAhzxbenPYaHt2c4zIKp
+ZSPF2shHn+ezv5qco5kxNt6wXKFGyEn4mMUlYz4s+MXRgwNLc+7uGYEpHVsr
+d1j0cu2NVeR3YMdd5g2n1Y7zj8GML5rRPLjW6LpOA/ndKX48mwebD1+epoBz
+SxxhtXCInMtlv3ivhd1d/ewsEU+ib3PeAXIPeBvkn4TDQm1KL8AuXOmODlj1
+jvadPJh7u2aOHvItl73JqoLDHnC7Sf5aRdYn7sP2IxJ58juKVzGdew/WatRr
+aYONZMRD1+GugQWzB2EO1z4qgZy7qx4Hf4KHzewiAsk9yInb1wXz1VvfO8CU
+bQ37Lqy0zeizDrnXzh+5HAqzN+gMfifnTpyh1yKYGjmk9pycOzfuVJUiXobJ
+vJslpD3n9VUWLH3Wh58KJzzkni8j9ZY1b4sn9dqnyV8Ku8Sl/EPql1d10zkF
+567/6un0k3DKZLaeDDwsiq9MhMO0Sh4dwjn+0vrYi1tk/IjWrBHcq8PHx+a0
+knuAFi0IhwXzhVkUuTf1h/6ZDfOKsn0sSX47C36qwj09ttykOpTcm6GcBTGw
++O74m3JS//HzYzvgHH77HRlyjxYKmzbCicnJw86w/qSixBnmxKm6XoQpyYJ/
+fWFu99ILr8m92DtDOgVuk6Ula+ng/fQQ+zaYobN5707YPmh/pzriKfRb4RcH
+S6xfHPWFO/qNt+fDlNC74B4sLLdybIYFN/fVKyBfO3lx1ys4Qc3YyhUO/Jin
++Y70F1WVJZB7TyophrRrjcWFVpF7lTfx9b/3L00zfQknbpe8KYZVucv3vIPN
+7WJ7kmHLzofcZ7CYS58MJtaI3H8HFmZMbdykQ/bLstSDMH/NGXVdks88LwUd
+WNItU0bB/Ab57ErEq5o+05Pkn9Id9rM9nNN5Q6UWdjcp1KtF/h067QV5pH3B
+40gLmJ7VUHCNfIepxSVn4LtKdSjULJvUz7VVSQlWukt7m0++4+7rxfLId5tP
++o96Uu/OguCJWdjPJ/UcB8h3xiO5T9Ew4xpbUw3xpBwPuKIMd/UtcnOGSxoi
+AiuUMP5f9yP//K/enPOHYUflqKrHpH5xB3a4wOLlFrPmL4GZjgbWcK3JAysO
+zHjzPGI1nHNp/OMtWBxb9XIbHNnt+H4M5u53o/HIeA6pXy10kY99VFcpLFIO
+NwuCXVgra6bIeA6xrzJhbp9s9CbE5xgxK6sJjrXXPJcK68/uTPoAq36Q9hyE
+dYoky37AosUXN1kif//gwT0yeshv1UH5MDhHdRVfCtY3Gs64Dte2/mgcRf9A
+w5bqelinVVm9E84rVKh4CsfOGzStgsM2rxY8gjOD7k79DbN/yn5+A36nFp5x
+EBZbDEgHw/GJ39lOMGvUcekSMn8N55g+6f+OMb8G8QVmbHOYTmwTFegMcwMe
+NPWhHvy9AUebkG+eyE7cBofNVbFeAxtpFurXw0pdf3f+OpOsm25lHSwwfORh
+8RP2g8tl/8fEJ4Ks5s7AOI+Vj/fCLtXeB2l08v3KfEPm0+oyDJZXxD61l+lf
+Dis9MbliogBH1Z7fDXf5Fi4Kl8f5UCoTnAGn9UpnfpRjUd8amA97yfq8slL5
+Cx6wUzxlgvoxiq9f8oQtNymeCoPZPYyDu2Cj7fmR92HB4cdzjsL+uZ/nK+hj
+/L93GDyG6dpSZpvgPJVvz5lkvlVd908RG9IldbDH3G30StJfa7fTb4jPcfmb
+a2KY3cQbn4b4xZd/OyNngLweFd3OgD0844w1YVEDbeNK5OvvOOWjCyvl+H6u
+gN/JJp7UIf2TZe7ooj70yE62KnGJ2al9cO3ET4tpcFpF0GA83CaO9+rFfFQI
+rY83g3yX547XwEqTNNsNpP8396nLsMvK7VdeY3z+hOW9QyT+y79HOcCUwZGD
+LrBWXabBGcRn57sw0JiMd87n7xzkUzLd6dFMkk+655pbyDdQLylgAvXSSteo
+Sib1Wvpj4gPxo4bLIbI4n6fvuimGh6cejTpOx/mzyn7XMCzyPzPdUAb70+5A
+AI2Mtz60X1maRYWYBbVrw4E8oY4KjUUps2JmOMACbRfXn6ehf+xz9WiYsfJg
+Z5gUzjdh7rVSeDjq6Z0eCuspXDv5lcS/R2fOHzDd7bSGLerTtcfz0HpYVH2j
+Ox52Gc8NXgWLjQ9Payf1+5bVsAv+J0TLfKEh3h9MCM+ArYubmT5wYJP0ezrm
+EwSVqV2FlWT61c/CGocdPj+D2UdvK+ojPukVxR60pZhvbsl7IcwqXWmxBFaq
+SYvwRT4db/2er4JZ3bdO0pDvyy/yszbAadJHDONgQanBAmL2SqbZBJw4drbI
+mvT/w/3wetRrIMdXog+7eGct2weXl53iziDzqZbS98Ia3U87PpB4r9DjVsCW
+o7/tfAiLXphOtGM8dhJN7wrsck72qAMsZNqeDoPz+GeWJCG+ErfE+q1wgpxU
+Qini5xc/oluQfFU3jFYi34F44YYFcFrVs+ocisS5QncmTJmqPVCZYlLDcqxJ
+edL+yaag7huTKjn0NJe08y6xn0VPMqnIFYxKLdK+5+whJwmTYlW+MLIh7TTz
+Vxs+Myn9BydOcWBBvfBaxBiTamy6OJJExn9tNW/sE5MKk+PMF8GsK1aXKkeY
+FN3vD89ZyJ/yXb+le5hJ2dG6m91gQXhhixcsd+Dd+qukfhYVH6zg2AtHjnwg
+/ZlzGvzgnLlNP5sbYb3Z/dQgbK9zTyecOONJTxHGH5bZvLIEplydvxVhfrqj
+aeoQsc/FmFejGD+kqk7TGM6SUVowzqQY0hN/roG7Tmxy9UY+8dVHzXbCacMx
+D1O+MKnEos379xBXDwffRv6cJ2m+e2FWu9XtpAkmZe3KqGfD7AT6fWvUS7ij
+KsWJjOd59lgKvNVO1cGctL/d9uIKXC5RuzYH5gVlzt0Ei2bvvDOI+LpqD+mn
+YjwxbcHVOjit/GpNIuazFx2rSoNZQ54sC8Tj8qZpayRpNxbvjUP8rPz8vzxI
+e/1vi9KQX8oW4X5b4lvV74+gHgyvJzdNYZ7RzsOxgxg/7931paS9uUJ6oI9J
+aQRIdi8j7pX229bDpFTLcw6shgVrpA70dTEpqjnirTt5f50c68JzxB+R6xX9
+n0NKzVuxPyi9ebmkvt+3BDXUMal/tMtEvcQhFhud7jGpwDNvxnVJvWOftozz
+Mf80iwx/Yq3ohuHT2G8bJPeKiMkfr+L/TxPW/wCX74+H
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {6.573901114580226, 6.782664290660753}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt13s81Gn7B/B7FDmVUWJINcphpAOySgczu6UorSmJpKcpKomlZFHsM0mF
+ECHVpiZhC63DI6kcxqEQamxOUQyhlKSoCPl97n395h+v9+u6vvd9Xdd9D746
++7y37Zch+DAI+ffn4CQ+mjzSTX8u4xHmkdAJNS0eWaPC9rkL8/1SnWfCtjGJ
+HodgCev50m/IF+8xtZwHD271SCyH+1VyjZuW8ojw1xP5AbCnc8SBOOr2rDQW
+HFNOah1hnuNztzQW9hu4SfTgQZ3+LD04fsFXq/ElPCLqXN15RYNH2OumHm2H
+2TfqixRh8ZWA3hqYP5K07rg6j3CKwyIrqGUMjw3M5pGCob7GSliotHC+J5xX
+UFrWAEs2KWZ9U+ORqUXb+vtgEqnwPR5mTh+Ok8X+gnA5zY3wpX25d2k9vIvx
+G5iwZ0jDXGuYPWlU+WkW6mt0EXrQeu/cbHsP8/hRsRGwyDK4eAI+puY+L40+
+78DO1MPzAf4Gug9p/yfufBHAPsv+11MJM7uuz82E+W+X/HgC8yuVJ2RQr3ZQ
+o3c5HOMw9FEA2y5P/DsbFrtUyJXCi1e9Sb0AS/1VV89D/2avr94/BGe7maT6
+0nm4PSk1p/W+vZpdCEsWFzLG0K+xVqPtF9gp9b9aBbC0qoqlhXleahOOesNM
+m74zHNjTc6RcF/bR8xqZB4dpyIpbFqM/m6Sn43g+c8/+NdEwu9j3SBlc4NXg
+v5HGl1ltPgIXClTD5WCScfO+EpxiHmtdZ4S4tvZwPOrnZ1WvSYKlSS/7mLC0
+9U24P8xMztUIxTwq9ol6XGB+u47TEObpU/vn+S0wLyMuyxVOSXj2qw318ir1
+1pk8sn6f1NcOjjF4ZLULTonylf6Hxh0DTr5XxXkV6cz6HSbHDX6LhtdcjlgR
+R/dbEvd2A3z10SuLPLpf2OE36nCLm/yrJlgyuuvAJBPnaXPlnxHYuCRqF0F8
+sMb1uQb6EzQzC1hwZNqjeyawWNnAl64XGpkVvR4WFo9cPwNXODjl/krnI1cb
+2QhLXv3zgtrY+8i7pai31qhC/9/8up+/R8E+ubeWLqXxrDLxB1hUbDWpDEtl
+G1fZoP/hixrzOlEP28887k9Y27QsJIP2q6i1QwpnXi6J9KJx5xzRLMxTIrk/
+zIEH16RvMoXJ9sUPOhbhvtT3TFsFGyuozoiHBX+Qk4awmU7Qamsaz03ZS+j9
+jWOf/2GIebmouJRg/e2ZZZb3YZ/DIh13WPnLta3HYfLlMX8C9YbdLo1YBws5
+ijtDYE8L8x3qMF/JeccY+h8Zar4/xEE/Y8t6PGH5xQc2vYT59+w/tWHevBC+
+ngQW5m07uQXOPhX88SnND7/LiFLBfT3HetEM81YeYiXO4BHd6ZZpfbDYY+4f
+pdOx3kHDQhnsJ2BuVp0FK69zNNWB2ZstZsQqox/nnt5fYJHm/GZL2PizQ8J+
+Wu9seclc+KVsxcAZmKczYbcErqo7nZtC4xtVbnnAbq3mjwupC0e59fCIu6Ft
+HV3vmWGlM/YbzrC710D3X7ogYBLm11S11cPSXo/D+ai3Sn/vWDldv/TyVz/0
+k3dBWJcOG0cVK2ih3/EekxC6v4gbvd8XFnkvFDvS/EPK/DJY2eNu0ny6nv6P
+QBnMj20rSOig81sgMjGGid+A32VYUs+KsIa7HUzs7ODsqLzjNnBB7eSuKbAo
+N2nYBDY74/7ungHyRZwBBl3vhPo6b5h0rHJ9QPcXDMQYwT6q1Zt2w27n+6oH
+9JFnXTClDfWvLNe78gCW1o7tfIX+pgYrbIuBBS/+WvAE/Rd+Xt3iA5Mk5tN0
+zEscLCdyofHUp1vClXCem86k2MPCNZfSvRWRd7bT3YHmL9G/fFABfd0JnhDA
+4ll/zjwuj/lOmVTwo/vdKh7+exqes01rO099UfFvZVgyftQ/i+bryI8myuH7
+aWydVU/X8229bQ/HnDC1GP7XKjE8OFOvqVIN/QlGR7x2w0IdxkITWHjunexf
+cMFtZ+5GWBz/dA0L67d8Xb7dgfpoMj8dbgiMHdgJS8Pi2Q6oj5N3g2ynccfy
+Uyqo/2rNeP8vdJ6BJOMZ/PaNWZQ+3e9EaPg59KvGO7J8EvXw9przLJTo7zeZ
+v+qoT00/+0yJ/n2drR1H553MYW7A/AZlWvW30n4f+EsTYFZbRroCjbtbXbkP
+r89596hYD+tzT+XfgbP/u/vhUVhcfyzdB27pUGk1gEma/ogMPFyb4SbVxTn/
+xDA8iP0KFBwDr8G8gZzcG6jPU0F9zBUW95yrLED9DWppwaY0f+1utTz0m8dI
+M1OCBR5Bv13FPKrOlvYOLMTzQwF+JzC/FFv3nlewWGvP4l2yeH7+IYUW6nPN
+0VZT0X9EQt5LWKR0SX/9FHhiV8s7WOp9MXWPDH7vdKsyGLSesdXh1xn4vpUe
+2z+X7jf5+xMFODKxcHQtjbMmk5IJ+ivxPS2g8WjfjZ7wyMSihyG0/s2mjIMw
+J195azLN//Z2NAa+yrbRLIKlut8P9sKS7zs062H2wJucvVjfrI55/SWNa8xO
+H4PdM+u2tVNX7WnLQH2DsXlWjdTtbq/dUX9hRM6YmO7/0+0mDvrbHpbscwMW
+GgWld8LrT4ey/GHiZSgKxzx0h6+1/kLzExh3NDCvlnLpNDmaX97VegqWj260
+LaPzem+RVAk7hVZdD6TzKhhUb4fJhedGS2H2NZdfK+CRGQ8suhYgzpy6JZDe
+f9UzGpdgqVWv4Q/sF1naP7kVZqc0TzjA7FihzEyYZ+tddhr1ZednfXihg3yn
+N9rx6KdC5/jqDFiUZqARTs9D+w7jLEyOfKr2wjwC5mzp9aL5teKxzZhffMJt
+lgAW5nf57PrBJTH33Ox2w2IVRq3FOJe49J2qcaNeWXvX6juXVBi5C/yotzYO
+nx/hkuxhJ2EUXX/UKl//G5dYO87ZQvcX9l78qvaVSwo0uzNqadzdXnnfFy7h
+iZ7t+kidVLNTFXYv+ThdFf2ITUY4C+CWwoHgZTCJYP7vPJyZwYuwhoXhIfZb
+sV7hws5NzjS/enG3M/arkqbrudK4wlRuEurp9/Lp2Evnk1/UIYd6C5Ln33ag
+67mUXwsd45KV/7hyLGn+cEqwzASXeCZ4nJhD80NCgzzRv+6L5BUDqI+3KME7
+axLef8r1HixY/LrHBfOqmvLn4QA630R5k2LYp/g/s5bTeaTXCL/ArNlO+/rY
+iB95E/QDHm49EZ0EC3TSHjbBooaY7q2wdHZqWzBMxm9kybPp/wPVKu+x39vt
+sj+HzUd9HQM1IainxaPBUxnm5eq21+E8quR+sb8xD/Fppodb0Z+AsSHXhrpj
+xfL76D8s4Zv/NFj8raU9CPMSqny+0zYX+xC5lRbDXCL6/vNvj2HhuqIdMp+5
+RPqe30VNerQSmj9iPgvbNtN8YfblOJV+zK85WoNB15c52l77lkt8WqJGzKjd
+jbUX9XKJ0+oMJV/qAiXr1d2oL7Cf3IPJYMZL5ddcwoq6YDNO44nE7mYX1rtc
+Ym1J++vOaf8OrxzJCQ2AyXOD4mn0+dNnm9JoPDQoJr+HSyTScxcf0fjVOSs/
+vOES5nqL8nrqZ74fzr3D/TOz1amm+WvnX/jtA/qdFW+fTueVZay5YpBLOPEh
+fceoOX7bcj5xCbug3dWQ2vXRnJlDqOel+7JqWu/uoIwNmM9g2q2EHTBvckzF
+EveP430mpYHOQyOhuw82lsmbvpHayvy9Jb3f6rzJHG3M+7Z/6E+wddfIV02Y
+7CCMJ8gP6A28cGoO8j06qsaxPutZ9+4hvJeJd5g5/oP9nYrtb3pp0e/fdkV7
+nAepUVr7lb6nuXs/iUD9YRY7PWM06XlJ1FRpf8Z1+ZYwKTnGf4jzIAH8Ghka
+d9c6uArzWznFyOcV3svIwudhnh34flmIjz+lbj/ef6cJ/Ss41TdQR++dqlyH
++7On8/cBauYKzkAhl1zqWyai731k8EiIOAb91dfX21EHhO7J/7sE7zWWsrQe
+Ytt6QLeohHDUJc8bqKV+tZ5lJUQQWJKqqUX7d3hlVl5C+CLO653UaTEZMqUl
+RPiKqRdLbZ0frl1QQphee90eUg9KbuYll5DBzV26jdS3Xms9SuYSeYXDV9qo
+Mw81M0swv3lFj2upzVs+ratBfWHV0X9RS8wnk59jXpV/PD5MLXe+6/cXmI/2
+DVMt6inm85614/u08LIwj9ZrFLEop5NLRrLOm62l8zscnO2P+2q9KSH6HuYh
+rJ8rK8I82Y5DBw3ofIpsUmfjPlrHshRj8Z4ltL96sgZx3mgTGcV7E/ncFV6I
+592vtPW5Uj9c8vo91r+07cC6Jrw3ET3fyGrsL1Llr9lOPWmmcqwF98NYcLaT
+/p/fYJekWI/zdXi6/CR1k+WMS6V4niRG/kT9/x8pfd+fxfs/aePoPA==
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {0.4875589769853401, 8.878318388907438}, \
+{1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000002274`, 17.}, {13.500000000002274`, 16.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.552325660469876, 17.180083206945802}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1ws0lOkfB/A3USpqcp0Q41YaYhKbrNa4i1wrUZRKKalmc881bOWSJImi
+HZJLWaTkkrYhogs7CSG1UymWpYmKJP7fZ89/znGcz3luv9/3eWfOeVX3HHXd
+J0JR1Hv8kf/U5Cw+6mzqv48Um5KJzjmppMGmhOpWM6dhz5bjVyxg/phKj7g0
+m/KOlU0KhAUfa7eEw+wr25ilsPP8Pff74NTBTdRHMj+1VJ4pw6aKksKsDTXZ
+FE0yQ3s3zO3Wn4mC+XsVymJg6oyJ2GPYe7x842m4fGuntswKzG/ozAqFqxMd
+7XfAfP413c3w7XNWnjmwoKYhRAHuN85K6oY5G1aUPMP5jFxzh0UrUY/KUFEE
+zPvm6G8Al7/e8UiF1PfbVvnNMCXzreY++uvX/mdwPxl/qGm7G059Wjp8FPZu
+OMtaANPtR7OOwOwo09G7S9HP57zuvXDMrFNyJKzl+MuoM/El7QgXWKkkImgd
+TCuZ/tUYZoQ/37QMFtjW2xJ7r9CIm0S97GnVj2S+aN1x8xdwufkzrxNwI/dW
+TRXpR+LFxWY4W+SjWDbsbdh0Ww31mLyqVToJO18/9PksHEHvrAqBGR/ZLxeh
+v8bPbhbHSD79Hm5p5L7URP4KJvOvRL5XRl6ZOTZzyXr+YN6jEpgzFqbAJU6c
+MFwni/GAX183knq6gk/UwM4TtdfHST2blmzTk2NT7iXGAdroh1+77206zAqf
+afODU/V8Jz7APov588rJ+FnaWnV5NpX8+OOKbySPXrqMLcy2M5O21MK64aiF
+W2HhH/ScFJjR5xFpBwdaNmd1EbeWPVwFd+ybmVy2Cn2oR2l+wf4dmqq9bjCr
+Mq6gDA7MLfo9CeZ8rRP1IvVUtM/eIeNS3bFzYI33o0u7YeFpvfu56EfmHG/b
+KOy8VyreHC73udDwDU5l2mQMIg//ZX23puCYLy1xmXDLfsNvn2Da3ruBbrDO
+0MpGAcx3CqdWwO6VT3NayHj8KfGFMK1y3O0GOU+Ld0mU5Juw90siGZ/D6pMj
++Zt9vXKQ9GNh/INNnu9wv7iNxFThulhYtLe1SYfMN8jr6ibPt/DgflkyPrPd
+ltRbUiKvK0b6XXvG6K4s+V60Xf6BvJwD31WYol+uAatzFo6ZbLN/At++ef2S
+BKk3VM/RA3kqxVaaasDlPePD/bDM75xCa5KH772jB+k4X7/NKgBmv4o//BY+
+YLxes5jked5OaL+MTaVLRQs/kPGz3/Ly4Gq3C5Q2E+c96Bp7B3vW/XE4AOZ7
+0pmLFXBf2gNqf8Ic6bQTDLj6IH9cXBvnFd/XUoT7nr+qcIFpu3otZrE+/ss/
+NhmwQEdS0Aa3eHU3dcCMB2avk+FkvfCoRTqYn7m70wSmvo1Ir4d5Rb+MkHr7
+qipOesKc4Ku34mDWiVnTIDJf23pEHS7ntsvHkfm6v/m0oH9BQYrbSZgyGqoK
+gjkTkhXRMFsigMmC3TU3WXPIfuXJId+Rp9KwMMEDZkWeKumFtWb0TTfA3E9L
+F/DhzBulu5eT+XGzA33kPi4PL51G/bx59jfnYD/+rE/0S1g43d+5gXwfBF+f
+3YP54mGdZ2HbhCzpa8RTow5fYEraRfE8ccx8mUOovyWXeTwBZsfJbRmhk3oW
+HSJ2DkuoCUEeEsemm8h8bl3uZTHka6ngP1FEzlO8sDqN5B3y7HsLnFqmXk5X
+xO/Z9tZd4//Nz8tLhwUu7ZYrSV6jJz7NUcJ9qDD89pJ+lvgxvGC61Z31BbBz
+t9mRq3AMr6p7BPZ2yv/UTsb9M4yNVqO+XXklQ7BRpelPcTBtw9yLxN25R7Of
+wsKkrCvP4UBHC0cpXdxLc3FOITkvWXWzKxzDbrI5CPdZyY8kwsKyvyWVyHyv
+zuu1cKoKb+oB6q32zAgWkPXdJgn74NtWrrnfYb7eWJAYTMm1/rNID+MXXVOK
+0H+m+7ropXqk/wXRm+HsF1azEjD1vOLqQpKXVcfRWaynXnX2PEOegpwtBkMw
+o2fKvQTmuYTOtpH6qjjnsmEZZmF9GSwQLJfOhzXaJtNTYG7kzsgHcERcdOFh
+Un9fRugUXLeyUcMJppnX1djgPEbbDhVDmJ1XtqQYFgZGhavCrJOCMEXUny8W
+8VKW7B/raHMZ7sjrSZEm9XkUm2ggD//+pnhFmLN+Hu8mrGPEMdcl+8/sFzdd
+zqY+Hyt8ZU/yOKPl1AzfPjjxPYDU1+cxx1oZfbxx7LpG+uH9GL0DG20QNyN5
+0n5yCpZTwe/NuznVqiSvVtvi3bCz9cYjB2CW7vChDFgYfMe7AhakLEi8BRc9
+rvL7Qcbzax9Uw5uMfi5VZyF/m5G/Csh4VJW4DcxVm7c1Gu5aZffAF2bVtL+w
+hNtlkyfi4RiD2Nwp1FNgfeJdDixk3MzJh3V0/D/dhCmrgTU28NvyF/d4MM2H
+SRtAf9c7shQfw+z48HkJMHXqmmwbOU/UoHUNnC+VNfqUzHez6HqPvA40SCo3
+w4x/LVWK4bSkRvt7MOe4rXg0/PbsG9tyMn/iC8uPPI92EfNzYT4jyMsf3h/4
+MjWVrFdg+ZyE0z3qp6LJfIvVmtWwu/w6Tw7pJ84jicL5JrvtGvbAzpWVF73g
+jqX6mu4knxfjQU/h9JKNO13I+bvKsjaiv2B3exUnOFVZ+h0f/rBYffi/8eRj
+j7yQV+yGa7TtZP9y5cRhOPHyrkKS54G0RyXGDHwfja+lHIer86PtwmGF+38f
+SSN5jMmGVcIxv9DvlcJGywe2DsCXdM7zSF6huqZblqiyKTs/q0ufSN6TOx10
+4DTrTge5Nfjdm78neQM87fz4yc9wkWJypzlsnh077Q2zzlUcMIEvKUU8iYeF
+D4tmmHDDr5H6BbDRqsf1ZH+5FqZlI8xf8NHsX5zfEpdl+Bo+3W3r0wCXdkXv
+H4e7C546pcOJT274ztXH+qCvbj5wgUr0rCTM037ytwHsftdMRxqm6y+1F4cH
+h/U1iJ23RVfVIx+DevfNi2GOhqXpCZi5XmObGCx8bn7bFbZeLz85ifOoZUr9
+RvCRt3+oDsG8H/YPDWH9m6+7e2DvXb2+duT59ju/5hHMvh8jCIYzAk5Z1MDc
+HZUutXBU2IzyDTimoj1kAerZP9hc/zvJo0ewwBQevUlJZpLxTUt0IuBQox93
+02F3pvWrP2GtLTWeGTBt7uxbUeQ1Vqpkl0PW924U2MPJnY5FxfCg1E9HzpF8
+Jcz23oVbFK4aPIczGJF67XB5eqjIEjU2pfaedWYE5uTZ95vDrhNurRLoP9Tu
+lNFhWMa3ma4HcxNseMnwL4YDoZthrftGJVxYpDX7TSjJ0+FrfhHMjFAzuULW
+d55ry4ftflgfa4Anzyg3XyD73y0M6yfj95y4EbDWA87OuWtxP57+HdthXbe1
+DspwqNrCdfpw7anDlw3gFuHqt6Jw5hu/NiuYX5XO6EQ/GurruC4we7eY2zXY
+WZUj4g6zQrkfQmDvph5lDzimSEfZCWbZlW7dCmuZ7qKvhm1ZdesdYEGa7A1p
+kqfI8UQzMl/TezPJl7nEQWctqUddfQUFZ9e6qqjDjHdDjfNhiYRFQVKweK7v
+NkWSt6+rlQicWv48wZh8H5ZLXR1Hv6dzt6T6wPRjq88NwLRIA71M2PK8xORr
+8vyZXmkm96Nb93N2L3n+Vmw/IIt+g+dHyL2Eu1VfvSH5uCdltgpgyqmvL5fc
+zwXTsWHYNiJ8bABOWbgocprkPaTUxMR7nO2ep7qkPmfJdvoB+PPaZed14MEK
+zlAOzJSeEbUn+dJ2xj+GJxmFlf6k3+tGqf/C6SE1t1NhXsB1jbl4j/u6eP5U
+JcnbsKNNEk6uM+K8JPnVCzMk4Bny/rj2/++PGuz/AQ7UGzs=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.479517186987348, 5.883314205477544}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwt1wlUjfkbB/C3tN+0oGPmKm5TUkKFQQpvJYQUZUmr20iNVEyRGrwto6SS
+GoU56hYVow1ZC7fFMkq0GEupG2lPm5RC/+8z53/Pwfmc531/v+f5/t73Fm2h
+/6ad0gzDVOAP/ctI0V+6LPPfZxLLfDc2ybOGC2qd9znAJdFjZomwsfBVQyy8
+eI1mzzuq7yzouwi//7m5auFM+EK7JBOO/OdjYyTMnvp+MAIuHaub/xwWRMXp
+WsGGKT7Tp+jh+sRHNW3qLDOo3LtlA8wtvvE6CI5SMlU/BLMX2VsDaizjomf5
+YxrV4z5U/QIHRn9tvgYLnO9NzVJlGUl7XGwR2VBacEyFZXQcTrfeIGeOpXMT
+WSajJ8s9m+6f+yT0jDLLDHFrP8eTffgvGnks05nZqBUAizceiXWC5z22T7Wl
+euCrUlXYPjvBfzbZsyRGBq65G5OoCHuUzBEvhudPye3owXyizGVKWbDp4NdJ
+b2Buzmp5G+yX5JBvTfMzjgWiqehnW6f8zzWweJZfuBz6/TXp2xcJ5RU8kK+A
+eeJ1nsh8gxO+B05VwLzsS52petjPuDbcPQr2aPVd7Uzel792DNbkFSj/RXbu
+inZFfuq8p5vew31f4q9ehFccrjxlMgv9rfE/8Qq+WjQoHQGLC5w3dMKrWz+c
+q4PVumf/3QC3hXXs0tHH/g7+o/mw3inbKF9YXPF5nhcclN7mmwtzZzfekIb3
+VRUPvYclwfn2Mehnv8m0KBUD9Pnxl2ppODviis4cWGSWeuED5p2jmBBsTn7D
+u1OKPHga3s0rYObcBc3LyGtfZ43nYpjVddibgzxLnzSm68KC05+n1CqxzMyc
+pHJFqqe8PmgA9/4R495B/Ti6pN5UZJkv3cp2D2EmqPF8ONxtF5J4HmY32x6P
+hXUaJLqR5CeV/Dp46OizF7/S/QfrehyxnuCap+52qi/9mCeP/W+nHZjuSFae
+EfwO9rglsqY6x1fY/Br9Nt3xCN1D9TF1SSPmCbWPH4qDPbITBlow75fhOLMi
+qtfUub3F+a734eZ8onynbdjsinw0mjVUaF4mUs/jFjx5wsrzYXDC2b6HozAj
+KLSphiWel8sFyLtRZpemzmyWCbDvUtSHd2Q//DEQZn3M61VhfrbxuhK4L6CM
+/xr3r1Dr75I3hG3SzI/SeQhy4qzhANF5vWkwL3vrkmCYXW44aor+JuvPiEw1
+pPeHf08H/Q8ua7x8E5Z87jSUwnw1ActTymBx1plgCfKQ+T5YXwpzMw6JnyG/
+pn7FGzfIecW2DchX78T5YRHZN7lDHX60SLE/gtbP2W0RooDnl2++SUj1udG7
+NOF/akTyK2DRFcP9X+XxvCw/OVmL9rf6y2ka6gd8q7zGMZ+o4nvZfnimxpvb
+7bDA++91ilhfXmOBTz0sfmN99Qk8nLF2y2u63tlwYwH6y534pOo95cX3y8xF
+/718v9AxmNm37VMhztPlutNWAe3f2jt+E/Ouj9pUsJHyaTItvYg85Cd/MIqn
+fosyZoYgr1WPR7pr4QTpqG1qyLMzoidSMAee5XLCBm47ObJ0L9xXMWX3Tjjm
+ua5mGdXFB7WFcLStpt7kuXj/ut6FrYAbKov93GCuek/vN6zvyfdbmwFLQg/3
+roLlXC38G2DR/birQvQzwuNN5s1DPUd2qQv6Tfbukp5LPuFtw2KeGapq1yxg
+0U/B9zQxb9X9Jmsb8qOmN+PIZ9mF+TErYY9H96OHkaf67Py+hTBjf+e8Gqw6
+/jJYk+r6bXZbcB61deXJ32j/eudd1XIs41XcNKmePOGpbDSsbmX34SYsyLZY
+cgiuUvyokgIzGcN1BXBbxPO9oVRXjj40g9azcL+8i+pnjSpKYVff4X5Xmt95
+KOMk9tdrqRt2h8V73HI59FuyqLzOj/ZrPdYVjvMsE5cMx1A+kROFMZiv3sdK
+u5DWc3n6PBrz83OCvTrInKtfAPJZ8nbLMgPKJ9P23ELk9/dIbcJeWGygkvgE
+Dti9quE+za/cLjFA3sUG4evVjbBfV1H3eng0YbxFaETv97/GJvALY53sK2RZ
+NeFL3B+xI/32KMykHNlpRetHjD3UMsb61pZav09kuSPqslKmsODDwMTj6E/+
+wbTlG4zp+T7UHIr+FzrNY1xhj/Y7T50xn+cfv0zfCYtCi1qXKLKcVeyiR14w
+J8ncqY18ZEMUDgth1q2w5yd5lktt8Z7iRPult76ykWO5xQ7r09bRegdST4lk
+WSZEq9bbjOp2h7SM4HPdjk0GVOdiY0dlWG793YTwH8jX1BtlUNePGXmmQP19
+C6tZD9+tWOQ2QvN2d4w/hbW83O61weLpg7wwOXo+tj1thjmnOGUXnGfL4Sxe
+O+W3xFrJAf1yqclOY7CkP+XcNpxnTEXT0ETKI944zU2J5fz1dS/okgel3m3h
+sdyl/Ul6FjDTnNezAHlVFYal0bxcaE5+hzLLVcZ8642ifl1l+X4436yvsQ/z
+KY9Df2bfRt6fXCIKXlF+o133HqE+N0h5rpQJrl9b8zEZ9R0rBsSzYKbUVMoA
+/u3dD0rryJ9uvQ/H+v3CgmofWHLlthd+HnEDh+doRlC98dq/+ej3bIzxomQT
++v2kOPAMzkfL6cHdDKqL3F/g+4kLNPHIvgiL/uHNw/vDbRoMXk7mKpadtcb5
+HFO8qE3XS5ImCDchT6OkI0tTyCWu66Jl8L2x/PiVaFhwdf943wSWy6yb0nSA
+1tdMP54EC8RBpl5k2fMygXDAt7cWm2FWTnUj6kx2e2zAKlpP7KvVi7pqzhFt
+M7reuHI0DOsfG0kMX0h12/lZVrIsZ3RFOnIB3d+wMMgA/XUbT65cQtf7z3+n
+h/5nCo/mraR+Fn8ynofzdJxuq7+V5qu01jHB/L13cpv8ab1W80JtPL8ZMxr1
+48khic8HkFeW2QuVK7C48E/pM8jzrZHE/SW5s16Bh/Nteb/57jjlUzDB3hLu
+STqbqz+fzkvPxgznsdvxaL49LPG9eHoI70vJXKMN+8n7eviBWO+jxaSFp2HG
++sa9YuwffTXN/DrM2vIXv8LzZrXGMqKS1jusdawa/SdN0fJ/S/erPAi5juc1
+LqflThssvqTVdRLP89IB3+AuWi+vbloQzmfXSLFqB3lr2ZAv3pc9IddNm+n+
+WOVNR5G3dnLC5zpYFGCysVKa5RpHb3IPqH7z8ePV0vg+eJhqXkh1dedn36VY
+xn/nb1kZ1E/Ydt9PUiwXNHJmeSJdr28foI/r8/N6gyLnUx7rDqRgPcWlb86G
+wIK9gRpm2M9LQ/NxEPWr8JuhEs7zksDuX8pD9Lub2xfYU1huf5jWY2Vzx9D/
+Pktnv1i637WdPwHn+T4+TyWd9nfQ9pZCHsLbxUVFNN+kksp2uLx+KL/+v/UV
+8nKQn6W5h2Scrq+etdIS+aos2KA0awFcpaifjvP9cXV/mR0s2FBdUob69qN9
+8cGweOzXxGz4OTexO42uP7HD0RZ+tfaFXzksKl49cAvPj5zF9uctsOTSzw79
+2H+cPgv+//8TBfZ/11uc6w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.666233980906949, 2.1296932060463307}, \
+{0, 1}], LineBox[CompressedData["
+1:eJw9lQlQE2cUx7dQaURsyx0NJNnsrhU0ioBAKcWneJRDRUYq5VA8oBjEFMMl
+Rm4BE1shWEQUwVbKIai1pANoS7QEUTEYFC2HDqZaREektCgFRvptdb6dyez8
+Zr+8753/R26TBkUZEQQhRT/2/eahIWRqGj3mQNxK/Lm+nQKJq1mRONMC8Yaf
+4sspOPT90qxgG0sgAuu4bbkUELVp4cImxF/t9J2XQYHsafLQjm1WQHDD7MeV
+FHQ9Dw8qNrVG5yuvHKihILbfx9ejFjG3pJZzj4KVD+qWBHnaAJGv72k1pyF6
+CTeitwFxxbJXzp/TcPyZ9omFtS26/4LKrYIGvbS9qmsT4oLOLRHPaFg7cKRR
+vY9lVQnlwoDDjYx+50zEKYrYj2UM3E939T8iQRxp6aetYoDe1bPnzieIhQt4
+5TcZkCVaaiMn2PuftmYYGGjbbr6srQ5xRoPI4TEDpIPv+YBQxPBwnbSbgX12
+6hu5pux5he2qBgbiZz1pvt+K4rl1KaU6m4FXx95fLChA7LF4Mmc1A5N5nVqr
+PYiFDrpcggGXD/xnLpCy8RetM6hpCNcqtosViDXOWyxjaWipOWvHY+0JZyWU
+0DQsumYyaWuH7pu/NLH+T5SvuwbZ3sOIY5wrTNUUkDVlp1/MQfGM5G04o6LA
+8+Kx8qtqlsfnVWRS8PJxtIVPOBf5v9zrRRYFJRM6gjCZg+y5xuYUU7DW2CpE
+cgZx5NlM54sUZPUePOC0ai7ixlDtMAXuUdzZDR2ICZ9WahENJQNmoVIvHorv
+8kfpiTT88Jo+41eA+ImY+42GhvPi6uleLWJuDuhMGfjizm3vvH7E+TGXrq1H
++WpxjCzsZs8nnQ9TMiC/4G5q3IA4JMF4pImBEzG8O2lyxJr2Hc2/M5C9d/fE
+uCtiTnbQQ1SPmA75rbBHyJ/5moOlAwwc3RkaZ69iOXWh+zUGlJyQlx2s/4Fz
+DfxTDCR8WRtz0gTxQN2nzRIGrGZY9032onhHStVrHRh4vuaXflE74ozxqKsD
+qN98h/tv6xFzlaeyvqUhVxEm404gdkobfTeAhqY87Tv0cmRP01PQyKFhf1VG
+UWAl4g958upOCsZit4o9KORv5NaAFacpaCqYNh1Ss/womTxIwbRZRNWSTXao
+P+09BtMpkA+z82aHv493fheiq7bH//cOIMZs/PjYvnH8ya6r/Xx8vyI8fde5
+UAH2b73c83XfrwLsv8YrqO1vIyGOz+1+vrmNrRDHP3vzqcJhnhDnJzU90SLL
+Qojzd+RE8NGt/wpwfvdPVs10aRbg/MeXVqoMcQJcnwr37MWneQJcvwOKwhnv
+3eDj+sYef7QgM5uP639oQ/vYlD8f90fxyu7y3Y583D/lnIWXUyg+7q815zYR
+jCcf91/Qg96Naikf9+eWqdHKgt/4uH81yYOj/i4C3N9JRkmpnf/7/6b/I4iX
+t/0chXg+GnNKpqflQjw/Mw93JD3QC/F8RdMuTnYMiedPJv5RzJGReD4Nxe+v
+9mkk8fzGlcmN/vmLxPNN11fHj9qL8PwHl3uuG/IUYX2QpIbuk3wmwvph4s0t
+G1stwvrCUafEjLiLsP74TylFhay9t/rUJmNKL02QWL9kcX1VPV0k1rdjXskD
+J2pIrH9XXJLKOrNIrI8Sj6I2620k1s+vz0b1qv1IrK+D+S2F0ctIrL/BaWqK
+WUFifeZd59XZbCSxfruZlSmTEkms74FDMr2qksT6/1DlMHjXQOL9oLPc3PeH
+owjvj7lK/d2GVBHeL9fNVipv6kR4/xjXa/RSisL7ydvpsXd3AoX3l25wr9vO
+FsRv99s94zfv/wC2rKt2
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.844981764589882, 8.25073156171056}, \
+{-1, 0}], LineBox[{{6.4999999999976925`, 16.}, {13.49999999999251, 16.}}], 
+        PolygonBox[{{10.6, 16.}, {9.4, 15.6}, {9.4, 16.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 16.9452}, {0, -1}], 
+        LineBox[{{6.499999999996362, 16.000000000005457`}, {10., 
+         10.000000000003638`}}], 
+        PolygonBox[{{7.947677384685548, 13.51826734053906}, {
+         8.206811054955079, 12.280184249251306`}, {8.897834175673825, 
+         12.683281069670574`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 12.823799910437668}, \
+{1, 1}], LineBox[{{13.500000000007276`, 16.000000000005457`}, {
+         10.000000000003638`, 10.000000000001819`}}], 
+        PolygonBox[{{11.447677384685548`, 12.48173265946094}, {
+         11.706811054955079`, 13.719815750748694`}, {12.397834175673825`, 
+         13.316718930329426`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.484057296392571, 12.823799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 16.}], PointBox[{13.5, 16.}], 
+         PointBox[{10., 10.}], PointBox[{10., 4.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/chdfef/ifghgihi.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdfef/ifghgihi.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:eJwl1ws01GkfB/B/EuM+shjlMmxCSSrFomaEciuzIdNd7ktphFJrmRchEkq9
+FBltWxQx7WxU1JRLKlpKbql3WvQS1VC5Rb3f57xzjuN8zu/xPL/v7//M/xyG
+/ge2BMlQFPU3fshvavI7PgZsikZgyKZc7DOn9sDmH4XXvzPZVKtCjvl9fTal
+3Dgbr4J6ky7johkc6uIYbwYzYn+RL9JjU70OiXJesDTaJngxnBZ4sjENtql9
+11+ny6ZkM6qfNcFcLZ1TR+FK/wW1dCM2Ra/rW+tB3MkR7YKZP8oG/ARPOjCv
+lMFd9bVMB2IWK3yarN/+1XkvXM/bNeD4I5syDVTcfxa26g63TIEH555d3Av3
+e615cBdu+kW8Yhn6sUxNyBiGOTm5d5NgWp3CfKVF2O+X1Kpu2GnWMUkXzi4O
+ViX5pKYVdw1gKn6Qtg+OvRHrqwlX0jWPF8Jpo6szv2G/aqPxTbeIubr2r2Cb
+xp1mNfCJK781/En6ydE0vQT/oCkcTYYFj7Ou8uC8owPNXjBXXrzPCBZN5/F/
+hFsP9MTdQT8cg8KlE8hr6bjNkEXm+UVwuw2utPl3hRD5ythWdX/BaatoPgzY
+tE474A/iefUvYhci17ZY44twifsFx+4FqL8I+UjmGSsTJGTBnPH0zw2waQ79
+rVAH/UkyRCOw2ESosRr+fCRyDhP9MLffPNPCwLzDMlR3w9lKbbfi4cBbq1Mv
+wfQ8s7NusN8zrzIpzAv5+mEFPCNSOczCvMTTfeZWcE2e9r1MmDm4J9ATdrlR
+5N8F+53QiuDDIvrQfl1j5NsuVq2Dq7svsH1h3vrr5vPRj7kJrSIFLnH1oIfC
+yupH9Erhwb6Isrswl3M5txam7+p6p4Z8/d09LXWw5LHFlA+s6xuzpgbmvjhz
+KgOuPvKvd1fg1li39WWwX4DwchosPTRxXgTLrgu94Qc36X8Nvghbeg4/WEn2
+m/71djSc62fcPQcWXxuimcMz88oXtiFPSRh3wWP0Q7v6/vrvcKvSty8/w71K
+4ZlxMH/HyJ2HyOddpem/m8zj4TDPEnaanxnsTupi2r0cbZyrPL3BGeaEfSkf
+1WJTcS1vlTeR/Rqatm6F6zkG8wNgSeV/zjZo4rmvcZhJgSf9Kxqc4BNzV92v
+InV7q8iuHzDHzW6iT+R++3ovSoZrvI6etyF5uGq2bjDjVvyTJJJX+c97S+Hk
+V4Wuz+BQaWaIKRwY6jvKXIzvQ9/DE+tgj41GBftgm3fLXcJhfqCj6w3YZclE
+7lW4ekeD40fY8lxq0gQschc6GZqgz/yxwx7ob9KvK2sDsdEb3u8wL/mBwm7Y
+RifZaxz2cCh3DoE5EfU2LOTl275L9zch75e+qljY6uC2Ng6cl9C75ALMHVz6
+1ypSVzMdukbW6x33V4FNk6djimBxPOOoBP3EOt8sOgy35j76WEG8WTbLiszz
+bPxAPMw3aa/vxPkFppFJHFJn7ZQPhO0/OLeawDyGIusV8vQ/f5guD3NLdZ1d
+4Fjz5fJj5D4WcC9f1cB855epD5H7W9m7UxHmyJZ2vif3WyUzef98fN8qBroo
+/D2T06bSo86moosXvzEk+6ccOugDe/Q9UiTnt74M5/XTMfdWg8fHYU51Y0s6
+3JQ4SbXAk2/mmbnDUtsIHW3kFTClnYvhwMT8xUEwr0vYoQdH6+YoiODJ1WpN
+FjDt2Js8yhR1jRI5X5hRm9a0ER5MO9h4CmY+iWtNgWN76pxewYKxF553YKln
+quwK9GezRRLWB9uISjTSSL+M/H9m4crFTlt7Ye7NiEWKZth/d/9zE+R1Yv/2
+Mw3OG/smE0Tylw7bT2E9t/2zahbslx2/9zXMvm2keREOdet/egu29P7mcx72
+8LysdhL2o7f7HoHpixQUdpN+hBFTdrBuBq/DHA79UBPVj/OlOVoXZ8n9Gt3j
+FgP3Ksr99hz22zGwdAx5uo5tsRHCg+lr6/bAn3fEOuTDlaFRUylqmN+FK0mZ
+MKU2nrhBFff393jPLJhfH7ZNUQX3KTPErQi2lHkf91oJ+8eFB9fC7LFkg6eK
+2IfW988gzPwjQ7tPAfP3+OrDJPk07AKMYfHM2bt7YUlaTt05Gt5vuqWFV2H+
+m7SoDXCZU5PmJMmrb/fdFNb9O0xtI+Zn6T9lz4Z7nef45RJblIWmwoIIaqwX
+pnsb+k3Aeaclw3pLULd3n03BeftUjdu9Yfaa6eNL0R/19FJlAiwRbd3YDYuu
+pBkUwgK5MJlk5LnUUxdaBvP6dl83UCb3ZklqOVxZ83JGAAdaC02LiVNGR2bh
+zxNdf6TB4oAcVwvMhx1QKg0i1vFQNyc+tiDODpYuW/vgE9ZTifp6ynC21D8l
+GY5zbX/bg/4FOqvWSXC+KODK3Guw5NFAqBIssHDJTCD14OJhZTLfG4eCdsB8
+I+/b75FX+WuWugMstkgNrpbHvTS+dm4l8ZA4P1YO38eG7qgVcKWPaqLtPDY1
+Ut4Wsg5masxYK8riveU1eHIbnE07b/xJBu//xtebEkn9APPQ9zlsqj0hc1cV
+2a/a6Yw1nDes+nIc5szW1hdTOG/o/J51yEO/s6DFAZ4xH9HPIPNl/reFAfMH
+8xV7yDxyjy43hj06miZNlmK+55hV/rBLsUlzJMxXKqx5DMtW/HxeBHO0g+K9
+cZ5yeNGL9zD1bW/2F3iw43TAQnOcp1a35yL6vSTadN8O5udub9g8F8/d77r6
+Zjjbx63oA8zIcDLbAreWhIYdQl66VmS2C8xOf/L8Jcybcy1uJSyYcrPTwnxm
+kq3vq8OWvulMA9jeUbt6kPTbYhIzhvXsKfdFt2H62NzWkzBl/EH1OOm/QSfh
+C87b9+CJgEv6tZh3eAkcaB4zvRSWGMobWqFf0Wqhshyc3TWrsBB5BJc9ooYw
+H6Zr0ciz7ywqu3ShdxeZV5Kt2GeWRTU1PnVsJ/fTZmNzxzSL8g77tOI1uc89
+HwIjJlmUzVq9XeNk3pPb7q8aZ1Htm5966pLzzFQ67D6zqGYn57ebYeaDTve8
+MRaVqzm48wQs3scTbB1lUV3VucHPYD+75l8TpCzKZW2tqz7yi12L12vBBTdf
+y+wn83ofP8yA855cCLsD+5XnM/iwVWH5LrllWN8sE8PCftLTUf1uMNOtnLMB
+55kGnuGmwPy9qVH8TyzMKzrlJsx2tNbrRH/JdjKPumGBeseilejf6Vym/key
+fnnkkiMT6L8zdvU4TP1t+yQXeT1S1/NInVmw8tGBKdTnlEhewpJ5FdqT8KSG
+oW0tqYek3jPAvOJYe2rOkPrDwqxXqDdpS7RCyfk983OWwTMPpzZYk/NCQn9S
+x/6fr6oeJHkENAY3C/3Qihtqu5BXsuiY+E/0WyC/zlRIzEgVnUS+wKI1/qfI
+PE4MaVlhHpPWcuXxZF5sJUn0MIsqaf7h7mHigqriqLd4Pux1paQuVk5wPvMG
+zy/a8vlpcn89oh6r9+D5B0eO3CROCdH91Maiao54fHkLU9LIRMtG5DWMcTMi
+82jaPzh8k0UJvt+9FUysqxitLmBR0fIDhUJi8slb+///c5ax/wedUK1J
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.6273814311035784, 11.151823299819789}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt1gs41OkeB/C/O60YGbfKNi5dFpVKUWimTdOFahYt9lgGFZ1aplUd5DIR
+DyWJCieH2YTQhVJRYlyKTTQuleQIjVxSTTEat+z3PXs8D/N8vP/3fX+/33v5
+j5FvkPM+eYqibuKXfP79h8Gi/vdjxKLoHc9e3l3EooT1cy/cw/8VV4UYuMI8
+F9rZY3BisH5B5/csSjak0cSEK+oCL+6C07VS8nRgm2nrgVJDFtVjxMsYRb/2
+wm5XbVhwtMK/Ey6720/xFrIo/lF1jR6YlSQ1aVnAouKprFw59J8uKH9gB+sX
+1hcx4KfOjbZl82GFUkVHeFvPwy3bYIa+oXIkbNkpd0hiwKJUnxxNvUueb66T
+vw3TzsywP8NOpRvkzsH6DRlZZsiv9I14LIE8n2Vq5g2LOBEqmbBNe1PZaVjR
+11qvDhZNrYu5Do+E6fTMwIJdizg18NjJ1VYOmH/wwoNzDbC7hgHrHLxtuXVY
+FdzAznnZTeJ7sVs5H+aEBNYvQT7Fp/gzUfAhheIlfrDAtHzAEfaMs8pNglUP
+m02ok/6imJYrxLRV0keIXxR82uUy3JHdrRYGq2Y36MfCyxbK51nArgYFQU4w
+1/BWWg3qOX25jDaB+VktkY/WwbJghs4ZWHQxml6BdRq5IO38jsQnqep1g20i
+aztCkR+jzdVHAz5kneXbpc+ikv89ub+PrFv/Y7/1sKXmLdZz2Cr7JC1ND/V9
+G5/7Dh6L3HB+Shfr6e9ZTkf/Ora06hAs6vZf7AmHO1x5+EkH+2nUw6EM7pIb
+bYyHLV8XepsgPquHbGVbmHVPdeoiPDJdbatKLJukKyO/9OEDLyV0FnWVmya1
+h9VV8jtHYZ7gbE0QXHojYFgDzzOqnIPSYdkB+8CNcLH9Y/87sDDlUVUE3LBy
+5606mHFRI6AeLlvRoUbqa/Xtur8O4uXF5X0kz3NF/bE+MFXz+loaqfdQ5eVc
+mPs8xf0g2U/53SpdMOP65arV8OCxD7dnYUladg7Zz+LRwkx11KenbLvcLtim
+mS0m7byjVqtKkb/dGvvZl6R/voH5fNj0RnXDeVgQEDsUh3ralBSctCbjrS6b
+KweHxFU015D6fTGKT8K5sfN3CNkA88omtlvBRzzz9+SgHnzBjMI4OUev/vgm
+DzOUyqXP4fDx3056a2O9etuftcMWP+cbVc3DfI8nCz+Tc3ZQY3ApTI3VaJth
+PP24A7xsLdTvvaZ5GLz3fm6yGcxStnjVBYuClBc20fD8eSUtJ8TH23q9OAEW
+7tZiVMMWu7Qv+MCc8dvKa0l+A+vzXWEWP6ddAF9T43mRdv4/wxW/wWOJqW9O
+wgxuawsb9VKtrDF+QPrfd4o9BtPHEpfNwlxJ360E+GmT2NYR8TAcFP0jSX3b
+A+0zYJ63G4vcU8I2x7E+Em905RF1+EjFWq4xyc/Kq7oA87nqlqo6wzzjULYl
+TO9y3vIbTCuZ4eQi/nQn4+M8uNgila4JSwxcnDxIvQyrPY4g/4Y9ofeWkHa3
+ANMu1I9idJi+wnyWSuZuO2HXACWf32HRgwT3ZpyzihLzWCnJJ2xf5V7YU2bc
+vB8W/PKjog58dXii4aIm9ouKAacP57DHTWTprIF8P9dta4YDtLt+UJ+LeC9Z
+Ua9g4Uolw5bvcD73hn+h0J8rXNN3bQ4+6R0Gm+GO+ZMmhWpkvVN0L8E2Mc2t
+Laro/5/HAQrknsjRuWmmSp7/WnaU3EszNEmZCp4/8MT8PZwcwVaPhBnViRWe
+yFfV2S4vBE6mt2fUwunqsVlX4B6HiCgDUq8Aix1TMH/aS82D7IfxO0+CMT5j
+T9BkBCz7fnGMAuKx/FxyJBbmCFSuZMFcrbmLAkn/VKd6GxL/+3nWNnB8fm/q
+I1jY036mH/NRhgXc9ci3J3I4KBQue+fbnEDy3zcYKkO8jKQMzg1YtCD2HwFw
+SHR0lgDm70xKfIb8k4dnlH6FeZaJX61gqvdgZh/GtzQLzcom74FXz3asgYvt
+ftyoC/PfZJe6ID7RiufSLNx71NCpyR3Ih2p0lm6EOzhensbIV3Ioef0kzrmg
+or9SrITxyg+7tcGySO2FWYrw+laPRphT0i3+RQH70a/6dq8eOWfUr0vlUW/d
++q10jBcvrzGhIYf5TotivOFBP2b9AgrtT12TK2GROOp50TcmRZVsSjZHfDyf
+S9y4GSZV/GnvRxI/JT4c0zTNpIQZzqV05MdR4MpOwKzQne+iyT3vP/4iC5b0
+BL95C9MOPm03QH+eG69gFeolzHdpegsLdX5w9If5jUUJQ5iP5c+dcwJ2H9Dx
+noN4uOHizHCYtnJ7eh7MsHzM9iDtLa+n7BA/j68q1oNlL0x9q+Eexvb/3sd8
+MkZr8jLkK3zwVYUN8/wMnwWQ/GWVwZVkP99dvD+MtO+5v9QMlhk2K7vD3Lyh
+1rPI3928W3OWjH9gKngc9eP51hUHwZLWiem9emTdlw9cQzyiwcyvvbg3e/7Q
+uxkyi3rJplYEk3t0zF7JidRr3jw/Q5ijm3hvYBLtLSpzxLhHaSm2p31lTIo2
+GGn8J3kvbXL72i6FL9gaNJH3StedXrdRJsVVjq/9CIsMt/ys8Bn95TMDzcl7
+74x1aucHJiVi2ytEkfkP+n3kDGM+cbWtGBZyPdvjBphU8ljhkCviZR3TPH62
+H/VlsLY+gRn0og3BYvRfMM6xR77CfxUuWkl8VsE4H+b7vde6Axdv9toth/pw
+U2qTRtC/uDbIjk2+l1gcH7mN8SWjJvsOwyy7E7p9Q4ivmZ8RRdr5oUXbRpgU
+I+zO0iBS78wNPnc/Yr13HfvCJPu9KLM+XIJ8FaN+HyX7LVHidRj50XYvzUkk
++//dqUSTL4hHqvZak8ST9afzCZhn/iglmqzHRkojgrTr1y98T/IXpC/TIO2N
+3T9xiJXDE1dhvGST7nXlqB8//2la2yfMv0SabUHea2KV2QjExws986IY7y3B
+puX3wgeZlKWhE9sRFuqyFUbfov7RJ9ZSMGWa5qXbDW8uT2zFe03o+lPtYBvG
+2+FSXAtTy67e4tcyKf4Ho8A27f9/r+U9/PuTzvoLN7T2Kw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           
+           9.996694214876033]& ], {4.016469192730548, 5.934756130901607}, \
+{-1, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000001556`, 17.}, {16.000000000002885`, 17.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18., 17.6952}, {0, -1}], 
+        LineBox[CompressedData["
+1:eJw91H1ME3cYB/B2dhtvS4skDhtmy93JcMy2dwdFMJsPZWKJIOVFrcjkpUCY
+lE3n2Ox8aZMFtqEgiK7qCiumgQoaOoowDS91dkx5ETWYoSJ1sgaJojjE4SRl
+v+6P3yV3l08ud/d7+T5PaN5naQWvcTicVHR67+8vQReODDj/HxQcn4V102Jk
+x0/hizEUmOy9Z9M2IPvs9yfyKRDTr7Ym70bOiU817qPAqZPMdZm8Li4cOkiB
+3fV4fdHvyCcyt1aWUCBLKFxNPkVWbTvgUVKgv1UzMRtIo/+ldB8NokAwXH81
+UoIsHmgeu06CVPqmyaZAVv+YlVZGQrpFL+rchLxmxI8rJyEPpJPhacg+NUfl
+DwnYq8oo1iUjQ741rIGAsLulyU1xyGbuYE0BAU2PMlIiZMijcc/2xBCwoOoT
+u4Te72dtcojQ82a3/d4SZIPPuERIQM1mXVT2tHc+kXMrVhHwHqchsPa2dz4l
+E9UbCVDfXVn1dT+yYcEvWk/Aw8FhXd8l5OqMpDoHAfZfLWsvOpDnTxH5/iQc
+Pv8xvewKspV/8FAmCSdutw77jXpt3n7FSgKXsy83asb7vivHNUPCuEFb38j3
+jmdziWc1BaHLQ8/8HYk830jysyiYFh3RJO5Atvm6F76ioPKjPN3x75EFSdVT
+egrePmwKMLcj7+3bn7yHgjB9SIP8HnJwXCUnnYJFOa9bxWWAsyu9NyKUgnfe
+8L3AiJDNLRLqTxImDULtoShkzvzrjJGEwUJFR0U8svqFZIOSBEFd8CdPlcjW
+gjPNLwmgn6nN/gnIskam3kaAJYcf17sW2XZTyfucgG9vFXmKIpBVpsoABQGl
+Y7Hua8uQ4bLoMUnAA543d8jB/ucblxOgDf9NSE/R+Hmm1Mg1jtD4/Q8sMz3g
+pPH3bUFN2c8v0Pj/du3kD4JOGo/vn9PdiaVdNB7/v9+4a7/op/H8nJ4XCUP3
+aTz/B0OvFK0eGq9PXcXEjqsEg9fv7AHNbPZGBq9vhqOufOeXDF7/53/tMnU0
+MHh/Lj0a3/LWAIP3z/1dbe62GQbv72Xfsvp+Pov3PzFCJZt7l8X52JJy+tpU
+NIvzI1Fsd65fx+J8vYyWlcd8yOL8FUvu7C6LYnE+O3nZT7RhLM5vamt5v3kp
+i/MdmylMIhYYnH+3PcYldjO4PkJWtNhGhhlcP12rKtrUPQyur53tLcfK2xhc
+f3rn9eA/zjG4PqtyDPeVPzO4fo/dmdekdDO4vttjc+UDNxhc/xrppyEBTxjc
+H9p6Tt4cE7C4f0hWBl00rmFxf1k8csMvXsPi/mMZ5VnbqljcnxJSIf3cLyzu
+X0mBvY6lLhb3tw6uN3+RuP/9B3PT46g=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18., 8.354800000000001}, {0, 1}], 
+        LineBox[CompressedData["
+1:eJwt2Hs4lGkfB/DHkgYlp2QrGYNyikEaEU3IKZVNMlpq8o5TVCqVsFFUEkKU
+YzsVosQkCSmULWWsKZPklWar3dSmJskx9X7vrrc/cn267+e+v7+vx1xddAN3
+rg/6iaIoBRmKIl8pGvmLzqZ+/NFlU0xu+841MEd+/pQ6TD3e1V4EawVMrpsL
+R46Vsj7AXOE5UzW4OM+jxw5fy+YIYyfx7zXei4YTYZsstb5uWHhgSrMVZp80
+zi8hz5kymROwW95FfhisIs6u0Gdg//XpXAM4VJWR4ghL+BHcGzr4+uUYz5vY
+U36TDsw00YjxhamurAXHF+Ac05KydXBzrJ/CpDabGp7fFWgPJzjcmxULz1jR
+XcSAM5JG9ynDX+tm1svAKmffZNbPZ1Ntbznc5ySfNOREPFxGq91WBwssMhwC
+4R6T+7U5P/Kf1CGWezwmHw17zZFZehCOiFZ4sRVutlc0qoHp2/k8H9LT6gp/
+Cve1imOdN5D1F70LNsPJp5KKtpDnW/Vf3oej3DuG9sMJTWqJLMwj9TUxKCK9
+6/Vml8Jso4aoP2GpYslVZcwfZbc0RRH5vayOPAyDaRk3j5H5qYXGe6rh5Eea
+9ALSh02ZwWvY2e3otXfEHVTsJJydlxhpp4d898t8RmBO2dd9KbB0+fhkFxzh
+4vRVDFNXV+jmwH2rhrZr6aOPqK99dvD7X9Wz1sNeTxsz2pFPnP35/CFY5N1z
+y43k1/EIKoYzInU76jAfzb+Q1UDWcz3adWG5lgVz78L8NZ7aKehLvEVQ2QRT
+jb8xx+bh/sxPzKtwpKuL8W6Ys+RZcB45z9u7YGou5i8/nhJD8gSq2v4OJynF
+mvnC9GvCi5uI72zUtiT51nOcLGHPxZosZbJ+dZfSInhAQ2vNB8zH91qfZQNH
++A5++zHvDUXZIJijl53XCme8/Y9NOVm/0jBxG2a/N3pNIc8wFXngD+LB4dZg
+uK8n6EkPLKp89EYMC/OzF4/D3MCcIWfMx06u/WaA+1UKlu8RwO+jrxhtJn3c
+3stURR8qVxJl+HBzROj+rbDXaj/uW1iSORhYCG9IXnaHZYD3o/yW1m047ngy
+LxkWULnjd+G28EOhPTC7gnanAk71nj2qvxD5WVb50XDCyDZeOOx1rE/dCM7N
+cPylHGanCjVbkMc/rrCtD2Z6/NZI8laEmXPkFiFP5vP59ZhnzDiOoQML/MuU
+9eFWpaK3psSSiP4T6Ieqdlczg/kFT7+P/Ez2vzurR5430LgVDi8xGmXMgtma
+rIGPWmzK8PaqqiHcJ8k7kpUM93hY14lgae/CjmVwdNVPo5dJ/kKfffJwrnWz
+6zFY5JA6WzoH5/AKjgTB1OZtbSNw3yuzEHcyX4Ljyp+x37+ryN8apn/Y+nQD
+HHFMZ5cJHJnnWlYCU3X7LRbDKqdN2uSRj96Ql2tH+gg+EL8bVkkKlfWFm9Ps
+s17CA6dNTeNJP6GK6V6Yd0P72OJrcILVsbm18NcZ4pOfSL4rDW4z0U+cqrav
+Dealm1k+9yL9PXSkH4EpneDMOLhmXtHyJ3CGhrF7GkxX/dRlYIj82qnLDsEi
+8dT0KJhNs//uS963Xh+tWzDXL+yCGiz+927SN0Py83Yv/RruL7yRZrrUCPuZ
+e8MdYJFwRlggzHWzHr1B8hv+wjgMS6wYbQawhkd7XzYsHXspn44+UmW8m/LJ
++rJruqPoM0q6IpOsM7fT4kJI3/9cFiSS8+2aFvytyabquH4y28j5FrURe2Hp
+Vo0n7mQ9JPHFfHjA9vqfBmTdNa2zfzY+jx6at1CwwI/tcQvW6vZIfY78zKrw
+sTpik7qx23DzZ1nNR7Bbx5qci6QP2ZpYWZwnZKmdyYMjr9+t94Sdwy7dOk36
+sZzmVEbu++OQPd+QfD5eLVFB3rjYRkEtLHAK74yHk3YJZvWSvqQ6fh9hqZzT
+VQXkUemRfcrB/PO3LPJ2JnmTHhnWwoX/njZKhvljvvdk0NcGheYvj0kfn4rk
+WKQ/Rpcuwxj7jZZ5rYdDP6/7azcsmfju9wtMxX33vgMnuPxjZQUzOX+XzzTB
+/txC/zGcL5wZ4rIelphz68/DA4c+SdJMyPvnftCavK/zks7dhvnDbPnryCsM
+b2S9gkUzMgsXwjQ1x38nYOmCm7YZmD/1xB/F00zxPpV32I+hP1ql7kdZmB73
+QjMI1pfLko5gv4pl1kSfBu719/aXwM3Hj58KgrnXAgPumJDPE/5NWdgtkRf7
+O8lX77nipjq+D/unx8bAlJN5ZTrMLdput5Gcl6FqFw+3sjyzrEm+gx8rUuEN
+9MOG88h5d25vvQ4Lm/o5CiRvjjhwBJaa16n9RCx4d3w17hNnNrXIw/SULzVV
+sHDlyuVapI8OZ3lt5F+SVlm3lKxv6VicBvs3fn64lfSTp1A3Ppt8HjWG5ZL7
+Np/e7I8+MpwCJ3tgZmHRxiryfj54H6aLPiRKtnmDcOTkPPudsFR1NUMdffrn
+rKpvglW+lzK04cIHsTIqizHvM5aeIuxl5GMXAKvsWD2nF8/TvudUF8OCCxYB
+6XCc3NTEK1jio3vFiNyXnqr8sxncu2y0CvmG7Z4EO8Kiwx6WC2FR1TSVLXBz
+633tLMw7JveoZgcskBkZH0c//s5nzu+C2Z/bl/FIfzaFf4SS/foBlk/V2NTr
+zXFFPuT8gJvtHFjUEGlsC9N9TFgfVDHfEk+xFkzZuFQWwLywcM9h5OMPWTjw
+4IrHyhGdJL964jl3WHT5rsoVMp96sbEneV4td+wkzEzrbNoGt9k8+z2GPF/T
+OXAezrWYztgJZ8Q8HZTCzS2HdIhVYoaneSFPT+PS8liYPfQkqwHuy1lnlQNL
+k74FG2MeSUHSyZsw12BYLQ+OowV8HIRFtEvWFPrQMGd/MEZ+/iOW0E+DvN+9
+5yPNyOf3eBwfju6fqm0kfZ7f3tsJa+1+nDTDHOcdOZH/mqzLDrICYFGZpIm8
+7xkDl6WXYYlwZ/UNmOanO/AFFhyY77oPbujiuc9n4uf11Krrc+E7WYslNjB7
+qWpsGfJtfJzx33Uw/XCrhT4sd+F+MReW/ua+4RTmU4yIGdoG8z9fnZhEH2Mv
+Nwh3kP0XZqWTvp3NS1IiyPn3/KK7VDDvQqXHPPL8OzfxWthStP0EB+aW6jvW
+zWJTjz8V9LiR5/v2TX5XZlPLJwzkWSRP863+WPibAyNWn5x3IWQbEx6LKL2o
+RnxrjKMDp2o8GvoJlkztPuEKaxkfWz+IeemhG+eUwD3L/3z2HOZzT+y3mEXm
+SV/zDGZni5+/gpcoBo9KSH/fQkQc5CtbGZhM+kp4l829Dx+VM0tWwvnMuS0r
+WJivNevMQQbJX9g7dQ6eGHyvsoLkEb7YJoN+9pXlBP7o64Dl63Ww6XDxr0dg
+L7dpBcnwnZzDtRWkv/Ldooswe3bnrCck/9s1cpfh/rLG0a+w4BpPIxO2lZeT
+07PA+6Z8yWMTXJyW/dcquJmf50eDLVMYQTyYe4hyPYs8KdzWvN9gkaK1Cx3u
+6XwjzIDZO08nnsI8MZcVzhSR/fsf3J/E/JUz7kouwJIKq73t6Mvr3ftXxAnx
+dV/Oz0SPckLDszB/YWdH+gw2VXojNP4UWY+6lpivxKYcrYK/JJHz6eGzRIps
+Stmup20P2T9gt5kFL2Q2craS+/5T8vGJAhz1VH0dTJ2szqiE28wfBTuQebZ/
+tWmBbb4FX2KS84PVlJTwvENBvtoicl6MU/RReOLgpd8ZZF2scNQE9zt/ylDV
+J8/711pIYSa/pN+E7LdLGGxDXsWa7sW2xL39zHLM45/bIl5L9l/Qm52EeWkh
+d/3CSB6zqhFP9BEY9GY8mewPfqU2BlveDKuuIF6anmaP/qo7fdd0wXSPlt5g
+2LBBEDkJS9nXh6Jg5T63Kj1LfP9GNEzI+trTRfkeMHePv6MtnGXdIN4B099p
+3nuN84WOa3VPEvfrGTPglzt09l6Cm/v9li9Bvn+6Z8s2k+eT40v0kd+Nu8Kl
+k+zf86H6G+Y1++RJ64ETarwf/Il+eJE2vF6YihQ9OIc+TbOHWrthiaviriQa
+m/pgYyTpIK6Rrzs8HXk6Q66Q8/luOQ4X5TE/TWaTgJz/NfvexDTsn+TYniW+
+m3YvEea0uNafIHnUh7Vc4GoVnksMWdeWFzrCdfPUncNh9vECjWhYMc1+ZAtZ
+35HK+ws+Gn9otx+5Xzn3wn7cV1xamsUh3jgt2QJ5yqqn3gaQPIOXFOWQtyzf
+/HYYuc+rVvoSPsrvlo0j58Ud4JH3JbJCaUs2eT7uYU4W5m9d89eiatKfhu4m
+D/RTfTF7t5js9zrX+hwWWSvPmyD9rCitdML78f4f/AfHCvtDdI33wkk5ryw9
+YHq0Tc92OFjT/OEuWNLwt44pnGJz2fIMzP72ceVVnLdc6qRbT9Yt2e4yMP+B
+z75umPuG08NAHsGv9as/wAnjId0LkPfHLyGW/P/3DzT2/wADNNc5
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.667326901390272, 4.30940414848786}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt1Qs0lGkYB/BZRUOqySWztQZjjJHFnHJal40vK020LiVyTUVmp8aoHFSa
+ynbshJzaVtFFOklDZSeUkVwWue2k0bp201LbSCtJbYrs/93tO2fOc37nne95
+n+d5zztjsVmyNkaLRqNtx4fE/x9ziqZHogVFo87IbzebwT3yoLWwf5E/qwxm
+uJt0y2GFR8SmRrjGLNt7Gh6lDKUf4cgTCw4GsCmacHLdp8XI927+3ozTxCKH
+47HwB3sJ7T6cn2poo4B/GelfomdJ0eSJYjnZl7Fod8RiWCky3x0I35Bsq3WG
+KWe7O4XwgTeFcifY37FxZAyO3tuQwIPVW1SZjsi71Xk4YTZMt9H+QgiPH3Fo
+e4qYvM0vIx3xgOTqEiWivCVMegqxPOeW6jAiP0UTehJR1KvdGYHo1N7Zc5BE
+99pwJ0RqIK07DNFtp2i+KWLUwihPHmJqqOCfuWS93mH4BeqZmyxYziD9Pbm0
+lMxpGfcok032Tah6FA179/cpPGFm2o4yK9ijddg0Cd4waOD6CvNg1/glVrDJ
+fC+Ib8OqicgRLdKPcUDiZZgTWKwdBCsevJVeIOfl9bj2Cnw062VmCezVkvZM
+i4P807vjVfBN6QlBILxhblfzR3hBZxD9LEz5nDV2wf6TfRJ1H2yeuHboRzho
+o848uhVFk11wMemC+Q37WVzY/KXNJOk30NMzainML33UsgdWGtzx4sPMCrb6
+Nuk7OcyXBStWqO9po67HJeqn08j/xL7J8xt4ZAXfoxeOP3EkLRhuGvZzvAyP
+7hifFwOvuTTrzxRYc25UthG+Ed+eGgDTfZbdXQWrDPU4drD8NVdjBnfTxBGG
+MM99qv8F9i9enrFoFukvxTvnCmwfEyrRI+srh2Q/kPMrPLedBfP9Y5K4cBxN
+zPyOzCt8l40G/Z5StgmTYNmbaJMy+Ezm8fWV5P2wQ5YZMHP2rglt9KfMfhu6
+C96z+lVdCPFzVqOYnL88tUABC2Jrl++F9d8ai3S46FfTFn8aHq8oHQqC6759
+3aWCC1IYAXkwryaxXR/1FNqXbuqDmQOt7cFw4sP8i9rW6MfSIqcIHpshOmkB
+965K3jcFf9Luufk13BKX8asv5vFwjarAGmboTKXnwOn0jteGcN2EYrAb/ivv
+vu048su42QId9MWmzTr/O6yOTXflwG7yZ3akHvnPAyEOcHuT8pMEFhoN7LQm
+52BU7LOS1Nvfkz4HDnSijNhwTnBu2yDyl/qKH+vC5q5x4VfhzKjAfdNW5L5d
+dIqDPQ9sHZxJ1vtMnpF7Xv99ndYiUo9dka0G/Rg1t1avgJWHUlTFsPo3g6Ek
+mFFaxyf3JOG5b2QVmWeoliX5nTFf6Gami/7U17KOuZJ5hfqkRcAKXkckubfv
+je8cLIfj60s9BOT7sZxuXR7m6fZ3jQjes1+2OQSOfzHPOg8eEJlFnyM+WVbV
+D3NPmZf1wv7zLXtsUa+XlPVOywb9VpznSUn9aseWr2Dm6swPHfAtRcldK1jT
+2S9lYz7L1OUNLFjI8jHdBhdS8ihdYrPu6kvw+yiNjwb5eZwts7vgsbG7mhpY
+VtBRNAqPBF+0OAb3Tq8Ln4CdXKest8DC7sNfviL3xDmX70zqvcLU/wPm3DNy
+MIFzDCr3k/wbjl3PpsHyxuEqCaxnGG/6HvMQTpW1k/ONdi7JnSbzU1d4v0T9
+hakF98n7oy7jk0Xk/iUx8yk4v7IqTwzPvC45mwzTh8dkrvBYdVNWNannkUhs
+AksDbkbooz+BvGvhTLi8NWvdJphxy8pvBsza8dN6Jayc4XbaGN6ZlWs9ZzHO
+Jag2xAWuGXS7FgZH1csqJbAwgE7lw/nN7g9KyXra9YYe+L+H8/n/ypb6F1+a
+WGI=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.165661129127848, 11.57565554834886}, \
+{1, 0}], LineBox[{{16., 17.00000000000231}, {16., 9.999999999998607}}], 
+        PolygonBox[{{16., 14.1}, {15.6, 12.9}, {16.4, 12.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.9452, 13.5}, {-1, 0}], 
+        LineBox[{{16.000000000007276`, 17.000000000003638`}, {
+         10.000000000005457`, 13.5}}], 
+        PolygonBox[{{12.48173265946094, 14.947677384685548`}, {
+         13.316718930329426`, 15.897834175673825`}, {13.719815750748694`, 
+         15.206811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.823799910437668, 15.984057296392571}, \
+{1, -1}], 
+        LineBox[{{16., 9.999999999996362}, {10.000000000001819`, 
+         13.499999999996362`}}], 
+        PolygonBox[{{13.51826734053906, 11.447677384685548`}, {
+         12.683281069670574`, 12.397834175673825`}, {12.280184249251306`, 
+         11.706811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.823799910437668, 11.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{16., 17.}], PointBox[{16., 10.}], 
+         PointBox[{10., 13.5}], PointBox[{8., 8.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/cgdhef/ifghgihi.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdhef/ifghgihi.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:eJwl1ws01GkfB/B/EuM+shjlMmxCSSrFomaEciuzIdNd7ktphFJrmRchEkq9
+FBltWxQx7WxU1JRLKlpKbql3WvQS1VC5Rb3f57xzjuN8zu/xPL/v7//M/xyG
+/ge2BMlQFPU3fshvavI7PgZsikZgyKZc7DOn9sDmH4XXvzPZVKtCjvl9fTal
+3Dgbr4J6ky7johkc6uIYbwYzYn+RL9JjU70OiXJesDTaJngxnBZ4sjENtql9
+11+ny6ZkM6qfNcFcLZ1TR+FK/wW1dCM2Ra/rW+tB3MkR7YKZP8oG/ARPOjCv
+lMFd9bVMB2IWK3yarN/+1XkvXM/bNeD4I5syDVTcfxa26g63TIEH555d3Av3
+e615cBdu+kW8Yhn6sUxNyBiGOTm5d5NgWp3CfKVF2O+X1Kpu2GnWMUkXzi4O
+ViX5pKYVdw1gKn6Qtg+OvRHrqwlX0jWPF8Jpo6szv2G/aqPxTbeIubr2r2Cb
+xp1mNfCJK781/En6ydE0vQT/oCkcTYYFj7Ou8uC8owPNXjBXXrzPCBZN5/F/
+hFsP9MTdQT8cg8KlE8hr6bjNkEXm+UVwuw2utPl3hRD5ythWdX/BaatoPgzY
+tE474A/iefUvYhci17ZY44twifsFx+4FqL8I+UjmGSsTJGTBnPH0zw2waQ79
+rVAH/UkyRCOw2ESosRr+fCRyDhP9MLffPNPCwLzDMlR3w9lKbbfi4cBbq1Mv
+wfQ8s7NusN8zrzIpzAv5+mEFPCNSOczCvMTTfeZWcE2e9r1MmDm4J9ATdrlR
+5N8F+53QiuDDIvrQfl1j5NsuVq2Dq7svsH1h3vrr5vPRj7kJrSIFLnH1oIfC
+yupH9Erhwb6Isrswl3M5txam7+p6p4Z8/d09LXWw5LHFlA+s6xuzpgbmvjhz
+KgOuPvKvd1fg1li39WWwX4DwchosPTRxXgTLrgu94Qc36X8Nvghbeg4/WEn2
+m/71djSc62fcPQcWXxuimcMz88oXtiFPSRh3wWP0Q7v6/vrvcKvSty8/w71K
+4ZlxMH/HyJ2HyOddpem/m8zj4TDPEnaanxnsTupi2r0cbZyrPL3BGeaEfSkf
+1WJTcS1vlTeR/Rqatm6F6zkG8wNgSeV/zjZo4rmvcZhJgSf9Kxqc4BNzV92v
+InV7q8iuHzDHzW6iT+R++3ovSoZrvI6etyF5uGq2bjDjVvyTJJJX+c97S+Hk
+V4Wuz+BQaWaIKRwY6jvKXIzvQ9/DE+tgj41GBftgm3fLXcJhfqCj6w3YZclE
+7lW4ekeD40fY8lxq0gQschc6GZqgz/yxwx7ob9KvK2sDsdEb3u8wL/mBwm7Y
+RifZaxz2cCh3DoE5EfU2LOTl275L9zch75e+qljY6uC2Ng6cl9C75ALMHVz6
+1ypSVzMdukbW6x33V4FNk6djimBxPOOoBP3EOt8sOgy35j76WEG8WTbLiszz
+bPxAPMw3aa/vxPkFppFJHFJn7ZQPhO0/OLeawDyGIusV8vQ/f5guD3NLdZ1d
+4Fjz5fJj5D4WcC9f1cB855epD5H7W9m7UxHmyJZ2vif3WyUzef98fN8qBroo
+/D2T06bSo86moosXvzEk+6ccOugDe/Q9UiTnt74M5/XTMfdWg8fHYU51Y0s6
+3JQ4SbXAk2/mmbnDUtsIHW3kFTClnYvhwMT8xUEwr0vYoQdH6+YoiODJ1WpN
+FjDt2Js8yhR1jRI5X5hRm9a0ER5MO9h4CmY+iWtNgWN76pxewYKxF553YKln
+quwK9GezRRLWB9uISjTSSL+M/H9m4crFTlt7Ye7NiEWKZth/d/9zE+R1Yv/2
+Mw3OG/smE0Tylw7bT2E9t/2zahbslx2/9zXMvm2keREOdet/egu29P7mcx72
+8LysdhL2o7f7HoHpixQUdpN+hBFTdrBuBq/DHA79UBPVj/OlOVoXZ8n9Gt3j
+FgP3Ksr99hz22zGwdAx5uo5tsRHCg+lr6/bAn3fEOuTDlaFRUylqmN+FK0mZ
+MKU2nrhBFff393jPLJhfH7ZNUQX3KTPErQi2lHkf91oJ+8eFB9fC7LFkg6eK
+2IfW988gzPwjQ7tPAfP3+OrDJPk07AKMYfHM2bt7YUlaTt05Gt5vuqWFV2H+
+m7SoDXCZU5PmJMmrb/fdFNb9O0xtI+Zn6T9lz4Z7nef45RJblIWmwoIIaqwX
+pnsb+k3Aeaclw3pLULd3n03BeftUjdu9Yfaa6eNL0R/19FJlAiwRbd3YDYuu
+pBkUwgK5MJlk5LnUUxdaBvP6dl83UCb3ZklqOVxZ83JGAAdaC02LiVNGR2bh
+zxNdf6TB4oAcVwvMhx1QKg0i1vFQNyc+tiDODpYuW/vgE9ZTifp6ynC21D8l
+GY5zbX/bg/4FOqvWSXC+KODK3Guw5NFAqBIssHDJTCD14OJhZTLfG4eCdsB8
+I+/b75FX+WuWugMstkgNrpbHvTS+dm4l8ZA4P1YO38eG7qgVcKWPaqLtPDY1
+Ut4Wsg5masxYK8riveU1eHIbnE07b/xJBu//xtebEkn9APPQ9zlsqj0hc1cV
+2a/a6Yw1nDes+nIc5szW1hdTOG/o/J51yEO/s6DFAZ4xH9HPIPNl/reFAfMH
+8xV7yDxyjy43hj06miZNlmK+55hV/rBLsUlzJMxXKqx5DMtW/HxeBHO0g+K9
+cZ5yeNGL9zD1bW/2F3iw43TAQnOcp1a35yL6vSTadN8O5udub9g8F8/d77r6
+Zjjbx63oA8zIcDLbAreWhIYdQl66VmS2C8xOf/L8Jcybcy1uJSyYcrPTwnxm
+kq3vq8OWvulMA9jeUbt6kPTbYhIzhvXsKfdFt2H62NzWkzBl/EH1OOm/QSfh
+C87b9+CJgEv6tZh3eAkcaB4zvRSWGMobWqFf0Wqhshyc3TWrsBB5BJc9ooYw
+H6Zr0ciz7ywqu3ShdxeZV5Kt2GeWRTU1PnVsJ/fTZmNzxzSL8g77tOI1uc89
+HwIjJlmUzVq9XeNk3pPb7q8aZ1Htm5966pLzzFQ67D6zqGYn57ebYeaDTve8
+MRaVqzm48wQs3scTbB1lUV3VucHPYD+75l8TpCzKZW2tqz7yi12L12vBBTdf
+y+wn83ofP8yA855cCLsD+5XnM/iwVWH5LrllWN8sE8PCftLTUf1uMNOtnLMB
+55kGnuGmwPy9qVH8TyzMKzrlJsx2tNbrRH/JdjKPumGBeseilejf6Vym/key
+fnnkkiMT6L8zdvU4TP1t+yQXeT1S1/NInVmw8tGBKdTnlEhewpJ5FdqT8KSG
+oW0tqYek3jPAvOJYe2rOkPrDwqxXqDdpS7RCyfk983OWwTMPpzZYk/NCQn9S
+x/6fr6oeJHkENAY3C/3Qihtqu5BXsuiY+E/0WyC/zlRIzEgVnUS+wKI1/qfI
+PE4MaVlhHpPWcuXxZF5sJUn0MIsqaf7h7mHigqriqLd4Pux1paQuVk5wPvMG
+zy/a8vlpcn89oh6r9+D5B0eO3CROCdH91Maiao54fHkLU9LIRMtG5DWMcTMi
+82jaPzh8k0UJvt+9FUysqxitLmBR0fIDhUJi8slb+///c5ax/wedUK1J
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.6273814311035784, 11.151823299819789}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt1gs41OkeB/C/O60YGbfKNi5dFpVKUWimTdOFahYt9lgGFZ1aplUd5DIR
+DyWJCieH2YTQhVJRYlyKTTQuleQIjVxSTTEat+z3PXs8D/N8vP/3fX+/33v5
+j5FvkPM+eYqibuKXfP79h8Gi/vdjxKLoHc9e3l3EooT1cy/cw/8VV4UYuMI8
+F9rZY3BisH5B5/csSjak0cSEK+oCL+6C07VS8nRgm2nrgVJDFtVjxMsYRb/2
+wm5XbVhwtMK/Ey6720/xFrIo/lF1jR6YlSQ1aVnAouKprFw59J8uKH9gB+sX
+1hcx4KfOjbZl82GFUkVHeFvPwy3bYIa+oXIkbNkpd0hiwKJUnxxNvUueb66T
+vw3TzsywP8NOpRvkzsH6DRlZZsiv9I14LIE8n2Vq5g2LOBEqmbBNe1PZaVjR
+11qvDhZNrYu5Do+E6fTMwIJdizg18NjJ1VYOmH/wwoNzDbC7hgHrHLxtuXVY
+FdzAznnZTeJ7sVs5H+aEBNYvQT7Fp/gzUfAhheIlfrDAtHzAEfaMs8pNglUP
+m02ok/6imJYrxLRV0keIXxR82uUy3JHdrRYGq2Y36MfCyxbK51nArgYFQU4w
+1/BWWg3qOX25jDaB+VktkY/WwbJghs4ZWHQxml6BdRq5IO38jsQnqep1g20i
+aztCkR+jzdVHAz5kneXbpc+ikv89ub+PrFv/Y7/1sKXmLdZz2Cr7JC1ND/V9
+G5/7Dh6L3HB+Shfr6e9ZTkf/Ora06hAs6vZf7AmHO1x5+EkH+2nUw6EM7pIb
+bYyHLV8XepsgPquHbGVbmHVPdeoiPDJdbatKLJukKyO/9OEDLyV0FnWVmya1
+h9VV8jtHYZ7gbE0QXHojYFgDzzOqnIPSYdkB+8CNcLH9Y/87sDDlUVUE3LBy
+5606mHFRI6AeLlvRoUbqa/Xtur8O4uXF5X0kz3NF/bE+MFXz+loaqfdQ5eVc
+mPs8xf0g2U/53SpdMOP65arV8OCxD7dnYUladg7Zz+LRwkx11KenbLvcLtim
+mS0m7byjVqtKkb/dGvvZl6R/voH5fNj0RnXDeVgQEDsUh3ralBSctCbjrS6b
+KweHxFU015D6fTGKT8K5sfN3CNkA88omtlvBRzzz9+SgHnzBjMI4OUev/vgm
+DzOUyqXP4fDx3056a2O9etuftcMWP+cbVc3DfI8nCz+Tc3ZQY3ApTI3VaJth
+PP24A7xsLdTvvaZ5GLz3fm6yGcxStnjVBYuClBc20fD8eSUtJ8TH23q9OAEW
+7tZiVMMWu7Qv+MCc8dvKa0l+A+vzXWEWP6ddAF9T43mRdv4/wxW/wWOJqW9O
+wgxuawsb9VKtrDF+QPrfd4o9BtPHEpfNwlxJ360E+GmT2NYR8TAcFP0jSX3b
+A+0zYJ63G4vcU8I2x7E+Em905RF1+EjFWq4xyc/Kq7oA87nqlqo6wzzjULYl
+TO9y3vIbTCuZ4eQi/nQn4+M8uNgila4JSwxcnDxIvQyrPY4g/4Y9ofeWkHa3
+ANMu1I9idJi+wnyWSuZuO2HXACWf32HRgwT3ZpyzihLzWCnJJ2xf5V7YU2bc
+vB8W/PKjog58dXii4aIm9ouKAacP57DHTWTprIF8P9dta4YDtLt+UJ+LeC9Z
+Ua9g4Uolw5bvcD73hn+h0J8rXNN3bQ4+6R0Gm+GO+ZMmhWpkvVN0L8E2Mc2t
+Laro/5/HAQrknsjRuWmmSp7/WnaU3EszNEmZCp4/8MT8PZwcwVaPhBnViRWe
+yFfV2S4vBE6mt2fUwunqsVlX4B6HiCgDUq8Aix1TMH/aS82D7IfxO0+CMT5j
+T9BkBCz7fnGMAuKx/FxyJBbmCFSuZMFcrbmLAkn/VKd6GxL/+3nWNnB8fm/q
+I1jY036mH/NRhgXc9ci3J3I4KBQue+fbnEDy3zcYKkO8jKQMzg1YtCD2HwFw
+SHR0lgDm70xKfIb8k4dnlH6FeZaJX61gqvdgZh/GtzQLzcom74FXz3asgYvt
+ftyoC/PfZJe6ID7RiufSLNx71NCpyR3Ih2p0lm6EOzhensbIV3Ioef0kzrmg
+or9SrITxyg+7tcGySO2FWYrw+laPRphT0i3+RQH70a/6dq8eOWfUr0vlUW/d
++q10jBcvrzGhIYf5TotivOFBP2b9AgrtT12TK2GROOp50TcmRZVsSjZHfDyf
+S9y4GSZV/GnvRxI/JT4c0zTNpIQZzqV05MdR4MpOwKzQne+iyT3vP/4iC5b0
+BL95C9MOPm03QH+eG69gFeolzHdpegsLdX5w9If5jUUJQ5iP5c+dcwJ2H9Dx
+noN4uOHizHCYtnJ7eh7MsHzM9iDtLa+n7BA/j68q1oNlL0x9q+Eexvb/3sd8
+MkZr8jLkK3zwVYUN8/wMnwWQ/GWVwZVkP99dvD+MtO+5v9QMlhk2K7vD3Lyh
+1rPI3928W3OWjH9gKngc9eP51hUHwZLWiem9emTdlw9cQzyiwcyvvbg3e/7Q
+uxkyi3rJplYEk3t0zF7JidRr3jw/Q5ijm3hvYBLtLSpzxLhHaSm2p31lTIo2
+GGn8J3kvbXL72i6FL9gaNJH3StedXrdRJsVVjq/9CIsMt/ys8Bn95TMDzcl7
+74x1aucHJiVi2ytEkfkP+n3kDGM+cbWtGBZyPdvjBphU8ljhkCviZR3TPH62
+H/VlsLY+gRn0og3BYvRfMM6xR77CfxUuWkl8VsE4H+b7vde6Axdv9toth/pw
+U2qTRtC/uDbIjk2+l1gcH7mN8SWjJvsOwyy7E7p9Q4ivmZ8RRdr5oUXbRpgU
+I+zO0iBS78wNPnc/Yr13HfvCJPu9KLM+XIJ8FaN+HyX7LVHidRj50XYvzUkk
++//dqUSTL4hHqvZak8ST9afzCZhn/iglmqzHRkojgrTr1y98T/IXpC/TIO2N
+3T9xiJXDE1dhvGST7nXlqB8//2la2yfMv0SabUHea2KV2QjExws986IY7y3B
+puX3wgeZlKWhE9sRFuqyFUbfov7RJ9ZSMGWa5qXbDW8uT2zFe03o+lPtYBvG
+2+FSXAtTy67e4tcyKf4Ho8A27f9/r+U9/PuTzvoLN7T2Kw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           
+           9.996694214876033]& ], {4.016469192730548, 5.934756130901607}, \
+{-1, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000001556`, 17.}, {16.000000000002885`, 17.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18., 17.6952}, {0, -1}], 
+        LineBox[CompressedData["
+1:eJw91H1ME3cYB/B2dhtvS4skDhtmy93JcMy2dwdFMJsPZWKJIOVFrcjkpUCY
+lE3n2Ox8aZMFtqEgiK7qCiumgQoaOoowDS91dkx5ETWYoSJ1sgaJojjE4SRl
+v+6P3yV3l08ud/d7+T5PaN5naQWvcTicVHR67+8vQReODDj/HxQcn4V102Jk
+x0/hizEUmOy9Z9M2IPvs9yfyKRDTr7Ym70bOiU817qPAqZPMdZm8Li4cOkiB
+3fV4fdHvyCcyt1aWUCBLKFxNPkVWbTvgUVKgv1UzMRtIo/+ldB8NokAwXH81
+UoIsHmgeu06CVPqmyaZAVv+YlVZGQrpFL+rchLxmxI8rJyEPpJPhacg+NUfl
+DwnYq8oo1iUjQ741rIGAsLulyU1xyGbuYE0BAU2PMlIiZMijcc/2xBCwoOoT
+u4Te72dtcojQ82a3/d4SZIPPuERIQM1mXVT2tHc+kXMrVhHwHqchsPa2dz4l
+E9UbCVDfXVn1dT+yYcEvWk/Aw8FhXd8l5OqMpDoHAfZfLWsvOpDnTxH5/iQc
+Pv8xvewKspV/8FAmCSdutw77jXpt3n7FSgKXsy83asb7vivHNUPCuEFb38j3
+jmdziWc1BaHLQ8/8HYk830jysyiYFh3RJO5Atvm6F76ioPKjPN3x75EFSdVT
+egrePmwKMLcj7+3bn7yHgjB9SIP8HnJwXCUnnYJFOa9bxWWAsyu9NyKUgnfe
+8L3AiJDNLRLqTxImDULtoShkzvzrjJGEwUJFR0U8svqFZIOSBEFd8CdPlcjW
+gjPNLwmgn6nN/gnIskam3kaAJYcf17sW2XZTyfucgG9vFXmKIpBVpsoABQGl
+Y7Hua8uQ4bLoMUnAA543d8jB/ucblxOgDf9NSE/R+Hmm1Mg1jtD4/Q8sMz3g
+pPH3bUFN2c8v0Pj/du3kD4JOGo/vn9PdiaVdNB7/v9+4a7/op/H8nJ4XCUP3
+aTz/B0OvFK0eGq9PXcXEjqsEg9fv7AHNbPZGBq9vhqOufOeXDF7/53/tMnU0
+MHh/Lj0a3/LWAIP3z/1dbe62GQbv72Xfsvp+Pov3PzFCJZt7l8X52JJy+tpU
+NIvzI1Fsd65fx+J8vYyWlcd8yOL8FUvu7C6LYnE+O3nZT7RhLM5vamt5v3kp
+i/MdmylMIhYYnH+3PcYldjO4PkJWtNhGhhlcP12rKtrUPQyur53tLcfK2xhc
+f3rn9eA/zjG4PqtyDPeVPzO4fo/dmdekdDO4vttjc+UDNxhc/xrppyEBTxjc
+H9p6Tt4cE7C4f0hWBl00rmFxf1k8csMvXsPi/mMZ5VnbqljcnxJSIf3cLyzu
+X0mBvY6lLhb3tw6uN3+RuP/9B3PT46g=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18., 8.354800000000001}, {0, 1}], 
+        LineBox[CompressedData["
+1:eJwt2Hs4lGkfB/DHkgYlp2QrGYNyikEaEU3IKZVNMlpq8o5TVCqVsFFUEkKU
+YzsVosQkCSmULWWsKZPklWar3dSmJskx9X7vrrc/cn267+e+v7+vx1xddAN3
+rg/6iaIoBRmKIl8pGvmLzqZ+/NFlU0xu+841MEd+/pQ6TD3e1V4EawVMrpsL
+R46Vsj7AXOE5UzW4OM+jxw5fy+YIYyfx7zXei4YTYZsstb5uWHhgSrMVZp80
+zi8hz5kymROwW95FfhisIs6u0Gdg//XpXAM4VJWR4ghL+BHcGzr4+uUYz5vY
+U36TDsw00YjxhamurAXHF+Ac05KydXBzrJ/CpDabGp7fFWgPJzjcmxULz1jR
+XcSAM5JG9ynDX+tm1svAKmffZNbPZ1Ntbznc5ySfNOREPFxGq91WBwssMhwC
+4R6T+7U5P/Kf1CGWezwmHw17zZFZehCOiFZ4sRVutlc0qoHp2/k8H9LT6gp/
+Cve1imOdN5D1F70LNsPJp5KKtpDnW/Vf3oej3DuG9sMJTWqJLMwj9TUxKCK9
+6/Vml8Jso4aoP2GpYslVZcwfZbc0RRH5vayOPAyDaRk3j5H5qYXGe6rh5Eea
+9ALSh02ZwWvY2e3otXfEHVTsJJydlxhpp4d898t8RmBO2dd9KbB0+fhkFxzh
+4vRVDFNXV+jmwH2rhrZr6aOPqK99dvD7X9Wz1sNeTxsz2pFPnP35/CFY5N1z
+y43k1/EIKoYzInU76jAfzb+Q1UDWcz3adWG5lgVz78L8NZ7aKehLvEVQ2QRT
+jb8xx+bh/sxPzKtwpKuL8W6Ys+RZcB45z9u7YGou5i8/nhJD8gSq2v4OJynF
+mvnC9GvCi5uI72zUtiT51nOcLGHPxZosZbJ+dZfSInhAQ2vNB8zH91qfZQNH
++A5++zHvDUXZIJijl53XCme8/Y9NOVm/0jBxG2a/N3pNIc8wFXngD+LB4dZg
+uK8n6EkPLKp89EYMC/OzF4/D3MCcIWfMx06u/WaA+1UKlu8RwO+jrxhtJn3c
+3stURR8qVxJl+HBzROj+rbDXaj/uW1iSORhYCG9IXnaHZYD3o/yW1m047ngy
+LxkWULnjd+G28EOhPTC7gnanAk71nj2qvxD5WVb50XDCyDZeOOx1rE/dCM7N
+cPylHGanCjVbkMc/rrCtD2Z6/NZI8laEmXPkFiFP5vP59ZhnzDiOoQML/MuU
+9eFWpaK3psSSiP4T6Ieqdlczg/kFT7+P/Ez2vzurR5430LgVDi8xGmXMgtma
+rIGPWmzK8PaqqiHcJ8k7kpUM93hY14lgae/CjmVwdNVPo5dJ/kKfffJwrnWz
+6zFY5JA6WzoH5/AKjgTB1OZtbSNw3yuzEHcyX4Ljyp+x37+ryN8apn/Y+nQD
+HHFMZ5cJHJnnWlYCU3X7LRbDKqdN2uSRj96Ql2tH+gg+EL8bVkkKlfWFm9Ps
+s17CA6dNTeNJP6GK6V6Yd0P72OJrcILVsbm18NcZ4pOfSL4rDW4z0U+cqrav
+Dealm1k+9yL9PXSkH4EpneDMOLhmXtHyJ3CGhrF7GkxX/dRlYIj82qnLDsEi
+8dT0KJhNs//uS963Xh+tWzDXL+yCGiz+927SN0Py83Yv/RruL7yRZrrUCPuZ
+e8MdYJFwRlggzHWzHr1B8hv+wjgMS6wYbQawhkd7XzYsHXspn44+UmW8m/LJ
++rJruqPoM0q6IpOsM7fT4kJI3/9cFiSS8+2aFvytyabquH4y28j5FrURe2Hp
+Vo0n7mQ9JPHFfHjA9vqfBmTdNa2zfzY+jx6at1CwwI/tcQvW6vZIfY78zKrw
+sTpik7qx23DzZ1nNR7Bbx5qci6QP2ZpYWZwnZKmdyYMjr9+t94Sdwy7dOk36
+sZzmVEbu++OQPd+QfD5eLVFB3rjYRkEtLHAK74yHk3YJZvWSvqQ6fh9hqZzT
+VQXkUemRfcrB/PO3LPJ2JnmTHhnWwoX/njZKhvljvvdk0NcGheYvj0kfn4rk
+WKQ/Rpcuwxj7jZZ5rYdDP6/7azcsmfju9wtMxX33vgMnuPxjZQUzOX+XzzTB
+/txC/zGcL5wZ4rIelphz68/DA4c+SdJMyPvnftCavK/zks7dhvnDbPnryCsM
+b2S9gkUzMgsXwjQ1x38nYOmCm7YZmD/1xB/F00zxPpV32I+hP1ql7kdZmB73
+QjMI1pfLko5gv4pl1kSfBu719/aXwM3Hj58KgrnXAgPumJDPE/5NWdgtkRf7
+O8lX77nipjq+D/unx8bAlJN5ZTrMLdput5Gcl6FqFw+3sjyzrEm+gx8rUuEN
+9MOG88h5d25vvQ4Lm/o5CiRvjjhwBJaa16n9RCx4d3w17hNnNrXIw/SULzVV
+sHDlyuVapI8OZ3lt5F+SVlm3lKxv6VicBvs3fn64lfSTp1A3Ppt8HjWG5ZL7
+Np/e7I8+MpwCJ3tgZmHRxiryfj54H6aLPiRKtnmDcOTkPPudsFR1NUMdffrn
+rKpvglW+lzK04cIHsTIqizHvM5aeIuxl5GMXAKvsWD2nF8/TvudUF8OCCxYB
+6XCc3NTEK1jio3vFiNyXnqr8sxncu2y0CvmG7Z4EO8Kiwx6WC2FR1TSVLXBz
+633tLMw7JveoZgcskBkZH0c//s5nzu+C2Z/bl/FIfzaFf4SS/foBlk/V2NTr
+zXFFPuT8gJvtHFjUEGlsC9N9TFgfVDHfEk+xFkzZuFQWwLywcM9h5OMPWTjw
+4IrHyhGdJL964jl3WHT5rsoVMp96sbEneV4td+wkzEzrbNoGt9k8+z2GPF/T
+OXAezrWYztgJZ8Q8HZTCzS2HdIhVYoaneSFPT+PS8liYPfQkqwHuy1lnlQNL
+k74FG2MeSUHSyZsw12BYLQ+OowV8HIRFtEvWFPrQMGd/MEZ+/iOW0E+DvN+9
+5yPNyOf3eBwfju6fqm0kfZ7f3tsJa+1+nDTDHOcdOZH/mqzLDrICYFGZpIm8
+7xkDl6WXYYlwZ/UNmOanO/AFFhyY77oPbujiuc9n4uf11Krrc+E7WYslNjB7
+qWpsGfJtfJzx33Uw/XCrhT4sd+F+MReW/ua+4RTmU4yIGdoG8z9fnZhEH2Mv
+Nwh3kP0XZqWTvp3NS1IiyPn3/KK7VDDvQqXHPPL8OzfxWthStP0EB+aW6jvW
+zWJTjz8V9LiR5/v2TX5XZlPLJwzkWSRP863+WPibAyNWn5x3IWQbEx6LKL2o
+RnxrjKMDp2o8GvoJlkztPuEKaxkfWz+IeemhG+eUwD3L/3z2HOZzT+y3mEXm
+SV/zDGZni5+/gpcoBo9KSH/fQkQc5CtbGZhM+kp4l829Dx+VM0tWwvnMuS0r
+WJivNevMQQbJX9g7dQ6eGHyvsoLkEb7YJoN+9pXlBP7o64Dl63Ww6XDxr0dg
+L7dpBcnwnZzDtRWkv/Ldooswe3bnrCck/9s1cpfh/rLG0a+w4BpPIxO2lZeT
+07PA+6Z8yWMTXJyW/dcquJmf50eDLVMYQTyYe4hyPYs8KdzWvN9gkaK1Cx3u
+6XwjzIDZO08nnsI8MZcVzhSR/fsf3J/E/JUz7kouwJIKq73t6Mvr3ftXxAnx
+dV/Oz0SPckLDszB/YWdH+gw2VXojNP4UWY+6lpivxKYcrYK/JJHz6eGzRIps
+Stmup20P2T9gt5kFL2Q2craS+/5T8vGJAhz1VH0dTJ2szqiE28wfBTuQebZ/
+tWmBbb4FX2KS84PVlJTwvENBvtoicl6MU/RReOLgpd8ZZF2scNQE9zt/ylDV
+J8/711pIYSa/pN+E7LdLGGxDXsWa7sW2xL39zHLM45/bIl5L9l/Qm52EeWkh
+d/3CSB6zqhFP9BEY9GY8mewPfqU2BlveDKuuIF6anmaP/qo7fdd0wXSPlt5g
+2LBBEDkJS9nXh6Jg5T63Kj1LfP9GNEzI+trTRfkeMHePv6MtnGXdIN4B099p
+3nuN84WOa3VPEvfrGTPglzt09l6Cm/v9li9Bvn+6Z8s2k+eT40v0kd+Nu8Kl
+k+zf86H6G+Y1++RJ64ETarwf/Il+eJE2vF6YihQ9OIc+TbOHWrthiaviriQa
+m/pgYyTpIK6Rrzs8HXk6Q66Q8/luOQ4X5TE/TWaTgJz/NfvexDTsn+TYniW+
+m3YvEea0uNafIHnUh7Vc4GoVnksMWdeWFzrCdfPUncNh9vECjWhYMc1+ZAtZ
+35HK+ws+Gn9otx+5Xzn3wn7cV1xamsUh3jgt2QJ5yqqn3gaQPIOXFOWQtyzf
+/HYYuc+rVvoSPsrvlo0j58Ud4JH3JbJCaUs2eT7uYU4W5m9d89eiatKfhu4m
+D/RTfTF7t5js9zrX+hwWWSvPmyD9rCitdML78f4f/AfHCvtDdI33wkk5ryw9
+YHq0Tc92OFjT/OEuWNLwt44pnGJz2fIMzP72ceVVnLdc6qRbT9Yt2e4yMP+B
+z75umPuG08NAHsGv9as/wAnjId0LkPfHLyGW/P/3DzT2/wADNNc5
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.667326901390272, 4.30940414848786}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt1Qs0lGkYB/BZRUOqySWztQZjjJHFnHJal40vK020LiVyTUVmp8aoHFSa
+ynbshJzaVtFFOklDZSeUkVwWue2k0bp201LbSCtJbYrs/93tO2fOc37nne95
+n+d5zztjsVmyNkaLRqNtx4fE/x9ziqZHogVFo87IbzebwT3yoLWwf5E/qwxm
+uJt0y2GFR8SmRrjGLNt7Gh6lDKUf4cgTCw4GsCmacHLdp8XI927+3ozTxCKH
+47HwB3sJ7T6cn2poo4B/GelfomdJ0eSJYjnZl7Fod8RiWCky3x0I35Bsq3WG
+KWe7O4XwgTeFcifY37FxZAyO3tuQwIPVW1SZjsi71Xk4YTZMt9H+QgiPH3Fo
+e4qYvM0vIx3xgOTqEiWivCVMegqxPOeW6jAiP0UTehJR1KvdGYHo1N7Zc5BE
+99pwJ0RqIK07DNFtp2i+KWLUwihPHmJqqOCfuWS93mH4BeqZmyxYziD9Pbm0
+lMxpGfcok032Tah6FA179/cpPGFm2o4yK9ijddg0Cd4waOD6CvNg1/glVrDJ
+fC+Ib8OqicgRLdKPcUDiZZgTWKwdBCsevJVeIOfl9bj2Cnw062VmCezVkvZM
+i4P807vjVfBN6QlBILxhblfzR3hBZxD9LEz5nDV2wf6TfRJ1H2yeuHboRzho
+o848uhVFk11wMemC+Q37WVzY/KXNJOk30NMzainML33UsgdWGtzx4sPMCrb6
+Nuk7OcyXBStWqO9po67HJeqn08j/xL7J8xt4ZAXfoxeOP3EkLRhuGvZzvAyP
+7hifFwOvuTTrzxRYc25UthG+Ed+eGgDTfZbdXQWrDPU4drD8NVdjBnfTxBGG
+MM99qv8F9i9enrFoFukvxTvnCmwfEyrRI+srh2Q/kPMrPLedBfP9Y5K4cBxN
+zPyOzCt8l40G/Z5StgmTYNmbaJMy+Ezm8fWV5P2wQ5YZMHP2rglt9KfMfhu6
+C96z+lVdCPFzVqOYnL88tUABC2Jrl++F9d8ai3S46FfTFn8aHq8oHQqC6759
+3aWCC1IYAXkwryaxXR/1FNqXbuqDmQOt7cFw4sP8i9rW6MfSIqcIHpshOmkB
+965K3jcFf9Luufk13BKX8asv5vFwjarAGmboTKXnwOn0jteGcN2EYrAb/ivv
+vu048su42QId9MWmzTr/O6yOTXflwG7yZ3akHvnPAyEOcHuT8pMEFhoN7LQm
+52BU7LOS1Nvfkz4HDnSijNhwTnBu2yDyl/qKH+vC5q5x4VfhzKjAfdNW5L5d
+dIqDPQ9sHZxJ1vtMnpF7Xv99ndYiUo9dka0G/Rg1t1avgJWHUlTFsPo3g6Ek
+mFFaxyf3JOG5b2QVmWeoliX5nTFf6Gami/7U17KOuZJ5hfqkRcAKXkckubfv
+je8cLIfj60s9BOT7sZxuXR7m6fZ3jQjes1+2OQSOfzHPOg8eEJlFnyM+WVbV
+D3NPmZf1wv7zLXtsUa+XlPVOywb9VpznSUn9aseWr2Dm6swPHfAtRcldK1jT
+2S9lYz7L1OUNLFjI8jHdBhdS8ihdYrPu6kvw+yiNjwb5eZwts7vgsbG7mhpY
+VtBRNAqPBF+0OAb3Tq8Ln4CdXKest8DC7sNfviL3xDmX70zqvcLU/wPm3DNy
+MIFzDCr3k/wbjl3PpsHyxuEqCaxnGG/6HvMQTpW1k/ONdi7JnSbzU1d4v0T9
+hakF98n7oy7jk0Xk/iUx8yk4v7IqTwzPvC45mwzTh8dkrvBYdVNWNannkUhs
+AksDbkbooz+BvGvhTLi8NWvdJphxy8pvBsza8dN6Jayc4XbaGN6ZlWs9ZzHO
+Jag2xAWuGXS7FgZH1csqJbAwgE7lw/nN7g9KyXra9YYe+L+H8/n/ypb6F1+a
+WGI=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.165661129127848, 11.57565554834886}, \
+{1, 0}], LineBox[{{16., 17.00000000000231}, {16., 9.999999999998607}}], 
+        PolygonBox[{{16., 12.9}, {15.6, 14.1}, {16.4, 14.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.9452, 13.5}, {-1, 0}], 
+        LineBox[{{16.000000000007276`, 17.000000000003638`}, {
+         10.000000000005457`, 13.5}}], 
+        PolygonBox[{{13.51826734053906, 15.552322615314452`}, {
+         12.280184249251306`, 15.293188945044921`}, {12.683281069670574`, 
+         14.602165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.823799910437668, 15.984057296392571}, \
+{1, -1}], 
+        LineBox[{{16., 9.999999999996362}, {10.000000000001819`, 
+         13.499999999996362`}}], 
+        PolygonBox[{{12.48173265946094, 12.052322615314452`}, {
+         13.719815750748694`, 11.793188945044921`}, {13.316718930329426`, 
+         11.102165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.823799910437668, 11.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{16., 17.}], PointBox[{16., 10.}], 
+         PointBox[{10., 13.5}], PointBox[{8., 8.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/cgdhef/ifghgihi.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdhef/ifghgihi.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:eJwd1gs0VGsbB/BNqiFFSVFoCA0mDVHqqBlS6WoqNJxC5dZ9KjoKoYhKRe66
+jVBKZahVyGU4XYg0J5RqymCKk2QizhTx/d/PWq1Zv9n7fd7n+e93k+H2/Rv9
+lCmKGsI/8kkpRvGjz6FoBFM5VM2O32p74GLbig4TuOUyv+GjHofiaXRm7YA1
+Fc8stsKRTu22xbCdIPtE90xcF4ZdNtTmUOJ3C2LOwnbPFvZegnUW/Tl2Bay4
+f+2o6TQOxX+u1zqN3H/Y7XsJXKOq30rB1KKnqRunY7+qwtIxcIvlp6BuWJBr
+pGUA07UWJEXooN7Jtuh1pJ7hGEs1XfT5Qav6HBwY6NR9EvaJXfHwA1k/Q67W
+B9ck3Cu2Rb/yVxcTnGdwqPRPRg8SYYZylm8cHMIzOfQVDrR32y2Ei30XVXEw
+v8LELVEES4c3lZyCI8d61pfArAfr+6phKZWoeQUWrG4t7IJ9Ar8s5sM6tj+1
+FbBz3obv82HN/Q02vTBnk+XRHvRD36tu/YLU39gbn0X6l+x0vgALz97Vd4MZ
+rJnP2LD8nZXpRF3Sx+oxLejPLiF/XwPmF2+3WuoFFyuu8i7DLRZDka8xb2T0
+krvh5PqX/v3LSR5uTiEHYcFhpelkrhazDRJy3VmeWTgTFmUoj82CRSYF/LPY
+p4uprC0h9TJGOCRXxt9RJpb4lEfvTE4l33sv5abAwlOJrAUwbWHG40moE9jY
+r/IVz4n7l+RzKpwXsE6tlDy3WdwQM/TR5XifmQXnzdv2tIo8xxc8B2KfnoaP
+npiDm7KNVgLbLct82gvTLtYv/kzqPXMtDCXnsPpRtgmZS2vngl8wpaXldIjM
+IVE/HmCA7wslx57D6ZnlESI4wTxmrSn6TE/hDyvPQv5XHxyMgrmrhirmEm/z
+r3hN5qvLTeHAfMeEJYbkuY5yefaw8wODw1tgmoZuqxGct/tKWjQsZkl6Bsl+
+Qym5ZE6pJE67DOaNv52eANs1x8YfhjVNmcEHSL6DilFzWPhL7raIrN9T6/0R
+/Wv6LN79L3muxh03Usi5iQ/rOUHOQXVznhuZ16dURZ08jx3er4xggVFYbgzm
+446aKiuRc2ja6TuAfAKb63j95Fwc+LDcB053mTN9GE5/5RFVh/eKW7EsRg/3
+c2kH19rD4qsGMldS/+XxKw/xXtboNO/KIefYivbLAaa7e7qoot/AdycXt+K9
+5jE2v4uEWcx7Oy+Q9/6HW8x45CENKLq8FdYJ7zbMgFn0njYHuOnM1GgdOvYp
+CbJgw5xuMxM/uIUK93CFmV/EAwUw7YTMIYKsz2s4MwjLHTm1ZXDQ3I78BYbI
+Y5P3WFXye6Th/PZ9cGDS00BvWN1cpHsJVpg6DJTC6WF+typgfsWmQ9Mwn/Ns
+h53NMDfX/PYeOOcs11IKF7MjsovJ/JFx7q1wnE1fwwD8+FJ9ZSMs/u+QM52c
+x0GXSlJPwY//aQMzT9VOuQbThFnlVnBOEv1FBLmeUnVEG46fG8D2hAW3PzOk
+qDfV36h1PiylsyQXYF+r3+Ya5P7dagXz4D1a2ue/YV5WZ11BCfqPVpm6ugkW
+JtWU28D8lY6u1TDPwc0rF3nkWeauKiX5tKWe1oRdVQ145bCga3VIqBbOhxbX
+uh6Wxvd4d0/Bfvat4zuJ2SJHP1iq53ViIvanL7a51zOZQ9VvVm5YSuYvNLoW
+B+stHUw/YkjqjJ+/CA60lFqUwaJ2wwwlmE8f+UvFCH00jx9t10ReMmoeF46b
+fOfIB1jYnye5BLNiwsbL4T1TacpdMD0q5qIO1v8YsLOaNxu5Wi6zcYVb/uEx
++DAVR/2+AsuS077kwdIzfiE/YKcdzq/fwF2prkUuZJ6Hvx8MwbzKnsP5sL1b
+1ystY3jINV4Z89t9lfXNguP4JV9d4GLHVl86HJmvO3IOZqbzFdowp8njySNY
+2PJxQAnu0gye0gjrnZRqfEZ9QUdr9itYxfZv7mNigyR2CVyW9WTMVdJ/+U3R
+SS3yd0VwMQTm3/ilYw8zhLy0TTA9+dKK9+hPJI71tybrnWqWBMBiscv66TCH
+M6mmA/NR7cZcFZiWv8bTDQ4LPak1hLyKT7E6RMhvy/srjcOwwCss2QLW2Zey
+QQ33i15kbbTVwFyuzPrZMCt7Ac90EurvGvfbGZbPsw6fPxHzOt+feQTWrK+v
+91XH++Dv/7kI5l7OFokmoP+GjoIfsPBZnWINvFbV/KA98pAbHqCpwny7Tlks
+rPnsDw+FGqnflNoEJ2SVmurgep77axrdBPc1jr3gC28ZflAbAEsTK+rfwHFW
+Tok3yXWzcx67sP9jea5HByz86e6thf6SbRuDtUzRT+zRCbWwYiUzxw4WH5CP
+RGIedds9ehthAedgFUuDnB/3dG84UlZm2wA7WTx230ac8k2FQfJqkenw4HQf
+V43NsHFou+5yUv9tv5wPC47YKJmTesbZaw7Ba4OXiWlwnPmhp1tgTSPTetKf
+IixHby4cFLXPtxymNi53eI798qhZOulkvge1fhPh+BP9HodhlszK0wz9tiis
+gj1hzZej0SaYh+/OClpB1r+7f0cN8/uOyVe1J3lEe15sR557UjvDiaXf+m88
+VMX5KggWOJN68vh1yTT8PySEWekDC161Fx4fjzz0aq9Fw5zyItv4cfh+eFPi
+PXK9PlG9ZCzO8Qxr96+waGNTmwacPvGUy1zMx5eFnEtR4VDDuT6RQSRf2fqO
+tXBgdvH1SpjuVXBqAfxDdslVfQ7OxcjsYS7MWGM4gQeL29alpcNOvrruApiu
+z60ej/qRA5s722HOsWFmGvy1dqVQnwFP0zBciv64N6sU62Eq6Ht7H5xHNzoY
+DAsmv9LPxzzy8LrlCbBI2dt9C+Z1/uOQwVWYft7Me5j4baPFNVh6+HptFPKJ
+35xJz4Q1s2XrZbCN33XzOFi+nW+hjzxDVvV/2gv7/Buwaw45r0Wlq9fB4oBI
+PQruOpGWxiD93coIuY71xlMv2imT+0cOy2bCNQ47b0swjzzL/tMO7H87Pyaw
+FBZkblWcQL/R4WMrLsORk/PdT2Ae2UhTZRzM6mDk7ML8ZffuWoSTvM7SE5Yh
+L7HmY/cwOOFG5k6dMcj37TeDWHLdvOt2vxLOa5dGG6lHrbI+30oh79RxwSJY
+WvjHjLpRNsV6uXfeN1h09L2y3gib4iZO+NeE5OOyL6FymE0ZswUT/Mk8/l6f
+KofYFOPP2OzbJE+9av3Z8HCuX/B/JP+F4RO6f7Ep9bP905zM0P9bVSNtXKe5
+iFUTYGlP7YVMeGrR/DctsM/n3HQ+6lMXV1vomaP+3YLeuN9squzWpN7NsMg7
+7dAr9OOqctT7NLESrVcP/X/9R9uwCBZq89c3wzn5ai4NML3X7H0s5r3fOyHm
+IyxfoOVhrow8rYUd7f9f77f0HhwoGqchIZ6aoT8DecnHHJ1TZ05+3/xU5sE2
+devKC2Gf5BdVAbCeiVNlIhyZVDt3BRy02sxvL9m/zHlpH+oFHbWZvpLsn/RU
+dy8slq7fZEj2b5yhWop+mL8DE0cwL+eGyqaP6DcwfTKjDRakWo+pRv7cy8es
+62A6i81IwfzDjowjFTA1FOywCnkpYn5tLYNFvYrGPgWbqmH+rH9C1pv3vL0+
+iHyWKFm/J/d7nX575AebkvfqBg2TfI8wlSL68Dy8Tw0ySH/H12x8JmdTa9Wz
+rnqTeeqsaqu+san4h4OyKySPO90Xbn9FPzlREhnxHIO5W7rZVI7Sxw3zLFCf
+tn9R8xc2JVR6/jEUjjT0uqSF6zbb6sfWEEd03lLDeuc5knWTmVi/cunD3B42
+Fe3xeqsbzGk/PljTy6a25CdMuwD7dJR5mn1nU3GPAm49gaWcvQHn0K/o+LLC
+bzCdE2o22o88fs63U5+LemrmN/wH2NQeuaJOH6ZPql4nxPzcA9Sx2bBP1Uhz
+zX/IKyqng1wXvZw+4yry4v0t1JhEnGjQZPyTTQna/jo5QPafzLd3gWt+DzNf
+k/1XeUVNJ67tnl9E/KRtSijWx511Hj1D7rdXrwxF/celnyb4k/mqqCuzsL9m
+xJNGR3K/r0sDH/lLXmcUGcPUpGsq4ZjHlZ9cNxEW/Ezrd0X+jzk3v48iL5Fl
+g/F05FV8ZU3SMMnPMS15VyebCmLE3lIheY3Uz2lox/u2w6RIh9QrDln0WoL3
+8RNPYAdHuvF3ipuQT5hZ5w5yPbRwmqAOz7/60tEM4kcdnfoivG8F7pI3xGWz
+ftTcwfPsYzFJPhRX4zTvLPZL1VwSQCwYtV8YVEnlWU+5c4+Y/CSUUyrk05Lz
+P4Clt9A=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.1148, 9.674800000000001}, {1, 1}], 
+        LineBox[CompressedData["
+1:eJw9lglQVFcWhttmkwg08F73Q5QlEhgkstgYAZF5Z3ASFBEQo4IK1coqBEFF
+NpE0AsqA7IM6EEOjAyIYNtkUhBaEFIvQamQUrQpoQkBBGmURWZz7ku7bVV1d
+X73X955z7zn/fz4/Eubhz2axWJfQl/mdevsJffSA9eeHhKvG2prLyYirwnpf
+5BPwbrdxEX9hLbCEa8edXQiwcO76ZqMfYsPyr010CKj5kGD2t841wBqCE8ss
+9H78Gel/TBBn6aTMqhAQW7/DcV2aLlov5kH9BgJ6LyoEG8+vRutprDweSoDd
+wSMR2acQhx/kz3USwPpR1apQEbFVSsyrTSR8dAzkXbmhAyxN/oX+ahIOdA/f
+7ghALNh79rINFxK5xe1GDojdp1VutnIh63joUNIGxELJpwPbeFB4MY+Os0Y8
+NJNh3swDnmdvYoQbYtG34Zu+oEDtUL+jJA6xISdnTyQF2qmSWKqB4WqPsxUU
+pF6vu2c5z7zPsVnuoqBiF/HdDw4oPlZFQejPFIzGLiW3xyPW7P1JWkJB7GSu
+/aYGJv4/BgyCKUgX6zu8GUY8dL5ijqDAIm+kPfsjYsnOY7dKedBmpmVYu8Tw
+q9ZL5jxIC+n+fGIUsSAgoaqUC3b8XHvFJoZdxEmGXHh7c+XLxZPM/jkl9wtI
+sM6qCeBxEYs6D88YknA7VejaLELxSuONDeoJcPYR/xGoy+S/zz1BgO5j2zdX
+Is5RaL3GUPcvCDjdU/Tl2BgPnVedR4IiARl5hUdtnRFbRU5eYxNgY9rcuniT
+i943u9GvT0CCeP9P1RRiUbf11f0ELNUbPT6WSaL1DT66lxFQ/4+Fkes6iN2X
+bXu1SYifdmmYRnGw4CXxLo2EkL6jy6++Qyw0MezncKH+bJzDc3vEkpYtY5e4
+kBpbx1dCcbGGtBay9Hjw4gav041hYUbbV/k8WN/VnhyzBbFgzqlRhYKuWFMV
+C1/EorKsBgEFdTvpny1R3bLE/lm/iCgoJXVOpw8i1qzRG7tPwe40X/6QPorP
+MDbFsoeChce+dOZhxKyjw563KGjSjs7kXWGebx7MiqfA6u1LlksvYsl6jTBL
+Cn4tNnUTvUZc1RQy0MUDjklkgOc0k2+V530PHiRB2a7mEeY8cme1JFxQXz3r
+aSdGLB4qMNvOBXvvgNlTQsTwWq/pHgmibl/dfaaINY1fem8j4VyKCyG9zeS/
+dsDpMQH/qkp0O2HL5LPzyMdIAnTnnvssXNdG/VVgvswnIP29xDhAHbH4R52y
+z9B9HFfqUzumhdZfcJj/pA0prQERyf2a6LwurDxBENAniPrtoA1i997LBv8k
+oPKmRvmlvRyUT1HvlUwCnPg+VsuHNND+Jh427whQzHEeLr6gjvpz0pkMJGFx
+tuiT62s1pl43RY2SMPmU3BoVg1jqrqsUzoWkvqFBc3vEQqUz3DkuBFqtD1W2
+YN534ihH8YC0zm43c0U89FAvA9XdRhf25rQ8xCJejvoOCtaFVf9qtojYsLL8
+cRYFceOPOEnRaP+q1R+87lIw9gujV4ilA9fCeynYd3eD9PR5Dfy8eour4RMF
+Dv5/kfdSV0QwB6/fEnls65NqDt4/JGYgZ/4hB8fn9lzf+NF9Do7/N8nr9pRz
+HJzfQI03q5rLwfn3U3X6B05q4PNJiyrqX3FNHZ+f0ZL026AyNXy+m0c1bbZn
+r8Lnf8+MT80IPsP387Rj2nfESBXfX0Obd6317yr4fgubnBxVq5Tx/Yu3fxCs
+yVTC9dFxOeCZwQVFXD+5pG3PnkoFXF+HJvkE+YmN6+92FOGa/j0b12e3abnf
+eT4b12+tN2HtRrFxfZM+FYdbzdi4/iMe2C0HBrJxf/gkcYYfdbBx/7xYYZsw
+vFUB9xc/17aAblPA/Zco7Ff93VkR92eQdsJxUY8i7l/H2oqpa3ZKuL+FVPS0
+WpoS7n/dfY9OChqUsD6Ia/+dP8OwTD8C/6ucvCNFCevLotoGBVsTJaw/A2L/
+bF6OItanIBNVflWfAtavZ/aNXuuG2VjfJKbuxT9IVmD98/c6L1QuYWF9DFsS
+eun/b5mW62eDcfTug56LtFxf73w9kmo+Mk/L9TducEkguDhHy/VZbLrUoXFm
+hpbr91Ptr/xLyt/Tcn0fL3wRpWb1jpbrf1tqjdYkMUXL/SG2+En0zkNSWu4f
+otI731uqIpb5y/iyn7SRy/Bf/hOxO2nVnmjEMn9qyavUsjRC68n8SzlIdXRK
+Ee0n87fgvbfcMlRRPDL/i68znYc107TcH32+vEteNULxy/wz8tW96Ra1WVru
+r67vH0jN2xDL/Ld0Y9kKDp/J/y9/9kvfET++C7HMv/OXgqfCVyGW+fvfzaJ1
+xvzQ/2X+3+J0pCTNC+0nmw9MyEE6cQLFJ5sfxCOnLO6sR/HL5ouID9L9wWtQ
+vrL5I+J91cREyRtaPp+IK7XjrHpGaPn80ugxVd7ZN0zL55uq8qDcN83PaPn8
+E25ZOvHERULL5yPxw5CF08IWWj4/MVOVUCX/rny++j9tFrxA
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.75, 4.0548}, {0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000001556`, 17.}, {16.000000000002885`, 17.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18., 17.6952}, {0, -1}], 
+        LineBox[CompressedData["
+1:eJwV2Hk81PkfB/CJbRLR5JzkLFeuxlGr09eEVY5GK12Sm9VhEJGEqFiRYoVc
+STX5ReNc2bZEjig7OWJlmZRSW9skJMTv9emfeTwfn+v1fj8+Y77fNL2CdvqK
+0Wg0mQU0GvmkTc3jnypFE5FPOYoW0Xp+iaManDpyPUmeoqlkb1Yqh1nXW39e
+qEDRAr62nlmtTtEKezYyjsL1zb+0VsDUsp6mB3BVnQdbSwPzE/Yc+wqL1muO
+hMCx1f0ucooU7eTlnhsNsChc55MsnG/v1c3QxH4VPupkvvts+dN9cNrgQ6kG
+uDmMo50Pc9pTJI/DGoxrf/aR8RzpE8owR+A+LLES+8++Si5HXlNxyQNGMMc1
+ic6GL728FG8Dcxc3zT9DfcVqDpQznKZ3JN0f7qv9JEvMTR7MloBbbXIlbWGG
+c5FnnSxFm7ZXuGsCe/hdCIqDP2gL1RVh/qEAO0/YJ1MjawJ5hBIJtm7wFLW7
+phOu7z4ZHQrfLt1lwIe5hptLb8CBsv9cS4Njb4rZjMOyG4/wwmHWoHn4Xpzf
+0NZ8ygcWTBq6dsLDTy7IuJH5rbul96Ge24t82txJ/Y+ilv0Lz57wzT9C+tfo
+GxCDfvS7q48kkv3y+z8x0F/RiJU3OV/jn0M3s2HOhcDtr8h8Yc2UnBLm9/ay
+NVCPRilv+gQ8VZAe5Uv6w8m93QYLMp3r+bDgj2QdGpOitWlOp8+T/hyWubcc
+5nVdddqxiqLRtGMZSrDt5oTNeTDV5bbiG9b78GMb38CC2VyVBtgj5WLEai3s
+/yU/LgzmGzfaesMC81d/KME3eh3jL8Ee2ilSZcjLqC8Wq4HrywypLXArK0nn
+KbFeW0gHuS8NESO9MG3u1D0feF+zavtzWNgu85EOV4zd+9wGa0SPW9ehX1qF
+n8arYRbDaF08rHFw+2A2HHuo1tgXHsvqWxJJ8hX/HOQFT06nM12JZ9xEUbDP
+LeNKM5gbrOtK7pvd4Zvn5Mm45fYJGs7bVG6kPEP6saP2jT/5fhT13noHe8iX
+6Q/DDUOZCsOkH0+e9QWing8J5U0jsHDv1v2zcIPEXzkTMMOtpzwN/Zj28321
+jOzfY1unif6u9KDv2QAzNjNP3ILL7t9VO0r6tTPeb+Vy+NKmnv/B1Gazm+fg
+tlUlVz/DhaHZnB741y9Ndpu1keueRrqEMkU7at5vdx4W5Sz8Rx126Hvz9QUZ
+X7fpozJc5V19bbUO6pmNeT6N9aljThUhcOFn/7GHsNt+x4dVsChsRVMozHRJ
+bfgIe9jPdsrD900+yavoYj+GdWAJyfv07eUtsGi3lvcGeN8c864LzPgz8G9y
+306KDKLcyXz7qWFP2EWTH+YGUyfjbBfC+qJvT3cQB0usqyN/P/7avXoDMc2V
+cYbcF0XrbFWyX4Wn4S9wd17c6VmS30qzPAB28XOK/ZvkExRFJcBsLt3mdzjN
++Jb8Pbht6E5kFsz5ZlsjjfNyiifzYsh6k7We4bBeB/P9UVhY8Jo2Rr4/F4zM
+A+BYr6zcKNTj0ibRf5isl9yYLo369fOb+NFkvEJt6Cr8w5X70zkwNRHhbor+
+Ui2HfR7BGmdNVe/CxRk/S3wj8xdcymWtoGjPu9sif0Q9aQxvhQy487XW82jY
+wyS6fAgejvF68RgWrJy4y1CBi7zEl+uh/oNPfteGee22RQFwfU3GGTV42iqP
+XgPTAsycZ7E+4PHT7DmY8ilLeQiLqbHnLVdj/86ynmDYTqqLFQEztFTql8EV
+dK3L12F+dj/vBvK+92xVaYFFL2256+AfpB02DsAaX46bt6De/Nj4BSPE4lcW
+HYRPOvTKDsOUqfCGOPxGM6Ogm+x/xH9tHfpXtzTX9T7Zv+Tw3FnYdaW281VY
+aH3F6gjsMxPxLYbk+2dCKgjuG3v90Q2mDeqpp8B+TIuXG2DBBu5oMywY3HZC
+hZzfFX1OGed1fllq/gM5nys9kgC/Nm+0HEf9HkOKfQuQP0ItKvA/WDQ8uPs8
+8eXoRWS8fuh8rRrqz0+0Ey4keVIPf6qAR18oGGiRvOduvGCjv0XJDolOMCvp
+h7RWOGfyOz2BnJexLWcLfme1KtazGuG03gbrQngq7Q5TUh85m2c63sFVEe3H
+XWGhzfscJn53c8+ZN16H+TkhDgawjLKP4wRMcVr+1oR3Tr/yZRvgvl0bSv6O
+9QmGdyJ/hfndc//Vw3Pb15i2G5B7Rq8Kgq2dPC+KGSJf6qIEGZiS/2vxGph2
+YFVrEfJe2r/54g7ijsAAU3iuxajUGxYqNSQ0ol7zwfyIQ3AsV9fADWb82FTk
+D3ONOmXE4E0FT/32woxHl7fWoX+nT0tFs+E0LQEtCRZN2NC1yX6xWUeDYdlt
+KiHiMKfieUwYnDFe7Skkeaea+n+DZazUEu/DgjGdZ8/gXJnWpELiGm6ALs4b
+96kfSIQ1ggqD02GOv8z/ImHG+qQ7y5D/ie312mMwK7F3cR68b/FKpyi4/pJX
+2xrUbxG4a3Uq6d/69y8b4ZJAl2OlcKE33eRn9JebG9XYB4vU+p/1wktORCsv
+RV6+m9xBBzz3uK6xnHKCC4OF5rfhEvmJgExYNPuE9wU25xerviL9zh9TZuC5
+R+0/0TlTI4x/O+PIhI2jX07FwRbXJcNkYfYu04cdsMdp0dk5rOdJ3nBWNEa/
+094r1sOpGT17XWHB1i6PI/B0kuTr83BaZ4K6FDx5p/twLUzxPrfmI6/5VsuJ
+XjJ+0s/BGP5g1S7zLyxMZLY/QL069ALhZ5hl6Oa0Fz5tUar9ERbZzZ6iwXpl
+71YNwvWdKp516B+XNZnbTMZVBpSSYb/M+Voe7KGYVBkGC3c//nCW5DNpWnIS
+bs1VH/CGOZaOZflwiZTcBjY5z/JYxwD5flid5GmRfPH5e8xxnmKhY5Y0zJez
+pxeR+5vNMpxHP+rZp86S+96xQaA2A1PRleWlcH8WvUwM82lXRloo1D+4fjSZ
+9IuW3FjdDa987/l8Hcw7MFpmgv5ShzoUSB6LK7TgUNjil9/YOcbk98Jo4jb8
+5qe0Z/1kfdSNsRdw4tWC5pVrUJ+Sa8EczPzt4pMgWHDUv0kOz1FH+y2cH8Dc
+d73PlOGOBSY7F7EoWtZDzxdknPWaed4Ibj0feHUe68d1KxnOcGKXWPwQrHt8
+po4Laxh5H62GZwScjGSY2Vn6OB5+4iMtLCTzq5a4OsJCbR8tPpwmkyijANNz
+lrPukvXXtkncQ70MdpfKPZglNRnsCofShx3JOOsTbWoO/ZpwzzxUDlPj4al1
+8II41/3XiXtGt6bA3W095pkwY2E24wQco/DJ/AzMpz+oOA3PTT0oCyXnrUrN
+vkneCyRrZ7zI+JWZobewZe3+Qy6wBzN+txXOr5A/ZbYN5nb7F/HhXM4dTzas
+F7CijNx/Vc6FDgrmHHfWPQg3LsmTs4F5hep9PPjp1e/xO+DCGNnqMTiEdUnP
+A47ILOCvR3/vfE1+EA4HfH49dAIWvYp/cInM39iaVwmLnRAdqCT9cu8oeQmX
+7Lud1Uvq1TW0E8dzrHieMnuOjL987KAEO/Ncl+qYID9/k5kqGT//6KYjPGou
+raEAl2+xrQ6F9frnh+axX0vYzvFM4qDQwUF4zTaDrTUwn7ldvgr+Hhl9RwAz
+E/VFcXBc+KO4Edgu9cf19vDB1e9txuHYjvyPsrD7XJ1gFk7ce1FtAPWO/v7B
+ap6sl9jTfgtWGC0QI+MUnfrzFMxjHa3/AkvcW+Z3AL45QPm+JU653vATHLBw
+55I+Uo/DFNsSlooYGG82Ic8nQ7XWcKSPcmg13Gqm77QHTln7k7CY5LtQdjqS
+zO/3+ZXUx7ljb3oT/lp6rjiZ5PW6WUTub9Skr8UZuHDBt8sayK/Y0rc8AQ5I
+eR/kDxsOvB5IJPvvdrAqh89mNHakw30vVeen4Wuq1Bg5ry/ANs8K/a3qzpj/
+g8w337r2NKx9u82f5C9kyq6ug3cphez/RuqvqmS/hUPSfLpVTXG/Jh53LMJz
+c6Tx8iJrOEBbtlwZXlP29fhheE9DY7A67G39fTbdlLwvmm5VhO1vT764C+u9
+CZkn7zVq/yZ3DcDMLjm1QXhxvFvTDGwRFVlUAVcahTcqmOF7WJMnHgvLrUxY
+oQ/rDXnLbIODuKyDFrCE/XAjA2b9tfMXCtYY+3FtP+oVry47yIY9yq6682Dt
+7wblW2BOXLL4KbiyuICxjqx3cEo5ADeEeR9eDceq6f9nB6c3ab5aTs437U+y
+ghfP7q+RgHmbBrTIuPeg48avJL+8+Qvy3rjG9lXbG1JfvbJ6DPl7pR5X3gdL
+lPAelMKr8N7dAdM69b++gX3Zu5Rb4b7b4bF6yL/IxiW4BaZMNlUEwTuihRVP
+YFacdMFd+DvXSofsV/s6x0Ic/XyrY9j6juynG3VsG5zU9W77AuRj8pq4SbCK
+YG65GsyPb8qsh1981/a0hGsnVtV9gN3OOSj6wFPZsmZL8N5i9rsCPZnUa79h
+TJW8ty3hDFfAo9xTKZpw6E+lzv1wWt+0tRI8S/4fg6wnn6uo/wPv2Bb8
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.502886362674069, 4.972562773393563}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl1gs4lGkbB/DRN0kqTTk02tmJIlOpUEkO9Va0oxymkSUmjRArNGVrbfQ1
+4nOISq1Escl5Zm05pEbJYRsbkUaIYjOWighJPruLvv9zfXNdrvf6Xe97P899
+38/9ztA/dJTvN4tGo2Xhj1z//zGhaHRyNaBojIm8RStgVvx0X98KiiZsany8
+E87s9bpQCcse5fwjhCNCvOTn4UKb0sIf4dTnnjUusOBI1bzzsGD0mMFiuGJQ
+GnUNNtCv7n6ynKL5tjVV3YStxZwVYpgTl3o7Cy4qPmK7EZbLt8ZmwLY++bkD
++hRN6RD78DLM9XS6ngWP+pepRpH1z93le8Pusg6Ho3AXw+W+EdwVrsh1h4dq
+MoL+q0fRTPxE31BwjnXKz80wI4d7yojke+LK4nuwLOFmwkJSv+VsRgHMG4z9
+96f1WP+ZqzAHFtq5RDXB/dn8vb/AajXu5iWwbVhFxQM4M/eMfSas90+bVivM
+rfWeToOth/afGCM+e0OT3Oc80ZdpIT8TnZ9/J/F3Wq8nWsDi5eqPm+HUaMYl
+T5hRtGXbFFxXlx0UDid6GoQwkZ9ox0T/FTg6YNewOWxc5KQugTmW3pdIveM3
+dhqWwpTtpZUR8FTe5GgJbGBZ4p9J4qVGV/JhtcPcOXLSv3RBaRJccPx+5Rs4
+OnomMASedKQEdFOKxhT/5bYdNh4bfsaGOSuZieqwbxx/80a49f2+qAbUl6jN
+fLcTTl+frRkDizUOHHeErR173K3hvp59t3nw5NMMq55lyDN3UTm5z3urGrMb
+jjgsGLYl9vtgX86maGGlkg/mcEFdMN0MLpJ+e8EAdu9prJV9jbyOhLVrwB2e
+urP3wvTArPEJ5G9S4nZqmoV5FLBXvYZlrDZaNWzho/9bLdwx0nc2DR5dfkXt
+Nhz2pW8kHrbVYGy4DgsjPlsnwfK5Ke4JZD0dgUgK16mW+IphZb/2vTY4Ojhw
+QTgc11wYpYH9G4dONxAnvfxyhwcr3W3azsLUY7dHV2FZlSUrCVZb1/XxNdw/
+9tYxGxbHOp7VR32UQqf9Adw/9KzfA07ttX/fQfJnX5qOgaeGg+P+guvy1qzO
+YpP5q0pgoX7h6vYkCVwo5d+hYPHJ8jXX4ehXZWW+cHWeSu8J2EKy3C4WDnDp
+TN0Cm9DSjPKJi++ufod81B44b3tE+m/T7i+Gg9a/vfoKrnt7cXoO7JvWLBoi
+65fQPSJR/1BIst0kzD1fHDP6FUXbV+vXMk3OYylvaj/M/aTOIraonzn221KK
+prVT7jdBnt9WJVkH82IcLd7DlNEZ62xdnDNf0+0leX5Fr78BHGbTJZOTebOb
+7C5jYr/t20//SuqNrM3zgOVBAcpkuMjs5KAWzByIXRtBns+KGnuzhKIpGuVF
+pH4Tq545TXDH33MkznBcU014I0w1+1huJfnImNJuuF/vhrcpia+Inj8b66UL
+gwdWkX7MKF23wA7l9d4cePSgc0oYXLipRXct6a/ZhsOVsFA9mGVB6kn8RkcV
++edUP15vT+Ifyv/cDSv3drQfhPuHDxvFwfS9WZ7hJH4J+3I5PP/YV0+vkf27
+bPidcJeAr/mQ3O9cteM97KAfOKEk+b6/O7cPrg58ZzzbDHOyqn7zY7jVv/I7
+DhyWpsP/CWYpYwPtYeFB71dcuOLbHbP94QLzUe4A8uVOqG0SwzxO5NRJONl1
+k2Eyud/pp/cZ/dgYcNwyC2ZE9sX7ww5+B3SlcNIHtwvPddBPTpD0F5j2oqPF
+Eo72H16aD9c1nGDnaiPuHrszHVYuM2TpwEkX3NPOw0UJEtPLWvheyMi3PEXi
+e6/u/hpuVKg0+5B8suJv3ddE/3pTLu6BLfyc/wiC1czLHprBmcWS0E2wA6el
+YCnM5BfrasMBZ1xT6CS/8lvh8+Ap41tlH8n3BfOW4xKYmnVEs5fMe3XBfnPY
+OKnmPJk3PSPJVT/itdoNbeR59p9ON+FE8WuzDlgk4G19Q/af2D5A+l+3ZU2D
+MfKVm//n6QjMMFq9IRSmvv8+nOyv+OFUdSkscihwZpP8I9dND8CphadDrGHu
+pfHeRdrkPQp9eoDUI1WZz4FHveK3RpLzYvKaVsE5OstO55L45GuHtOEwr2dW
+9bDs1Ysxsl6HNN9skPTL2SMnHw76bLhWfQPy3G2b4gwrdh1aYgjzVLe19SJ/
+sU/rXCu4v51l5w/LP2502QPrOe+K/GMx5m2JhtgVHj3FL9sNF70sOLgfVm4O
+O1q6CL9TLvqqbjCj/EkIC7bQSmhwgt29vI+eY2D/8XXc7XBHxM0JFbgxfp7T
+erjaoHKnxkKch013ty7ZT6t7zFID7yWdvXIWrFCYJl9cgOv+PYcGUI+JOn0B
+A77TsKNHQeZD2eNTOR/7dNI/lJP+jJyWXoPTPbIrSX948vGpLFg0+lZ0hfRz
+5HhKCxwQt208nsTPeP69EutZ2EfRo83IeZuapMCtI4N6xElu0oW6yKfwgyTm
+HCz69VFaHpweyl13lczrlnGPTcg/tWumQULiq7yeP4BlM4PPa8j7sqshiIl6
+DQyY4a/hyQE7+i641XCqfgYOWHFLzQdOyjbJ0Ee9wlCNuCBYVKe4a0f643rN
+Twhrhc5t+I7cnyUX2cBD1dSFRJj5wub4v2CByOpRIUzFFgsOY//MtFxuPTkv
+lT3l6ciX1hNo2AMX8f1X30Z9NCu3nz6R9Y/+EJCDfgxpJc6hbUS8fUtg9Dys
+FxBsoQorlpcy3NUx/4O1esTKCttqzlyc1xd8yHmT/wfVqP8BWpudvQ==
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.57964504524893, 4.283992682631731}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl1g041NkeB/AxtxUKs0iIjCivSUxCrcZL5KUoTDbqqiyjuEaJiUIScsUo
+yYZ2vFRTVFLKSlJUREVYE2rH646yGkIKu/d79s7zeL7Px5n///z+v3POH519
+4Tt+olIolAr8kPz/ZzmTYkBShUlJGKGvfazFpBwbVbE9B7fKtawugN03R3mZ
+LcF4mYidA89V/3K5jbhkhegG3HpoYn+EKhyUrTgAm4WPtMkuZVLq2hfNWOD+
+MhXbeOfh8qs3rApgvbGmPkU1XDcna6Ohjfkk/n9EwgGsO+zLcKRuU9tj2FfO
+3FaTjvkPB383BXMVlAOD4Owd10wV1JkUWl/t8xuwVfsPTsR1RSamn+CkkStJ
+X/B9/v5agb4Ok7Ig9v3mlzDv2dVqb5huFPX+HCwTKeBGkvF2n0BPUs/QqcJT
+sMr67jAZMp61+GYK7H8688Vj1M/jtHTFkPE8FetEWCS/QTUANlvTpeUBc5P/
+rWQNe09ss10NCwsvfy8DJ9joJtFhtY4h4WvUJxyzbzaG2eHKp8/BAdUHHnrC
+VSyvaBbcOPyhJhNuNeFSyfPT19b8/geZv3RB6yv0J91Dd5ZF+jXIWxcNM/s8
+Hr1VI+t3y8YSriu40HcQ/Qgw6a1XhPMnLbxkNJgUibbjfmlY6NV44hpMi55d
+vwxmDB+95LIM99Eo+30rPOkmL+6HJXHHY/Nhycudk+GaTIrgt68DUqjHbODH
+qY9wVbxr8SZYwuBN78C6i/wKHyTB5cMHFYtgmjpD8RU8WBqW2gV77mG6qpH+
+M+XGJ2DmhTh50j92tN3KKdiXqq9eRNYjqdBeBHOZgVE9sFqbw5n7sKBtRYHs
+Cialw1HLKR4Wsv2yjWDRg3uRG2Hx4Y2LfoC9W6hXJ1EfT2sihAknRJ68foPU
+P2j5lgE3rHS2D4Nndrozl8Hl4aHvrODUZ0espzCfXnHH9iWwpDRlvgE28OJe
+koYbvXnOZ+DGuPAqRZg5RzXfTiy9/idzuJyro6gCd1Sq6JF+0T0KbN/i+QXN
+1fpPYY4gnVoCq2gdDzBHvQa7hD7RpF91OTl3YLX/rnvmAzuyzM854pyo7eR5
+2cHe4UYsEcyPSGFtgA0kHT4nyLrn2YY7wiWtnf00ZK7d/uP+xFKrJLuRFIum
+wkSkzb0MtctIbn2aSyX5vdfM6ABZN/vl9hPIBS2ZbLIuag4BnZbIoMrTcnZk
+XYpNRuOR4p89RvyRMvda1r1AbulfUXsQKdrksEMJ/TurUigOI78v2TXvDV+h
+zocEkuupnlaZ8EaOkdATrutdyKmFTaP5LutgmuFQgYisF7vShvTNU4e/dxKW
++IrDJKiLH9Ou9BUumS1rbIF93QOaxuCxshjTMph9+wf/32CblCm/LNJnZj3r
+Nlw7KN0QB4tbpgdPwIcoRZwoWC1MeN8Vni55Ij5KzqFYfkAB7vcb10yDPW2K
+K9vIeS3Z7HeVXH+5IzOH1LUv3q2NfL9j7j7Zr5wHIZ+lkTPcFjMLZJKMZ70T
++V6l6CwNaXJq+FoGuc+loo/fcJ2/2zXTXlhSr1r8mdRxdG+WCebl638MmSXr
+EWH75zG4qllgpkSus6rf/QIWbj5qsB5eHFSuq6SLfRIR9ZJN5ldXbtwOt6ZQ
+vpXAFVq/bkiBKSW61BGYF8wdL4fpQzc71+I+7j9+G38JCydc9Mk81xkK4new
+r0pOTgP8rWZIrw+mOdv1LET+xZbOFyI9e4bG7JGaibpdT5FVGXyLw0j+s2P9
+15E8vYjzOciNp2rM05Bqcw9KSpHJH4tOBSHFzy4KbiPTtio8IvfJ/VNJIECy
+PJY36CAFFjUhWcjIF84saWQqtTckDOk9tEYygbrMgg8/t4XvaihcGYG3rFlr
+KAN3yBgsGiXneo6f14IMmK3SmiUOczpA9lvosc02S0k/WNlTXrD06zlVJmy1
+VpiiRfbLrf3PI+G6Q5uMP5F109NovEP6GaFwshl+0bZKaZb0gzpz7S78RP8N
+Y4se6uE4LC2Da0efR+bC/IdL0yvI9+UnxsRw6pdu2UbYqMvjoeVK8n6jv/kI
+axh/XhYP0x/rczQxf6u1W/ojuFGD07yT7E/R18kpMj4UbZ8HC74rqKGvQr7f
+2jIAR4nWvbeFPf1ctU1Jn54YTnvAqSypnig4+46lszfMd2DdqSbro6h13x1O
+WJJ+cRou22ZYbwPzZK3F+qjT/5VZGLk/9/TqWHd4VeWkDgWmjRd07INN5M0v
+9q4kfWUYH4BVRCP3q2Duo2VHyLhEOX/vBTK+J5pNrufdc9kdCwtUWYcMYVdl
+1dXBcB0rvoT0scbC5ZM/bJWlkEf2UfJeN4c9sIRp6Ef2jdH8OCOU+ATXZCvM
+ubJyTQqckLg9/HvyPIz06ZuwTHxRRDf6wZ2PKeuHzYRNjqXwcNDibvI8YueI
+nGTyPpluTgwm/eoJyPgPzGMssr0L10n9VREI087n+yzQx3l439kZAmuGh4q9
+YYm/sWwc7Blnq1hMxv0UfuHDGU+rpUZhGm+heStckSuxXm2AurZ8uCdH9pV2
+WnYgzEkU55D6aydVQnkwxTm/9TycfuRfN2/BtKyA5SL4Jn+X+DGc6kCjk35Z
+mu/xeA4LTqgmh8EVUp+r62Bf2dIN1+HBs2/z/rl+QDujF47scx05D7ducvOg
+og/Dqf0Lo2BJE2tcHc4vVy3dAc+MZl1cAXfvqq8wNSB/51zNNOG05ARpeVK/
+to7vQjj3aA5HgucLyGgKH8L9NRzYMT0we74gtgrOeK3u3gozY4YWn4TzH8pn
+EfNpKjrkXPSf/HnfO5h37sqsHNwQ+7f1F5i+K2HuFVn/d3s/aGE+9pd3kRfI
+uXKaK/KE68yox4PhuPGUr2fgqm2/ttjBiTVOc+2wVcv1XAMy7vDalW6I+fUZ
+UVpkPxjuYXBgNTOGM3mPyIkMu+tgg55GUwY5D11Ub0Uj8v9kZqYPfCA6tNMX
+zi0/ppxE3mtUn7aL8JY3H2oekveQRolGO/zPB/UrkTRm/g8iD+gn
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.867783472564531, 9.687357802186902}, \
+{1, 0}], LineBox[{{16., 17.00000000000231}, {16., 9.999999999998607}}], 
+        PolygonBox[{{16., 14.1}, {15.6, 12.9}, {16.4, 12.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.9452, 13.5}, {-1, 0}], 
+        LineBox[{{16.000000000007276`, 17.000000000003638`}, {
+         10.000000000005457`, 13.5}}], 
+        PolygonBox[{{12.48173265946094, 14.947677384685548`}, {
+         13.316718930329426`, 15.897834175673825`}, {13.719815750748694`, 
+         15.206811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.823799910437668, 15.984057296392571}, \
+{1, -1}], 
+        LineBox[{{16., 9.999999999996362}, {10.000000000001819`, 
+         13.499999999996362`}}], 
+        PolygonBox[{{13.51826734053906, 11.447677384685548`}, {
+         12.683281069670574`, 12.397834175673825`}, {12.280184249251306`, 
+         11.706811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.823799910437668, 11.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{16., 17.}], PointBox[{16., 10.}], 
+         PointBox[{10., 13.5}], PointBox[{7.5, 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}]},
+       "\"afbf/cgdfeh/ifghgihi.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdfeh/ifghgihi.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:eJwd1gs0VGsbB/BNqiFFSVFoCA0mDVHqqBlS6WoqNJxC5dZ9KjoKoYhKRe66
+jVBKZahVyGU4XYg0J5RqymCKk2QizhTx/d/PWq1Zv9n7fd7n+e93k+H2/Rv9
+lCmKGsI/8kkpRvGjz6FoBFM5VM2O32p74GLbig4TuOUyv+GjHofiaXRm7YA1
+Fc8stsKRTu22xbCdIPtE90xcF4ZdNtTmUOJ3C2LOwnbPFvZegnUW/Tl2Bay4
+f+2o6TQOxX+u1zqN3H/Y7XsJXKOq30rB1KKnqRunY7+qwtIxcIvlp6BuWJBr
+pGUA07UWJEXooN7Jtuh1pJ7hGEs1XfT5Qav6HBwY6NR9EvaJXfHwA1k/Q67W
+B9ck3Cu2Rb/yVxcTnGdwqPRPRg8SYYZylm8cHMIzOfQVDrR32y2Ei30XVXEw
+v8LELVEES4c3lZyCI8d61pfArAfr+6phKZWoeQUWrG4t7IJ9Ar8s5sM6tj+1
+FbBz3obv82HN/Q02vTBnk+XRHvRD36tu/YLU39gbn0X6l+x0vgALz97Vd4MZ
+rJnP2LD8nZXpRF3Sx+oxLejPLiF/XwPmF2+3WuoFFyuu8i7DLRZDka8xb2T0
+krvh5PqX/v3LSR5uTiEHYcFhpelkrhazDRJy3VmeWTgTFmUoj82CRSYF/LPY
+p4uprC0h9TJGOCRXxt9RJpb4lEfvTE4l33sv5abAwlOJrAUwbWHG40moE9jY
+r/IVz4n7l+RzKpwXsE6tlDy3WdwQM/TR5XifmQXnzdv2tIo8xxc8B2KfnoaP
+npiDm7KNVgLbLct82gvTLtYv/kzqPXMtDCXnsPpRtgmZS2vngl8wpaXldIjM
+IVE/HmCA7wslx57D6ZnlESI4wTxmrSn6TE/hDyvPQv5XHxyMgrmrhirmEm/z
+r3hN5qvLTeHAfMeEJYbkuY5yefaw8wODw1tgmoZuqxGct/tKWjQsZkl6Bsl+
+Qym5ZE6pJE67DOaNv52eANs1x8YfhjVNmcEHSL6DilFzWPhL7raIrN9T6/0R
+/Wv6LN79L3muxh03Usi5iQ/rOUHOQXVznhuZ16dURZ08jx3er4xggVFYbgzm
+446aKiuRc2ja6TuAfAKb63j95Fwc+LDcB053mTN9GE5/5RFVh/eKW7EsRg/3
+c2kH19rD4qsGMldS/+XxKw/xXtboNO/KIefYivbLAaa7e7qoot/AdycXt+K9
+5jE2v4uEWcx7Oy+Q9/6HW8x45CENKLq8FdYJ7zbMgFn0njYHuOnM1GgdOvYp
+CbJgw5xuMxM/uIUK93CFmV/EAwUw7YTMIYKsz2s4MwjLHTm1ZXDQ3I78BYbI
+Y5P3WFXye6Th/PZ9cGDS00BvWN1cpHsJVpg6DJTC6WF+typgfsWmQ9Mwn/Ns
+h53NMDfX/PYeOOcs11IKF7MjsovJ/JFx7q1wnE1fwwD8+FJ9ZSMs/u+QM52c
+x0GXSlJPwY//aQMzT9VOuQbThFnlVnBOEv1FBLmeUnVEG46fG8D2hAW3PzOk
+qDfV36h1PiylsyQXYF+r3+Ya5P7dagXz4D1a2ue/YV5WZ11BCfqPVpm6ugkW
+JtWU28D8lY6u1TDPwc0rF3nkWeauKiX5tKWe1oRdVQ145bCga3VIqBbOhxbX
+uh6Wxvd4d0/Bfvat4zuJ2SJHP1iq53ViIvanL7a51zOZQ9VvVm5YSuYvNLoW
+B+stHUw/YkjqjJ+/CA60lFqUwaJ2wwwlmE8f+UvFCH00jx9t10ReMmoeF46b
+fOfIB1jYnye5BLNiwsbL4T1TacpdMD0q5qIO1v8YsLOaNxu5Wi6zcYVb/uEx
++DAVR/2+AsuS077kwdIzfiE/YKcdzq/fwF2prkUuZJ6Hvx8MwbzKnsP5sL1b
+1ystY3jINV4Z89t9lfXNguP4JV9d4GLHVl86HJmvO3IOZqbzFdowp8njySNY
+2PJxQAnu0gye0gjrnZRqfEZ9QUdr9itYxfZv7mNigyR2CVyW9WTMVdJ/+U3R
+SS3yd0VwMQTm3/ilYw8zhLy0TTA9+dKK9+hPJI71tybrnWqWBMBiscv66TCH
+M6mmA/NR7cZcFZiWv8bTDQ4LPak1hLyKT7E6RMhvy/srjcOwwCss2QLW2Zey
+QQ33i15kbbTVwFyuzPrZMCt7Ac90EurvGvfbGZbPsw6fPxHzOt+feQTWrK+v
+91XH++Dv/7kI5l7OFokmoP+GjoIfsPBZnWINvFbV/KA98pAbHqCpwny7Tlks
+rPnsDw+FGqnflNoEJ2SVmurgep77axrdBPc1jr3gC28ZflAbAEsTK+rfwHFW
+Tok3yXWzcx67sP9jea5HByz86e6thf6SbRuDtUzRT+zRCbWwYiUzxw4WH5CP
+RGIedds9ehthAedgFUuDnB/3dG84UlZm2wA7WTx230ac8k2FQfJqkenw4HQf
+V43NsHFou+5yUv9tv5wPC47YKJmTesbZaw7Ba4OXiWlwnPmhp1tgTSPTetKf
+IixHby4cFLXPtxymNi53eI798qhZOulkvge1fhPh+BP9HodhlszK0wz9tiis
+gj1hzZej0SaYh+/OClpB1r+7f0cN8/uOyVe1J3lEe15sR557UjvDiaXf+m88
+VMX5KggWOJN68vh1yTT8PySEWekDC161Fx4fjzz0aq9Fw5zyItv4cfh+eFPi
+PXK9PlG9ZCzO8Qxr96+waGNTmwacPvGUy1zMx5eFnEtR4VDDuT6RQSRf2fqO
+tXBgdvH1SpjuVXBqAfxDdslVfQ7OxcjsYS7MWGM4gQeL29alpcNOvrruApiu
+z60ej/qRA5s722HOsWFmGvy1dqVQnwFP0zBciv64N6sU62Eq6Ht7H5xHNzoY
+DAsmv9LPxzzy8LrlCbBI2dt9C+Z1/uOQwVWYft7Me5j4baPFNVh6+HptFPKJ
+35xJz4Q1s2XrZbCN33XzOFi+nW+hjzxDVvV/2gv7/Buwaw45r0Wlq9fB4oBI
+PQruOpGWxiD93coIuY71xlMv2imT+0cOy2bCNQ47b0swjzzL/tMO7H87Pyaw
+FBZkblWcQL/R4WMrLsORk/PdT2Ae2UhTZRzM6mDk7ML8ZffuWoSTvM7SE5Yh
+L7HmY/cwOOFG5k6dMcj37TeDWHLdvOt2vxLOa5dGG6lHrbI+30oh79RxwSJY
+WvjHjLpRNsV6uXfeN1h09L2y3gib4iZO+NeE5OOyL6FymE0ZswUT/Mk8/l6f
+KofYFOPP2OzbJE+9av3Z8HCuX/B/JP+F4RO6f7Ep9bP905zM0P9bVSNtXKe5
+iFUTYGlP7YVMeGrR/DctsM/n3HQ+6lMXV1vomaP+3YLeuN9squzWpN7NsMg7
+7dAr9OOqctT7NLESrVcP/X/9R9uwCBZq89c3wzn5ai4NML3X7H0s5r3fOyHm
+IyxfoOVhrow8rYUd7f9f77f0HhwoGqchIZ6aoT8DecnHHJ1TZ05+3/xU5sE2
+devKC2Gf5BdVAbCeiVNlIhyZVDt3BRy02sxvL9m/zHlpH+oFHbWZvpLsn/RU
+dy8slq7fZEj2b5yhWop+mL8DE0cwL+eGyqaP6DcwfTKjDRakWo+pRv7cy8es
+62A6i81IwfzDjowjFTA1FOywCnkpYn5tLYNFvYrGPgWbqmH+rH9C1pv3vL0+
+iHyWKFm/J/d7nX575AebkvfqBg2TfI8wlSL68Dy8Tw0ySH/H12x8JmdTa9Wz
+rnqTeeqsaqu+san4h4OyKySPO90Xbn9FPzlREhnxHIO5W7rZVI7Sxw3zLFCf
+tn9R8xc2JVR6/jEUjjT0uqSF6zbb6sfWEEd03lLDeuc5knWTmVi/cunD3B42
+Fe3xeqsbzGk/PljTy6a25CdMuwD7dJR5mn1nU3GPAm49gaWcvQHn0K/o+LLC
+bzCdE2o22o88fs63U5+LemrmN/wH2NQeuaJOH6ZPql4nxPzcA9Sx2bBP1Uhz
+zX/IKyqng1wXvZw+4yry4v0t1JhEnGjQZPyTTQna/jo5QPafzLd3gWt+DzNf
+k/1XeUVNJ67tnl9E/KRtSijWx511Hj1D7rdXrwxF/celnyb4k/mqqCuzsL9m
+xJNGR3K/r0sDH/lLXmcUGcPUpGsq4ZjHlZ9cNxEW/Ezrd0X+jzk3v48iL5Fl
+g/F05FV8ZU3SMMnPMS15VyebCmLE3lIheY3Uz2lox/u2w6RIh9QrDln0WoL3
+8RNPYAdHuvF3ipuQT5hZ5w5yPbRwmqAOz7/60tEM4kcdnfoivG8F7pI3xGWz
+ftTcwfPsYzFJPhRX4zTvLPZL1VwSQCwYtV8YVEnlWU+5c4+Y/CSUUyrk05Lz
+P4Clt9A=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.1148, 9.674800000000001}, {1, 1}], 
+        LineBox[CompressedData["
+1:eJw9lglQVFcWhttmkwg08F73Q5QlEhgkstgYAZF5Z3ASFBEQo4IK1coqBEFF
+NpE0AsqA7IM6EEOjAyIYNtkUhBaEFIvQamQUrQpoQkBBGmURWZz7ku7bVV1d
+X73X955z7zn/fz4/Eubhz2axWJfQl/mdevsJffSA9eeHhKvG2prLyYirwnpf
+5BPwbrdxEX9hLbCEa8edXQiwcO76ZqMfYsPyr010CKj5kGD2t841wBqCE8ss
+9H78Gel/TBBn6aTMqhAQW7/DcV2aLlov5kH9BgJ6LyoEG8+vRutprDweSoDd
+wSMR2acQhx/kz3USwPpR1apQEbFVSsyrTSR8dAzkXbmhAyxN/oX+ahIOdA/f
+7ghALNh79rINFxK5xe1GDojdp1VutnIh63joUNIGxELJpwPbeFB4MY+Os0Y8
+NJNh3swDnmdvYoQbYtG34Zu+oEDtUL+jJA6xISdnTyQF2qmSWKqB4WqPsxUU
+pF6vu2c5z7zPsVnuoqBiF/HdDw4oPlZFQejPFIzGLiW3xyPW7P1JWkJB7GSu
+/aYGJv4/BgyCKUgX6zu8GUY8dL5ijqDAIm+kPfsjYsnOY7dKedBmpmVYu8Tw
+q9ZL5jxIC+n+fGIUsSAgoaqUC3b8XHvFJoZdxEmGXHh7c+XLxZPM/jkl9wtI
+sM6qCeBxEYs6D88YknA7VejaLELxSuONDeoJcPYR/xGoy+S/zz1BgO5j2zdX
+Is5RaL3GUPcvCDjdU/Tl2BgPnVedR4IiARl5hUdtnRFbRU5eYxNgY9rcuniT
+i943u9GvT0CCeP9P1RRiUbf11f0ELNUbPT6WSaL1DT66lxFQ/4+Fkes6iN2X
+bXu1SYifdmmYRnGw4CXxLo2EkL6jy6++Qyw0MezncKH+bJzDc3vEkpYtY5e4
+kBpbx1dCcbGGtBay9Hjw4gav041hYUbbV/k8WN/VnhyzBbFgzqlRhYKuWFMV
+C1/EorKsBgEFdTvpny1R3bLE/lm/iCgoJXVOpw8i1qzRG7tPwe40X/6QPorP
+MDbFsoeChce+dOZhxKyjw563KGjSjs7kXWGebx7MiqfA6u1LlksvYsl6jTBL
+Cn4tNnUTvUZc1RQy0MUDjklkgOc0k2+V530PHiRB2a7mEeY8cme1JFxQXz3r
+aSdGLB4qMNvOBXvvgNlTQsTwWq/pHgmibl/dfaaINY1fem8j4VyKCyG9zeS/
+dsDpMQH/qkp0O2HL5LPzyMdIAnTnnvssXNdG/VVgvswnIP29xDhAHbH4R52y
+z9B9HFfqUzumhdZfcJj/pA0prQERyf2a6LwurDxBENAniPrtoA1i997LBv8k
+oPKmRvmlvRyUT1HvlUwCnPg+VsuHNND+Jh427whQzHEeLr6gjvpz0pkMJGFx
+tuiT62s1pl43RY2SMPmU3BoVg1jqrqsUzoWkvqFBc3vEQqUz3DkuBFqtD1W2
+YN534ihH8YC0zm43c0U89FAvA9XdRhf25rQ8xCJejvoOCtaFVf9qtojYsLL8
+cRYFceOPOEnRaP+q1R+87lIw9gujV4ilA9fCeynYd3eD9PR5Dfy8eour4RMF
+Dv5/kfdSV0QwB6/fEnls65NqDt4/JGYgZ/4hB8fn9lzf+NF9Do7/N8nr9pRz
+HJzfQI03q5rLwfn3U3X6B05q4PNJiyrqX3FNHZ+f0ZL026AyNXy+m0c1bbZn
+r8Lnf8+MT80IPsP387Rj2nfESBXfX0Obd6317yr4fgubnBxVq5Tx/Yu3fxCs
+yVTC9dFxOeCZwQVFXD+5pG3PnkoFXF+HJvkE+YmN6+92FOGa/j0b12e3abnf
+eT4b12+tN2HtRrFxfZM+FYdbzdi4/iMe2C0HBrJxf/gkcYYfdbBx/7xYYZsw
+vFUB9xc/17aAblPA/Zco7Ff93VkR92eQdsJxUY8i7l/H2oqpa3ZKuL+FVPS0
+WpoS7n/dfY9OChqUsD6Ia/+dP8OwTD8C/6ucvCNFCevLotoGBVsTJaw/A2L/
+bF6OItanIBNVflWfAtavZ/aNXuuG2VjfJKbuxT9IVmD98/c6L1QuYWF9DFsS
+eun/b5mW62eDcfTug56LtFxf73w9kmo+Mk/L9TducEkguDhHy/VZbLrUoXFm
+hpbr91Ptr/xLyt/Tcn0fL3wRpWb1jpbrf1tqjdYkMUXL/SG2+En0zkNSWu4f
+otI731uqIpb5y/iyn7SRy/Bf/hOxO2nVnmjEMn9qyavUsjRC68n8SzlIdXRK
+Ee0n87fgvbfcMlRRPDL/i68znYc107TcH32+vEteNULxy/wz8tW96Ra1WVru
+r67vH0jN2xDL/Ld0Y9kKDp/J/y9/9kvfET++C7HMv/OXgqfCVyGW+fvfzaJ1
+xvzQ/2X+3+J0pCTNC+0nmw9MyEE6cQLFJ5sfxCOnLO6sR/HL5ouID9L9wWtQ
+vrL5I+J91cREyRtaPp+IK7XjrHpGaPn80ugxVd7ZN0zL55uq8qDcN83PaPn8
+E25ZOvHERULL5yPxw5CF08IWWj4/MVOVUCX/rny++j9tFrxA
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.75, 4.0548}, {0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000001556`, 17.}, {16.000000000002885`, 17.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18., 17.6952}, {0, -1}], 
+        LineBox[CompressedData["
+1:eJwV2Hk81PkfB/CJbRLR5JzkLFeuxlGr09eEVY5GK12Sm9VhEJGEqFiRYoVc
+STX5ReNc2bZEjig7OWJlmZRSW9skJMTv9emfeTwfn+v1fj8+Y77fNL2CdvqK
+0Wg0mQU0GvmkTc3jnypFE5FPOYoW0Xp+iaManDpyPUmeoqlkb1Yqh1nXW39e
+qEDRAr62nlmtTtEKezYyjsL1zb+0VsDUsp6mB3BVnQdbSwPzE/Yc+wqL1muO
+hMCx1f0ucooU7eTlnhsNsChc55MsnG/v1c3QxH4VPupkvvts+dN9cNrgQ6kG
+uDmMo50Pc9pTJI/DGoxrf/aR8RzpE8owR+A+LLES+8++Si5HXlNxyQNGMMc1
+ic6GL728FG8Dcxc3zT9DfcVqDpQznKZ3JN0f7qv9JEvMTR7MloBbbXIlbWGG
+c5FnnSxFm7ZXuGsCe/hdCIqDP2gL1RVh/qEAO0/YJ1MjawJ5hBIJtm7wFLW7
+phOu7z4ZHQrfLt1lwIe5hptLb8CBsv9cS4Njb4rZjMOyG4/wwmHWoHn4Xpzf
+0NZ8ygcWTBq6dsLDTy7IuJH5rbul96Ge24t82txJ/Y+ilv0Lz57wzT9C+tfo
+GxCDfvS7q48kkv3y+z8x0F/RiJU3OV/jn0M3s2HOhcDtr8h8Yc2UnBLm9/ay
+NVCPRilv+gQ8VZAe5Uv6w8m93QYLMp3r+bDgj2QdGpOitWlOp8+T/hyWubcc
+5nVdddqxiqLRtGMZSrDt5oTNeTDV5bbiG9b78GMb38CC2VyVBtgj5WLEai3s
+/yU/LgzmGzfaesMC81d/KME3eh3jL8Ee2ilSZcjLqC8Wq4HrywypLXArK0nn
+KbFeW0gHuS8NESO9MG3u1D0feF+zavtzWNgu85EOV4zd+9wGa0SPW9ehX1qF
+n8arYRbDaF08rHFw+2A2HHuo1tgXHsvqWxJJ8hX/HOQFT06nM12JZ9xEUbDP
+LeNKM5gbrOtK7pvd4Zvn5Mm45fYJGs7bVG6kPEP6saP2jT/5fhT13noHe8iX
+6Q/DDUOZCsOkH0+e9QWing8J5U0jsHDv1v2zcIPEXzkTMMOtpzwN/Zj28321
+jOzfY1unif6u9KDv2QAzNjNP3ILL7t9VO0r6tTPeb+Vy+NKmnv/B1Gazm+fg
+tlUlVz/DhaHZnB741y9Ndpu1keueRrqEMkU7at5vdx4W5Sz8Rx126Hvz9QUZ
+X7fpozJc5V19bbUO6pmNeT6N9aljThUhcOFn/7GHsNt+x4dVsChsRVMozHRJ
+bfgIe9jPdsrD900+yavoYj+GdWAJyfv07eUtsGi3lvcGeN8c864LzPgz8G9y
+306KDKLcyXz7qWFP2EWTH+YGUyfjbBfC+qJvT3cQB0usqyN/P/7avXoDMc2V
+cYbcF0XrbFWyX4Wn4S9wd17c6VmS30qzPAB28XOK/ZvkExRFJcBsLt3mdzjN
++Jb8Pbht6E5kFsz5ZlsjjfNyiifzYsh6k7We4bBeB/P9UVhY8Jo2Rr4/F4zM
+A+BYr6zcKNTj0ibRf5isl9yYLo369fOb+NFkvEJt6Cr8w5X70zkwNRHhbor+
+Ui2HfR7BGmdNVe/CxRk/S3wj8xdcymWtoGjPu9sif0Q9aQxvhQy487XW82jY
+wyS6fAgejvF68RgWrJy4y1CBi7zEl+uh/oNPfteGee22RQFwfU3GGTV42iqP
+XgPTAsycZ7E+4PHT7DmY8ilLeQiLqbHnLVdj/86ynmDYTqqLFQEztFTql8EV
+dK3L12F+dj/vBvK+92xVaYFFL2256+AfpB02DsAaX46bt6De/Nj4BSPE4lcW
+HYRPOvTKDsOUqfCGOPxGM6Ogm+x/xH9tHfpXtzTX9T7Zv+Tw3FnYdaW281VY
+aH3F6gjsMxPxLYbk+2dCKgjuG3v90Q2mDeqpp8B+TIuXG2DBBu5oMywY3HZC
+hZzfFX1OGed1fllq/gM5nys9kgC/Nm+0HEf9HkOKfQuQP0ItKvA/WDQ8uPs8
+8eXoRWS8fuh8rRrqz0+0Ey4keVIPf6qAR18oGGiRvOduvGCjv0XJDolOMCvp
+h7RWOGfyOz2BnJexLWcLfme1KtazGuG03gbrQngq7Q5TUh85m2c63sFVEe3H
+XWGhzfscJn53c8+ZN16H+TkhDgawjLKP4wRMcVr+1oR3Tr/yZRvgvl0bSv6O
+9QmGdyJ/hfndc//Vw3Pb15i2G5B7Rq8Kgq2dPC+KGSJf6qIEGZiS/2vxGph2
+YFVrEfJe2r/54g7ijsAAU3iuxajUGxYqNSQ0ol7zwfyIQ3AsV9fADWb82FTk
+D3ONOmXE4E0FT/32woxHl7fWoX+nT0tFs+E0LQEtCRZN2NC1yX6xWUeDYdlt
+KiHiMKfieUwYnDFe7Skkeaea+n+DZazUEu/DgjGdZ8/gXJnWpELiGm6ALs4b
+96kfSIQ1ggqD02GOv8z/ImHG+qQ7y5D/ie312mMwK7F3cR68b/FKpyi4/pJX
+2xrUbxG4a3Uq6d/69y8b4ZJAl2OlcKE33eRn9JebG9XYB4vU+p/1wktORCsv
+RV6+m9xBBzz3uK6xnHKCC4OF5rfhEvmJgExYNPuE9wU25xerviL9zh9TZuC5
+R+0/0TlTI4x/O+PIhI2jX07FwRbXJcNkYfYu04cdsMdp0dk5rOdJ3nBWNEa/
+094r1sOpGT17XWHB1i6PI/B0kuTr83BaZ4K6FDx5p/twLUzxPrfmI6/5VsuJ
+XjJ+0s/BGP5g1S7zLyxMZLY/QL069ALhZ5hl6Oa0Fz5tUar9ERbZzZ6iwXpl
+71YNwvWdKp516B+XNZnbTMZVBpSSYb/M+Voe7KGYVBkGC3c//nCW5DNpWnIS
+bs1VH/CGOZaOZflwiZTcBjY5z/JYxwD5flid5GmRfPH5e8xxnmKhY5Y0zJez
+pxeR+5vNMpxHP+rZp86S+96xQaA2A1PRleWlcH8WvUwM82lXRloo1D+4fjSZ
+9IuW3FjdDa987/l8Hcw7MFpmgv5ShzoUSB6LK7TgUNjil9/YOcbk98Jo4jb8
+5qe0Z/1kfdSNsRdw4tWC5pVrUJ+Sa8EczPzt4pMgWHDUv0kOz1FH+y2cH8Dc
+d73PlOGOBSY7F7EoWtZDzxdknPWaed4Ibj0feHUe68d1KxnOcGKXWPwQrHt8
+po4Laxh5H62GZwScjGSY2Vn6OB5+4iMtLCTzq5a4OsJCbR8tPpwmkyijANNz
+lrPukvXXtkncQ70MdpfKPZglNRnsCofShx3JOOsTbWoO/ZpwzzxUDlPj4al1
+8II41/3XiXtGt6bA3W095pkwY2E24wQco/DJ/AzMpz+oOA3PTT0oCyXnrUrN
+vkneCyRrZ7zI+JWZobewZe3+Qy6wBzN+txXOr5A/ZbYN5nb7F/HhXM4dTzas
+F7CijNx/Vc6FDgrmHHfWPQg3LsmTs4F5hep9PPjp1e/xO+DCGNnqMTiEdUnP
+A47ILOCvR3/vfE1+EA4HfH49dAIWvYp/cInM39iaVwmLnRAdqCT9cu8oeQmX
+7Lud1Uvq1TW0E8dzrHieMnuOjL987KAEO/Ncl+qYID9/k5kqGT//6KYjPGou
+raEAl2+xrQ6F9frnh+axX0vYzvFM4qDQwUF4zTaDrTUwn7ldvgr+Hhl9RwAz
+E/VFcXBc+KO4Edgu9cf19vDB1e9txuHYjvyPsrD7XJ1gFk7ce1FtAPWO/v7B
+ap6sl9jTfgtWGC0QI+MUnfrzFMxjHa3/AkvcW+Z3AL45QPm+JU653vATHLBw
+55I+Uo/DFNsSlooYGG82Ic8nQ7XWcKSPcmg13Gqm77QHTln7k7CY5LtQdjqS
+zO/3+ZXUx7ljb3oT/lp6rjiZ5PW6WUTub9Skr8UZuHDBt8sayK/Y0rc8AQ5I
+eR/kDxsOvB5IJPvvdrAqh89mNHakw30vVeen4Wuq1Bg5ry/ANs8K/a3qzpj/
+g8w337r2NKx9u82f5C9kyq6ug3cphez/RuqvqmS/hUPSfLpVTXG/Jh53LMJz
+c6Tx8iJrOEBbtlwZXlP29fhheE9DY7A67G39fTbdlLwvmm5VhO1vT764C+u9
+CZkn7zVq/yZ3DcDMLjm1QXhxvFvTDGwRFVlUAVcahTcqmOF7WJMnHgvLrUxY
+oQ/rDXnLbIODuKyDFrCE/XAjA2b9tfMXCtYY+3FtP+oVry47yIY9yq6682Dt
+7wblW2BOXLL4KbiyuICxjqx3cEo5ADeEeR9eDceq6f9nB6c3ab5aTs437U+y
+ghfP7q+RgHmbBrTIuPeg48avJL+8+Qvy3rjG9lXbG1JfvbJ6DPl7pR5X3gdL
+lPAelMKr8N7dAdM69b++gX3Zu5Rb4b7b4bF6yL/IxiW4BaZMNlUEwTuihRVP
+YFacdMFd+DvXSofsV/s6x0Ic/XyrY9j6juynG3VsG5zU9W77AuRj8pq4SbCK
+YG65GsyPb8qsh1981/a0hGsnVtV9gN3OOSj6wFPZsmZL8N5i9rsCPZnUa79h
+TJW8ty3hDFfAo9xTKZpw6E+lzv1wWt+0tRI8S/4fg6wnn6uo/wPv2Bb8
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.502886362674069, 4.972562773393563}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl1gs4lGkbB/DRN0kqTTk02tmJIlOpUEkO9Va0oxymkSUmjRArNGVrbfQ1
+4nOISq1Escl5Zm05pEbJYRsbkUaIYjOWighJPruLvv9zfXNdrvf6Xe97P899
+38/9ztA/dJTvN4tGo2Xhj1z//zGhaHRyNaBojIm8RStgVvx0X98KiiZsany8
+E87s9bpQCcse5fwjhCNCvOTn4UKb0sIf4dTnnjUusOBI1bzzsGD0mMFiuGJQ
+GnUNNtCv7n6ynKL5tjVV3YStxZwVYpgTl3o7Cy4qPmK7EZbLt8ZmwLY++bkD
++hRN6RD78DLM9XS6ngWP+pepRpH1z93le8Pusg6Ho3AXw+W+EdwVrsh1h4dq
+MoL+q0fRTPxE31BwjnXKz80wI4d7yojke+LK4nuwLOFmwkJSv+VsRgHMG4z9
+96f1WP+ZqzAHFtq5RDXB/dn8vb/AajXu5iWwbVhFxQM4M/eMfSas90+bVivM
+rfWeToOth/afGCM+e0OT3Oc80ZdpIT8TnZ9/J/F3Wq8nWsDi5eqPm+HUaMYl
+T5hRtGXbFFxXlx0UDid6GoQwkZ9ox0T/FTg6YNewOWxc5KQugTmW3pdIveM3
+dhqWwpTtpZUR8FTe5GgJbGBZ4p9J4qVGV/JhtcPcOXLSv3RBaRJccPx+5Rs4
+OnomMASedKQEdFOKxhT/5bYdNh4bfsaGOSuZieqwbxx/80a49f2+qAbUl6jN
+fLcTTl+frRkDizUOHHeErR173K3hvp59t3nw5NMMq55lyDN3UTm5z3urGrMb
+jjgsGLYl9vtgX86maGGlkg/mcEFdMN0MLpJ+e8EAdu9prJV9jbyOhLVrwB2e
+urP3wvTArPEJ5G9S4nZqmoV5FLBXvYZlrDZaNWzho/9bLdwx0nc2DR5dfkXt
+Nhz2pW8kHrbVYGy4DgsjPlsnwfK5Ke4JZD0dgUgK16mW+IphZb/2vTY4Ojhw
+QTgc11wYpYH9G4dONxAnvfxyhwcr3W3azsLUY7dHV2FZlSUrCVZb1/XxNdw/
+9tYxGxbHOp7VR32UQqf9Adw/9KzfA07ttX/fQfJnX5qOgaeGg+P+guvy1qzO
+YpP5q0pgoX7h6vYkCVwo5d+hYPHJ8jXX4ehXZWW+cHWeSu8J2EKy3C4WDnDp
+TN0Cm9DSjPKJi++ufod81B44b3tE+m/T7i+Gg9a/vfoKrnt7cXoO7JvWLBoi
+65fQPSJR/1BIst0kzD1fHDP6FUXbV+vXMk3OYylvaj/M/aTOIraonzn221KK
+prVT7jdBnt9WJVkH82IcLd7DlNEZ62xdnDNf0+0leX5Fr78BHGbTJZOTebOb
+7C5jYr/t20//SuqNrM3zgOVBAcpkuMjs5KAWzByIXRtBns+KGnuzhKIpGuVF
+pH4Tq545TXDH33MkznBcU014I0w1+1huJfnImNJuuF/vhrcpia+Inj8b66UL
+gwdWkX7MKF23wA7l9d4cePSgc0oYXLipRXct6a/ZhsOVsFA9mGVB6kn8RkcV
++edUP15vT+Ifyv/cDSv3drQfhPuHDxvFwfS9WZ7hJH4J+3I5PP/YV0+vkf27
+bPidcJeAr/mQ3O9cteM97KAfOKEk+b6/O7cPrg58ZzzbDHOyqn7zY7jVv/I7
+DhyWpsP/CWYpYwPtYeFB71dcuOLbHbP94QLzUe4A8uVOqG0SwzxO5NRJONl1
+k2Eyud/pp/cZ/dgYcNwyC2ZE9sX7ww5+B3SlcNIHtwvPddBPTpD0F5j2oqPF
+Eo72H16aD9c1nGDnaiPuHrszHVYuM2TpwEkX3NPOw0UJEtPLWvheyMi3PEXi
+e6/u/hpuVKg0+5B8suJv3ddE/3pTLu6BLfyc/wiC1czLHprBmcWS0E2wA6el
+YCnM5BfrasMBZ1xT6CS/8lvh8+Ap41tlH8n3BfOW4xKYmnVEs5fMe3XBfnPY
+OKnmPJk3PSPJVT/itdoNbeR59p9ON+FE8WuzDlgk4G19Q/af2D5A+l+3ZU2D
+MfKVm//n6QjMMFq9IRSmvv8+nOyv+OFUdSkscihwZpP8I9dND8CphadDrGHu
+pfHeRdrkPQp9eoDUI1WZz4FHveK3RpLzYvKaVsE5OstO55L45GuHtOEwr2dW
+9bDs1Ysxsl6HNN9skPTL2SMnHw76bLhWfQPy3G2b4gwrdh1aYgjzVLe19SJ/
+sU/rXCu4v51l5w/LP2502QPrOe+K/GMx5m2JhtgVHj3FL9sNF70sOLgfVm4O
+O1q6CL9TLvqqbjCj/EkIC7bQSmhwgt29vI+eY2D/8XXc7XBHxM0JFbgxfp7T
+erjaoHKnxkKch013ty7ZT6t7zFID7yWdvXIWrFCYJl9cgOv+PYcGUI+JOn0B
+A77TsKNHQeZD2eNTOR/7dNI/lJP+jJyWXoPTPbIrSX948vGpLFg0+lZ0hfRz
+5HhKCxwQt208nsTPeP69EutZ2EfRo83IeZuapMCtI4N6xElu0oW6yKfwgyTm
+HCz69VFaHpweyl13lczrlnGPTcg/tWumQULiq7yeP4BlM4PPa8j7sqshiIl6
+DQyY4a/hyQE7+i641XCqfgYOWHFLzQdOyjbJ0Ee9wlCNuCBYVKe4a0f643rN
+Twhrhc5t+I7cnyUX2cBD1dSFRJj5wub4v2CByOpRIUzFFgsOY//MtFxuPTkv
+lT3l6ciX1hNo2AMX8f1X30Z9NCu3nz6R9Y/+EJCDfgxpJc6hbUS8fUtg9Dys
+FxBsoQorlpcy3NUx/4O1esTKCttqzlyc1xd8yHmT/wfVqP8BWpudvQ==
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.57964504524893, 4.283992682631731}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl1g041NkeB/AxtxUKs0iIjCivSUxCrcZL5KUoTDbqqiyjuEaJiUIScsUo
+yYZ2vFRTVFLKSlJUREVYE2rH646yGkIKu/d79s7zeL7Px5n///z+v3POH519
+4Tt+olIolAr8kPz/ZzmTYkBShUlJGKGvfazFpBwbVbE9B7fKtawugN03R3mZ
+LcF4mYidA89V/3K5jbhkhegG3HpoYn+EKhyUrTgAm4WPtMkuZVLq2hfNWOD+
+MhXbeOfh8qs3rApgvbGmPkU1XDcna6Ohjfkk/n9EwgGsO+zLcKRuU9tj2FfO
+3FaTjvkPB383BXMVlAOD4Owd10wV1JkUWl/t8xuwVfsPTsR1RSamn+CkkStJ
+X/B9/v5agb4Ok7Ig9v3mlzDv2dVqb5huFPX+HCwTKeBGkvF2n0BPUs/QqcJT
+sMr67jAZMp61+GYK7H8688Vj1M/jtHTFkPE8FetEWCS/QTUANlvTpeUBc5P/
+rWQNe09ss10NCwsvfy8DJ9joJtFhtY4h4WvUJxyzbzaG2eHKp8/BAdUHHnrC
+VSyvaBbcOPyhJhNuNeFSyfPT19b8/geZv3RB6yv0J91Dd5ZF+jXIWxcNM/s8
+Hr1VI+t3y8YSriu40HcQ/Qgw6a1XhPMnLbxkNJgUibbjfmlY6NV44hpMi55d
+vwxmDB+95LIM99Eo+30rPOkmL+6HJXHHY/Nhycudk+GaTIrgt68DUqjHbODH
+qY9wVbxr8SZYwuBN78C6i/wKHyTB5cMHFYtgmjpD8RU8WBqW2gV77mG6qpH+
+M+XGJ2DmhTh50j92tN3KKdiXqq9eRNYjqdBeBHOZgVE9sFqbw5n7sKBtRYHs
+Cialw1HLKR4Wsv2yjWDRg3uRG2Hx4Y2LfoC9W6hXJ1EfT2sihAknRJ68foPU
+P2j5lgE3rHS2D4Nndrozl8Hl4aHvrODUZ0espzCfXnHH9iWwpDRlvgE28OJe
+koYbvXnOZ+DGuPAqRZg5RzXfTiy9/idzuJyro6gCd1Sq6JF+0T0KbN/i+QXN
+1fpPYY4gnVoCq2gdDzBHvQa7hD7RpF91OTl3YLX/rnvmAzuyzM854pyo7eR5
+2cHe4UYsEcyPSGFtgA0kHT4nyLrn2YY7wiWtnf00ZK7d/uP+xFKrJLuRFIum
+wkSkzb0MtctIbn2aSyX5vdfM6ABZN/vl9hPIBS2ZbLIuag4BnZbIoMrTcnZk
+XYpNRuOR4p89RvyRMvda1r1AbulfUXsQKdrksEMJ/TurUigOI78v2TXvDV+h
+zocEkuupnlaZ8EaOkdATrutdyKmFTaP5LutgmuFQgYisF7vShvTNU4e/dxKW
++IrDJKiLH9Ou9BUumS1rbIF93QOaxuCxshjTMph9+wf/32CblCm/LNJnZj3r
+Nlw7KN0QB4tbpgdPwIcoRZwoWC1MeN8Vni55Ij5KzqFYfkAB7vcb10yDPW2K
+K9vIeS3Z7HeVXH+5IzOH1LUv3q2NfL9j7j7Zr5wHIZ+lkTPcFjMLZJKMZ70T
++V6l6CwNaXJq+FoGuc+loo/fcJ2/2zXTXlhSr1r8mdRxdG+WCebl638MmSXr
+EWH75zG4qllgpkSus6rf/QIWbj5qsB5eHFSuq6SLfRIR9ZJN5ldXbtwOt6ZQ
+vpXAFVq/bkiBKSW61BGYF8wdL4fpQzc71+I+7j9+G38JCydc9Mk81xkK4new
+r0pOTgP8rWZIrw+mOdv1LET+xZbOFyI9e4bG7JGaibpdT5FVGXyLw0j+s2P9
+15E8vYjzOciNp2rM05Bqcw9KSpHJH4tOBSHFzy4KbiPTtio8IvfJ/VNJIECy
+PJY36CAFFjUhWcjIF84saWQqtTckDOk9tEYygbrMgg8/t4XvaihcGYG3rFlr
+KAN3yBgsGiXneo6f14IMmK3SmiUOczpA9lvosc02S0k/WNlTXrD06zlVJmy1
+VpiiRfbLrf3PI+G6Q5uMP5F109NovEP6GaFwshl+0bZKaZb0gzpz7S78RP8N
+Y4se6uE4LC2Da0efR+bC/IdL0yvI9+UnxsRw6pdu2UbYqMvjoeVK8n6jv/kI
+axh/XhYP0x/rczQxf6u1W/ojuFGD07yT7E/R18kpMj4UbZ8HC74rqKGvQr7f
+2jIAR4nWvbeFPf1ctU1Jn54YTnvAqSypnig4+46lszfMd2DdqSbro6h13x1O
+WJJ+cRou22ZYbwPzZK3F+qjT/5VZGLk/9/TqWHd4VeWkDgWmjRd07INN5M0v
+9q4kfWUYH4BVRCP3q2Duo2VHyLhEOX/vBTK+J5pNrufdc9kdCwtUWYcMYVdl
+1dXBcB0rvoT0scbC5ZM/bJWlkEf2UfJeN4c9sIRp6Ef2jdH8OCOU+ATXZCvM
+ubJyTQqckLg9/HvyPIz06ZuwTHxRRDf6wZ2PKeuHzYRNjqXwcNDibvI8YueI
+nGTyPpluTgwm/eoJyPgPzGMssr0L10n9VREI087n+yzQx3l439kZAmuGh4q9
+YYm/sWwc7Blnq1hMxv0UfuHDGU+rpUZhGm+heStckSuxXm2AurZ8uCdH9pV2
+WnYgzEkU55D6aydVQnkwxTm/9TycfuRfN2/BtKyA5SL4Jn+X+DGc6kCjk35Z
+mu/xeA4LTqgmh8EVUp+r62Bf2dIN1+HBs2/z/rl+QDujF47scx05D7ducvOg
+og/Dqf0Lo2BJE2tcHc4vVy3dAc+MZl1cAXfvqq8wNSB/51zNNOG05ARpeVK/
+to7vQjj3aA5HgucLyGgKH8L9NRzYMT0we74gtgrOeK3u3gozY4YWn4TzH8pn
+EfNpKjrkXPSf/HnfO5h37sqsHNwQ+7f1F5i+K2HuFVn/d3s/aGE+9pd3kRfI
+uXKaK/KE68yox4PhuPGUr2fgqm2/ttjBiTVOc+2wVcv1XAMy7vDalW6I+fUZ
+UVpkPxjuYXBgNTOGM3mPyIkMu+tgg55GUwY5D11Ub0Uj8v9kZqYPfCA6tNMX
+zi0/ppxE3mtUn7aL8JY3H2oekveQRolGO/zPB/UrkTRm/g8iD+gn
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.867783472564531, 9.687357802186902}, \
+{1, 0}], LineBox[{{16., 17.00000000000231}, {16., 9.999999999998607}}], 
+        PolygonBox[{{16., 12.9}, {15.6, 14.1}, {16.4, 14.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.9452, 13.5}, {-1, 0}], 
+        LineBox[{{16.000000000007276`, 17.000000000003638`}, {
+         10.000000000005457`, 13.5}}], 
+        PolygonBox[{{13.51826734053906, 15.552322615314452`}, {
+         12.280184249251306`, 15.293188945044921`}, {12.683281069670574`, 
+         14.602165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.823799910437668, 15.984057296392571}, \
+{1, -1}], 
+        LineBox[{{16., 9.999999999996362}, {10.000000000001819`, 
+         13.499999999996362`}}], 
+        PolygonBox[{{12.48173265946094, 12.052322615314452`}, {
+         13.719815750748694`, 11.793188945044921`}, {13.316718930329426`, 
+         11.102165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.823799910437668, 11.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{16., 17.}], PointBox[{16., 10.}], 
+         PointBox[{10., 13.5}], PointBox[{7.5, 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}]},
+       "\"afbf/cgdfeh/ifghgihi.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdfeh/ifghgihi.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:eJwl1gk4lfkeB/C/rmTJmj3pdAnZxjVpyqj3bbG3nETpxtyTaCrkmI7BRDQo
+y0myTCrLYWJaEC22yOnGkEqHkSzTHddWo2UOI1nH/f6f+z7Pec7z8f7/v//v
+933f8zxW+YV4BCwihJzFh37//9JgydQCLiOWrE9+9PG4OktISu82JWOWvHH4
+QX5AjSV1Ra7vVsGxatX3fOEh8YGarbBN3uYtT1VZsv37gNkQWKq0+MW8CkvW
+/sMyqwiWBO5W3QvHZoTLD8Lckm/de5RZIphMTzBZjb97uK1OhkX2Bn8Fw+Iy
+tX8dhTv9fO2r4DSTnJ4wWPOZh3QB5gdM5JfA3sPH+xxNWKKmt1ROAfW9U4w7
+z8C854498fDVZ1tHxHB5yHORLvp7M84GjMM2e754ex9mv8+Y1zPF+mOKv9hi
+npbPI/+9Dm4Z0N90hs5nk/qFC+x9grnyC5yz5aXXTthstOWcNvJJbFUQusKx
+cxar3WGfmyq19rDo5uBimp9/1QdTI7q/yEUYBbvcPxMhC3cHTLwWwL/OCbP7
+0U/ahkzrvXS9VfaNGpidOxLAgeWHJ6UXYJGW+ulOnJ8o2FgZCEs78g4IYIFz
+tJ0rPPXgYMEiOKLUIM4SJrqexxZjPv8wJlwH7l/irj+GvMR5ostKdP/5+GXt
+S5Gv4VVtRTg2NS6tTAk5eTldXwaLQ4uH0xVZ4lB6ONeM1gvZwTmrwJLGy/XN
+LjAn7bdrGfJ4HuW5iSdof/dPvW1YQusEd/xE65V+VNSAS0Ivrh2i+/tIQaoc
+SzKLokZNML84LjF1PXw1qv19MMxJr3ulBj8dL1SqgrlzLlXaMC/JYnaBrm/V
+CHSGs9ckhzmZoV7934V5MGnx35FIbXrFUBvnOQSdTngEx+r0vSiGPTmBAZMw
+p8eF54J+M4u3p6xcgzntyuvHYONe55mNsGjLnZxLmG/7invGu2F+WNz9dZg/
+vrR/zJtaOukshmUjFRu8YIm61pfWyEtgnnfABZb+4F8SCTfebCW2MPe7K3q5
+sKe7ZJsmrLb7cX4mvNYgSXEM/Ygv3DT6Cq5z7ApuhUUPkr6eRv1q6/rSQtim
+uVL5COxzSkcrClZLyT1biv7im5oHvGHuzJLxNvRfIj5q+yXc/16jvwPz8mz5
+I8Z0feiE9kPkU16QkalD85Ds21i4GOe7+4ZpwvzbGadjZJH//sh9BnD5A197
+v7/hvWM9L35G7/+3O2HPIuyL+OfynbTeT+9GD8jgnEoZr3Daf3sdiSOYbyDN
+6QbNf7CCyVtgMMexc8M0b70yNvkvhhhw+XxTzM+JWrpLMs+Qtd8MjwVTxyWq
+nICv/rhiqJK6M50XCjda6xNijnqvxkN+hrPLreed4NjnUwNHUU9NUHktCea1
+2dlycV73qaG5JljioJ9mh34MMh/azcD8ghsmL2CfoFODxhao/2lEGo3+Hax8
+prdZ0N/HiR9NMF+QKK17PywdnvyzCebvvbf3EBybLJz2QB5mBjENB+l+dkNS
+EzylWNLuBfO+qkjWRn5mWi5VrAX9XU1tZmEf++xpI5jvMJi8Ce4XrQmVgVlD
+VVlVWLPjum0f+uNcuGhagXqxt3dG3qH9xsdxTeBrq8rOC6k77pWEop+c7z5W
+HaHzWo4tz0b/uuJwTTfYZp/jfD7mk+9KuGALi4oGe1YhD7b/23YjmL3UNToy
+h7zty5evpPlVBwcXzDAkKMh312pYvDNA1X+KIb9u8OtdR++XOZpvnmTI3OzQ
+3T1wf/OArNsEQ2Qb8g+epO6dXZk6zpD1QxPjJfS82i1Z+mMM8UxI13xN908U
+G/75B57nEVbPjOZXuE186AMs77r0OM0n2kNw7j1DhHdbmipp/lqBhiHw3VpV
+GWIJu/lYEqzPVP5M4AyzWlZ/2KAe72nt62SYp7yQFyZliA95uqMFFmctK0vC
++f5PPF7Ow/3FOcJG9GfW1ydnbgXrXj6vif7fnZQTu8M8v1s2X39kiFRZaY8f
+vX+J33Yd8/qH9cYFw+yTR8GtnxjCeSwUUoskMYJq5MNdIbf8EF1fWu0VMM2Q
+nJHfXXfB4pQHZk2wUMUk63NaX1xh/BzmRgtb1WHOqxuz0XBnrf6nt+hP1Nak
+LkG9zrqK3Y10npgX55pxXkuqvnEunT9dY+sx9BO/zulOBJ3frkTwEP1POTWY
+7qfrVUvDejBffNHmcJbOb6S75iHyiLA7yLWh+591tWkgz3KJhoI5vf8qIz/x
+DUPEWs/SrKlHf9ZRGGKIt0v74U10/eDg+m9+Y4jufpksWj925rBb+Euc1xVx
+K4a6N6yQJ8HzUXnffYuuX9R6sqWRIduHi5+8oRZezL1diffFqGbEDPOSbsMP
+NYV4P/7z+6bj1JzHNeIo9GuSf7uSml5p9WSO/n9hxf4PT74hSw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.7026940733168927, 12.067904665985203}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl0w00lPkeB/A/dd1pZZJG5KVGKsPZJrfSmXTb53HlrYhSim27k+rm2lCb
+rBDTOzXLKLUVjjlWm5abt6Kd2hoW11u3oS2TIVNGXnMnidHqut//2ecc5zmf
++b/9ft//wyE8Zut+Y0LIOfzR9x+PBUumpvE4sqT0u9YnhrkskSzLK6+EfWsc
+pR2w68uBL6Jhkp/mdgM2X/LzGwGsLXF4EAr79v7Y3L+YJaJ89YdJc5bIuW/V
+JfAhWeiFVJi0x5ekwMrqw50c2DrU6HIoLPbiKj5x8fZt/ccXsIRjq+4ywzzL
+xzIhrPff6H9/NkseqCxmucD8kSNf55myJNZtT5Ar7Brv7HXpM5Yk3fD4loVl
+vbe88maxZKbPIye6P78q7mUTB7+v8a6Ih1nWcq0dXJtusySXzre2n/j+zyxR
+PSjbUgvLM12MPeBOhc3EEK130c0oa9j/uLRpLvo1V8i/todTucsur4KVhY7b
+A+DTbwb8AmGZlbLuBzrf3sR2Lyy2Wdhog/PsGqXSKJpv+b+ti+Cgox2nqFWb
+Cw/4o95+M9PgcLrf+5X3PsCGRBPlJjiouOznXPTH02hMXGj+buOCdehf3Ly1
+/RPN75jEtY6atAQ0wFrF6tpVyOtgi6LvPM3/bf9YCiwzWxHrA5e67xcVwKWK
+OUaEWjyUn0PH7zTUVTrQexqZcwDO4vjNjoblfwsRzYClEewCAazK3333G3re
+mYu8Pj7WWxjr76G+Dbqx0WJYlZ3+qQP1jz3M25MI6wVdkd3olzOluxMMa3cG
+GB4jn7G14R1r6HpHP78SE5bsO/hV4FJYXJF1XvonlnzuXmq7iK7/nDsvZiZL
+BNq4VkfY/JbCWDwD9/r8TOZKWP6UqztgjN+V3/I2wuzyjcHpRrifhA9VEfS8
+xKSSFwT37XA7Qwq7xkSoN8NZ5ZuPVdDxX19NvJpmCL/t1koNLDm7dvAkrJI7
+HzZCv5IablIKvMv96qQjzHrmDrbBqy19q1iax6P6OHfsZ/isuHU7HT96xORf
+sLldyqM9NE+bWbPdUU9EyN2QvbCyT7rrBbxLLlOH0vWcBXNOon7R8l2TG2DZ
+7u0vXNBfxMHkniV0v197Y5pgQVa120eal3Xvmx3I47dk3VQdzef7U9xmmMRW
+FqbBskyTBjvkV1Aq/OQNkyuVgT5wi9CGENr/w/vx3jDfZ11D1CLUWXNMbQVL
+dE09moXI831htwL7+cq12s2wmOukdYVFx5/ZNNujHqHndBLqkdc6fLcNNg+d
+Z1mA+lVRM34asUN9C50SitGf9bs7a3Jg1iO/Lhd5xEsKhX+HSbZ6iiA/34rR
+2yJYuzvozP0phuy8ohgUwEp7q7bjH2FPJ+cVdP2SDibMwJB7+7QtfnTcVG8b
+Ps6QiBNP98XR8cFafcEY7u9CRl0ZLDl8UbfiPUMKp4QuBlh+ctjVbJQh4q8S
+vvRCvfyuwnue7xhSeqFYkwWLd0cpn+sZIhdZWL6m/Zk2ttTBV6/I0wToX9m6
+5uZszBfvuGy0j+bR+SztB1i77a9VMliyyOJQCvbnj/KSi2AtbzL1Is7nfFnd
+U0bHE67Vt6A+mXukXz5dn5V32g71i+5kjCXC/IBoJmaCISTg2nyGjrf6bStH
+v0r2edMwrae8sebpJNarjU3PweSsoq8G+egzGq+b0/ojO5wP/84QQTBvSErz
+NInObIPlFjvGp20xv/Pshpdwaa+XVTSsnRh5nU7nT+ZrNDZY7/e/X15jP86m
+yd8CYPkN3qAG56X2CP/ZsADr04ydJajH2l5TEAhLutnbatTPF6+b22eN9Yv3
+P3qH/uRuiRmZMN++YnUH8igNe+y+BWZ7DC/zkeehIulWJ1j58G3Z/WHsv953
+OY+Odz+9sq4f+a73cLOCJXklIYM96H8weURIPUc38KybIf1ha01CqVUW3go1
+8k//GHmRunBkpKqNIexAwsF2mCRqt75vRn9Nb1850vpV8cvd6zA/zHX7EWrv
+I0Z7q7H/5IK/VFPvHIqLVuJ7iTN7x0H/JP28J1OD+dFdgd7UMZKw7Hp8fyH2
+sUepq157Cx+jnqx51peomzn+9Tg/6MztohxY0rZlYU475u+xi5FRh4Y+aetE
+vwdGT0dRVywONn+F72um0++rYKVHTVIu+tX2nmjS0Xpq+q8P9+L7yD7XcgJm
+s5/0afqQ73y/QjNYGSmUBAwwpKGpq/IC7X9/xjXBIPq9fkM7bYX1G345FQan
+1ilio2FlxfPIdswnR0VTmvnYL3Bp23XkrR9eahoAK4MUNTffMMSw7L/m9ZZY
+3zpUxNExJD58p8sm6tTJ8f9ocZ8zm8e7ebAhuQD/kkR5ouqbc7BkZU5cdyu+
+z02X1J50vCrdxwH56S3vps2nps/V9X+8eez/AXlZLnI=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.7973059266831077, 7.067904665985203}, \
+{-1, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000002274`, 17.}, {13.500000000002274`, 16.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.552325660469876, 17.180083206945802}, \
+{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:eJwt1A1Qk3UcB/A/AjlexFHIazAUkJERxEENAntADpUXJW68nHgMZtRQKIPV
+ASoN2nByunjLKEYspGMIcYsY7tJiFHnzRFkkuHlcIpBwNAILhUCi7/+u5+65
+/33uefl9f7/nf89O4btp+VsIIYdx0pWYNnF4M2SOrlyGGF3GzDNwe2xrVQfM
+M/T2tsGSr9M/48Oq9HESDc807wlxhEPV7wxrn2cIKy+ieDSQIdzqDb4bPHQ4
+RX4ZXjoxoijwYoiN47GMi/DkK1cr+z0ZEs7JyaFmWUkbWXCoaU3bCUuKGn4p
+8GBItHOC22041yYybNqdIcr3FXYE9SR2/hun4NLFOc5rtP6H7+2LhLvjHxwo
+h+UlEpk3bJn+LkgHm9r+knFh+cHxikVYvUYOZcInZSXlXkEMYTuNCdvh8C6u
+Fw/WGQO5LNQX318tiYMNVbyCMljXsz5Jr4emnvl3AWY7TPnT53nPHJdmI/9c
+VELRPJ3fNbGrDtY5lMV00nrHw6zW4aecg7HZcNaktcAb89BxHtnbwiKP5EZP
+2H3QqO9Cv6kZJ9uWcH9pi07Pp/OpNSSpYEeflNdtYd7qE9tgmFlImh/cjfVG
+81Ul8liCkxsVsMTekLeCfriK2cUimARrRAnwzNYAQR4s79E6N7rB/nX3RPDS
+yA/9864MuaMfelQFm8z3tvPh3JbU37upCw9JTTuwH6KjTFOwMZbfUAEn913Y
+4Ys88tIwQSLMlfnkC+DaNbMwBn4qlRQ0w+7X92dmwP7nlGQEJm/JEuvg6KOu
+qsewceflh7OwTmrb4YB5sNiT02+gvmXbvlYn+r19TrT8DLdz+gs2cL9vXdQA
+D/kJ+SjNBOsjf91Uwaz6bxy+hNWJleZlWJTcpThC52m6GfEi+leb+x6y4KZx
+j02G7o+agDkN+pls368IgSfKysyZcO2fYssTPC+NO+JiDWsi355pgoeVSV9d
+CUA/FQlTHrRe/o9LZXDTJ6uXJMjHuunwZgrM5lwZGEM/Bq+Lr4bDoqZCOz9Y
+o/o7IQT2tb/2oNiFIaerRVZ7YbUn99TIcwzhB3mKc+AsS8WuONi0HFh0AU6t
+Kvl09FmGHDCHa6/D8rPcymrY4MjPtkU+vVUpKw+Ov02c4qlHvVqF8HLNb+Vn
+qGu+XZHDXIGsh35P34GIkBE4+e4XRbdgXeC0/0uoxxvfXjlB99MLijUl7Lg0
+tngXZjeG9zkjr2bq7K4BOp+PtX9UwvzZtYV6OCvG+vw03C1MkabTet4d1cHo
+V/35sRR7+v7Hdz7IgsUNyk4t8s+9XL9bAA9v3XbpKJ2XuM6yF2ZH3ai3gXMj
+AiZW8L4hU4u+158hq4OzP52n3rNhXQgTVcj6FjjUaCwMp9dd7lsJkff0rbQ1
+J1j3Pf+fXvSnKXbJ3/D7/7/mjH1OVz/mP8lKx0w=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.16438510075492, 12.373697879094095}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwl1AdMU1EUBuDnQsBSI45UaLHuAZYqEFGoPhSwisQiEjWiVHBgBSxqFKmD
+RK2ioDWGpQYbqEnVxjgogiuiKHVECeJi6Au2igmBgqtiLf5HX9LcfL05955z
+8s4bm7x12Yb+DMMsxI/W/48/ywykdRzLhJYnauRw5MGaQ71jWWbCD73yBMz0
+VjJfYMf9rsgGmOMdKXwKc+Z+X/gBiNNs7CyD3ftK4xbATpd9qhrmeQa3psP2
+XO5tMCwYUJiQDxtD3Np7xCxTkR7yRw9XrI7PM8GRVkmREVZm1k9bT/Zu22yA
+rWVH5gph5Y2esAKYu87TXB7DMlXbGmP2wMx7L6cEtpbI5q+G60u859z1Q172
+EeJgWNBW/DwJVseem+IBu49THxsFW/jNlhbUE/rJPdEqYpl7DSP3XoUd+Trp
+E1gnbTHnwu3OW1/rYKeX6s4m2DL+yrEWeHn57dJYWJnksg3CefdSEobKYH3M
+TH4EbLxwLnEWxT/5HXsUNmU+WEP78gNFCa2wYfF+1VI4NeWuKgT51zrSVqTD
+RoPobD5coXq3q5D2F03+ycG8wcLzj+l+k2PtSPQjr0AUM4jqKU+LDYJ36LW7
+F8K67JZNctiU0+SgfocfSAiMh9O0JcmvqZ9dioJlcJUhJcxvOs73nDU4GpaL
++7xSYGnW2R3T4fBuobYMXrnt+1IPWCG7kdsEX8nOGG5GPsvpfwnL5LTN5kXB
+ARQHF7Mu30eobz2dC2ctqtsZDnN0L9zOC3poQv+klBes7Gfu9oXzKG/Yznp9
+PS7Ee0l1wWL/sEJPuJbqJvNDF5/yRR6GUxo78sl5da0rAFY08J8/gnXd7y43
++WB/RpL5NKwocDWWwvqapxczYOVH7a1sWG37MymK6oufV50BP5s4+rCY4usu
++tG+KbCvpz/VG71bdgbmhr2N6qT3TdiY/YLiXa2/PsJT1lVtGY77v0XLBTa4
++Lx/bzIs2D5Q0kMWVZ6shplhVVFDcF776blx3qjHPXPJ50A4i5vKpsLWJR6i
+JLg+SHOwEnZ0uu0rovpsxiIH3LFKK3sDWzJsu6ahXxzNBfqhm1D7Ug4n0tyQ
+LWskcbCR5gpWN6t6I2ADzR3MugVc8oE7aC4D0c8RqTeb6T6aW1jgkpVr4WCa
+a9iyZUCDCG6kuYcZ7YdcA+px/sJ3AVZ0RNT4wSx9N+Cs6OofOvTn3yNFnbT6
+sH8BRImRiQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.763809742330267, 6.7638097423302685}, \
+{1, 1}], LineBox[{{13.500000000007276`, 16.000000000003638`}, {
+         7.500000000005457, 12.5}}], 
+        PolygonBox[{{11.01826734053906, 14.552322615314452`}, {
+         9.780184249251306, 14.293188945044921`}, {10.183281069670574`, 
+         13.602165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10.323799910437668, 14.984057296392571}, \
+{1, -1}], LineBox[{{13.5, 16.00000000000231}, {13.5, 8.999999999998607}}], 
+        PolygonBox[{{13.5, 11.9}, {13.1, 13.1}, {13.9, 13.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.4452, 12.5}, {-1, 0}], 
+        LineBox[{{7.5, 12.500000000003638`}, {13.500000000003638`, 
+         9.000000000003638}}], 
+        PolygonBox[{{9.98173265946094, 11.052322615314452`}, {
+         10.816718930329426`, 10.102165824326175`}, {11.219815750748694`, 
+         10.793188945044921`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10.323799910437668, 10.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{4.5, 10.}], PointBox[{13.5, 16.}], 
+         PointBox[{16., 6.5}], PointBox[{7.5, 12.5}], PointBox[{13.5, 9.}]}, 
+        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}]},
+       "\"afbf/cgdheh/fihjgigjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdheh/fihjgigjij.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.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.77548972111089*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ImageCache->GraphicsData["CompressedBitmap", "\<\
+eJx83QW8tVlVP/DL2zH9DsNQE3TMkAIiKFiIKAoyNga2YmCign9ERbG7E7sL
+UTFQsVtRULG7u/P813c/67fPvpcL5/OZuOc8z95rr/it2PXEp33Y+7znBzzt
+w9733Z9205t8yNOe8T7v++4fetPjPuhD6quTtzs4uN1N/rnpwP/vDg7yr/G5
+2b/6j/7/Lxr/Obn7v//7v90//uM/jr8e09/927/9264/B5f6u3/5l3+Z350Z
+/z69+8///M/di1/84t1nfuZn7n7gB35AWwd325q/09LUP/zDP4y/LvR3n/AJ
+n7D72Z/92fHXiW7wl37pl3af93mfN9r/oz/6o91Hf/RHe/dU//zDP/zDu8/5
+nM8JBbuXv/zlu4//+I8/0YR8+Id/+O7zP//zx0/PfOYzd7/927998IDu7b/+
+6792f/u3f3uIgq//+q/ffeVXfuUhCv7u7/5u97Ef+7GjDe884xnP8N7289W7
+//iP/9i9y7u8y+6pT33q+Of93u/9xnf//M//vPuwD/uw3b/+67+OVz/7sz97
+95znPGdQ+NZv/da7pzzlKbuP+qiP8uzBI0dbF3df9VVftfvGb/zG8TwGfczH
+fMzuHd/xHXdv93Zvt/vDP/zD0T0GFCMONg5csfvd3/3d8V0+yP3Ij/zIKZcv
+/MIv3H3ER3zE7i//8i937/AO7zBo/YIv+IKzPbqv+Zqv2d3jHvfYfdZnfdbu
+Ld7iLQaX/vd//7eV4Y7NRxJ47GMfu3vLt3zLMf5/+qd/OjjfRL/N27zN7nu+
+53tGZz/4gz+4+5Iv+ZLde7/3e+8e+chH7l75ylfi+e4JT3gC4pvoy0ev7/M+
+7zOJ/omf+InBFB+Kc+7cucE8H/+t/ltGp4YWfOmXfunui7/4iw3+xibxm77p
+m3av93qvt3vSk560e8/3fM/dX/3VX00Sn/e85+2e9axnjeZ++Zd/ebxKpPe9
+7313L3nJS3b//d//vXv0ox+NdweRK/1/93d/90GmIejWd/j7mMc8Zsj4N37j
+N3bXXXfdkJE+n/vc5w6VeqM3eiOsODjXJP/Zn/3ZUKviu3dubbKe/exn7z7p
+kz5pkKWpiOnjPu7jdh/0QR80zOjxj3/87vd///ebc1fufvVXf3X3pm/6ppNz
+f/7nf7573OMeN9QFmXe60512b/Zmb7b76Z/+6d2nfMqnjN/f9m3flh21eZ4Z
+qvRzP/dzwzRJ7oEPfODuF37hF47I/AM+4AN23/3d3z2Ip9Ql92bo5WPA3/u9
+3zso+OAP/uDdO73TOw1lNXCM+r3f+73d67zO6wxGs6lf//Vfb8ZeMf7Wdj4/
+9VM/Nd6HBkZGv2ihz8/8zM/s3uqt3mr3P//zP+eaeDJ41KMetXvnd37nARiv
++7qvq4kb+ucy/sFqfMRfLZc+b2/fsPvkT/7kYYU+HvM2qbzWa73WgJ5oAkz5
+2q/92kGcD2t++tOfvnvXd33X3R//8R9PS8N6vzGCD/mQD9l94Ad+4BApbXjR
+i160e8M3fEMWf3Yh/slPfvJQUqTgUUnhltY5Ovmpn/qpo/V///d/HxSVqe2e
+//zn797t3d5t2L8evfp1X/d1gzpN+vzar/0aA242X9z9xV/8xe6JT3zieB8T
+UEdscAGV/p/gC2+mYhSbd7fddtvgipFeccUVuHNIMc4MtfzQD/3Q3Zu/+ZsP
+o33AAx5A68/1IFbdIAWswGIE+PzO7/zO7mEPe9juEz/xE4dRer30Y/xmUKUb
+E3sN8GlPe9qQ5Kd/+qfvXvjCF9K37eeTwza/67u+a/x1tv+NH7/4i784VAcc
+wUJjKiU4uOsiBkYGlozzLne5y+5P//RPj1MSg8Uu0Aw+fZg+FSQu+kZ5vvmb
+v3nYlaa//Mu/fAjeu3//938/xMAVvu/7vu+w3/d6r/ca9nf/+99/9wZv8AZD
+pKV46whI0wiYKDPWXD1ycP9jNIWkb7311uF9APTLXvay0bV3GBL0I+nv+I7v
+GM//yq/8yqtoCg7xUNpAoqGyD9z5kz/5kyFrIBxNKW6NNgG8DyGX4I9oyrd9
+27cN51Lgsvvcz/3c3YULF8hm4/OFoSnf//3fP5EAZt397ncffPL5zd/8TQOK
+M8dGKP8t3/ItY7wFkXMMP//zP7+7973vPRCdtbzHe7zHcP60/w/+4A92P/qj
+P7p74zd+Y7Z7ECShXDfffPOwDuK84YYbdn/zN38TJXnpS186fuab+CvGUCYd
+JSGVhAU+hM+cQSAJUhIuEwU+VB20gT7mYXAohh6eedCDHjQo4O6oO93+jM/4
+jKF8zOjBD36wPkL8K17xisFaAnuTN3mT3ZVXXunn6AdP9Gmf9mkTSd7+7d9+
+9+M//uMDmKEIFCBTsvWhJwCcCHi3GsXk7V//9V8PFcfz3/qt3xoRjIjkq7/6
+q0f39AeolShbP86O9h/xiEeM+MyHBggIBAE3HVYSlvP6r//6k5GwsfzG1tKl
+AQl607uB6hGvfVhA/Dop68Hv0Ji20FKOkUEWN+aIWNcd73jHoY9wALbiL0ji
+LGm/WOL7vu/7prboiyvywUWYUUYcbRFGgM3AMY9ZYdk2ipuGMpEBDcEXqk8n
+fThZUZlX2S04CBVsGJqRi/DMqAS0nsVj+n67291uRJK06173utfuh37oh4Z3
+xEiaVDzPIL7sy75sRAc+IgOvF4Det3n9Yz/2Y4MyFLIIfOSD8Mj/o+gnf/In
+h5+gPaTuO+IDaLyn3guiJ695SbrNXnzwHqSjHmqIg8mwtPQgbpImGq1nmN8d
+7nAHwc0RxaGL97nPfYZD8dFD4VUgStwC6kRW/AtYrE5OtIYmLkezFvyMtuqz
+PMtuhCqkkQ971qOEhCXxO6SBw35jZSxrBhtnRigPAqITouKKs+/aFBTW7O55
+z3sO2/BhT0YtWzrdTeAePGbu/kFlfbcN4tQADx89lFGc8Hu9q+WV7nJCLY/z
+6BvjJS+yLB0fXpyf9Kl3O9TelJrlG5cPr1/Ict8ewFHicJu/243sqQyvGElV
+mrqD48hrEqfH93xSnZBfkozH75SxCdheIUmROvPDbjZQttXacqd+So7E2YIb
+Y3roQx+qk7uMn0+PSJXv4TgoFQC8rF+tVGJEKV41FnBUxpyQU6zIYgS2IgrI
+UIh+l0UL7na3uw2Q4TIf8pCHULqLPQY6/vCHP3wQoHHAwURpwZNbzBgLcyBx
+ifzIyGiwt5ElzJCA1VPpn+H62ofScjo1ogyOjF/7tV972DAM9Hjp/blmuC5Z
+kr+u6VeQ+Q3f8A2jQ05GZLYM2ECDynBLSlIiTYdcNXDVITjsZCod8oWN7wdv
+0d9Rc1bCe5zs7/CtEqPx11aLOHh09yCPEqznwy0UjF3eoqZ+WqO+PKvIML3L
+DuGxv16rmxPiwdN8WP13fud3pjkqaUwSP5xamzMQacR+MKdG+CIpJ7IaUDSb
+h+iw+eh4QDCpsTUwA7UrGLu2GyQOfrazgTQo+O30ZQ5FuMY8gCq1IfgKYm7f
+r8A2XkmkmWZ4n07vewjnBq3f+q3fOoYW9FKHgMAFABthB6/bDKKP7INtMqNC
+moNruyW51Pu///sPnr/gBS8YY5HGyqFKEx6+2BAjoTOciey4Hr3UrWA9ocOy
+L/qiLxq4zWj585LwI5pRSJSJ4H79/+27cXkaZBPrEg57LsFtPx+8Xr8svoC+
+amLV9rVtvrpCuOBawPn//t//G7WUMteD124GCEMoVr86TPtSvw/ndApbKJos
+SagsY762RSDAah/SwdMGehJVeCXA564L0q9cJGmoyIjFyCekNqWsB3fYBvd2
+PTjBKH1htkXRU/prkqAPBlbWcqnH42t1Cc4K4JXyTbpoFTfKRRKHV8u9XNkt
+CkBoj2iqNCWhvZAdNnJEwpZSqoPm//2beuFK++OpmxgKYer7g3v1dxwI0/JX
+viOAMDDvYrx3ual793df8RVfMQxst4AdtojJAaH/p4bF1Yz3R37kR3Y33njj
+CGnIwP8XIlwxfr5sFquIlIqIt/l5KE/HYRHl5ruqh7acy/ttY2Gq6NKKFtDB
+b6/fQbKK3U5g78H1u2//9m8ffthjQl9Mz2Prq7wBAsjKcxI++mQM5EvvfIQM
+MJ55l7u4ubklN2VKJe7JVWGAiH03Yg3/vucAR+kzHDBWkqSfIcN3uoI0SPAd
+c1i/867cD15DnDznuzynD5KnQDIpmUAq1qQPrTjCeuYgY6Dd4umC2DkGmKQt
+ZnptKyiMAD7idDGbNqICskDxh49gUxhRtpaasggmjmpNuXlOwbPckiL6+H/d
+0CZDeOELX3hwSCduGBqlDAJI+EqcZISsHXf4StzQjJH5znOkADBIjA75jnug
+z7irPe+KC7kFCuE5TufcuXMnxqzBmVTHBxlcABuvwYZ31I6V8NR3bnQGCTJZ
+qqfGoAeRNAZUD5ua3HVoJ41kIpy7R0TMkg9+1XdwSroO8XwHBaGN1B7SMHTf
+UUOlEKJZ3+XGQSD+l8EUwduoWLEP8qklxhSTMyqYwEMVfw7u0sCNBLETTZE3
+cfWarti6Nf/UED3t9nvZcgJW1IgC+QliEYqW3UWf2I+8Lx9KUro+9OkETnZl
+Zf3Q4yI6UbTxiWI1pXOVgkqqDqnS2ZmX5IPjPEAFstMYKLTQuQxtfqcAIO05
++p13y5fNWJ4UFBYQixXccVGyqdLFOWkgshUz0syE/SCHLfMT3EtiS16YpvtN
+pIrj9d2FHhHAXD+gRpG42DcppQ90quQ8v6M3XTk+9J3n9t9dGt8prfD41Fr3
+JgBMqJ0+fXqWiwUkqnxGvEIQZUAP+MiQ0AjKGJwCB5QtSVxsHdJURZsjrqku
+U2Ch5fxNepR2C7KKAwc3Llpwyy23DP7jjMC19OxC2yWM5Yv5plRUABVbLU2P
+FPFLvZbX9zH28g6tS1eP/9w8fA79MZIIUb9STfCyficOW7+DI0efExN5jnlB
+BeABJSGC53ELJSBOGaKA5CBZcbBJbbGAPQLl6nq2p2sI23dILiEcXNlDwUoI
+SlgQ0MekFCSU9iR99Z3MTN63fuc53/Xk4iBD5IgkET5pCulVWjwPcMAqCZsA
+KTbOoQAkLPB82UuGAkFglqJJhqI7JgSArujvcBvnNklu/4afmV+BuarQZUIb
++pwe6J20jELddtttBzEvqsxFibWZBqFT14LsjjI3E1TBgvQ+AETIrgZxadWZ
+GwekYigFjOVytFBLvJHvMA4TjC7f6ZqAyB9Y+NAT78JVzp4usRPv+QgfBQzV
+VjFYOfviFDBdk4jQq+ggC6ccaCmAPUia1DWO8Vckoj+W7K+N+7cM29SehCJl
+YN/Rc0aW70gI3caS78RkFMPMa6o8vhPLURT8SDEEGKLVR5ynT3RDtM7dh4IK
+OvE6pS98E4wSYfEyw9NdNzeHh9VdZ2v3saUlifWiXAptAnm4LRUCjCXSm1ud
+UcFkBO4VmFzWX1ME+sJhVM8pfgEn+IUHyuAnTpzgLw9p0ZYEQIJStEOJge/K
+Kx2soUlPwB76julVbNDfXTPe9R3bUVJlEOyEGVN6+O07YSj8BxU0jGRIWvi5
+lOiEM5BWoFTEp2fWmlR7A55zAxy0rqXomGCULEvvk9tRY2KrjudAuFffrXEs
+NfZdhWfzO+8a3P7da8Z35Eh1uHB+mWxJQ7xMlkyL4KSnBkyFqR2GmvF45Stf
+uUIW+CO9ct0rZBkwyMqAxa5YasCZicAYbCysSYXFYwjBWXhhFUeWmlA4eq18
+iRjJ7a2tP107jK0Ou5jTfKdHPizd4dCZBSVo3brn+M9lgzWII0CPoYI01FGE
+r+J0Vur7yYIrhwoBKsGdluMdRDrmfzR5FGQ0V5DevDk7PJXnGL3JSMABd2Ht
+PZo8fZAcdrMfQRnpirCpv1k9fwPEUteQx8CNDObBCFFNMMJs/nEYQQnEeyGP
+EiCZs8N75NFdyWDiS+KGU/7h9PSn7Xr2IJUd8qFAsh3k97M9kRhI8lQzrFu/
+MDQhs4dGhAG8B4WCxpxVaUCCbtp71EznMp7DZjpZdXIYvqHJZy4ueoO7ckHQ
+adVICGU3qSCEUGZN9XwMgt0gXNFDOzS+xBFCwSyEZ2IIlsgV544zr9KREEpe
+VEU5I4SSDXed6f8irok6P6JR9hJ/wlZ8+B+oZoXPg7sdSCf2Sr5QlB0kHxT1
+8s/5AI2S+1YbP0jFSNguSTVppLJQcNLV9Y3FKNhNd7OVaHlqBkSBTcpcOGJc
+lJwXXY2LlzhqXP6mqTx4XBft7em3SSMxMBh0isNFCaGRLnX0MWnEcT5CgYYR
+WnAUGukjGkTErGL1wiRBAVcLowaxsNAoJO8p+xnPeR8817uzrEdjKbe/Htj9
+i2qoJmtivfoQZVx++eXDJSvFJmKAZaxS9GGV0F1X0Z0ZbIZZ6gM0X7JaoHux
+e5cVUMeNJ5vdo1oQ7YPaVLuLw3M6VT2U/oE+3BAMz4LgFsJLAdjOYo5k1Mn0
+HD/zFGTu9efkCKuzkjADoZkiPJauZiDILR24uDSNDetAhNio8NGNQTDLUuc5
+EOwzwCxJk5VWFpWB0G7awTYXb0j4BKdymYFwcxRzHQjuN8jNiiRhYoJ6tUK4
+YKQM5AEte5ZsIFAdouENm6F3ponF/ol6U7zgIEz8texT9eKDqIoKxP3udz8q
+1bWNM3PWQYqr1MKEi+WnmnUGCOCyxg2qQebS1EOWTAtZOR1IwiQJVXJdc0mD
+xmZt8R8bg84NZOF/oIWcwEcc3nNSt++RUDduxry6itfTn/70JuP0MGDdM3xO
+RL0hw0gAoAuukgvzTKn1HAbIRCZGpzCFO4xV6UTbWY3pe8aOFVYXZBgEolgF
+UBisj3YZcVneNf0Y2cJDKiEeEf2wa7Zb2cBWK79qBI2BFx6J9zGnzo4F0zTN
+BzzFCGWeGFyWd8NhLWDx6OBOOKMnPvGJrf3nxngQRMWNESFiRb0UYae6CdIX
+paXkK0q74tUgARGVZqxIQI3VPCcSnB1yp3aMSKKh45jmdd0yF89AWLulG8qf
+pW/nFpjiGJgovlMfalTZyEHWF6eQg3DWTeNLFS/vn6EfxUe73vVSfmg1fuDI
+1UzjPzsaNXeKUewDc1NIv9Sv0mG6rtVCs+ABBBb4+CuJPwbqheu/vF9X7BQ1
+MvhqKq+LwsRGso5T/Z0CMR+1922nhn+V8rHgUqA7rgpxZlSDsrAHQcoEJbGz
+rRNKgdFhH86QjrCfkmD6Ba7B6Gv630GETF8xoV49MBBhzc6DCGgkfZ4GxpXi
+36EJ5c5JLqCi1FHDDaF4nLXlPno2avFPWVgIZWS07yihCOFUiG+1eSKFEbFA
+3wvDMFnTfBpHVGqQsBECAtvtr+3fJJ80/Pr+zsIAixiEnJf3KDgmg0QCqPJR
+GRAbFayc6cdARo9ifDgkf9OcEsMREUt85UY+7FoF52Uve9nZpsPUDzGv9Man
+7L87MzrJMqfIrNgST8bbER3zIQhGMU3//ICumL4Cmrc9iiDSlkpmEpcQRJf5
+WOJRPYdgISxiVoKjXOt37AYG7BYfnPLLbmDrbnp9hp/wme+Yhn9+QDdNMnaB
+ug8VoDYiIxMJm5JucacCCOq5BigQeVvF0CtRZ1ZFJ3BF+7I1/+V2zGdEs7kt
+8gfLSOVaMJpN1ftHhC1yBvI8CsdkQVkxYdOcU+NnDQDnIu5804Fu8Ck2pgv0
+1SPgc0OxvWuk39Q/k5feU8kFC0TAdYI1sMFEJMKRrHcUI03Ry7NPnTrlmVBH
+7UEANhVsnG8OoAp++pk7BN7QgnAL3a5pAlc7FoBnLpE2WoGJYZgpmAKcCPRb
++Y52M2fnZB44Fw3xqp4rf9JC3jaWSCq2XjfK4xQJvXz8+dYH/BD2CTwFXnxl
+1JNDkYlJR3t+PBGOyAT8YZOwrqKajmMvG56OpvJyVEbCpnkGZfSwgXioS5ln
+rBcVSg6qHOyPtCqyzOIWLMZONaeL3VNW+lJm+CHIpoB0SEgmhtAzhS8+r8u6
+YtFX94CwVfgkp9OzcCkD4jtI0ztYKArgGwK5fmcTcLF4lto0yeCPhQukLHIm
+Oe4wSMG88KnQokd1YYwA/8RIsn7rpMAuBPE+9S5OnFgjfFUA7TP1q1vi0hIa
+xUxmSn9y/Al4/BWPQCHVPktB5zo00V82Hxip92Ywcm5IL1U0n1TSBPcFDq0v
+W3B3xVAjepIPSBEe0GBqxh0pymCzdZo9m36ypcNKKXXwmeSiGFh79dVXU+xG
+rSuHLmlKQCIOE7MRB4KhHHRKRpqSGEyHBHdqkvHIc4kAeCE0cLgiMTp60003
+jUFzYOa7KqcMybqnSPQPySQTksHE+fPnPTNJpqtgAySqaSNZKKkCI5JmMevk
+nrY7EJnFab6DvzenEyNmC0nsb9+ageTLLrtshKxlDFmAiSxTwXe+852H4jKh
+UrwrWuJaQl0WakAgOuexQpeW+F27XzS2QbRvuzC+W500nWHDWmJcQr2y1VWp
+ez/dQRJn0GhZl01pIcxzYjZJR8pcYIFElto4Zea+9FZKk72BPEGWAKbagihW
+DrKAdgmnfnvRi15Uhmu6aY3j6AdhMOtQSRCCGN41VHpOepF9HJlP5G3GatqN
+SjxhWzhbzjv70BgJmIczpYmpKlNEQ4UTFNS8V1bqwQtLH2lSEZcElFB6X+bu
+5MlR0ZiBhuCeAQNa4SzzrN+vOyxa8To+Q4uz3aryAPiFjxZQl3M4NDXQs27z
+O5zIhs+AoRlmNdXddFuXDVZkAQlLJRl+OeGUQJuTaYuOUFlSo9Ms3pttsK5f
+NMxwK/6b5BgSxihE5jvvd7mv29i0mtVY+nRVkyjU8mxI5BuRmIV0almAqKfn
+IwdfWSsKewR0hXFzQ4MoLmsHYZ7MBQCYi8g6PW40VcWUSVTmrEyxe4R8LfSq
+LuMRUCeVRUlR18vysjRAZUKn/A5TogQV/KY4wRasC+V+fMQ7yjVWoCbXBDTU
+MLmOIIauqwVHytjfC3ZnAsk0wQs7qvYSEiRZ5w01p2xXhpAl+RAYh+ge300Q
+JbCVYEt1MNCHwTFKziMEZ0UWVaQzCIZnNkGGYCUsYcEm7U14OEmFqab3tRmq
+OY6k6f7LlxXXL/bPBECeHAOL5ndr/KdakDSGcfGOxpxdAfJCg2REWdOvKb3E
+SKTH3dtUE6oU/G87vnO/Dop1wcXwmFitPlfKO7cEKGPFcWfT0Vwhv82/C8Up
+MD5LNwT2FkgkZqb/Xrv22msJOPMFXuU3eRurhGFl0sdk5qxdyNPrWLPlIet5
+KQBp+RlxXLiAX7hQr6esIqLM5imRjIBqBkSbnnAC9N5Y2AE/h4sZA89LlwQa
+Je+MQW5oS4lF53KaUtg5OZ1sRDgHtdnEWDC9rM3CeWuzsgFHUFAO8HTrgldZ
+YaZn+QZOzfYrQCswv1NTqDsqRYj1Xtw/pe5VDHPuAVXyNc6QP+W5eoFN8BOb
+qMa6Npu64GzJeaoHBZb8Ch2kZfhTsV6CIOYlUhYhwwU1+bNNMLYLjCxwLJMJ
+S0W63FJcVGUPB0lW1uIdpRRT5WSAzHXtd5+cGs8bKGQvJkQfIKfiDPaSis1Z
+xboQndWCWVRsM0mIpoSU0jKsCgpCNGMNwdYN0IMQHTigWghhGpG/TJQr8tE0
+FazUMnBOQGuzlHguJd+q3lmNwsx5bsprKWnKSQuEzMDAO1nxUY7riOjBWrxw
+tGg9iiFcpFVCCz6MnxG8lbLmFfVNnnC32x94oBlsEDgksRcqeVYNCxQaKy0S
+ciWcAgcZxKWlrawHSZ+eibKf7n9r1wpTkRBTA255Xlmxq9OTxpR99jv6z45U
+iCZAheuvv37QCLKs4wqN7K+nNad4FTu5zOxblelV9JByNvRQZ7zmmmtGkwyJ
+F2Rk1XSmkohZ8Rm6EZlWimsJSVYJb1u756Z6ys07We8I2EU3WekncIKZWq/v
+k7Sy0tSQfJDOjLidq/sZutNp3niG21G+MJ93c3edMrfVchLRYsXsOt5e15V+
+pGuSyKSKD+/G1mzYStf+JlFNsnhoL1+0DC0VEoakig72aYnogZMxrbtJ5vwA
+Hk5Y1uV3JBkq32UohWGzNMARaYuILl68OFazJJM7hvnXNxm4yJGzSKWSTFRQ
+mgxHeMmGCANOGj4Qswo0hZtMmyijzHLlltdlN/pN3Rw4EQzrWgIHndlbjWx2
+SUelsOIJ6Swb0rRcNF3ivPf8NlctnBxuNuXKlJqMQCG1YveC3cq1u6x5GC02
+s6IzJe+5YpeuYT4zlB9IAYsLVy56L1hUgjMfyPOVKr4G1t+hDYve97rSQUWW
+igpZS3NSEAZPaBeNooGBlS4nKBVRCSm9OQO0bQ66p2l77eu50ZEOM/MOQ2E+
+cy1HlQ5lBDSTPdJgmvySl7wkkWFq2uAurrx6S8caz/au61s3sRW7icFrbCWH
+d7ADWSRCzBMbHofs2SxSRIWAno7bCE8TtJE4l01SYpTSGN41SPlqBbBV7EWU
+/lozPmUezV/TzRMxyTM9z1tulGV6mga6ui6TC9y9Kvu3eruRrN1R1hS/011i
+BJGKUduvFOYrgZmrZYYwsx3p6WOYv2HcVSPglbEYhcf9jTTfCUvZiuYUvwQU
+kkKJld/KVLNuf43iy9qyIuM1sJdtYqXUK9/B8szVZQUttYRwgFhpFRirhRJB
+spvj+Jkqiegv7QP0nvCZ2oEpalWQkYXSjrS7MmzDp2tGlmyk+ZAHTSRi0CcY
+JZdMR6Jf6GgM2WFXvipBOYXH8w55s2LxGMalup/VJ/IO0IKRpQzxHASJlpT8
+8EY9rYBiVhFY0FVXXTXGbIGLyu35Y3iZrfrUXpfwWEmF/pWqp0uEYkGgiiOi
+9daSJoygIMIXYb9EiqEWVrx6Tm87jXpRTEc7lw+cyMh8cBUkhym64THUkqxA
+KCM+SEwMS7J0IyHmVT0E1rLuXY8+F10H99n4n4SNnwNDHuGIWAKBq1mU6ocp
+WVrNSzMmOYHXZNmZ5McwvBZfSZtKThOZVjncpbuWO4nfeiIxSwNHWaVsJ10L
+CnRpkETFdnvr3Ix8UZ61f9TWaIoB0YJVHtm1zVurPyg+E5/XSn03pbpyVDA5
+Y/poogZSKP4yVmLyamqOnBmWa2Jf7t+mEngyi3wCggZnf5260RFRkHTH5+OT
+WFFX1UQmtbNURYbD/PnoigWjFwkFsamXph2si7WOSkElIutBfIIqYLLis/Sq
+N+k2nkj0en39yTb8RIHcTH2ddXMr4+/aHSIC5tI8EOI1imxccx/4haEJWiMI
+P7FahV6aZf6GShQ6JfkgTvui95sntjqy1Yb+OsTrk9Pb7jlxanhagTVxV1yQ
+oWXWAWQX1GUpHnTHlH0LJ0ds0gv4Z0aTdNBf13WTPCPZkHYhcHrCEfqGxyWG
+9LQy8S5Lq8bAopNbYyLg7UWRa0GaqZre5FK3HVpWb54caX2mxcNJaghKt1We
+23dMtI95CifjwU3dQWSMNn7L60MlqjuEmlQS+RLDJcD1GO/MPorj6Zhe0URr
+WzLTSSMEhzYLAwSpfXqk3TRl7ZFEOCX8KmZctbA16Wq6U74iATHxGk+3i5xC
+xdPs9jjfCstwsiMDQiSHVIUilt4mdHW/JCtWXMhyzGxs0YTs2PxtszqJAlTr
+9W8jhMQYGARoU0GEBtwM9cxmTBYmE0zRWXZoskkYX24lg1c26xOLDrK9HUbr
+ks8nHkETXpZpzf2dyMmUDdnQbAgkEyyvFDT0M3xe+a1OjD8ysEQEHJdRUGM4
+x9Br5An7KEpYn51s8AsoZSE7B7ag0ZX9MEWQ9yk6gP1IS+B26dKlnES27QZv
+Z7olm4adHEqJ7wT+FzE5W9KTqYGLgVRelCXsu6RjhWvXNPO5KnMe5F5Z4eDE
+Ce722lYMpm3MOVjB3wbHDbAOjj5Hf9A5NQp9GZUwsTxQTJnXNqh9ff3kEIFK
+pb/iebBcJMe5IZ+6ggWwMVe1bAtP+TOzQlI/aXnp2BU9MrInOGhdBnBVN76G
+lz4KAEIvBZT6/0PcPjl0vKcHDs1WAWblgju3VDynKJVinPw84C5UwnmrpNNG
+FmAI0MMeQz288nybTqJOJknTF3tJP/5hb+lLqcN36yYb4KQGt6/inhtGkQPY
+fNAPkdlvsTosJgnOke2oVVkkU3lCZgMpPz1YN8zMo1UOx9khRnAShh7hdRa+
+QvUULARxItsU/Uy1ZEP3NYtaIWztBuLRQEW68Je3MRj11bQPddWXtW95AXDh
+Rskq+ESr1e89U/2nC1YvtlznUjAiaLDu88yC+MwAGZbzt0yeUF2bo0tfU1BS
+puFKhKB+suogQdMxycsVPRg9ZZuGCQNNEDLB39jPoI5LpVQsRJgKmyyEvnph
+VE/pTK/FBsU6qC2gSmjPerIIyWrTLGrAv3QpgKElRM9mpR4dErbsL4x4SVph
+rhvSZm9HTrpTPy5ZhUEqDbw5H6H6UPnSXAHPhHgs0QxyQGmpw1pRML9Dmop+
+TjZ5DQWLrGbxGsIE3T48DEUhosLNezSbWAR+UIRy/Mk4saC3pUyOgnsORa1t
+bqfbjieA4zmDgdPg6gizNP0ey9vsyGir9XTk64TUa8AhseRjym4iOmIA4AyX
+SRGbUVlLlsQSWHo1Hws+a3gpV2lZQZRSOGaCI5mL3l4jOwWH61mL9ELYxh2U
+4O7VpHNyWhHsFtym8rEmDomBtNjnJhyEG9QkJY+Yo2dYObnfq8cB/TDSs6wd
+ws8J2cMR73p6DdHsuzszmK+Z3nE1YqiymxPUcJ3QwaqOCofrecYznpFgUoCj
+aR6ep5ZVJo1/tezc5lKyZOuWbir7MqSKQgoF+uMyryzxkgVkv8et3YZkF6Io
+hxCuWe8Yy8qVtJGUdGV4tlTsp/a2CjzXLb4zLCCncCGYuEPL3jtgoqOmBFyv
+gQvUMT89oHvyHXOCCAo6cC076I6rcK27jrNz7gHNDc85Chp0aM+Ijsvp0wZw
+7J0WB1miTyc8J8enbgCuJHV9D/pI0JLKbtZ9LoN+bBOFRYkEREKvbmCPawLA
+opUllkSaWfTf0vVzx4zjjce/zx3r5o2L6Vd3m7IcvH4TxMWePXt2hGNCDwQd
+V5t9035e67Ao+3q5jjPHUPMmLVEWhB/wytI9NTZzGvT7lpWUM3OHPfCGLu3o
+Th9DzZu1AMiHtbSDOq66+6j+joFFvCmo+s4ijEhERU4eLc7btsM0V7fVV4ur
+WHO5nuQ6eGI/mjpmn6eQR/nywFuIgiecqCAnq2AFqwlORRw4LjTXe0cm8wTP
+Ytm227j5fe5QwSH7hviz3hX9lv1YMHQ9akKtsk9OCH2ChKxSuazpE4t4TYTp
+w/Y015HUYCqW6LGcRoBFBgdGJeM3bjQ/vokJ9iXvM58ixYQ3FRI+qaUF3jSq
+jCj59YhVFlp8ne4FEssL/XVdmzL/0GvTxkduRIw0JIVORVMkYNX+iI8+he5k
+tgMvyrPhF81WDNlKIqeGjJQBOIW5CPD8qID4ijEkVsIP32Enoxt7mk+AlMA+
+dBEurR14g5/037nm5fxQQ18JpFMzks/6jpdgpbd0s9gobfbXVla7OIkiQyjA
+srNKJTMRAgCljV5f8OhuDscswyrhtYpcGhYsh6HCVg/iuHxBJTyZsC6R10cb
+TBL87jue38TGw7qfHAX7vOc9r/s5N4aoHqofiw3YPXfh/RJDuMNqfCUrDXcA
+qxEZrZrFLW28/KH0QQBX3d+9vyYLOiLOK3s5wgOOVHLhEIC4t5i7yOWN+jum
+fNe73nWE73lOq8zJspRHdW/QDxGCuSLuUYd7o4gSc+fc3dbfcdv29lg+/Ob9
+HcPtrePd8tRnK++SvKYJPk6EuZv4uqlgQPMQFVucCh7AV6lYTv1jbNasiQ+K
+We+2aXUJ97iS5o2v2qSw13xM4dfapA0adotXlPVu3RBjsrzZUoSAjOhHUr00
+niGThwREGJBc8ciJT4POPA8Z+pDrmWqttJ845rs37e9AozzVrpo8RwF9t+Df
+6/VPItGsc0kwzBx0b9YmTVCz9ghzWFmW5q/kCkDDFEw+lMOMcWVAB09Y2ie6
+8hWHDq3qo0JD4pO7SZzLIb8+SHZUrazwSf264KjPp51NSmw5OX89odtCmue0
+ZxrTLssW+eFuT44aUorwadLffSTtwVv2d4xIeqgUmOd4QZMOotR0zS9x8hZp
+iIcsZlVuc6rokRFLsoxQzQ+VahkmRSvvnSOGcyZMywtVt/VEfWdSFikWRYXZ
+8J/sV/JEBwTgrxvWrrf1Dre//e2HJkuxUMli2VQZf/yhnuye9LPHpKYotqUm
+PVMPa+Psq0rPEBJqUqNDPW9aYdbcmsA8jrdCT6ffZ+CiRhWRVS68dTAl/FbP
+yPUMPsjpkCNdv1U/asNPm+74QDl1OKv00y1cxMe1NqeWJGDw1wetTW574nP6
+bB6H710VmNojOJBprM3ypHm3mx1k9dkiG6JvK0YF29Z9kShX8hvrI2eGzplc
+UlGw7pglFgi84vBTOMNPyeEFJooe5Z+OPJVFhZCBUtKSSg8OPbVNQstas05N
+Ap3y5bbtssPaM0NoHSkPT85rV6jbT927R5lzuH2AyVYS3g47D4buT1XYAjpE
+sA8cSoqtjTnbeNkh+PVToDSrUJWZ5BpWaVVUPEKWE56KkIRlHPn+DPCTcx/Q
+9tderQOw2TR/9LS/vIfmwvxHvUpnXtCZSdoTywjWgxCzqDm5pMby+zLNmr78
+JCY2x/uAleUXByjmYEnyY/sWN3G5winBOpPZ6+xlI1KT6QobPAflfNiB9pqK
+oYHznqvz8yCGUOT/s8QSgLLAhzZZdDzngVMvJSZAQCFlTkaGTJXcLFxibiYN
+wgi+Q4iQ9IQ/sCUKHTAN6Z6nZbncSmrAufsITPkV/QoAek/jOEbVEqBtXFcP
+Iah1oQ1LLNViZvIdiJE1GnBTNZOWQiBzC+jg+W89LBVD68W0A4yYi+DVq4au
+aKrLvQu8epDmO4vGkZ7DcmQ6huGjeMQv5TAKK4ORzAoce5/ioABSG/qqdiIV
+CgKSfSTauReK78r3pGleIlJBNk5HKuJrESS7xVGzQjiXpMz3oOfFL37xlAoF
+s7rVh6FGyWiJ01INtTWjbfGqkfzjvmDD7/q3kE7b2Ei5eTGSFVGIPDxHSyoc
+OCSQGw7dF+QD3kFd5o0YLCZiKEp7WdnQASWP3l4xvuMXUY0yeu8dusG3KkbJ
+jZlOvfvIxoTlsp+SkTTujsMdgFU5lMGxXCUcUZk8PsYvLzMLvQoA6UhTQDfB
+6uh/QQK/qs7P3QsqH9nDX2/yoWesO/Ppat36wkhM17+EJM8ZFr3MBiBCsDZC
+/94RbptkkVjRc0EMdle7h4Rw1/Gt8NaHBWjJTD0QoTpwSe2Ho2HEapOwLStH
+VOox1kdK6MgphuhZEYQAkjFz9aI20drrNAfW65ZYB+EZOQ4GkPQt4edXFN38
+P3XOOoBVAtRV4kTt5CIUIkU7XFHQLKdwnACAPV1SpNJNnzU0Fp6oW9BmArSK
+lPB1Sx8piHexjNFrE/6oY7BQ72X3F9JKQC2ArfZz43Q5BoNh7MhgCQZKo0Y8
+iyEQG/KhzISG1n3HfpUzcsML4cjdMcSzwrbeNjVKHPLY+rvPqb80nkEDtQJj
+aJBgQ2mOXLvZgwmLcugF4SouU0MKU9yaJ10LzMSAYuwcZqo0JmTHEXhjfAKb
+7Zz+mwYd+mZy2WQrstG/MgmB5txP41dvQIe2RNK8BPSgHMokaGASzEDWLbcz
+LvNcJIcOeAbeS9kPSebOA41xUFANU8hVQAw5cYY6U1FqK7Xzu+e1yFdZjQGj
+PNsrcAcQ4ABT8VEPK8SfERD96gNUZ+ZK3XGv3j24e3NK4ZTBkwYNsRGShPoq
+nOFFcjENzfJsfCMz9wEK4oWYEJ+OK9mkl+uKSAmI2JuD09VuBIbRmmWlSCEU
+K97hKGFRJoiCDOU+v3seueBdHQC5fGn2G1AWziwnyXgHJhKeUEPpUL3jqClt
+mzgYIiwgdpiSuLQEFUfsK3GMnyteznwR5VvuNB0011DXOLQ/c3IlJ9Llo+Ne
+EDzdPnZkvU41f7emlVtEADq95v8TXcyKy3bPj5/8Mw+B3nZvJwQyHOrX9ekh
+VsW2ZTnIstT0IATQDq2GWRi3EJDt1+lpIeIgofBSPslzc0MBCcNeHzkxcyxf
+EorSk7+2GZmuKF8zXHnq03kbyPTG7vEd9RfL8T7ZA88rMSvV84qwH9WEeLXT
+3fG6dK4QPEsaPK08YF9Grl1RP6SBETloq3wyr+gcmloX3LXmN+ifcKRPfZ5H
+h8fMmLVxGQdzFNzxdqGfWzEmTmC9aZKX5Ka25UdbP2wnV9hmQtOzwFG8YASy
+i+wnJjlxjbDJDKPlf0VHliYhI/ftlj6nFyDW1M1eODs+WCtGJCxNL55n3UAP
+hJ85c0bkkl6EEDxFT7GtiWD2h/cprJuH3u6ZWpczszfsMHEe9iqJ829YlBMh
++UM9YafnVaxS4eIHsjeEXSRCXPdOS895c1GAYoLQT+aEpTljDBNEpwoN4Ajc
+LddK5ZAcgadHrFVM2ZhL9RtAT0qbqzg0Gy2HhD1Nn14pB4/Kb8gQhDqFKuk1
+J7FxhsKTcmqzVwbOIlGSXrkjwtdzFsVhSi8c7FL5FiaMEtjQLhAXsYgRBU3L
+epx5qJVVG6lj+C1zidJmbOWqOSTRKmpZD02lO1hKrNruBRnzyhKDV29Rtsgy
+ZbrHgoyGE+XyKxXaMvPLBjjyj9i+oNxoln+kKcRk4EV+WoV8AiY85YIpUL3y
+gNZocRm35ee5OWs7/Erwx5GK6I27+NGnctyt5WE00mup8qb3V4w3Tbb0YceD
+TCGH+pP0KKvEyVlOIHCZV9tdOUbHzCmYiEUhiUe3MIcblar2WcmjGTAjhlJN
+zCYJ3AF43LW8TXW3bOi+i7UypX2yfmrwHeN4/Xnm3HaIJMshqj77u7F+uy1I
+VCeJAYQ2pFd8nF5oAu3Zn1a9nQfYJzDiW3qR7xI4MSHEOo7eXJ8NkIhQ/iVo
+eYBjNraVXNsEI11cj6AUeeB4YIKLBy9gYr+k/8qRYMI7cGPml3HK9pCBJKzD
+brBFNHwKm97fir4t5Oz7R0dfdL/yqfv2oDk0xsmB1CMBKBbA9IWYOXWvs5te
+vLitkRFqosyHr6w4IS2TO+IMrPQgLfO+WtZiLxofnSsY3nFl65l5e1XO7BUE
+VqfbBN91Q8TKOiqAICs3TcAmysjiU9JBhNiOi8haKxLwG3sgc1yd16adGQdS
+JlJN9bOYefceB7kK3HPXCAUUKIPwezT6KVekgOCDQj3z4POMqm1rFaIZIBE7
+HSHHPhikHDGHDbKoXHqQbhhwtrr44BfEwOp5wuO2fJj0deEfKUNpyp1W1Dg9
+XBO3A18YjT1PG8evGi48q2b8I3ElQ8RLSph0cvMseuN5YXRBQJb1Eb1wDQBB
+OIsRi3336J/pGU7iHPBzl2qhQWZbcwIxq170ioKoDeSKKjYnxVNeikKRvo6p
+JpsS6ReT0jLQY0Y8eg1r1Vjegmeh80Ys6DPFesNhjSUJcxA6B73+v1rM6g06
+gqbso7OQn2aKEekGfIPMsp6STBYa8SNogpoKPpS7fE1WqvKUvWl/rk2Cbyof
+UiyKDApLkje2xgiyAkg+/h8KILBMP/G3GodEjxnjr1gsQWrKCrtdDpE+PRBA
+j3DIP4rD6ZIiixDyQQK/i0015nSJPWocqoTEpc66NXHodghqI1O4usdLlUg2
+iOr1QuNtOcbF0ZmByKRBfA7U40EoqDgMeFvrnXyMqAUd9lNlNzsw5bJ7DiOH
+bPiKzzIeyo3orF3HWooF44tnN/TXhIbjcvzqIbqW43eZe5amiFIcUZcIOUuh
+9OY5mUV6o/kp4NT7N/ZYQJ1Az16NdCUUkD7nbhxE4osNGHdfOb7tLECZ6K6i
+gUwlp1rTE3uDm4QAAs8351lCTuymRj6SFL0KpSCsKGAfHZ+aV6ppt7pMQpki
+Uo4/7/thhnDru/s1VUvmN3JQvbLL4vZMLAGWSoOQy+9OcF93rzNxay6yktd3
+us6hSmCUyvXSn/stZrV+DAAw08aZ8m5+DVzq3SPixmURhOFDTDtR+9jsTPyT
+T7Z6ZuU+9yXnAEmiHYvoirazjQfZ4kD8GI5k3p3oIRov2bnCwB3ijyCwEsbD
+pQp/QuBSkZhX1RmDCRA6TbbC0hpI7j/k2kyD7jOSbdEDN7W/Lms79SVH2FPI
+/fEmZwblJgK4Q7XwrvwGAuRpYE7v/sGrGnwooO7iq70JnJwH/bv5LBSIgOk5
+U0eFHGDdDKpgBYRzDmVZ3J0PCynA4a+scsddZb2sNTcFlnvIYRZwIhWqQTFz
+E5m6FeOlbPxir1MeXq4PcB5YgCJKHBEJE0SPbk7fRHR+GIHsisfBSzhBLrQA
+pojA7tmS7yP7B1jOytaZ0ZXk239Bj2HWcFPhglbQSyQtH8Oj0v3gBRcH3xGG
+vYhQVHFfUmaM1yrY3ZoY4XUuPKl3QgxtFaXARxqKXwXwIUbol52JXIYyYIng
+iLBEEzmc/85tMpghrV5Xo7FTbprdAlmekiCFOfsJvdMD29Aq9OuKwTQnKIJr
+hFZ93tivMKfes5jsfDanDEQ3fB+sv6FJx05dbAcW+u7CCOd9RzcChLmoChRz
+gDXknAIpp0n1WerZl4Rn6ySqIKzWqpUQBf3IMLZuxVqIEnsyqf11QRfmElPN
+JQ3JXjTpPQMoCYUo2mM6Q9zCvXAp87i/GeGwCD5XnYjZY+pyKCBlz5Epa7mJ
+YleIe+jaoujbtkL43EASxpoIiReht71xPjZGDbpC2ZnLdkUCNCWvTD2Sr781
+6TvvJNekYu1EWv1ODZfI2wr5JtfPjFdFfkw/68pLy8IPk9SqbxgstLHMaG4q
+vnzoMMXIoUKxM/9vbIAJYSxF4r8VcYq0UCVEgkS6LSUPVXgl5ZX5owpwlYcK
+VcasAoOVTMjCxULYQ7I8O0YqHodw9C2HxKhIZjk9Q9W4Tor4eGsq4PGvHHcp
+uv3w5CwTbS9uhFD+nFJIGBzIsv6aISh3aSa7T6mtkCasAiQ4wLzHnbhby9JG
+bilXeJBPaVWicxqh073nOzViXgDTp0nGrlTygZmf0auekbsMJCC5+lyTstEy
+9gQosIDOxDWzc5Eo/ZqnrG43ABEHOMjFt6UkoTVVkf2Ww1NDIdBK/UopQivn
+gI9o5bThXGjNHJEP5kkFyrkdEvoWEoA2p7vGGqm+eMZfOfmM9YmUoI1ylNUf
+euZCswkPiugFBxOM10ByYCmuUAr/aAaKZnw5DZR+l5xubEPOWeJ0Jmf1YDIK
+ulYyDNdr1BeVnRnMFaT4QunZ0yxbnR1IxW/hKJji3vqivZnPKBf2HMvouhUs
+p5+b1pL/4sN6xxYL9z0jgmwJcHjbTkImdbkNyggL1UId7ZYKAWsaTx8glcVr
+oc4zUttkW2Ki8vst4GSI6zb4bFbN7as5TizHyYPqirpCRA4UZlssguEDBEvM
+szXbuGWKLCX5rBKPOnrpRiwbhw1/t9vfa5GVEGoD0QMqI7Tvswaj5wImaXDu
+F+HrssKcDSznXw310jsoKy1OE9RHwiG+w01zNznvDSWiSMDOvK3zKZ9/aSE0
+J8SEUCGi9ID3nBW708PomIavcVgNMoTiQXaH+IhQESpaKE0LOtBn+q04hFBi
+nifab2UIrl+sqbbAw1TA0FLPZHKOwXRqbnZP5RD+3eKMPcNwLOxdnXEffTLP
+4CETuYuouC/HnaBO5FAuR/DTw/JNEb3Y0poIp+0m76aAyRAKbbLMLW5QD7lt
+Q6vAiHJZmH2um+D3PYsXy9GiTNbRcQhCGIb3Nvd5I4P8kTPwOtdSeNUO7op5
+6QNNi8vRpkStLw0fgvP/Ob6kbDpUER6cbucdqnLJltaZgXQUSth5EKq0TOas
+SXYpaWipJsnMaRkGKATmhUvSMXWCy9H2m3AuHpq89Qnn2a1eGFwf7TfDXWM1
+sWt8Fv0Ui+exrHhHufiNWdU8NQNJFaH66cZWeQhI/qtDNAAzF0VpVF41Xq0x
+l/zAq5LveuoU7AGES5GK5LmuXPvA+T2sO85dwIm+qQKx9k6ZdOxrI829j7hR
+qJWOCfeY6hh9YnqkiVS+c1sqMUsVRoS2xFNUBiOMcO5N3hBWwGDQEmmpcQt1
+bhkG0ioKngNiep13l2/Znl5onajQzs8aZW4KwYDswZfa8DfSWdo3p5ROTpMQ
+H21Gum2z8xjWp36OAHk5LIh7U5kFWCjpE7kPciK0MWMV6jzrGZ7W1O7rdj/a
+kchwLVmJrh1/M1FRIQViNIIBsVBfwDf7YWAKWLyYIaeMVjCQXTFJp3L+F4SY
+LmY7y6aP5Jj7/6kD6cWx5RYQVwdGPJkV9U8mkAtpIx4pBictrJVGmiwvCacI
+z24kr2yHAqrbzysNTg7k6fsNZwmXPvR9eOODAIW43t0cyCH0XF+qCUEZRy6c
+jaHjMG+Vy5fdjJYdL9n8ta/UnJobwfqk2XQFrlWd0lVf/rGs+d5mtJHj2VTb
+avAtm7go2gnBdrv9NcTUMIWcCEtcSNROacnpz1Ap57VQATWA+m+CU1xWFU+q
+aZbkmc98Zo7WMKw+NGr2AqmkGgVqcxM1U8t+k5LEJsdL89xPYVLcBoMF5uv6
+GPPVJlpk1jCBTqfSxneotL12d4X7dFrFrqA2XeWswyyR9CFcPpay6l48JMnT
+lYEyb5iLFIoM2EShmwnO0zZYFT45UyynUxlFTyTPulaztrVo42+OWchIWWTh
+UI6aZbSgKTNkVEhhyoAv62foTcJSfIbMZOCZyATTdFO+awbCuGCyjEaQlxnK
+Ciw3C70wfAGlii/QBEwTGWOmT3Vzss/MgsNM0TRLNpLm5DywdevSq4QAdAEF
+RZJyQ+kVgiEmuUOK4NAua94qJMqu0b71aNhGPZINplnaYs3VQzZhXdPcyiHq
+1EeeZ3lTZ73z6kOOCyjxKzTWRHtum+EyWaQeuUrEzYPEz4yQW37EaUi1LPgu
+luTOZp48ckKgQ1uiHloW2BfH5tlWWUOe++Bl0uQrU7vQLPO7UZAvDc5d52bc
+3FllUXIhxHr4nFlJtfJbl24EWDhPHcQIbG3thmTkUgYMpoRBnrOMwpnfihIl
+guCPRXdSsVcRwbkRXMopWD2ZgiDBFJAr88pFhLgrIMRKEuHUuBY7vnIYKkGz
+VIqqWfBd8dd6vo3Ym5oLBmQqZV056QducrP7Oud2rgPZ2v+X5IGPuPnmm4dA
+VRslD/M6mivm4UhZIZ5rCOis8DXr9UR54AfnirM56gCIWYpAyza5XxwOHTuy
+/C0VQazKcbldTJpUghxrlwUVVNB64hrsxqrLB3XYiCe5d5mT6Dv3xt8chN84
+R3FCTpVQp2Sw/rqqSeSiYXdOEMHMXDDtA1yptHbusCrAFkvoomO2sJ7JiVp2
+M4Pa5kv7aoApIq1CIO49Bx6IdIgt808UQwkDg053t9lf4p/if3Awy7yijmrJ
+9XqyXL7ISg0fcZxl24XsYStz4pW5HK0ELo2PlbNcBHuVNjuaMGxlHz2vOO+R
+wT5mRkmwN0fRsgZJOGoTNJW4InxwxhB8RHEGUYYSKglYXpKbhwKvJEBv6Jbe
+PAexBbSh0khUSVcq+0iZMUKjpuLYD9t6z/ewV+0Wd1r+ub+PkHtbxRQ01et1
+3xMROdCedj/IIcSExx/3US5b1L3NKwMK/wCJtU6BVdAsEYaF8MXimC/XbcyM
+A+3yFCCYNb+96GhIQNPQoJpK7qpVwqcj5a0uaz7lrpIsu+5i0gAHtBs/50Y/
+SAZPetHItGhpgNnRxCvMsIAzhHsFoVkbC/wwnUUSEJ3gajUPIA1uHv96akCW
+9b4er0FcbMJFISJ6UJN1Dj5wYT35XtgqhyFysUK1HjtfY9D+zLNg8EKl1HUZ
+ufrA6xANGxFtxd2Vi2BNpjjKBbUqEpm3pa2kxdBJim7MGaDt0hKxK3NipsrO
+T33qU8/3QL3tp3DX5KnETZaQG0Ppdw4kyrJjULQWLrDYwqISxcbDq0bTekO0
+1fl8KzNR7iNwv1MECs/8BJl8L3Ms5ThuB34mJfTIGvktojJ9VBRkUH7WU5+3
+OnqSW4GNbDMkRZDEYWbNJJyMYtApEQKPPt3cVQNWXSZhrJQ9M4t4Qzlgii5I
+IwsEOQRaXNI9ohta6BLsQS4Wp268Xg6O48k6BJ0rP0Q4IFlxi2JLqemMOZ8s
+5TGo9RREk/RZ7pjdNkk7FMdSKOJlhQhmFc0m9nE+qWvkNmsqN+saFwdS05tY
+OIPIqhFOkauCG7aZx+ezDFvPXQexKc2lge7reYoQkVlTYQaJv7A7O1KJWP5o
+8oyCGZl+eZiMCCcsWBRfiAksMltGRMHEBWy8Ap+MCG9zP50PoOlj4wbSGw3J
+q8PFEhLXU55q9kIPiigzIBuLMi8lKGXyRK4paQDRGqQwS7RGPVQ+TJFh1LWH
+NciYcgHx6dbR7PXiMTOFSUsSkmmO98gRMJm+7nBivbS3HznIgcFZ+ivWtYXU
+kSgBNc2glqKmTp+d0iwrKymyucanQ7mZCRKpqFj4zk0D+zKfjaQt/E49kFFj
+Ev8C8GUV7QyiYHqiPPuzwbZpVFOe/AQoNRKr+eAF5YVEDDmVQQn8iS4WoEp7
+qVZjavWRiO7IoGLQghdrKgA+E8ndsXuDvjCcYIKmFPG5ZAODi7Siekw0wnf2
+ot0e2LVj7DBBsmVQ/EVOAu751UG4QSI8gwzkZlC0ac5+Tj2zZKf3Gh/kHC7a
+LrYxUZHdSG3jg8IKfqNLmQLcLyrYdqgobznyJ9cvWRMghUMgPVjvKMA/hQkl
+6oe3kbIcYUtWDkMm4SveKUUrt6iBODE5+ZAAAxxIckRFlGjuOzo3Z9X8pHlN
+in7o27zt7vRxxfFDB8X2p+eiLw5m9UFy4wdaIXrAKHPsqEQtfQulugTBficm
+lJYDCqU0vu8sGdEDSjUDPuZqtNOvchQCSo/bsnZE4tgIgDbyt6aEOvwFXBQR
+r5fjEqezSJyynhKlrrE504yiy2r37NKFuSjZUQ6CgjhAqxTr0GEOnqXCuXeW
+S1T3L02JV8Ri/CBB/zCovoOufcG2/pNkGWCBTSQmw/K1v+7T3wEba85KpScl
++CX2QwHdzaovkXVJKFagdWYrWhgLQGoEoYBOqVZRhpe//OWhgIV0Renw4s1t
+4ZsI2Nzp+YUluGnCjHYiSPUJtyuWTUJBS7kIh9aeW5rLHYNrubI3fU7zBjDe
+VRh4aAuUakFKBqL6KwCrtnMYAvZ4jTlCApGlydF1G7b41Os5PINi4xf22+iS
+Jaue4yQFbgUbx92rc69F8LmgVSavQATH98W/syOsQVZOKmcoIHJ9RjiUYgME
+Cnwq31xc+vJJjZsjzYmesSoej0OleEdkiWliR6nZJpDzc8WVmhaG0wzqDtio
+ubPXYjKch9BrE8f2HaEgA5khATb0LatToGzBkgRz0Q9pPcJl3M+xF8JhmG7Y
+NawgEbOS8yvXKWo5YKhGGcaJ9iivt6gW2XJ1Vl7nhiDAR3XofjHxuMMcI0+9
+sTLaC61lC8GEUKQZVKAIRtrpUIMORcJ7mgMbvZ6rxSyMyTI1cZCclubpsk9I
+D2WvQYrZOejEp0iRj6V8ItHsnhL1c2Oka3FnQk7QwgU5Bqi4HEESdhbPRN+x
+M9cwnOp/85LOjlDrKBB7UD+aEpzsOdMuBoEPvXMt3AMZfdL70HiyLdHnZxhv
+dyPbpEVmAKv1bGqmSEntM/MEeCzoOe6em3s2iyAMWMiHLXmfKzl85fCZoT5Z
+gkRQFLdsOhSqHMgAyQz2obgElThCywQh4hYQrXHqMXJNTUZebqYNB2NJy+UB
+B+vkrpDOrrniTTRG4NOHDxysWhTjjPzgEGPH9XKbD2yixe1gTMbF5e8XOZ2c
+GRvcCA9gBAjLx7R+2XJ+TkVEgpxMeC71PT3iRQZkVhGb6s1jD9C9ez8P7AjP
+WhpHdexXtJycJ4+zrnSvYkC/E34A5TLW/Mw10nfU9Y431CVy0CJrsg1ZoqHi
+PNfEHyvDbUffFkoLFYG5eQvc1FFKssC6rCTeUNBOz1x6HJlpuXelHirN5dTw
+2KbqrgzFXznjWNe9BmEkohRUNE9wmfcV1wF6NkNn1ClLeDlfK2uDfLgt+NyX
+x+8XTm6LPlBl7oEALZI57jzouzVlWa2vdwAF8gT9dgCHMq6ESgEtESoTK00N
+ZVlK7EOJkzP0wcnJ4jgRuKwsIWQUdM05jWOFt03iXpwBY86bwUXIAAV1RGkJ
+1W6aKGuHeOOvKKQMD5IqsK3ZYM+iTQnmRC9/3boMMuwPDdAI2hWERkORkjqJ
+FZnImltEtnVyokOsMWsgm+YCxfDzrLBtEXRWpvMW7L5aOU6OW/Hm/Lo7YXxy
++2/22O6D8q35lD4EYV2yWsNZTfGQQjk4x+GaSatmEs4m0cCVGkcm0V6tHLfz
+9Q4ffb/tpZSTZfmnUoxQh7UUXifHYKcSc/NLDE6AFhEaDqb67sH9vMqtiCVR
+8P6IiW3pIIbzvSnsEUzgcLl2mscQXLFVHKe/c2XvPm/QQ3EoM9wKQVyPv25s
+gjgRuCt3lyiZDE4zrJ0uAccaRFR4oWfWg02aWVBINnwNF5ZmkkMQ9yte8YpQ
+c4xA1oXBQl9LMrLwhfWKTLinnPiCcAtfIg0ctB8JwEhP1wkx4Qet57Yf2G3y
+YX2i/1AAAsYzx7jevqmndb1aar+KZn/at3ClbO3KVndZnJwCDDCi5BGsBX/U
+ye/YvVM7vYuCgC8hikntBLuuqe49iYuenJ5LaRLMY2D2l+Q4izXBRw99M3Pd
+G0gztY48TOCsOWTlfBi4LkQgbugks0qYgcyj0zzUH+Oh8QSFU4MaX5vCKXAK
+blFRKUNOqGHIxGvZROnidf0YBwXKQKRXMvPXdZ+rmgJOyAFRloGIpMJ2/89D
+oP36fjb3sKWg6L9yrFRzKMjtu3sKJpaHBt6TqFOQDr6zCJWTwuGVbbBRybTg
+6CjXsw1QpKhWRodw1NrUgIdek+NGhRkZnu12u7lFlE9VQMPiAsX799f0EK9k
+X2UhkRtZ9wUR8+APhRj5iNDKibvQuQwgdUI5l4JB302U4WlYsuyv3AbHJnQq
+uCrlPLmQSLcNu/Qy12NRe8aq35T/lhN1uGWLiPaAtM1riq381TyNCGhADpjO
+4/wwftllkWCYd8AF6lhGeX55PfuykgOCS+VjwW8JPhs+VX3BtJwP1ImpjHi9
+m6pjiPFX9tEy2XWywOGFATztOVdg3ZzADq2CALPZnJCt+8wCIAptkb1f63b4
+Lov0navw/CNIBazpGyznMqi0QYpymOVY3jBaqaIXL044UD3K5uzgNQfPqeha
+bEw4cHS91AGSMTk2kkoK02UY+ig1vW9bouYpUWqnbKODeE7nTt1rpvGsMlIo
+90oftT43ClA84cW6BzirF/1W319qu6P8sCKnA4r/xRUGZzAMPnBOheS5uhaJ
+4qv5EsuUsgmCXGJMT3va09I7KLXtTCBZXR7ahbuVmUVclsWACv4hiyj4W34g
+W0h9sqs6XAbeuRci62jWEtq9FqUFO2tGThr6YJxl8rmcz6NcD3aDGs1DNG4/
+isLSct3guuvBngODrd8jEUEilLDcNKjBeKk2p1CmFAFzhuw3p5zmGmcanSuh
+sNM0mzKk+C1VMFUypxSbEi0/02zOGlhlIZ0pDVMZrIaFbogKTOhVIdOW8yg/
+1hy9KzN59H4Xy77Ixb9sZ09cHM9lc5SUU/onVIj/SonSzMJNzRgcyNRI2Wc8
+/6veAnlqbvcQ95RWZ2OsHIIkSIxSQREOdQ0aeIXceHljN5c58L7V/opmd45U
+62BuEu//AWTPYDa7c48TQ0ZAMm5Pa5h5FUsyrNzdvHKXG4CO/lqvcqMX/soO
+/twBTbV8SI5aMaZS9FwVdaTWl7LZcXc3McVMZSXkM1xc6TViQz7iA8311seu
+KW0ZTuKHRD4Vm2QRZKI3r6y10Qz2EAtPzlXKe5Fv85r4oEIQSM3iSFupCwzS
+MswjgfUmQTBLcTmUsFHu2OnR+HiGcRBN/TcHc68lcKi83hr1qnccnR8KkPWh
+PqRFgT0Hc/m9XLOVkDc3esOPgq8knq+h+KlemFsjsg6OxACd3nMYkehVEzmr
+rK9LnjmiEeX2wZv7O/bRl7lM/jMEUrcc675tbyJMjLauRHaNcVzmeuHScbdA
+5VDHtX0IpMAJ7+7bnBeopK4iYlDoDWIdw5oNSC4MpuqSjWJDTlXMHKtQvNLF
+pCK5qVeMclv3nNjBPxY9C9aOG1GukEIpjDMXJvYTzC1XSB1DbHjdF6stIfZW
+LoZfJpILadMKh8RhA+nEcpQNmAPXMtCnNP3KCGh36pX6mI6Pu0Hq8U0/KowB
+i4QW2FSQcebV03/P7okPskBGrC5TMQ09JkWrVfZpaYkJSdGkEKvw9fz4easZ
+WFEisCBmavlWTRB1zTbmXMhYcjtuviL3VHlF+b8z19cwgRDUwrzcS58jZstS
+z2q6xM0BWnyUBSPKNlBckrE9c3IYtlD89OnTfX/QdjUIE4QtmciiZJYaPKmJ
+zdJ1BZ1ll+U6rlx1JSYRqtDRuR7/NcqENB1zKANR3bZQLYtj2Jn6jxZL4pse
+XT3iRo+r+UgGmSfx5aghgQDCOnAY34GbQAVQfLOGBbi6+J3xbE/tHuRejdVh
+rAvspTRbEDHDN2oPpShNrH+dMQ8igm/P8RCb4m6bp0zsZVEIMfCU4ozyawEf
+ySqKhCO5VG2FfWEx1LBDw/xvRoGMVCyEVoILMYkzOFomT24ac2RyPtJAMmBp
+wWYemLJLETB0W+h6fuAsUVtSzc5sjxCzcKGiOjM+2YGJ0b5T4wqXvO87OCNq
+T7tZoSdylT2ZhsMx2QAlwPHMBOGiNhht6B1lI8p1ctb1dzN0OXiH1jhv5m7I
+eixLDLyBVy94wQvmBluhxtF1Z0BDca+ayBh97Su8ygoQ4sHPPres16ZsBmpK
+nuO/2N2kdJMrdPFFbKHNqRVbIq9JepygZlw4RpFPTtNehvy5ixlzA/YHXNZG
+iQ3QjpVxD0Lo3Fnlb9MfkD01P1kM47Vw02+c6t0Od0OfNGnCJ1YALXBb82/c
+35ll74uFDta9FwwZKLWqPnQxLmKmVu/c30k7BC/+ymVW3LVTLP31kMNNMATa
+al38evfj0aiCXeZOyce2vpAoioXXNYrb+msBIVeML0Xhgw93SF1VVWhjOoS/
+6NsfBbnN3Kurrx0iQC2EZMra0yHLULvotadHOmTPYhJF7bXebnOG5ZXpkOPq
+M4r7EsaT84plxGZ7DYBdT7XOPhhiz91d+sx5zfV7cl6vJVFbCzXZ4NXHQb5W
+/yQr6uP0Z60EC1C03oQlbnAap3V7oZxspN1AMJSLUmxDyidHLSpg5wYtdZfc
+xhqyuT7PrWSb7g5td1wZvrlBj/NQBZqpHHFcKjqwy9ukpVrqNJ+37lZhgpLl
+qggoVr7xV+4oAuUqHapDeU4khefHUIS/iDUzWoFHKDJ3gUhRNffmv0o2FXlP
+iiCOqRVnk6Unkbm1pxx6KBKTUXor5/IcQNS+utwR0TInhQFl4Sgl9Dp6Y5jg
+Ugl5t1gzFTBBVSTUc8XW+k44K6ijArnVkmIqA5lxw3xM97dDGEvMTVFQfsmb
+p7IpNDKTdWbdjHvuan3rZiSRSi3YsVkTMRXxuJwjt1WZDUH1dplWPVXfQc3s
+Qe0zy998IYde8xDpmifN8VORj8wpUs9zQPronWjcAxRYn3OIed8Ml+6/qX/i
+ZBRp1tkxzim3aabZnHlpZiPPQV+Lfo5pluhUedYrmgB47i5OsxRWys1685wA
+r+sIada/cwfXhiqn5/5JfsBCk0LjTtP6ka3ejheZo1diLq+8LeSbrk5Ab96N
+5kf1aLnvVNlu69ZIKhfzWvKqkl5I0629YZMl7ZFhwDRP2LCYFEI0RRWQi3Es
+uVQxKZIA2Y4Fmofsev3gUOvbInzRYngJZ6rVJ/fPuZdWqOVRrrjCh6f0z1kY
+48Mjy4LKMO+98uP0SFL9YpGnixv2Izg9TwOwsgpaPOtZzzpI6zxkrnLjFzi6
+CkHvfXgEMgGmBrO5CZnaU57ylLDImdOsi3SV6eBrMT4/Q2wegJZrQTJUkXP3
+kRMBMbA3Bc9osScbB3X+2zd9ZprXtFNW8ftAhGpme/uyebiWT9YLCJ9UR3Li
+jXAAWpYpBf0UpXul/SREL72RbzADSysI2X6+bqQn1kewV1BCR3IOrJpmInZV
+ROmaCDGrmb1DOikhySZVZgtbNoouDmqkpD4KI1Y1eU2pQGDKVWKNedmNN7cf
+QX1Wd/jw7OsV6gwFQ9TUzMVJWnmh9corygSuRDsyqpbYTc2oNXvKGgzrE7KF
+IcwTt/DcPqybby0ytleuHXhsuimfHKfuw/hErr0wZ6gocTF/5pyriJiW9U9l
+S7e+BupyTsxKHZuPEpEXvCk0i2j1yL7xQB4He30njpBAeQX4MSzUmLHmgfCX
+kslNvE8B8ZrnKTcR0UoFc6Eb9TUIYiNuCsfaernUQa4Dk/N1xDM+8izI5FmJ
+NEvl8OR64EkC4m8p0jpxkdLyPBj0IHsPSQkq8EHYDOnDw+Uar7kaJJfz+Jjn
+IXGYSnzTTK4dam+SNh9ORHO5tYZXyM2luY2JOXCtduLQCl0ptpSS3b+pzR4L
+qKScz6mE2sO3fvn3DcN8JB0+zIFCGRFsTjbGZyBJu8lTEzqybAvn9Ed78J0l
+MyHk+t27tjUh2bnWZT6byC8/dA+VD1I82ucjDi0xWgEfkvaX5l45VAKM54Nc
+77JagIKDOEoYfY5jjg/L/Xg3tN7nXBBBAuppylwmdJyYLxs9RcwYlAkkr7KF
+bJwGZSXnWBgxK3rJhIjfwIrYKA/VzL5KrPS2lBxh1eL9uxWs0ImlDuzVNGbp
+Wug9TtA4sgraKxQE2oj2hHC+h430LidkKHQYK7crfPMc4ebMYY7MNGWEzbmT
+nsStRrIJ+upDgqbOHpV2UuHeAT6iDeyjR8LrXh08nitB91AuDkFmES/SRAL+
+DtNIkv9XazkiaBTjJ8+MQ4KZeXzwhdF7nAsfK5AEUrmPgsCLCVldQ/syfWO7
+RyHz3PikECAGIiZNETTVAkqMTs8l0Qc3YcYv4dajuj/UKFe0EXbNmGzsS64H
+XHGwFmBkFxxpYF/SXU1QL55RHMXVV/R7YtQwLgxcF3lluxVAz+4HH16pwrBH
+tvAYfg5sYUnswUeYkgIXXuS8P9UAFGieE6zmpvD4B7zCm9T3gAd/0ov8hp7Z
+LnRIeHeaE+/Zwg1LsolRzQ97yZ2RI4FKUlf+AG9jqnQrC2iFa0gwLO9UPBgJ
+YozwLEsSU/bKci7NFkmZDlu382530txr1FvMFyjz6pW2+7BfoiEyDlLPFEaX
+NDmrRBkkCikMij3rNyGy7jEdSfpW8pVYes4HNjBwcSQIZdCspRTwmmNI3upg
+l0YcqQl6izy44TvMJSffs+/c3M5YPQ9PWJZylFC13OWUOZ8lpYi/47TpDWeN
+NLlabi4NbQRnCLt9ErXpwXUDDKXKqUDjQK8vGrDD1HKiIYzIc4wgxXOcFdz6
+vefYIncjy7maPkYkesmcF1WZh1ltM3tZaZv5e65JFmJt9F2aamaL/9JuH56A
+tjJZmgrqMRaYoCpuACCv950JRkXynqnRbmRcMZpg6etuJPFZlwfnxRM+nDdV
+q67DbvYh9rJmeqtdXjYvhUQRylCebfK6iotDVY3mRO/6Ty/57H32hcF+Vp8F
+dQaXBTP+X2icQwxO7Bf0np/HTRp11BbcmDzhV5yXeUhNzg7G8so91T+CMCmd
+osQtPWzDsciN5q0LTwjH9/VsbviiZckOMbnvl0lLMJ7IzbilJcQqgwgvSoRb
+7fiaQfdS6Z6HXkikkpLAKajBN/YJbENGvS3VoHq4NzZ9WoAVnubaBIY1vKSU
+uMEo9kvPzg/fTcC9DHN0Yr6A4UC7tfjBiFoN58VToCXJLC4rEs5kdpuHRe++
+MnR+2JoQQdUn6RUFQIZscF2dhuRUtx/VHYuoozBRa2znoogAKVI1+ABWcrYo
+qBFys54oBGWUX/RKnkObPvow8NzKFibn4A1hsuaFciWWu/WbNLNXnXVr1wzr
+IZucX+NDEMCNquVmBtzg1jXJFFBhpKyyAHQrAp4eRQOwDzf7mLp5rZbmZYP7
+7UbXDJDL+c8J3lkgfMXwrATzLo238MPgKaLAC2NLjR7S/Mezdc4ti77oaprP
+wfXUvu+sH/pMreguHQD3cjJWxUgF5eueTW7FrGO2vbF9FV+kQ0ZmRcvV+3t/
+781tdUeuZ9/g4Or1IsjxEedJpTktlMnvxEUQBWWRCw1jIBXBTmoEMYJso8TE
+bDUAdXdZdKE/M4JZLnkfHz7fUm/aL5QTWPHxNFLbEQ6Oo4HAM7wc+qaEaE0R
+mkmh3NMmrHuO7vhiKhQ/AHyQuxztOHSG08zuPx/ql93ivUJiBF5iN1uVk3Rn
+p6vkDmZAWY4COQSFzZlY3K+Vn7dGsgJx2P62s3OjGXaue4CtKMJulXkrUo0v
+0TMmiVCMiIYTSkZl9KWuObtRi4IYs0tBI3LnyfSkMMFOIYbgVCq2X0FyfjCM
+vjCmPn5yZihZipCrBnhONm7LeO6342owkybnrgyGRnZIznfkm6HU+1v3V81j
+tzWtVqU4AujkXuYJkE51DcnIGRym8ahFXh+am8mjnI6zr4bffoARcWBGFJVG
+gGphtnf0wmT1TByoInGYKCjJNYbcGz+b/gAaxmFI+uMGUKi/BDhZw+C7nOtK
+PRin4JY7wfQciqs/BiomMxWVc2BonYjTdJQo9vnPf34v3jw3UA0ox7j0TaCQ
+tZQjKISR5L1n0ZVDRjIQ4T8Gkxv2IMvwxXeCYo6RwUEs31u8sFUK+yDLbf2e
+LvwUFWODwFGmF/jgrMBDH742IynPiMdxXr0NbivmWniAHJwtW48AoJ+mTTul
+O4/Jm3Lrio/INSew7ZfTXxg2Ka/CdJNzMhvFeYt4KA7mVTyYRXgYANBUaIEc
+yuq/uR/PzyrzVgsAkvTOWeGfQSeVZS8m1qAAvqMOEImGcgQbW1tufsDXnkIa
+H566kOLmVQLXD90Fnn0F0njSdziH29m7hHVAWsZCqHHMShqelXoINwAHXRIY
+VhT1mOYyzlBXRhsf5DVmg8v7lSaXD5un6lQ/DlhBmsqDOTmkaodu5H8WTGVl
+n+cEYzyrlctuDspSpFzF7h9ZMynn2DI+h4nIO9GJz2IRQMPLkpWAIjvvyIXM
+JH3ZeFGK2My9okcNAEiHxHJOcq6oohRraImh7W3be54bVgOZcSjgkFjv2c9+
+drIeXyliA+McF9yOeLwiyulLWsbfku6P+ZiPybpSkIa39C41nizVYN/rpGJO
+UN5Tef28/VLEkpTRcxwuXx15GyGfjkxQCm7IJAUTdSXlnIy094rcp1nO1YMS
+3eWip9LG3N2XK+SUlBzBQAF5FT1JxliMsL43EeYcLQ6J7vLoCgzF1sbPXvly
+9QgM0Cr9pcc5E5ku5+hDTgcPc1cEhNAzEThm88SI7S5m//8YM60A0ckmRZW0
+QsCwrijICcC7XeYtzg2RM/AUX2kUBOPOloQRGUyGaGgFMjNr1QXIg5zDq3tl
+GoXs3Dskvub+L7VpZnMqsrNjPG1DC6zoy24HsLrv5cS4auDKMWRqYhKOR6Nu
+aOD+yZRwclRbUgh/7/F+m5COkWSjtHYzmeqzAfZm+EEvH8CPF/oOL7q2kvsC
+wwpkQVv4jhWiIOyAAOsF5qS5362yXYUiFDHV40PvQDA7z1WHtELli6EG/YSO
+yYfVbenx3kdtKQ1Q3h/SeziyPqSw2w17a/zPKHPdY5qkMIByO4jHIK4ZJUAR
+LAWnuMjBWR5WjJnLiUnQ3wyZxHMDCJwpjTgxVqScHF8LLyyr2K7+uXLE9fBX
+GJMDnzVn3QlYgnhsS2iSex6QYflGtmYjDa5IPymrDKiGfGkZ/ZpiMB2ClCNu
+o791QIxJNHqQc4SYHkwxEiapayYvFWVa/l/iFvMHZYYoXvE3Hc61j9plFzlo
+0hCZpmEavv8GnXEYOpuDoAjJS0iQmWuDAmW1tu+wqhStxlOY1XYRZcjWqWxV
+VYMuu81RsKqsmSQ1TCF0hce5D1LrKScbaR/bP4DOCFAonrSnKjuPcMaITV0W
+1dtm4VkGZHcU3bKtaJ8QslcyH9rUT/HdbrFuqlGy3VRoN6tVRO9I+nwnrcFT
+WwQ3bT4zIi6oDpJZgPYvXLiQxdQ520kISby8PqV2tGD20qw2NgpNJ0ZF/uIw
+2hRR6YQQwnjyQq6/tKI7NJKjKYZ1zCIpyzn2322HkithaU8fdJOpwGb9MocK
+B0/2OKgKdhqPBeIe4XntOsg41gshszuBMfcxr/MoRcJXVpHYyATFtQUQm+Zd
+PkZA28V8PIH4T+RNuzkjyAofUIuV6+5eWk136rmDBx1WEOrWW2vm41TPQMuw
+5nd9c+s4rS/fcUB8oMtD8x0Se9Xt/I6kGauFswmbKCVDAls+WQVpusMaU3RR
+Ik4om+lr2CuCGqXC3hbx32V0QRdZQ0L3nBVMMPmONcEbw0zYL79RKMrVsj4S
+E2TiXoTo7y42ZSTcKqFkxYhuqJWRAHkkEAzIAVVUs/Q8I8HoLh32Uv+TAwUP
+bwM6PbfS8NQo3TZj+O3agRHUKTcjmERkUtBNFMHbcnGYnVUo1NYzEgG6BJY8
+N++Q3M4jlW5rptTpfoc1R5gBnjez377jOXiE1cywmfbs1zvcZRAKuEJMCilE
+tX5HbBLr3pk5r76KSKM5OTPeb9yArME7vVYjA2LROb2zsCR7EZiMEH5/u+u9
+hqBZtEfX6wATZMXJka7eMnHoYwRi+Vwe7JNYmzKt31HkVcGMgLboy+/a9v/q
+giWqjMTjzIKZlMSjOHpMtLrtfr1s5tL5UF9Wagq9bxIZMK2XMqfMLGM7XaMn
+RGoZX3yOxaoe7wNXWjFyYIC0bj3CEa19FOuhhYx9bPL8jq+WQq6nH0m9eTaT
+QqknA13ZMGWLUuTq2F7sdOjWEf+PpWgQUDLAeYP5qXlyHR5NXdlSQszfr9A/
+mZrS+CuFWNH4elt4ovR1HawuFNZXT8pzGdkaF+aQ7aJ8JuRElRs4fHKlU9bg
+8qy4BBOY0HoxDFqItiuo6cYQeCDB/bZJ88wI7ImUUHggNl+BT24M5SvbMGfr
+OERFTUmV38wuHlpuEPuqwrbM1QBc6ZUlIqt/3/S3kfyyGZ3lo/de9joNhacG
+K3NB0+VzBocrzP0/8rlc/kdUgJ9Kq1E4uXE1KMbE5ktMD24iV+eddTfrxFn0
+iyEZ0LKJJuC1vXZp9Iq7LJxQ/VeIBeh9n3O6KR3/0QfDTRVP1alUfNYodGm0
+3tUGTPa+VWLFmJy9lnRJGpyDpHg3+kbQAE0zxaxc2yOIok6MTRCp3lIDCgLQ
+LCUCBBVxLb8sAQOofJDcBbCaUjvVQkKelE7/oslsDvehhH3N9hCguut+CmY7
+48KzrLyCg3V/XYT0sCYBwJjBUTG0MF4zIUGQIBfqS8JGdzk7jzB5piCi+us6
+NZsLNHG6AOU4EnLACF3IBeL1eGwBqPYM/DzVxKAJgYlhHGEUZUmJtS617fLJ
+qImrG4rxchWg3ii7weHd/ry4UwM/oB9nXs8dktaZEYTLKohcgtI74ANwuZpO
+9JcrCjQIGHMpMPBhOfRXoKLkL4fve2ozdPVYyaNDCh7evXOwCo4CSUYqXqkm
+cogX/ctsG3mJJspi0rGoGH8Zko6JUxLfBeV0jG4zLwA4J2AcnQnLrId0Lyfq
+iGQxPaEjZc1s6gSeM0OkMJgtER24KxZk1ePS00GOe9OiqJGuBWS8xgEWpEev
+jK+9S8r3EZu3cuk2R2KV2HLorVinPeA8lZN4YCZgpG44NS9R3u4vgUq0sdQl
+EqIARuhp1izXmwfTnpx3xJrWT0d0hbR0RMCWYJUFrp5DCNiLB+/aLTH/nDlx
+7fJd162nDQJgHoY05kmp29lNy7nrKVEBGakfJKB81mlkybrHU0DRmvxrnoS5
+HV7BOgiqhHhEAFITTBc1E52y9swLzs4d6MwK9mtfWW5/W+a2GMVzuegppQRi
+13HfLRtWZ1GPpQJZtsc3KrtiCFY7HKleXe1HhkKT/Qx5CkJWAnLesXFE0VUe
+sshtTmtsJ0qgy8H8wS7gxHOaHeYlJCA1jpTqel/+ovybymTBUmwI4JpQ0QXX
+h2VTuNuxqSQYvySyLyeUq3doFGQUVc2rE7ZjWTL7UXw+IkB8UVlMzVuBsjQl
+rGOaBsS5UkNKXp4nV0Nl0tHX8ABwlalGG4myL+8DGRFXFqJFUQHVbbfdlj5T
+hm8xDVQpNE+fMmKjTxFQfXPJbzLbLqcr8wuKEbKIIFe+mtXQkrC+BJ0CBNay
+StpuGpEgCwwz6wI8lEHoqUfxtlQmAhKiyC+hhOgcSpS658JLWp7Ih8bgg+KY
+qdxS52gGPcwVTXdepXV2sMNMT/aKUBCF1f0WuDMzAvRP7sMsl5DdumSSzjkS
+W37DO0EilvKr83DCbSeV+VWb725pSqgud9xqPVcD7ovl22VZOUAex/C6cr1Q
+QiQoUaLNuYChhK6RA+MvUa3Ln7S2v35j21XLqtvh5FGxVY4hz5wzImEEZ8rK
+Wbaeec+ScuI+82lAHhhAK+pU5phhwQVTgNRIIODSgBJjzgZmfr6GOhY487ex
+RS4anfCjONXS3Xh6+Vw7RnXVhezgztwUfvc1VkPNcpvpekIQt4bf4gRDV0Gr
+hPJgNY1cy1C/39rdsjOLf5gGvHNqRc5rhFIUKaBMAVU3020uZ+V3kC0qFVbu
+a6OnZhEDQBaJqf+BK1/zdNnjLUjvO2nn68DTyGFrAX1ivT4sdLyC2n09+MxQ
+WNNvuYtUSFModnEhiCUT/4zMTg3EhTVYVEp1RDgpsZikFVQr/GdKdRWOvlmv
+WtY1TSsvCYL5ep26Rye9ssOuYFC8qK8mNYPZ29zycKwD800SiOSyxCa4QqVh
+Ko6Vx0/vMu/0zrr3W6E3O+uy5LZ4dOsdh8wdWRaRWpcYIndvR16Cg2xIXY8/
+yqVDERabzVVfmKFwl8CeCplFT3LPOB3srKyZ6zeT2wn6U5KHnPv8esMB2Iee
+EtamZr2BeDvQW9iAkqy2qNau7Q4AC2QQ4+EX1gL6fbl2UxvQzUYqin9Qtyzt
+BfZMQMuC3zKlXGhPKN4wBEMjVJ6FwGroa9UQTU6UzN1afBS0MFK5utGVIeYG
+TS1rlWGYu2HquUGTrIXRWRZDp4u4GAg67RvPljtnZNQ4coMmscpTWITOVwhT
+g6Ax9LgcwhE2C7HMZotkWKWgo8LonCAJRrA401YmvOep+tu59X0zgH/CYbBt
+YQ3ZabTnvNNo1lgnY2aZ02dsm9mBBRMo1IsvIHGcwwL+Tl4tIOAL5q3p54bW
+S8HVimhuQN8AS8tyqp/H5IyUmP7AQYzdnwt2epQQZP2GItc0LZ8jA9ihmGN/
+MMmpocgp5pZyN6cf2j2m+gkoRExEqoy5P+Dw3JwFQjguMUuxiZplwW8O1c2B
+udgPFzXFh9ivn6ZArXUxsIXjZs1iRdFFWeoVTTOqeNQ+dmrN96nqHhO2jNDw
+5CIZsgSdF7P1qcKCpFJUBdYyfRKGlUVsThhkVuzEY1qggIYoG7vDyrWNPnau
+lWotlT+NA2EMZb8QtkaYChjooXymtPKK9ER65xX/MNDidyZJl3Wu89R0UN81
+lskFaJmTrIOgwCcBYN5FNNOAitkTmbvSiJ2ymIW4fh3vhhHWrJjzlRWVh5mv
+Z56a3zYC7MpdAdLLHFBmqd3+TNwtbvMeEmGMzUw5VZpa0G3Jbm/le5WjGE3E
+53mqp1CC6UwLoOcUTe2jGQ0WoFoGlI2+2fHMhu5weMg0eL2YzjbhLEiEAVwg
+KYALTd7Sv4nb1iN6hDB5LxONlAB27c/R2DyLWTtFJx7a1pwytDOLccl/uE47
+b5QqkgInTc75fPSJAkMw3blJOuuE1gNh+5K3SZ6oDFnQtstmWY6dXQAUH0Ot
+1E6kymNSWwf6ZKfeegMCb0vfrm/jIUCWQjlqWOumazK0qjRNGxGn7pgZ8aBA
+Ik3Tu751dDZNnupWEKrIWhMqj1o6aKUbVS4r2Hh7cTxNAwEWtAVggneYh9hE
+nmptgRhiT6q+TKZKuXNIbm6j07zAWFHDnrH9+rsNvbhCddHcRkcMUqh97Way
+n5lasFkufvLIeNkdinkgdpTmKZr1xPT70f2dPOm6664bhyWkDV5M2kBBccBB
+gmmD99aG9QzZeYn30jYlXZDBtiuaXe8qpKzsYzk6nTeDEoLL+in1u+QcfTnK
+ADsisEC6JBYac8JG1l7Rk9AI6uxXMVX+oMMs41JxX6EnTQnks0RLiONYlDTF
+TZoz4LXCMloszrFuKW1kKb0PqYOjtCEFksWKurOBiWuWlfWRnoOtZiL3p2Vu
+sCf+4+MY4XpOpOFbLlJK2jScmdPqPrQMOMwrI7d7BaT5lmA1V3JrmA1+2QSd
++3IwMXm4D7XvM/Wmn2GgklZzAOGO50xPmGqL38Ld3iMzZ660nTNUc/ggPVek
+4b3DKe2ZQmdaPpQT98FRAiVKDOoES9BSKtUVwskx1X/+bj/GbWMX5F4P+yGJ
+roRMupQC8ci5QkdYR+fFWLvF/RIO7w7m4n6FE2FBmjU0a6QoUhZzC4d6K9qh
+87Fz5Gbawyo2SqnW9noGaO5qYmEWS7BLZuVAvBJ1ypSsTVYPCz0mMPco3WGg
+Ip7S1VBCHQl3ZSJUCcitc7w5+DjvWoTc+207Imir3A6rkoNatVWWlDfEfH0f
+6zzogKHlsNtcTQTr1EtgUFHyqP7a2HRqNXrZeFqVWmWaKK0qeckP1la5XtGK
+UmAh5o2tEQhSzTa1IobnTsNN9sDNihX7epmR8crkcsxluZDUVrlPcQ08rQxh
+tapeVzAJFDknoguBPCZUJLeK0o7w1OjFdjYQvPSlL42OABVRwKo3TIq+ih7S
+OP1S3Occy0zC06zZ5N0rRjnuwqj1pk1GyQrSKiDncgUG5fSzwZLfY5vPec5z
+poLTyj46c6oaEVnDZOltusFENrzeheS7GEy6zvXs1s9XavPAw2YMjxMqphUO
+vfe4TSXmx+DsKhsoFmSJGZN4F3Lmc7LxnE2d9qDsUWUUawpA+IKtRrvtNODW
+uTxIBj1T6fZ8cWuGxGy2N+rONvmFXtYx+4bKWXqQ52RkqpSWlDSLHtg/yft4
+2r1ATs0TecwvVHOP768zXdqnP0R8cSG23Ty4TYZIFVrpINykm1yRjNnA5Lel
+xlnzR4Eo2n6u59S8HESP1cVWNei7rbag3jKw/bV3p6dtOEHG0mCg/Lj+jc2y
+b7+x4f2l4dtyE2GgaCBs4RtyaWF2uaFE3YXf4o8k57mWuew/hS7sYdh7ju4v
+yOJWVfqt++4R5cQfTIcyZUgz/mCAoD8nMDO6jAiF4NFvRiYlW+8SURU2onAM
+/uRso0RlEghZOQzqnHsAKXEWhy4uIxLU7u8/2kZEpXTvjCPH1vSIbmkJEn5u
+vis8zZ0xsEoqcbvb3U6s+7j+Gvx7EncLpvI0z+Br5fHCocxFifikQEgQF5hK
+mZPwm6di0A5ADPRQqBh+lIzK8M2KWs997nPTKZXlM3Vc0u1xZbkGCORZ/WrP
+NsVfD3nvmfyW1Mmh2Z4noUSBTMvOD22QOn3MbRiQR1xE3zCL5RsrPSuJxu6M
+pRfvz/Gws2R+Jeysv6e1fTpl575TSFrgDdSqi8C8wSLZl+p6Tq2DTGgx45+j
+tzHarjLRd0W99+1HKS5a9hsDTs1JWyazTEUSAd1kbWVVuXAISgjR+eoC9hgX
+rM8Zmg9ZR3JyOFdoRhy5hkrgn4Pd37C/o1E5FDDD4FrkWAgpIjKM7N/f28zJ
+HOzTL25GTkrCQJhP0kmuSTygKvcXgXp3uYhAbahD+gzo/v0TL5JLH4KUa7z+
+Bv0dVvWWuFkkxIyEbzkRm1BQAOsEt/urRs4NwEIGn5ulYwSm3Xmd3j7O2E8n
+HQ6t+3zY+/VP7KgvL5lzA6hNyPzYZVQpRly9dIUaIc09ms94p94nWsMdy288
+Y2NIsC9lqv0kz7byus+TmT5xDXDX0moC3CNDER6BS3/lCA71gUStj1k0Ltc3
+5zmwmzg0ayNzCfd+3eOpIWzvClnKsKLEssk4lIyIosZtp5s1mux8JlX6HHqJ
+YhXRwt2uhW3BQWLHrEJg6nHId+s22EgCGzZlZiptrIy7tIwwkWJGDdIO32Oy
+CZ9xWImZSy0IPwvzKlZYF0IkKry0fJeo8NCorxjpMnwTuGCYPAWDMpWRNd/Z
+eQXMCrHCd3ib2mrW16yR4s1tmfycJg0OALE9DOWTaDWKMb5PqBiI5/8ZUWBA
+FNdZ/uyLaiWKzE0J3jPl4q/NUi4Mzcbo7HfP/dNZp9FRYs7C9XgCxEPbX64a
+vJR7ZA2Xwhgx5NQEgUBm6FMXkW1jbjE7nmm9riu95rIl5dB7NeMEUH2a/NBQ
+0CocMQAk6MpAcvwHrQT+RJ2+aAqnsL/Y7XBE+rBmEqEhXwifa6YIyHe5tbq0
+ODPOIvE+iaQjqAlMsspOpNscL40pVmFIlqYp35v1Mu1hNLQsd2SxC0mE3kEt
+bkkhhTJmguOCPRdRx78bPUqJugRw934U6Gh+f8XSpYHwSuuZjidPckOS0FwI
+njtSMICxyEdyqpXfuGrF42Drcu79vKPOe6ICwqpkIUeDJ0leIwBwawuEtKq6
+iO6L5bK8Kd4yKaVWy0XeelgEvm1XPRtHN2gzniUSNGQFpP325QvDPVgclflD
+0nE2gqhJCuy7MrQxk1WxplFr3UoM1T2raIqms/0zk8xBZzlMv2AjkAfuiG2/
+E+jUyNEyPzD3EJwcIGJ6YD9lcGE8qjrOdrLWN1MWZjzwuCgIMRRGEd3MAjbD
+kOLvuYVWVpat/GguMM3SRWjnImk/OTKEmi6MIGpvAzX5AJ6VR1gZAWscaKAF
+G9rKpG45LDuIpsJieilbfwkApYw2qz+xFH+EF/uzfrbLnK1LTG0X/hTN21a5
+k7m+ZGyfOTP+vW3GEs5X9nWQ5ySCIM1KojzHqoTKZ86c6edODSuWubLWCmNu
+7FFwWJyTLXaDshPjmJLt+secUwHXejZ9zG5lCDnoLYsyyLCyoZAmqkEKok6P
+f5+blqrug7cKfoqMKgr129llBAIkDWUE8CqnfhSzHtpEJLHyz+nTp0dUWK+f
+7Q4hlWydspuZyWNKFfXbxrLzg9VMer1JwgQGKYnSQPV9DytAVpXtlhiAh5aw
+7q8p3A6KzVE9Wdrk3Zz8kYVtkAbLbNOl9i4eyLoHGMqBkb4MksvdsPSqoWgW
+FXhPpkHhkM7Ksj87S3zxNdvXe0lVQh/IdXg41w6dzO292ZOQs88YcM429K4h
+wtuc9WyIakGmb4DBXH26RXGYbXEcHTJ1sI306gHvih5e41cBKIrXnere761l
+c2d9FogpFdyv++FTYQ7OqGTu+9nyfjjOC8FQAs6eS0M0feE90jQ8ffPfOVaK
+hwxMb4cNbGzkguIENiPr4PLyVzkHKqcngOlw1+sgkmeDLGuBPpvwE9etZyuf
+W57LHRynGpVy9V3fAjPZJfgVb03bb8/oGW7muqb76Ip540DfemMLkfgObOzP
+OdrcZ24Re033/WQzuPDnTP9ivMYTJU6ATWSy2bRDaz2jKpgdcXjQ5xgeyjnT
+b8Ku9LHb7SuP2VCwP1Bv2xEgPIPkkSP14lmKt33IUaJbjrkpnGm93nFpf7LH
+dvcNuxHDpFXzc4wCVZQ5W7GsQuFzcPKW1gNtggY1tIxOKEYKCdF8cqIKDShp
+PmERrFcjRHbmNbaVvW0gQMblN0rRk7yZZFk3/KFY/M8LSriedMwzuQIMSsim
+12cyAl2r4kF2ddHucvx286v+f/bdCL+AEsbXqJ7SX5NS1siVf99Wxx5kIZWk
+UdmIGzOhYP1o6X92UKlqmKQxYZrggqBMhjrlWZoCcwtv8woAM/vi4KfciUDu
+AKjgvWciJwEMk0fjJcAnyKwIOq1xqSIYN7ElLQDsRy9y5s6SkN6xmwZRYBNE
+ynIQW7Cbpg1d5GVtZJoWHnpsv+3i5Nyg5K9H9Hf8iYmd8inzXQiJheuFFBif
+yYcbV3GdGcUE2yiw14SLiLQojjvKGZrijXXgXrEoOz2IEqwt9Nedummqbm8E
+PyK4QGkZ+urphAOFJbPp3C+93vajoGoRDj5n4HRUyOiQgbybY+/Lag/thzdX
+jJFHBs7zyRZ96KrKYDURsSA6FZFk0CJSPexjze3mGGV4y0wycFGUdaI+MIQT
+LcNN033WzqGmASA+Y0aapoviSpLMqWHyTeHu+i4FYwn7Uz62HfriaZPbRwYu
+kzP4fMTV5fvu0IYKdv0s2St+5AaeLD4OMKkok5RVPRm3QN7u1XzYXwUHaRmd
+IiuWWlqalnXkydSkVQfEfeT4iH4VLvGRllbXkPKqGMzGjxDFRkQL+7ntOWp4
+3Hf5Dtr+f3V3kBxFDEMBNDBJseAImVOw4ThN5yjcAa4b9Gx9t4fKhiWpIkUm
+HbdlS19fsmzT89Ks9I0l6QhuWowwL0A7QoH00axaG3SUQ6SGt3QsZwFqpiKK
+tAz81chaEyh42G80sqQLvtKyMh2bRL9vAyZqldmvnuRP0UDHG/gz/5QM0pMK
+KB+5zstIdxgztsIUawafoob8PHol+xUbMojivfeNTJNdQmI3bT6BSTN5QZ/l
+/pqjHTW8dr85DGUAMNfZpLcReKWOIaYNpB0/vkMt2NT9/RIpAYa591NfO56S
+LrE8NoeR1OxEYEokoXZtMZzLshaL98vUxSmqBLj91x5IgyVfi5SFEkRaYMSl
+oxRp16tp4hWnzTSD8nJgFHvWbi/RLnvmeA3qfrQDzOWA7OVtaXP/kjQjIJOh
+zuPocdZWclMRvO1V34et8Z0eXhxAyJpbkH3x3EIEHKBfPT7/gAP87/+fN0Y9
+r7OSmUP54pQYm/yc31CK9K0/Fnejj1xBkakkyQGpuBWmoW6Cxbf5nqOHmuaw
+XlWVFmat5QLZa2lv7igBLzRCFAXECmhToc61WzCFz1bOmF3NfqrxsQhFhFpn
+feCmdOh87AegkcjLoi2N5I1cNfi1n8mW7uy/JxLAUvsfak/F5B/9lPJhltD7
+81cYhQplAWW/nV4KJF857p61ZCxkc3M9jeH1+1Lflubsp6R9FGJZ+uWOQH0N
+fhrhau1J5zKBj2Ep+hIZTLIxlgyMDEirQRaKRAYwn0sI0zScQl25VK+wnFuf
+ZTIAt86Iw8O3yj382JXvy/Ajrk1kqxTQSr2G4HQmg/eQFxMHyaqaYqBpkCMI
+vfN3e9WHSZSS9FkEAXcmct4MMds3uPg4gEWOeCf5GGcNpQ9QVgFln90y/IFB
+cpv1XyL5NcaY5DGL4WkLpFdzOEcu8fCFSssrYj/pvnlgL8dxlN35fhuia0v4
+nPCbz2Uze6kQIuZZdXQRk55D/5xlIhJjROWvV784Ei4/WTiBoaFXAPog5m2k
+kXCi/SxxZKcv7livNXs4Y9L7whuiMqWIyhQRvfK81ZbvL+uaK2KYMQmPPM+w
+mcM85GRum5HrRBTk1qLK3CsnVO5z9ZHBwA2uOc8xYyzsKmC+Db0NEzgeReeE
+oJcK4Twun9N3Vy3RWQgF3I9gV3bisKsorpk3jGUIa0FZ3pQC3u/3sYEXDcd5
+KGAhVyYLPWZVObvbxGJZdm1GMiAFHipIWl0VMOFCm2RnNynbqjeYK1MxoEwS
+4Y9UqV7RO71XMKO353muNJG42GIYr57yDqNAd5UHfh5lZc8jHlTy0Ycu5hXc
+gCJDVo5nQy+vUGId6elfkmyyJJirORTht1RvDUViXdPJL0h0ka4sLS0xBHkk
+XsVyh1yPKQB2yRXR3j4qZgkkQvJGcVkMT2rOZ8QLUNJ4ronGCoV6f3SAUvwL
+vRmP3vEFNX4tw6+tA0YUqc3LBOp2kRrRn/Px3/0rjiP3gGfeARL8FNH140Nv
+/oEzPH36AyoG5UE=\
+\>"],ExpressionUUID->"4c5ec22e-95a1-49ef-b741-eeca0945f7d7"],
+
+Cell[BoxData[
+ GraphicsBox[{InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl1gk4lfkeB/C/rmTJmj3pdAnZxjVpyqj3bbG3nETpxtyTaCrkmI7BRDQo
+y0myTCrLYWJaEC22yOnGkEqHkSzTHddWo2UOI1nH/f6f+z7Pec7z8f7/v//v
+933f8zxW+YV4BCwihJzFh37//9JgydQCLiOWrE9+9PG4OktISu82JWOWvHH4
+QX5AjSV1Ra7vVsGxatX3fOEh8YGarbBN3uYtT1VZsv37gNkQWKq0+MW8CkvW
+/sMyqwiWBO5W3QvHZoTLD8Lckm/de5RZIphMTzBZjb97uK1OhkX2Bn8Fw+Iy
+tX8dhTv9fO2r4DSTnJ4wWPOZh3QB5gdM5JfA3sPH+xxNWKKmt1ROAfW9U4w7
+z8C854498fDVZ1tHxHB5yHORLvp7M84GjMM2e754ex9mv8+Y1zPF+mOKv9hi
+npbPI/+9Dm4Z0N90hs5nk/qFC+x9grnyC5yz5aXXTthstOWcNvJJbFUQusKx
+cxar3WGfmyq19rDo5uBimp9/1QdTI7q/yEUYBbvcPxMhC3cHTLwWwL/OCbP7
+0U/ahkzrvXS9VfaNGpidOxLAgeWHJ6UXYJGW+ulOnJ8o2FgZCEs78g4IYIFz
+tJ0rPPXgYMEiOKLUIM4SJrqexxZjPv8wJlwH7l/irj+GvMR5ostKdP/5+GXt
+S5Gv4VVtRTg2NS6tTAk5eTldXwaLQ4uH0xVZ4lB6ONeM1gvZwTmrwJLGy/XN
+LjAn7bdrGfJ4HuW5iSdof/dPvW1YQusEd/xE65V+VNSAS0Ivrh2i+/tIQaoc
+SzKLokZNML84LjF1PXw1qv19MMxJr3ulBj8dL1SqgrlzLlXaMC/JYnaBrm/V
+CHSGs9ckhzmZoV7934V5MGnx35FIbXrFUBvnOQSdTngEx+r0vSiGPTmBAZMw
+p8eF54J+M4u3p6xcgzntyuvHYONe55mNsGjLnZxLmG/7invGu2F+WNz9dZg/
+vrR/zJtaOukshmUjFRu8YIm61pfWyEtgnnfABZb+4F8SCTfebCW2MPe7K3q5
+sKe7ZJsmrLb7cX4mvNYgSXEM/Ygv3DT6Cq5z7ApuhUUPkr6eRv1q6/rSQtim
+uVL5COxzSkcrClZLyT1biv7im5oHvGHuzJLxNvRfIj5q+yXc/16jvwPz8mz5
+I8Z0feiE9kPkU16QkalD85Ds21i4GOe7+4ZpwvzbGadjZJH//sh9BnD5A197
+v7/hvWM9L35G7/+3O2HPIuyL+OfynbTeT+9GD8jgnEoZr3Daf3sdiSOYbyDN
+6QbNf7CCyVtgMMexc8M0b70yNvkvhhhw+XxTzM+JWrpLMs+Qtd8MjwVTxyWq
+nICv/rhiqJK6M50XCjda6xNijnqvxkN+hrPLreed4NjnUwNHUU9NUHktCea1
+2dlycV73qaG5JljioJ9mh34MMh/azcD8ghsmL2CfoFODxhao/2lEGo3+Hax8
+prdZ0N/HiR9NMF+QKK17PywdnvyzCebvvbf3EBybLJz2QB5mBjENB+l+dkNS
+EzylWNLuBfO+qkjWRn5mWi5VrAX9XU1tZmEf++xpI5jvMJi8Ce4XrQmVgVlD
+VVlVWLPjum0f+uNcuGhagXqxt3dG3qH9xsdxTeBrq8rOC6k77pWEop+c7z5W
+HaHzWo4tz0b/uuJwTTfYZp/jfD7mk+9KuGALi4oGe1YhD7b/23YjmL3UNToy
+h7zty5evpPlVBwcXzDAkKMh312pYvDNA1X+KIb9u8OtdR++XOZpvnmTI3OzQ
+3T1wf/OArNsEQ2Qb8g+epO6dXZk6zpD1QxPjJfS82i1Z+mMM8UxI13xN908U
+G/75B57nEVbPjOZXuE186AMs77r0OM0n2kNw7j1DhHdbmipp/lqBhiHw3VpV
+GWIJu/lYEqzPVP5M4AyzWlZ/2KAe72nt62SYp7yQFyZliA95uqMFFmctK0vC
++f5PPF7Ow/3FOcJG9GfW1ydnbgXrXj6vif7fnZQTu8M8v1s2X39kiFRZaY8f
+vX+J33Yd8/qH9cYFw+yTR8GtnxjCeSwUUoskMYJq5MNdIbf8EF1fWu0VMM2Q
+nJHfXXfB4pQHZk2wUMUk63NaX1xh/BzmRgtb1WHOqxuz0XBnrf6nt+hP1Nak
+LkG9zrqK3Y10npgX55pxXkuqvnEunT9dY+sx9BO/zulOBJ3frkTwEP1POTWY
+7qfrVUvDejBffNHmcJbOb6S75iHyiLA7yLWh+591tWkgz3KJhoI5vf8qIz/x
+DUPEWs/SrKlHf9ZRGGKIt0v74U10/eDg+m9+Y4jufpksWj925rBb+Euc1xVx
+K4a6N6yQJ8HzUXnffYuuX9R6sqWRIduHi5+8oRZezL1diffFqGbEDPOSbsMP
+NYV4P/7z+6bj1JzHNeIo9GuSf7uSml5p9WSO/n9hxf4PT74hSw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.7026940733168927, 12.067904665985203}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl0w00lPkeB/A/dd1pZZJG5KVGKsPZJrfSmXTb53HlrYhSim27k+rm2lCb
+rBDTOzXLKLUVjjlWm5abt6Kd2hoW11u3oS2TIVNGXnMnidHqut//2ecc5zmf
++b/9ft//wyE8Zut+Y0LIOfzR9x+PBUumpvE4sqT0u9YnhrkskSzLK6+EfWsc
+pR2w68uBL6Jhkp/mdgM2X/LzGwGsLXF4EAr79v7Y3L+YJaJ89YdJc5bIuW/V
+JfAhWeiFVJi0x5ekwMrqw50c2DrU6HIoLPbiKj5x8fZt/ccXsIRjq+4ywzzL
+xzIhrPff6H9/NkseqCxmucD8kSNf55myJNZtT5Ar7Brv7HXpM5Yk3fD4loVl
+vbe88maxZKbPIye6P78q7mUTB7+v8a6Ih1nWcq0dXJtusySXzre2n/j+zyxR
+PSjbUgvLM12MPeBOhc3EEK130c0oa9j/uLRpLvo1V8i/todTucsur4KVhY7b
+A+DTbwb8AmGZlbLuBzrf3sR2Lyy2Wdhog/PsGqXSKJpv+b+ti+Cgox2nqFWb
+Cw/4o95+M9PgcLrf+5X3PsCGRBPlJjiouOznXPTH02hMXGj+buOCdehf3Ly1
+/RPN75jEtY6atAQ0wFrF6tpVyOtgi6LvPM3/bf9YCiwzWxHrA5e67xcVwKWK
+OUaEWjyUn0PH7zTUVTrQexqZcwDO4vjNjoblfwsRzYClEewCAazK3333G3re
+mYu8Pj7WWxjr76G+Dbqx0WJYlZ3+qQP1jz3M25MI6wVdkd3olzOluxMMa3cG
+GB4jn7G14R1r6HpHP78SE5bsO/hV4FJYXJF1XvonlnzuXmq7iK7/nDsvZiZL
+BNq4VkfY/JbCWDwD9/r8TOZKWP6UqztgjN+V3/I2wuzyjcHpRrifhA9VEfS8
+xKSSFwT37XA7Qwq7xkSoN8NZ5ZuPVdDxX19NvJpmCL/t1koNLDm7dvAkrJI7
+HzZCv5IablIKvMv96qQjzHrmDrbBqy19q1iax6P6OHfsZ/isuHU7HT96xORf
+sLldyqM9NE+bWbPdUU9EyN2QvbCyT7rrBbxLLlOH0vWcBXNOon7R8l2TG2DZ
+7u0vXNBfxMHkniV0v197Y5pgQVa120eal3Xvmx3I47dk3VQdzef7U9xmmMRW
+FqbBskyTBjvkV1Aq/OQNkyuVgT5wi9CGENr/w/vx3jDfZ11D1CLUWXNMbQVL
+dE09moXI831htwL7+cq12s2wmOukdYVFx5/ZNNujHqHndBLqkdc6fLcNNg+d
+Z1mA+lVRM34asUN9C50SitGf9bs7a3Jg1iO/Lhd5xEsKhX+HSbZ6iiA/34rR
+2yJYuzvozP0phuy8ohgUwEp7q7bjH2FPJ+cVdP2SDibMwJB7+7QtfnTcVG8b
+Ps6QiBNP98XR8cFafcEY7u9CRl0ZLDl8UbfiPUMKp4QuBlh+ctjVbJQh4q8S
+vvRCvfyuwnue7xhSeqFYkwWLd0cpn+sZIhdZWL6m/Zk2ttTBV6/I0wToX9m6
+5uZszBfvuGy0j+bR+SztB1i77a9VMliyyOJQCvbnj/KSi2AtbzL1Is7nfFnd
+U0bHE67Vt6A+mXukXz5dn5V32g71i+5kjCXC/IBoJmaCISTg2nyGjrf6bStH
+v0r2edMwrae8sebpJNarjU3PweSsoq8G+egzGq+b0/ojO5wP/84QQTBvSErz
+NInObIPlFjvGp20xv/Pshpdwaa+XVTSsnRh5nU7nT+ZrNDZY7/e/X15jP86m
+yd8CYPkN3qAG56X2CP/ZsADr04ydJajH2l5TEAhLutnbatTPF6+b22eN9Yv3
+P3qH/uRuiRmZMN++YnUH8igNe+y+BWZ7DC/zkeehIulWJ1j58G3Z/WHsv953
+OY+Odz+9sq4f+a73cLOCJXklIYM96H8weURIPUc38KybIf1ha01CqVUW3go1
+8k//GHmRunBkpKqNIexAwsF2mCRqt75vRn9Nb1850vpV8cvd6zA/zHX7EWrv
+I0Z7q7H/5IK/VFPvHIqLVuJ7iTN7x0H/JP28J1OD+dFdgd7UMZKw7Hp8fyH2
+sUepq157Cx+jnqx51peomzn+9Tg/6MztohxY0rZlYU475u+xi5FRh4Y+aetE
+vwdGT0dRVywONn+F72um0++rYKVHTVIu+tX2nmjS0Xpq+q8P9+L7yD7XcgJm
+s5/0afqQ73y/QjNYGSmUBAwwpKGpq/IC7X9/xjXBIPq9fkM7bYX1G345FQan
+1ilio2FlxfPIdswnR0VTmvnYL3Bp23XkrR9eahoAK4MUNTffMMSw7L/m9ZZY
+3zpUxNExJD58p8sm6tTJ8f9ocZ8zm8e7ebAhuQD/kkR5ouqbc7BkZU5cdyu+
+z02X1J50vCrdxwH56S3vps2nps/V9X+8eez/AXlZLnI=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.7973059266831077, 7.067904665985203}, \
+{-1, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000002274`, 17.}, {13.500000000002274`, 16.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.552325660469876, 17.180083206945802}, \
+{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:eJwt1A1Qk3UcB/A/AjlexFHIazAUkJERxEENAntADpUXJW68nHgMZtRQKIPV
+ASoN2nByunjLKEYspGMIcYsY7tJiFHnzRFkkuHlcIpBwNAILhUCi7/+u5+65
+/33uefl9f7/nf89O4btp+VsIIYdx0pWYNnF4M2SOrlyGGF3GzDNwe2xrVQfM
+M/T2tsGSr9M/48Oq9HESDc807wlxhEPV7wxrn2cIKy+ieDSQIdzqDb4bPHQ4
+RX4ZXjoxoijwYoiN47GMi/DkK1cr+z0ZEs7JyaFmWUkbWXCoaU3bCUuKGn4p
+8GBItHOC22041yYybNqdIcr3FXYE9SR2/hun4NLFOc5rtP6H7+2LhLvjHxwo
+h+UlEpk3bJn+LkgHm9r+knFh+cHxikVYvUYOZcInZSXlXkEMYTuNCdvh8C6u
+Fw/WGQO5LNQX318tiYMNVbyCMljXsz5Jr4emnvl3AWY7TPnT53nPHJdmI/9c
+VELRPJ3fNbGrDtY5lMV00nrHw6zW4aecg7HZcNaktcAb89BxHtnbwiKP5EZP
+2H3QqO9Cv6kZJ9uWcH9pi07Pp/OpNSSpYEeflNdtYd7qE9tgmFlImh/cjfVG
+81Ul8liCkxsVsMTekLeCfriK2cUimARrRAnwzNYAQR4s79E6N7rB/nX3RPDS
+yA/9864MuaMfelQFm8z3tvPh3JbU37upCw9JTTuwH6KjTFOwMZbfUAEn913Y
+4Ys88tIwQSLMlfnkC+DaNbMwBn4qlRQ0w+7X92dmwP7nlGQEJm/JEuvg6KOu
+qsewceflh7OwTmrb4YB5sNiT02+gvmXbvlYn+r19TrT8DLdz+gs2cL9vXdQA
+D/kJ+SjNBOsjf91Uwaz6bxy+hNWJleZlWJTcpThC52m6GfEi+leb+x6y4KZx
+j02G7o+agDkN+pls368IgSfKysyZcO2fYssTPC+NO+JiDWsi355pgoeVSV9d
+CUA/FQlTHrRe/o9LZXDTJ6uXJMjHuunwZgrM5lwZGEM/Bq+Lr4bDoqZCOz9Y
+o/o7IQT2tb/2oNiFIaerRVZ7YbUn99TIcwzhB3mKc+AsS8WuONi0HFh0AU6t
+Kvl09FmGHDCHa6/D8rPcymrY4MjPtkU+vVUpKw+Ov02c4qlHvVqF8HLNb+Vn
+qGu+XZHDXIGsh35P34GIkBE4+e4XRbdgXeC0/0uoxxvfXjlB99MLijUl7Lg0
+tngXZjeG9zkjr2bq7K4BOp+PtX9UwvzZtYV6OCvG+vw03C1MkabTet4d1cHo
+V/35sRR7+v7Hdz7IgsUNyk4t8s+9XL9bAA9v3XbpKJ2XuM6yF2ZH3ai3gXMj
+AiZW8L4hU4u+158hq4OzP52n3rNhXQgTVcj6FjjUaCwMp9dd7lsJkff0rbQ1
+J1j3Pf+fXvSnKXbJ3/D7/7/mjH1OVz/mP8lKx0w=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.16438510075492, 12.373697879094095}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwl1AdMU1EUBuDnQsBSI45UaLHuAZYqEFGoPhSwisQiEjWiVHBgBSxqFKmD
+RK2ioDWGpQYbqEnVxjgogiuiKHVECeJi6Au2igmBgqtiLf5HX9LcfL05955z
+8s4bm7x12Yb+DMMsxI/W/48/ywykdRzLhJYnauRw5MGaQ71jWWbCD73yBMz0
+VjJfYMf9rsgGmOMdKXwKc+Z+X/gBiNNs7CyD3ftK4xbATpd9qhrmeQa3psP2
+XO5tMCwYUJiQDxtD3Np7xCxTkR7yRw9XrI7PM8GRVkmREVZm1k9bT/Zu22yA
+rWVH5gph5Y2esAKYu87TXB7DMlXbGmP2wMx7L6cEtpbI5q+G60u859z1Q172
+EeJgWNBW/DwJVseem+IBu49THxsFW/jNlhbUE/rJPdEqYpl7DSP3XoUd+Trp
+E1gnbTHnwu3OW1/rYKeX6s4m2DL+yrEWeHn57dJYWJnksg3CefdSEobKYH3M
+TH4EbLxwLnEWxT/5HXsUNmU+WEP78gNFCa2wYfF+1VI4NeWuKgT51zrSVqTD
+RoPobD5coXq3q5D2F03+ycG8wcLzj+l+k2PtSPQjr0AUM4jqKU+LDYJ36LW7
+F8K67JZNctiU0+SgfocfSAiMh9O0JcmvqZ9dioJlcJUhJcxvOs73nDU4GpaL
++7xSYGnW2R3T4fBuobYMXrnt+1IPWCG7kdsEX8nOGG5GPsvpfwnL5LTN5kXB
+ARQHF7Mu30eobz2dC2ctqtsZDnN0L9zOC3poQv+klBes7Gfu9oXzKG/Yznp9
+PS7Ee0l1wWL/sEJPuJbqJvNDF5/yRR6GUxo78sl5da0rAFY08J8/gnXd7y43
++WB/RpL5NKwocDWWwvqapxczYOVH7a1sWG37MymK6oufV50BP5s4+rCY4usu
++tG+KbCvpz/VG71bdgbmhr2N6qT3TdiY/YLiXa2/PsJT1lVtGY77v0XLBTa4
++Lx/bzIs2D5Q0kMWVZ6shplhVVFDcF776blx3qjHPXPJ50A4i5vKpsLWJR6i
+JLg+SHOwEnZ0uu0rovpsxiIH3LFKK3sDWzJsu6ahXxzNBfqhm1D7Ug4n0tyQ
+LWskcbCR5gpWN6t6I2ADzR3MugVc8oE7aC4D0c8RqTeb6T6aW1jgkpVr4WCa
+a9iyZUCDCG6kuYcZ7YdcA+px/sJ3AVZ0RNT4wSx9N+Cs6OofOvTn3yNFnbT6
+sH8BRImRiQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.763809742330267, 6.7638097423302685}, \
+{1, 1}], LineBox[{{13.500000000007276`, 16.000000000003638`}, {
+         7.500000000005457, 12.5}}], 
+        PolygonBox[{{9.98173265946094, 13.947677384685548`}, {
+         10.816718930329426`, 14.897834175673825`}, {11.219815750748694`, 
+         14.206811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10.323799910437668, 14.984057296392571}, \
+{1, -1}], LineBox[{{13.5, 16.00000000000231}, {13.5, 8.999999999998607}}], 
+        PolygonBox[{{13.5, 13.1}, {13.1, 11.9}, {13.9, 11.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.4452, 12.5}, {-1, 0}], 
+        LineBox[{{7.5, 12.500000000003638`}, {13.500000000003638`, 
+         9.000000000003638}}], 
+        PolygonBox[{{11.01826734053906, 10.447677384685548`}, {
+         9.780184249251306, 10.706811054955079`}, {10.183281069670574`, 
+         11.397834175673825`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10.323799910437668, 10.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{4.5, 10.}], PointBox[{13.5, 16.}], 
+         PointBox[{16., 6.5}], PointBox[{7.5, 12.5}], PointBox[{13.5, 9.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T5", " ", "P2", " ", "N10"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbf/cgdheh/fihjgigjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdheh/fihjgigjij.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:eJwt1As0lekaB/DXuDZGKjTOFLnsQ27RkKOi79MuNuM2KoRmqShEzDkOKp12
+LQ3nRGl0IbLcRqYyo6HGbaKxNbvk0lRnq8SOQmVcdyWk83/OOd9ae+31W8/7
+vt/z/L9vb+Mdcf4RHzHG0vCh7/9dGjyb/YDLmGdhz6v2K9R4Vtl5Vc/QhGf8
+7ukPs6o8S72mkesGy0Mb3hjD1cVR15Jh1lJWEK2CdZm5jlWwOH1Q0q3MM6mN
+xzEFrTcfS0uBJSquvWtMedb0VaW1Fxx0M8oiFTbyU1UnO/mOurbDYev8E/fD
+Q/HFU4sFsMuuN/dgL6UrVqFwofcH4SbcT8NS+iSPvCsuexxeKqj3vA+LT1nJ
+ytCf6JOud8p/xv653TrRmEdaYd1mQV4bWr9SHfdlBlobycLdugo4I/Be3BbY
+6ButvAvIozDIZWkI3NRSEyGch/kHE8sDYHG/0+FGOPRClY4HrX++Uaj3Mc8c
+3Abq7am+49IJDk4YzvLVJ+v7aa2Fy/u/bJhCf/zdSZEavCDk6WcymKWulRTh
+vPBq39yrVL8RN6YNd7+ICD9DHjXV24J+En5YdPIA2brNNAn9Die1q+2med30
+9h/EfHzjv/cEw0abok7HY359iZZuIOVzubtuK/LZfMtuchvVAyfOrEeeclvF
+t3G0X9v+ocNHqG+P0cqgvM2KO1Yr8UxF9l6ziva/EKgFM/SZ3Hu7H24KPfF4
+9QeOKWY/Njag+YQKw4VzHFs6KsrYBvNOrefWv+fYgk8f8yVUD74bfW+WY37p
+Js7D5AnjNgncFXtoq6MZHOijp4v13YUnIw+RNxhJ62C72xPCFrLdQM8POH9q
+4uCgqjnVj9v24/5eFi5HOZhXvjRdgv78lAQ58bD8L651EehfVHF/8iy5xWWr
+DeYL//xOZzVc+H2UwTicXJZ0/6Y5Pb/8hAvIg3X16LbDTaOLg9yRV+Tx65+2
+0v7EFRelsKJ3Sdt1qkdk/EuAfDVm0o9epH4OpZ/fQr+HYPGzE9TP4WZhEBzT
+s7Pjv/1sut5oCYdpdG71pfr5Ifc2nCcP1K60gVnOHpX1cIp5JptP530mncpA
+PzEjKyMmML98wPZRFfrNacxu64Z5fc/7v2A+tuvJy3Y4rFe6rgrzD7c7G96m
+vI6VZ65BPjW+J6I7yIKcZZrI83KjPKqX9o/sK3g1jefzs6X7NNx0aEXnyBTH
+lpucblhG86XvX2T2lmORRzwXU7/scV1Z4WuO6Rb9ujqN7CnW2aPgWI6K0xXK
+j42Li49Pwkvu1mkux/7tZmwhbJ3RG7wZFpuXMMUEx5ynkuILyCaKjFWoz1pk
+tA7CzD27pgNe8LZIuMIC+7+cnqvB+UY9a9rjYLFTYtkz3D+1UvnURbJQtEGI
+/jZsH1N+AvO9P4c2o3/n+oP9qpbYr3dG3x/zbUiMDxGQvR5odM/g/SvMZE4w
+b+I25o08FAYTMh5mSl8cO433S/+v3QEcLJZEeRfT+23zapsDXLj2GzV75Juf
+omRnDMtvurRGwwmedhHqdH7F/KwEOEti9WgI/RhdL/b2gZ0vTOX/Rv3t8+kZ
+xXnOl3Nl35FDPMoGcL8EwbnaozTPrZXx6ehnrPir7VHkOScrOfrNmWd+05/M
+ef828w752JeVCMnhiaWvML/IWDnShc7b2T90A/mIyuYErlQ/f0xyEnkqJmWp
+vlRfo3Zx7zjuX76zORJmRZvnyUY4FhRw/lIGrZf5DNm/4hhTacuto/qeJVY6
+QxxrSLI8Mk52C//1+HOOOSXVzthSXimqorp+jpULRnwSyHOp9sV96M/7cFoD
+5XctP+gLOGZTfbqaFerKf7r6E1wt3WHqR+7QzWrDfvGNaOuzsLjP58U/cX6Q
+8O/ZD6m+Q8ehY5BjoUp8sp41rGYacOglxyRKBus8yI6cPOkPPE/zivy/kfse
+1HqMceyUjW1FNswHLyp5gHnH7B9OlpPTNgZ7IY8s3e7wKlqvPR2Vh/druPH/
+XhUzdQX5lfb1SL6HxdaxiYffYL1/a+1ZsnqK4xzc5fiy4x90Hv/6+TLkr3Hr
+90dhcJNffP9T1K0dk/o4qmve2SuEu/UXzjckV7+tdMf5yz+5lfke8/Gi5Xmv
+0U+nplKq3Ir+b9oKAvH7UFlpMyqlPM45uB7APIofjU7XkCW7DJ8Oc0w+991Y
+JeVTZP/Ht3g+NaHGJlVUj1+l//kzjj37+kl/I9UTZ3VbeznWJD1wREaOLaot
+kyFvuezhO3Kn6NS6To5VRh4MMKP513dMlDbjeRYUz4SQw+bphf2E+e9ExuaS
+jdRfaKVxzCFmaq6b7LfPcFFeIxN7DjQLbGCN5OyW0kYmemRdupfcZRGrXdiI
+//+XX9eQ6cr6hanQ9wr+PwSlKl4=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.5944997717265688, 13.169947406655712}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwt1Q001WccB/AnoXtauM1NuMrl1qgktVhW/P9JEV0RRTi6Mb3S9DqsuKVJ
+7Za7jVBebmrFUZFsySHXKLJR3bFipRuSMK6XoYR9n23/c+6553N+z/P8Xv7P
+OX+z4C83hWoQQkLxo/9EPYlnGkv+fcxZwp5XKfU4LCk9OKTxsxlLuOeScnoR
+r9IQduyFxQVdxRdh+Rl9/jyYvWERZAgfLW9+pxKwRLB5kfYubZbMuxZ47QrM
+iqpnyLRYoqhRjEfANtteS1I0WRL4xjjShdpH82n8VJZYvrIwXwAXbN8m3amB
+/2NPpAaw4mDpvTVTWDJjx0i1Hqwm/mXzCUt8vqnYzoPlxyVLlkwwJMEybq+Q
+rr8hD1r7gSFW70fjVsKquRflme8Z8thsf4c/LD6RdMP1HdbX2sXE0vqi7z0Q
+jWJ92t7xq/S8ffVri0YY4kl8hutpPz0i3xh4xSUyPETPc1O05sINXJssA/RP
+HmVfssH+Io5T1VJYZef+BQfnO+82jXWm8cRbx4XIX9TKXSeCBb0B4fvHGBLW
+kPXBDZbPIeEvUW/7pprJVTTupb9jK/rxyxy2EsKSR5EltZMMWe4T1zaO/I87
+wpIT0b/JQAah9ckHIpvNMB+1h7IxifZ/WFj4A9z5UGbsA0cUL9Jugdvv+Dbp
+0PonBQfG4BpBWmGCKeImF2M64eL5h6cPzYVrNlRfhmXJH2cHwzJr0XRruj4r
+3aFpDvKEq03PIL/rHOf1gbA4ZOadKNTHrruZ02eC/K/qr6eNM2SX2FF6HpYr
+az1Ool9uj56HN6wa4/M2YD4FAeZ+FjAbeHRAE/MkDkqePo3rmsdVDjEkco9b
+1yy6f8EFQfoAQ2Tmpqut6fkZftOy1Xg/JrXJW6mthFp1fzHEku+SlET9kTJQ
+3cUQzvJLq/6EJVNt86s6GdLZ16K7APWSod4JvzcMEXy3Z1UULKk10C/qwPrW
+p88f0HjtM6sGWGBRJdRB/5J7Wcb5WM/VPp7sAiuaBq8te8sQRa7rigPUd5xD
+13YzJPX0y/LT1JHc8mrUIzt6/9a3MEm2v+6Gegvcd0uOwGJtoaiyH/fv9PL0
+9dQuzcvsBxkiySuK0qJ2/r07Bf0LcjOkeahH4KPU/O1vhhjGP//MkVr4dUvl
+MENG+btuK9CfWKrcF4H5yUd6O+3o/BaHdtyH/cJeu/7IR/6rY0tLYcsXtWlc
+WLzDzXsj3PmqtPKYMdbr1EtjcZ64IeVCvxHOv9sf5IV83J1DORGwJDlzSx3q
+Sy10nZgwxHkuPvmTqJ9VemrIqd9eSevrQ3773I1bYPaBzbxEzCOhxzZFSOPN
+I/ZamJ+kV3aWQ+0gfRHdinreu7dpUgtFVsueM6R4t7/rbOriaH/dBoZEnDwW
+7UDdoTt++SHO8+UFHaKOCJR1lzAkR9dRUEydOt/2ShbmG/lUrIl6iefcosak
+csJdGh/sQ61urNuQU05SCyocL1O3Jx6oyS0nbHcmv4da5Wz9UybM525faExd
+XjN0Cu8vwbN7K3WrU1VIIe6jn/eKr6jPTtn88BfMY/Wac7HU1YR3tw7znBlu
+tB+WHPm1vRD113BExJ3Go45onG9Gf4ZtYTo0vn7qIyMV7nv6mzN3kZ/d8r1d
+JubxuGUw2ovO+6Zv5e125PuwcOUz9Cfh51Z8jvtoeTM43gtWuLZdMMI8Of2f
+5lXMxn7j8F4HWBVSFLgYVqRLAzKwXjHREpNmAJ8KHrR9jXkdalVPh8mJTzx0
+2xjyrDHbN34W9ktLnGxRj8K8pEsPlkSFnDrRhPvHWK7L49H8SU8yn6Af73yn
+AB5932VlHPQ/Gib7w4z3/3cjtey/74g++w/yhW0e
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {0.30479999999999996, 7.7452}, {1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.999999999998543`, 17.}, {14.999999999997012`, 17.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.5, 17.6952}, {0, -1}], 
+        LineBox[CompressedData["
+1:eJwd2Hk8VPv/B/CxJCqSGzeUkAoNKWuWa8oSskzIlsrWj0q2XI31zi1JlkxJ
+TdahCKFJKVGyJURGhEIpQuWiRVlavq/P74/yePqc897Omc85Q8Er0P4gP4VC
+4efDP/ykKJH/5GgUcfJzNY0SOla+xB0eYnTxh8Gxni0urTDvM9N5EFZKWmNj
+sZZGoaW2a29dQ6Mwfy8ueAYzK+MuBcNede0dW+VpFI8Aa5fL8H5mVnIMzLGQ
+si6E01NDD7aS9TundmXDIdOmm1cqYF0xVjsKzrud2edK3CU7agJbzR+NuAwH
+PfmoOIv8fcOiRzth3k7BmExY/AbblaJIo2h47tfQhq3kBS3Ww+JJ4f81ydIo
+EWnWRcYwpe7TTSd48k/7fXZk/YVkynsZGsVCTvm2I8yTzf87Fn56svUwncSr
+G+ajwqwktysmMG1u464RaRqlqVj7xWbYI2Sgkguf0PbulIJrx6tfpcLLLv04
+PY/65J0eeKbAyooOsoMwXax99Aps5VtWUQvTFISXdZLz85LCrsHMJXX+ksgn
+vtTRPZX0G7KOGwDH7TiwOY70azGY+wLOnqcF/kvim7U62KOf1Q0CJmSdZkjb
+2Q273Fh6NA1mnbPKdMM8hEOkTW7A4ldHTIdgukZDcRc8JCit74H5iofEy/Cj
+fo5xL/c5fFY+LGcbHDTiaG2I674/Yu0Yg3jL+C4WfMfopE0NzNSMKH8KD0xb
+TS5eh3qYnw7OwG+7yyodYLroLjMB3Bf3NdVO5cDMIobWLNZvR2pQ38NB1Pg1
+z+HCZxWZ6ko0yrTm4rEM2J636PNR2IMp7GEH902ln86Ha6WzFL+gvtAEnyXd
+cFDn96OJcIHIzbhZYpeWudVws4VaiMR65N9X3FiCfv32sW4qwCzRrNfGsE9M
+5eUNMO1Zu14/5jV9RW2CrA+9q/c9CbNa1DtWwrV6stGG8IfwrDoKOZ7V2ysC
+779snjiGfPInJvkmcT26w9VUn8AU85y0DzAjLetBKcwJyKBScPzhnFeB5+Ah
+y0pXdTjpY+gBBulv5eHSYzB3fiDeB2ZOvGhshy8uXL/pTOLJzHptQ73Z8dN7
+HGD6oZPny+EIz0tsF1jDhNOhhX6X2TF0/Uj8CivdamKRMydPkHmsuFlFw/z+
+Ohy/7xqZL2uvYy2caWam20Py//vZUBvX5+zdY9Ji6I+jxViTASd1dpXawNPV
+o4aT8NDvv2xSyfrrwi5JfG6/+gmvGCTzCWQUKMOsv+dGlTegfrHRpZthuc2r
+roXChatTF8i6l6W9ag0cz5CaloL7dsl5CmxE/qaxhi+I39qkdGgHLG/UEVEA
+zz8SzQ2HubrDBZbE7nn3rsHiqyKT36D+brezDU/gWkvPDyGwafOWbe/gIWuJ
+Gn642UpW8CuJ56UqfRHzkNn0OXqWxItRHdsC+3Gb/L8QzzVUvcQ80x9PzZPz
+6UatWRfggPNPijtJPoeGUS9YPm3YvJKs/+yWtIA5y2Q7Mkj+0pgqM7hmtsQ7
+hvSzRcvbHWY69ah7wUzqqUuJsOCMlK0lqe+B2GAnnFDyvVobnnYSeExFPY1u
+xgYqMK8ifznZL/klg03XwxrB16sk0M+G1U7fVEk9AnLGabCPvs4SA5gSw39X
+FvOJSNdv20Pqc+mSyIU5/rtWRcIWtc4bxTFvqYwze4vhyonTDlawDn1P+luY
+ddb/XRRcsyEvQlEZ9/fbfYIFcH0s1d4PrvXjN2iEaVXzuuWwR86VuB44oip4
+1S9YubHdcwCOWqP6xFIF83zV2vKcXN/8HJVUmObx8K8G2DSlbX0fzFT2rcmH
+1TvrX0upYq7mxffIc4Gq4XHPBmYvPb6IDt9fZOsbCU8/ZT6Whds00n9lw+Lc
+vQ+b0Z8g0+3XXXiIa5LtAn9LnXFsgikVPQYTmI8630uPVph+p5MZD1PCMyca
+ST63+fktsPXv/A3kfO4B09IJzNuwquVCHszyL35HPj8lz0wFz5B8X0Jl8uCB
+w7wwf7LeuZfHge09k0TtSP7t5xMq4SElzuetMC/F59E4PO8btUMGrpXgLGxG
+vtiQkhkhUl9O0p1Esv9R5NvmMQ/x8o5rZD8cNX+s/53M65RKWwj6kTq6w/0n
+PKSfkzZD9s9cs3ei5Pyi66J/YR5iwtQ1KjCNxy5gwtavFvfbkvp8YlbWwrEi
+dqdjYGWB5O9zcGi5hCLpd5ZPU5WKfb+qiWnznawLl/Y6wnp8292NNsFJZikh
+cGiQlPdpmP2I4RAL/1pYatMF09r3XT0DD2Q4f5Kj4vp4jcWegN+Oiar6wazl
+jyICSXyZux9KYO7wu/jd8MuZ3j0fYcbZHiVVOEAsiaeghvvp6uGNC6hvJNL7
+DzuYd9T+XhNcVfdMNwRmBB4yTIGtZq7VJcAau0u2OhMvUrzKhpl+g+sUyDy+
+hu7IhDlTLxa9xrxi31QcuQjTDcOVz8CNc6728XBQM/u6KRzVkPvPMZjmcql7
+Jawj8HeDK8yt71r+gzzPbrooGJHjq3R6F2D3N+bVa0m83dw8cnx6unm1ADwk
+YD1sRu6/oTJD0h9zUkzkLFyZLKDTB4uf8Ur9AJeHO/q0kf7rb0hSUa9F2Xe9
+FjjePcT7EPn8VOxv7YCVebHvi+GCjILmIdjF9s+tk7C9zN6wHzBeWG5rYH7u
+tvfyFZG/9n7aJzLvTImUKntYbyY6oQimXrjCTSTrD4T29cMTUwc3tKmRfdeN
+LYDnthsn+IiEOuIZBfDk4QIJ+nl3mB72bdlWWCf1fmwhPO1/qUsH/mGdJv0V
+bk6eoJL3nvqg85uMNuP+eKt2VRbWi+y+8S8sns/Y/hP5xm3cnzyEGW++xTyH
+/Z0SR2eIDVy2FcD7fKf2r9DAPkw1zgyGc9Qz7irClReDlurDid7JderE7AoR
+fniqrpOhDWvcOS7XhnkMCvms0IWF66jV6WT/ml42ownTe4oUgmAZ5SUPqfC4
+7hFrW/jXozJtEr9WrfWFDvl8BBrvkCTxLRbmVeEk5oExIVg+47TvJlg4fsx/
+GvWyjjTu0YPTjbvju2HlYDZjN2w7ddfwPsz7mc8fRuKrLYougvX6Ksuuwv5G
+wwLZcPyOte398LJGIeMMcvwirz3S6KfGqJSWBwsH5S64wVbrXW/fgsff3bHI
+hguZj3o74NrkNbeHYDmtvYxvMHPwXM1azHvnudyIP1AvzZy+zBU+1/ZbUQPm
+KLyOToDj3l85QYcLTQ6Yl8PC9S8eHiP9JjB+PYVrVjx9y4bFvWVvvYYHJ6pf
+18DNAlFTw3DxxMfcEXjowKu6ftjIacWfIlvQvx2l+jHsWpCsvwmm/6E8Xgi3
+8CvJW8Hi1ZLNTHj5kpKfPrDerV0Gu+H/JPZrRsJ9zx2CVsOSdzztk2BOBK9t
+BP2197gqsGF2uVV3CZwaV5OdDVtcaBI9DkfpTlA4MNde870ZLFM/disTdtn5
+NF8W/vh80jGNnC8Wpz+PeRfFCJQkwKz6PduH4dzzd65Ewxrrg0d74QHD08aB
+8PiRz/19MINreM4D9hBOtB+FuS1FpfYk/8bY77/h6gR6rjk5/+W6WSXkE7nn
+ftCI9GvqsITsnz7Oh57rkvUZ1YhEuCs0qkCHxNfsNWiBE2TYB/RhebtVfEvR
+/7pz6o4mpH7l6N225Hr43ebshguPuV5lwdXHQ1UOkvrH/y+yAz5gUZ5B6h9P
+nIsSxntzvsry4HSYcvVW0jbY2VJspgquzKl44wF7vo22fgUL53pIR8PlrOMx
+AlsR323ULBmWkrwcowJXLhedZcHt30X07GDeTK1J/Dry/viSfQyeHtnx8Bi8
+e832rDSY/vFHlCMsWmbpdpusFxpRqHCzVtjiDpg9T1f7gXrDhxaE3sEuhlna
+5H7x0zOcmIE1LC8yU2DHB9uYfJr4fRbjvDOc2t/XsBget+j5pAB7X3s+JQzz
+KpeKfsL8tn0NCFkE021vyT8m8/V6/eEn4sVrKsmT/WSnULfiF5jj9IWTAvfY
+rBcahYM6bFrJ88t8rcrlXtgjst+CfE+SrBKYbIYpfEU7L5D9NM5XuhoWz/AO
+KIM3j2zbeIP0s2VuhHxPOqV5YXkBcWmYO9k/hc5eKOGQfnwfrzaAb2gdupkD
+M+wfSYXDgi++5l0h9RkMzFXBNuquz0q2kue1u/Uvsp+a5rqSfJVf/jlFw/y2
+j5TJkPlZiIoo/wMn2YXVjpH6AwIH7sLRuZH1guh/1bPIM+PwD4Wjh9eTeag6
+H16O9/hV93L6LWBKs6LCJti9QW51AMywdHqkD6tPT8ldIOdTrf8zgl0V13bc
+g4Pi2eVa5HvDCjnZV2Td5gd3LbyE/B1AC/fP//9xgPY/mqO4+g==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.0723744310654, 6.280370328210516}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl1gk4VekfB/BDhmsrdBMSyhITum0yBp1QabNniRCKtJAwikSZukq6leWq
+JqbuY4ksIes/opFUY4non61Edjf7UJrv+//f5/Hc5/Occ97f8v7ec63y8LM5
+LEhR1CP8kW/q2w98dOj/f6vSFMe9VsZSl6ZUNraqDsHa+c3eSbBhDWvwBUzf
+XPHyAyw3pc5KhNte/nNs6TqaCvl9Y/QB8rztgKwxnGI2qsWEKXPO1gNw2229
+uprVeN70hrI3sXF4RBAcU7Cowgtm1EhxVWGJM8KTtnCgxi2v5lU05R8b4KAH
+MwuXLrsKp9fsWLcYputEo3fD7p58y07kY14VrbUMvvtjyXQG3LBQXDusgrzS
+Km4Hwmqj+tFNcKBsxvNtcFxQ8981sNrI4TYmbKZg/MtLOF3i0SAf/agMV89o
+gzcVFyW0wXZebpYTcPn8kg9v4NkU279kEU9T58FCI2wW7q1Dww1VF8/3wnI7
+c5yOw7OSphIMrD8p3jGdCIdcMWTrwyEWWiUVcEw3VyEIfu3Wyu6G+T8b7yyD
+2+lvmTOwttpBKQbqlYu2HRJEf9zj3yk5wu2HWLkUHNjuMJYGC12bkufjfjb7
+jcAkzG35KtoIt/+5P0qRhT5qUuo8WHj1X2IGcJtkS50vzEg+5G4Nx02cXLQG
+vvfrNO8QLGTM8/yAevV3VTn4wtp2JoNXYMPvZq7H4Fqv+FZ9+AL7wU+HYU2b
+WcFGZfQ/NWHBAVZpe7zXAJZ4Kmu3HWZ5si/kK9EUr8LsoC7xmZjqbXCtvUUm
+E56t5MgMrET/L0X1TyD/Yr0F5Sw4S7RvpgJmL45Wj4GHbehZDuxukt7ChkNC
+rBR84XTVHLcU2GdmXsWC1C9rza6HFfVEDLfCuWFmLdKIV6B/fZDMp7ti8ctD
+MN3Q3LcPdrx6jFUCM98cVTxO5lflop808u9+bJbBJesfyfroCTuezBpohDUH
+u9Y9hC3SdF6IIf8QX6G0TtjEufUgi9QTNhr1DRb0UZZzhPsH9ytS6NeVp776
+EXBKcsHNL7h+83LJfCpMpwR/yoPjRgLy6kh/xjN+uMHB3fpNA3B6KN94Evn5
+OF1nLlqP+Yx1sgmAnw5vDV8G+1ufXt6FemMux55SgYsNr+2nYcf/xBSqwuld
+PL+7ijiPjBVnlMnz1YqL51bg3Oz3s2LCs+Kvn7vBBq4mOmR92kqj9K0C5uUP
+SZsRxO/uXGvnDMucEt7WDFNtF8fm5NHHW+VpJTDnTSKvEN7g6meeTPKVfbXy
+Gjy3ee+nS2TeeqnISNh+/p18AMy9n3ziBqwgV+bhAReXrF1SCpdyWcOkX9zY
+cNMZ4q7vHHvYfCy+yRTxNZ6MvHIm+RiJFybB5i7783xguebQw+Pw53GB0TAW
+6RNXfyfqMSm68yqRzD9Pr+gGPNpvalBM8lNOnXoFZ6cPdbbDUszMHj657nlf
+XQj1s/u/cL7B5a8+22vDDQbLPYbhDeWvs21hVtyOTRWwnsBAYAgxb9PxILhq
+6OzSJFgzXPCrFCyY26VdQPZnxXmZeOT3cJVQdi1Z/6KPizBcaTXQ3gJz8384
++qLe1Jwgjw/Ekro7XsjRVM2MpOV74oesZ6qw3b0i+QY4t9noxKXleD9xGpIq
+4e6j7UlTspizjXnzmSTf0PSRYPj+6abcW7CKspDCEjhO28LlDMzZVXrn2TKc
+pz+elbvCIV6DVzmwRml53HY4Yk3RxTC49sm3m+vIvIjoxUXBCh8f/6pE5stN
+3DYVzjor1ixD5uc5Y74DpqcFrBeTeXNclqyBeFXz4bulYSm3vONnYe75PRMr
+YPOpW3NN8IE5b1ldUp+TcbIW6unseSe/E7ZiT9b9BltUlwkfgRn3XdyL4Gwr
+94RoUv9mOZEe+Kmov2kuqWfv/Olp2Lws0rWN1N8q9WAU1n37Xo3agPW5zlQd
+fFd/Q5s6cfXac2w44NyOdzthuTX9nLXwuGlfthfMTtmq/gT58dieW0Jhd++/
+T2rDDYr2t6/AlNWegluot0+ty+MmnBJvJDLOxHuebr5A3Ob64+s+2GQ03PYq
+8eNDytlL8Tsh0sc5B1vZ3qXkYb76R0tfWCVgd3CcDE35aoaN2cAMf/FIdZhz
+2l/4F7K+yMz3emnE88vep0TyUQ4MSIANnOSjhWCfkPWDZ+Du8hy/EdTvniQ2
+QFye4RH3X5jPSTgVB0fQzVZvYMd4EZUa+Ozvivk1cEo530EM8XT9r/i9IPtp
+yb7gDGt4rWqtJ/s/q3QgH862t33bRfanrtFYHPl3mqz/Mk3225PiuMAbegX0
+mKTe1Pqf/oS9+npj9eDZfZTwW5h9ejjMheSrlTw2AgfbVRyIIv1sv+40Cpcy
+Onyy4IbVPLoJfty5qbcJTn9ZvzoJzmL1rZ4m/SthCJvBTf98TGFuhKOCfFuQ
+36UhQyUd2KePp2kNx1goZxrD+vwEo3LUq5F+otAcZuTYX1aE3UfCpfbAnKH8
+oBApmgqf+G1mO9ytdvvIoyWYT0NtMQO48rNAYuhi5Hkw20wTpnJkeN6SNPVu
+peC4NByh0LgqTAL7v513exb50dz5yGfiOO+7msc6iEMY943guZaigmqy30fn
+QifEcP5Ur6VmwhyW3sInWOiOzuFEcl0sWEIU94+OrTzIJs/nv85wg3Pf2xac
+J/0pi9jVCQs3FRiEk+c3nzM5i/hNYspupJ+cNBO3Nchv+hxHi8xjRFbVhTaY
+mio1SIMrJYOdIlBPXJlYYxWJ5+0gKYN6Dbe0N/UQ7zabiIR9Cu07GKhPqv6e
+Zg18T1LNgQXnSnbItcJ1bMYlx43k93i2Jwe2T9ySeh5OOWmdYgFTFj8L8sj+
+zMcGFiBe7MNC0eekf0ZMdi/yiUrX9O4k94/01PUj/+I8O+lxmC/5OfEF6otI
+iHFaIPFbgvWuoT9R1e2TgpvwPnWWNdkhSlP/+8B88v+rCP0vmGLqoA==
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.28233829669103, 4.3021661698002225}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwd1Q1Uk1UYB/D3oM6hk40Pa8R0I3FNAwRkOgXhTRZsKLCQD5EUNPBMhISD
+FB+KJAOmWE4OJAnogqBpM2d+AQ3BEALF45LpwbAUlUaQSk4UAbX/bee8u+e3
+3fu8z/Pc+57XdcuOyGQbiqI+wUVGikO+5tPU6Bt8XGjKV2aQ7phHU4LNByJv
+wT2Ltaf6eDTVZo3b1QGXi6pWfAAbqtgzrsOGooLBkxgFrZZgK8aopS+LF2DU
+UMdTvDFPnS8rbXiHpuiVQRklsIpxqnMl8Yna0KdwtbxO9sAZ6x3Ojqfhvrou
+s6QW1vBtW8bgy/b7L2bDhucOESrkyYvKtG6FCxqKuU58muLeKrm/HVa8lmQd
+g52aJsqK4LahqzkcAU3949w9/zSsfLyjWw6bRv7sHYYla9zyc4gZsZs8kY8u
+c+3vNTB38unLz+DE8BffnoMNrApdKyzyeSlqg6WmsO3TUB+9qGpDC8zszMhb
+BQ+1lDSfhN3c3/9iG+lH8/CmMrhP6NxRCHOGGA9TYae7HRv2waKS63GB8PRH
+dquzYaU61p1F7ldmkx9B4seEcPSo594edwEbpujlnwcS15tCGpFP+g+PPfrI
+vkXz5obB2scelXnww5C7GhPqo1JTjnnCXO+BfcHwqIcul/RTk5Kw7QwX/WkJ
+ze+FmVl1FA/WKqc/vwKbo59+VPQ25u88POsP2Dc2NPbZW/ChirO2iFfulN+d
+BnP454wRMKtr+fDYXOSV1tith6Oawtdp4HRzSN485DveWXUtEKZDSjU1sHKJ
+mzcDNlmSWE6oN/EXhuKhE+qO+fdmPNy4hvfoNly5cE5UHayyOX9xEPby82+y
+wD2v43bPwPpKTmq80JWm/PeaX4lhZuzWGx/DibGZ0Zmw4KtIx32wLq+H0QQn
+JrPUx+F7A2yxDfLP3i51bYHdtd/0y+Ehx+ot7fB3R+UzS2GvGz5KI9zztz37
+Esy1JA3qXMn5EHdb4HH3K7z9sMy7v3kSplaZfttM4tdcDZyANR+W+/rAGv96
+3QCsPHa/6xXyv3eHF34aXt+QI/+VnL+i7MptMHN+n/oQ6UfGyMRsEu/gpCKB
+nJ9pzAdHSD2yPUFLyXkTTq9xJs5W/8yGp7xYngfQH0XDj8mP0N9niZHCF46I
+07Alphc251hSE+DRwbCVxKpaw8wrDtifKettMn90xeSAHyzIXbDVHvGiVIHl
+TfY01bVBv0oCK1sqloTAErcAlxRYMbCMPcRB3ecLRfUwK37eT0dhdfBiIdkf
+Sr/raCos8S8r8kD90o0xikgOeb5nFWfBKh/r0ggy/5U0ivTXqNij3wwXnKhf
+/AY283cLS/7/fyTd712sD/ATG8n6of7bn8JKxlTTFNx3ZP/uw7B/oZ2jFPlx
+Lyx8coZ42UXFl/B6s19YO1lfY0zrhbUZPWs6YF+7ArU96jWl65c3w/oupksQ
+bNjItdbCxuqDnkkwXV01UgCvpU3qDNjL2GobA1cnD5uUsMgroMoN3lnke0IG
+NyadlDxB/sqxa+0ceH3/ze8bYVoQcOcS6afYxlhI6n39vHEjsfyseB2czndx
+sJB64r3qFsGj2rRM0o8+YXCQLaw1VL9Xy8b57KkfsZL+hruGZtnBYX9Zh2FZ
+cIN/8Bycs2wP4ROYvpzL4LNQj0V0nsJ6aiIu2nY2fl/XGsCHu6TtdnazsI9f
+l3fKifWrh31tEeeC+9V8cr8xsbOKiecm1zOS7A+XvB/gcfJ+cKX/A1GYJ70=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.225285377617156, 7.188392099638602}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl1QdUU1ccBvAHIo5qIIiUImCQsFQkzGLV8CpTBKTWSRFTZZWhyWkUtCC0
+IsMqBhRKiZYhRQqKESUgRUTZGGhEiwzFNAeRikakDFuw9Ls25+S888t9793/
+/e6Iyb6DW0PUKYpKxpdc//+soKmF5LqKpngHL19kwTsSJ3+/tZKmShauFzvB
++c/KGg7DIkFvGw0/7j7fuRrW3vMknQu7eVcYKK1oKqciUmYDn3tX8SAHztcv
+H9aFa3K+1PscFhnmtalMaMpryLlPB367OfNeHey/4NrjXkv8bvqkIhlWjxhO
+/wWmtJx/9IJrOwSax+H6PvEjTfhAx/M3obBiJOlVA4umijTrMrbD+hoFod/B
+rDRxpR/co5q57QavWBVQ9xlpvyLzXQxHfZlVtAeW5zS61y6nqTHH43MEMF9c
+NiGADzQXWZyER11St3Bhzs7rrEvk/ur2+aZw0tzF3U3ERz/qZsHHxtsMB2Ge
+sXL/xzA7JqNzltQX17Y7BDb4k6vQw3jlyu7wEjhXFRZjAUs2NO1/B3ML/3hn
+A1NWGzgc1HfeLcaOmP+wgB8Kr49d4cSGSxKXqOfBtbK1WQzy/LTVF49gg1oH
+HxX6s4yTjS9CPh7XuloayPhNHwZvgE/aXFScgSW98TGhMO+pUdfnMO2e50Hy
+jppXYs2EwzeW+orhfZNa7W0WmL/msiNF8E+bV0sS4LepFxwK4KOekXMd4VSt
+s5EZsNLWYWLEHPOv9u2ZQ7A0ZEFuMVx9OlvkB9/9NPB5KMyf2P3QCM5WzZxb
+A88/M2r+DPXnv/l30awZ8oqxLimGNVPvB/bCOdI1lcFkPscsV9bBsR3C30xg
+1SHry1dgSjSpcYfk1/bxL5dgjtr9DA9YKrQ7UgbXrxsY7DFGLvLkRdWwRDas
+FwdXb/KZugfLpVPp9rBOv2viM5guPTygBtdcVLuujvokOZbFw0ao2+mE0ARO
+FKidIF4hCfvRhYwnQ8wk929dIp0JIO1Npwc4MC8kJVsAj24Sph2CS5W8jG9h
+7ZOMh/dglmPKnjS43vWrZhvUq7dPcCcFZgVf6TkP+7hLhr4h7ZJo5jyMV7f4
+7r4QYg7XywX+rjl2nRsc7q/7vRAOHq8e0ifPn935dRG80O2S+yDJz+tRlwxe
+bb1fTPKhuhvbR2CZX21CMMmr4Kuns3AOJ6LTEG5tbZ03H/PD+TXmbBcb8/1b
+SvUceLhSMpECixzK/hzD/W63x5e7wD38F3rdsHw4aOU/pti/Uz98Ug4zpu00
+foXzh7c2xMF23kf2Hoepta+TXOFuLitvGzwqsP9ZAy5cwGu1gf29Dyw8QeYz
+/Z+YpaTds8B/FnnduNnaPxemjznYx8NjjF4JBddb+hTOgfmv7TxIOz9hwv4H
+zE+Fs0mSDpzY9/tf62BDRtWUOWmPPuU8YYj+bJYqaVixPSWxCW5s7fQOgrW5
+dTvL4eKBMt140j87zFMCD95QLRGT+rr85e0w/7qtmRRmCYz5M/C4xStXGanP
+1fraRvRXr6jK6yfjZce75cJKzf1XlaTd9Hv2LGywzPJTxfvxXr0dRdbjLW7K
+A+KDLpYDMOPKdlYtzDGO8/JDHv6ZWctySZ7ZbP1qOMBkzttouKesLvwD5JdZ
+55HnbErmsYNpDwft0g6cxrnrnPrK5jOyvyLiZFVwjmagP9lPh30X3D8IhzPM
+hJHwkKc81gzWf3vRgJw3B2RdI32Yd7q502Mb7FdMb8uEq+V6CU5kvciKW3zh
+nsqnLeQ89c+a4mjBkjenbatQXwVz2/oe0m9DQK4rPPQo0r0U5oV5mzRhfDJj
+603J5Dm2hYiGM7UD+6Ng7cCXozXIJ3PkGCsI5ruU71oLcx8EyXbDot2LK+qR
+d6xstdleci58FJG2HdYQWn0QTd6n+vvx9DKsw8PHNMj/gFwsHZPC3FKZz3lY
+Uax0TIN1Gtuf3yTvf3naSAh78zhSUq8i39woFv7EkHlqkrzf9mbeOVi0t9aT
+ifEl6jAZrTBvue2wOczSPPpUC/077Vpb6EjaEwQ3wuFmqy1/rSPnrJ3N0U64
+szLpmjPJpyI9az3GY+zX8uEq8r/nmb2kHE6tnenQMSH7U/zECHm8UP/55Wv0
+LxErVckkn6V903dJPjVxaYNwfnvVq1Mw5esabod8RYWhulvgUY/ukSg4QsNO
+l6wLRUkbnQGPS2KLyL4aPR4dfwHXqI2MO6PkHLo5WSmCLzNd5V/AnMf2mpFw
+Y1cz+x7qUvwRJrIm73+3aZCsa1bNDkEf7tOnW/qbyT54oVYqhJPshTsD4Pcf
+eBG5GtL/AZvf91E=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {6.662419809687106, 10.755933890072207}, \
+{1, 0}], LineBox[{{15., 17.00000000000231}, {15., 9.999999999998607}}], 
+        PolygonBox[{{15., 14.1}, {14.6, 12.9}, {15.4, 12.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.9452, 13.5}, {-1, 0}], 
+        LineBox[{{15.000000000007276`, 17.000000000003638`}, {
+         9.000000000005457, 13.5}}], 
+        PolygonBox[{{11.48173265946094, 14.947677384685548`}, {
+         12.316718930329426`, 15.897834175673825`}, {12.719815750748694`, 
+         15.206811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.823799910437668, 15.984057296392571}, \
+{1, -1}], 
+        LineBox[{{15., 9.999999999996362}, {9.000000000001819, 
+         13.499999999996362`}}], 
+        PolygonBox[{{12.51826734053906, 11.447677384685548`}, {
+         11.683281069670574`, 12.397834175673825`}, {11.280184249251306`, 
+         11.706811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.823799910437668, 11.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{3., 9.}], PointBox[{15., 17.}], 
+         PointBox[{7.5, 7.}], PointBox[{15., 10.}], PointBox[{9., 13.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T6", " ", "P1", " ", "N11"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbf/cgdhei/fhhjgigjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdhei/fhhjgigjij.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:eJwt1As0lekaB/DXuDZGKjTOFLnsQ27RkKOi79MuNuM2KoRmqShEzDkOKp12
+LQ3nRGl0IbLcRqYyo6HGbaKxNbvk0lRnq8SOQmVcdyWk83/OOd9ae+31W8/7
+vt/z/L9vb+Mdcf4RHzHG0vCh7/9dGjyb/YDLmGdhz6v2K9R4Vtl5Vc/QhGf8
+7ukPs6o8S72mkesGy0Mb3hjD1cVR15Jh1lJWEK2CdZm5jlWwOH1Q0q3MM6mN
+xzEFrTcfS0uBJSquvWtMedb0VaW1Fxx0M8oiFTbyU1UnO/mOurbDYev8E/fD
+Q/HFU4sFsMuuN/dgL6UrVqFwofcH4SbcT8NS+iSPvCsuexxeKqj3vA+LT1nJ
+ytCf6JOud8p/xv653TrRmEdaYd1mQV4bWr9SHfdlBlobycLdugo4I/Be3BbY
+6ButvAvIozDIZWkI3NRSEyGch/kHE8sDYHG/0+FGOPRClY4HrX++Uaj3Mc8c
+3Abq7am+49IJDk4YzvLVJ+v7aa2Fy/u/bJhCf/zdSZEavCDk6WcymKWulRTh
+vPBq39yrVL8RN6YNd7+ICD9DHjXV24J+En5YdPIA2brNNAn9Die1q+2med30
+9h/EfHzjv/cEw0abok7HY359iZZuIOVzubtuK/LZfMtuchvVAyfOrEeeclvF
+t3G0X9v+ocNHqG+P0cqgvM2KO1Yr8UxF9l6ziva/EKgFM/SZ3Hu7H24KPfF4
+9QeOKWY/Njag+YQKw4VzHFs6KsrYBvNOrefWv+fYgk8f8yVUD74bfW+WY37p
+Js7D5AnjNgncFXtoq6MZHOijp4v13YUnIw+RNxhJ62C72xPCFrLdQM8POH9q
+4uCgqjnVj9v24/5eFi5HOZhXvjRdgv78lAQ58bD8L651EehfVHF/8iy5xWWr
+DeYL//xOZzVc+H2UwTicXJZ0/6Y5Pb/8hAvIg3X16LbDTaOLg9yRV+Tx65+2
+0v7EFRelsKJ3Sdt1qkdk/EuAfDVm0o9epH4OpZ/fQr+HYPGzE9TP4WZhEBzT
+s7Pjv/1sut5oCYdpdG71pfr5Ifc2nCcP1K60gVnOHpX1cIp5JptP530mncpA
+PzEjKyMmML98wPZRFfrNacxu64Z5fc/7v2A+tuvJy3Y4rFe6rgrzD7c7G96m
+vI6VZ65BPjW+J6I7yIKcZZrI83KjPKqX9o/sK3g1jefzs6X7NNx0aEXnyBTH
+lpucblhG86XvX2T2lmORRzwXU7/scV1Z4WuO6Rb9ujqN7CnW2aPgWI6K0xXK
+j42Li49Pwkvu1mkux/7tZmwhbJ3RG7wZFpuXMMUEx5ynkuILyCaKjFWoz1pk
+tA7CzD27pgNe8LZIuMIC+7+cnqvB+UY9a9rjYLFTYtkz3D+1UvnURbJQtEGI
+/jZsH1N+AvO9P4c2o3/n+oP9qpbYr3dG3x/zbUiMDxGQvR5odM/g/SvMZE4w
+b+I25o08FAYTMh5mSl8cO433S/+v3QEcLJZEeRfT+23zapsDXLj2GzV75Juf
+omRnDMtvurRGwwmedhHqdH7F/KwEOEti9WgI/RhdL/b2gZ0vTOX/Rv3t8+kZ
+xXnOl3Nl35FDPMoGcL8EwbnaozTPrZXx6ehnrPir7VHkOScrOfrNmWd+05/M
+ef828w752JeVCMnhiaWvML/IWDnShc7b2T90A/mIyuYErlQ/f0xyEnkqJmWp
+vlRfo3Zx7zjuX76zORJmRZvnyUY4FhRw/lIGrZf5DNm/4hhTacuto/qeJVY6
+QxxrSLI8Mk52C//1+HOOOSXVzthSXimqorp+jpULRnwSyHOp9sV96M/7cFoD
+5XctP+gLOGZTfbqaFerKf7r6E1wt3WHqR+7QzWrDfvGNaOuzsLjP58U/cX6Q
+8O/ZD6m+Q8ehY5BjoUp8sp41rGYacOglxyRKBus8yI6cPOkPPE/zivy/kfse
+1HqMceyUjW1FNswHLyp5gHnH7B9OlpPTNgZ7IY8s3e7wKlqvPR2Vh/druPH/
+XhUzdQX5lfb1SL6HxdaxiYffYL1/a+1ZsnqK4xzc5fiy4x90Hv/6+TLkr3Hr
+90dhcJNffP9T1K0dk/o4qmve2SuEu/UXzjckV7+tdMf5yz+5lfke8/Gi5Xmv
+0U+nplKq3Ir+b9oKAvH7UFlpMyqlPM45uB7APIofjU7XkCW7DJ8Oc0w+991Y
+JeVTZP/Ht3g+NaHGJlVUj1+l//kzjj37+kl/I9UTZ3VbeznWJD1wREaOLaot
+kyFvuezhO3Kn6NS6To5VRh4MMKP513dMlDbjeRYUz4SQw+bphf2E+e9ExuaS
+jdRfaKVxzCFmaq6b7LfPcFFeIxN7DjQLbGCN5OyW0kYmemRdupfcZRGrXdiI
+//+XX9eQ6cr6hanQ9wr+PwSlKl4=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           
+           9.996694214876033]& ], {2.5944997717265688, 13.169947406655712}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwt1Q001WccB/AnoXtauM1NuMrl1qgktVhW/P9JEV0RRTi6Mb3S9DqsuKVJ
+7Za7jVBebmrFUZFsySHXKLJR3bFipRuSMK6XoYR9n23/c+6553N+z/P8Xv7P
+OX+z4C83hWoQQkLxo/9EPYlnGkv+fcxZwp5XKfU4LCk9OKTxsxlLuOeScnoR
+r9IQduyFxQVdxRdh+Rl9/jyYvWERZAgfLW9+pxKwRLB5kfYubZbMuxZ47QrM
+iqpnyLRYoqhRjEfANtteS1I0WRL4xjjShdpH82n8VJZYvrIwXwAXbN8m3amB
+/2NPpAaw4mDpvTVTWDJjx0i1Hqwm/mXzCUt8vqnYzoPlxyVLlkwwJMEybq+Q
+rr8hD1r7gSFW70fjVsKquRflme8Z8thsf4c/LD6RdMP1HdbX2sXE0vqi7z0Q
+jWJ92t7xq/S8ffVri0YY4kl8hutpPz0i3xh4xSUyPETPc1O05sINXJssA/RP
+HmVfssH+Io5T1VJYZef+BQfnO+82jXWm8cRbx4XIX9TKXSeCBb0B4fvHGBLW
+kPXBDZbPIeEvUW/7pprJVTTupb9jK/rxyxy2EsKSR5EltZMMWe4T1zaO/I87
+wpIT0b/JQAah9ckHIpvNMB+1h7IxifZ/WFj4A9z5UGbsA0cUL9Jugdvv+Dbp
+0PonBQfG4BpBWmGCKeImF2M64eL5h6cPzYVrNlRfhmXJH2cHwzJr0XRruj4r
+3aFpDvKEq03PIL/rHOf1gbA4ZOadKNTHrruZ02eC/K/qr6eNM2SX2FF6HpYr
+az1Ool9uj56HN6wa4/M2YD4FAeZ+FjAbeHRAE/MkDkqePo3rmsdVDjEkco9b
+1yy6f8EFQfoAQ2Tmpqut6fkZftOy1Xg/JrXJW6mthFp1fzHEku+SlET9kTJQ
+3cUQzvJLq/6EJVNt86s6GdLZ16K7APWSod4JvzcMEXy3Z1UULKk10C/qwPrW
+p88f0HjtM6sGWGBRJdRB/5J7Wcb5WM/VPp7sAiuaBq8te8sQRa7rigPUd5xD
+13YzJPX0y/LT1JHc8mrUIzt6/9a3MEm2v+6Gegvcd0uOwGJtoaiyH/fv9PL0
+9dQuzcvsBxkiySuK0qJ2/r07Bf0LcjOkeahH4KPU/O1vhhjGP//MkVr4dUvl
+MENG+btuK9CfWKrcF4H5yUd6O+3o/BaHdtyH/cJeu/7IR/6rY0tLYcsXtWlc
+WLzDzXsj3PmqtPKYMdbr1EtjcZ64IeVCvxHOv9sf5IV83J1DORGwJDlzSx3q
+Sy10nZgwxHkuPvmTqJ9VemrIqd9eSevrQ3773I1bYPaBzbxEzCOhxzZFSOPN
+I/ZamJ+kV3aWQ+0gfRHdinreu7dpUgtFVsueM6R4t7/rbOriaH/dBoZEnDwW
+7UDdoTt++SHO8+UFHaKOCJR1lzAkR9dRUEydOt/2ShbmG/lUrIl6iefcosak
+csJdGh/sQ61urNuQU05SCyocL1O3Jx6oyS0nbHcmv4da5Wz9UybM525faExd
+XjN0Cu8vwbN7K3WrU1VIIe6jn/eKr6jPTtn88BfMY/Wac7HU1YR3tw7znBlu
+tB+WHPm1vRD113BExJ3Go45onG9Gf4ZtYTo0vn7qIyMV7nv6mzN3kZ/d8r1d
+JubxuGUw2ovO+6Zv5e125PuwcOUz9Cfh51Z8jvtoeTM43gtWuLZdMMI8Of2f
+5lXMxn7j8F4HWBVSFLgYVqRLAzKwXjHREpNmAJ8KHrR9jXkdalVPh8mJTzx0
+2xjyrDHbN34W9ktLnGxRj8K8pEsPlkSFnDrRhPvHWK7L49H8SU8yn6Af73yn
+AB5932VlHPQ/Gib7w4z3/3cjtey/74g++w/yhW0e
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {0.30479999999999996, 7.7452}, {1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.999999999998543`, 17.}, {14.999999999997012`, 17.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.5, 17.6952}, {0, -1}], 
+        LineBox[CompressedData["
+1:eJwd2Hk8VPv/B/CxJCqSGzeUkAoNKWuWa8oSskzIlsrWj0q2XI31zi1JlkxJ
+TdahCKFJKVGyJURGhEIpQuWiRVlavq/P74/yePqc897Omc85Q8Er0P4gP4VC
+4efDP/ykKJH/5GgUcfJzNY0SOla+xB0eYnTxh8Gxni0urTDvM9N5EFZKWmNj
+sZZGoaW2a29dQ6Mwfy8ueAYzK+MuBcNede0dW+VpFI8Aa5fL8H5mVnIMzLGQ
+si6E01NDD7aS9TundmXDIdOmm1cqYF0xVjsKzrud2edK3CU7agJbzR+NuAwH
+PfmoOIv8fcOiRzth3k7BmExY/AbblaJIo2h47tfQhq3kBS3Ww+JJ4f81ydIo
+EWnWRcYwpe7TTSd48k/7fXZk/YVkynsZGsVCTvm2I8yTzf87Fn56svUwncSr
+G+ajwqwktysmMG1u464RaRqlqVj7xWbYI2Sgkguf0PbulIJrx6tfpcLLLv04
+PY/65J0eeKbAyooOsoMwXax99Aps5VtWUQvTFISXdZLz85LCrsHMJXX+ksgn
+vtTRPZX0G7KOGwDH7TiwOY70azGY+wLOnqcF/kvim7U62KOf1Q0CJmSdZkjb
+2Q273Fh6NA1mnbPKdMM8hEOkTW7A4ldHTIdgukZDcRc8JCit74H5iofEy/Cj
+fo5xL/c5fFY+LGcbHDTiaG2I674/Yu0Yg3jL+C4WfMfopE0NzNSMKH8KD0xb
+TS5eh3qYnw7OwG+7yyodYLroLjMB3Bf3NdVO5cDMIobWLNZvR2pQ38NB1Pg1
+z+HCZxWZ6ko0yrTm4rEM2J636PNR2IMp7GEH902ln86Ha6WzFL+gvtAEnyXd
+cFDn96OJcIHIzbhZYpeWudVws4VaiMR65N9X3FiCfv32sW4qwCzRrNfGsE9M
+5eUNMO1Zu14/5jV9RW2CrA+9q/c9CbNa1DtWwrV6stGG8IfwrDoKOZ7V2ysC
+779snjiGfPInJvkmcT26w9VUn8AU85y0DzAjLetBKcwJyKBScPzhnFeB5+Ah
+y0pXdTjpY+gBBulv5eHSYzB3fiDeB2ZOvGhshy8uXL/pTOLJzHptQ73Z8dN7
+HGD6oZPny+EIz0tsF1jDhNOhhX6X2TF0/Uj8CivdamKRMydPkHmsuFlFw/z+
+Ohy/7xqZL2uvYy2caWam20Py//vZUBvX5+zdY9Ji6I+jxViTASd1dpXawNPV
+o4aT8NDvv2xSyfrrwi5JfG6/+gmvGCTzCWQUKMOsv+dGlTegfrHRpZthuc2r
+roXChatTF8i6l6W9ag0cz5CaloL7dsl5CmxE/qaxhi+I39qkdGgHLG/UEVEA
+zz8SzQ2HubrDBZbE7nn3rsHiqyKT36D+brezDU/gWkvPDyGwafOWbe/gIWuJ
+Gn642UpW8CuJ56UqfRHzkNn0OXqWxItRHdsC+3Gb/L8QzzVUvcQ80x9PzZPz
+6UatWRfggPNPijtJPoeGUS9YPm3YvJKs/+yWtIA5y2Q7Mkj+0pgqM7hmtsQ7
+hvSzRcvbHWY69ah7wUzqqUuJsOCMlK0lqe+B2GAnnFDyvVobnnYSeExFPY1u
+xgYqMK8ifznZL/klg03XwxrB16sk0M+G1U7fVEk9AnLGabCPvs4SA5gSw39X
+FvOJSNdv20Pqc+mSyIU5/rtWRcIWtc4bxTFvqYwze4vhyonTDlawDn1P+luY
+ddb/XRRcsyEvQlEZ9/fbfYIFcH0s1d4PrvXjN2iEaVXzuuWwR86VuB44oip4
+1S9YubHdcwCOWqP6xFIF83zV2vKcXN/8HJVUmObx8K8G2DSlbX0fzFT2rcmH
+1TvrX0upYq7mxffIc4Gq4XHPBmYvPb6IDt9fZOsbCU8/ZT6Whds00n9lw+Lc
+vQ+b0Z8g0+3XXXiIa5LtAn9LnXFsgikVPQYTmI8630uPVph+p5MZD1PCMyca
+ST63+fktsPXv/A3kfO4B09IJzNuwquVCHszyL35HPj8lz0wFz5B8X0Jl8uCB
+w7wwf7LeuZfHge09k0TtSP7t5xMq4SElzuetMC/F59E4PO8btUMGrpXgLGxG
+vtiQkhkhUl9O0p1Esv9R5NvmMQ/x8o5rZD8cNX+s/53M65RKWwj6kTq6w/0n
+PKSfkzZD9s9cs3ei5Pyi66J/YR5iwtQ1KjCNxy5gwtavFvfbkvp8YlbWwrEi
+dqdjYGWB5O9zcGi5hCLpd5ZPU5WKfb+qiWnznawLl/Y6wnp8292NNsFJZikh
+cGiQlPdpmP2I4RAL/1pYatMF09r3XT0DD2Q4f5Kj4vp4jcWegN+Oiar6wazl
+jyICSXyZux9KYO7wu/jd8MuZ3j0fYcbZHiVVOEAsiaeghvvp6uGNC6hvJNL7
+DzuYd9T+XhNcVfdMNwRmBB4yTIGtZq7VJcAau0u2OhMvUrzKhpl+g+sUyDy+
+hu7IhDlTLxa9xrxi31QcuQjTDcOVz8CNc6728XBQM/u6KRzVkPvPMZjmcql7
+Jawj8HeDK8yt71r+gzzPbrooGJHjq3R6F2D3N+bVa0m83dw8cnx6unm1ADwk
+YD1sRu6/oTJD0h9zUkzkLFyZLKDTB4uf8Ur9AJeHO/q0kf7rb0hSUa9F2Xe9
+FjjePcT7EPn8VOxv7YCVebHvi+GCjILmIdjF9s+tk7C9zN6wHzBeWG5rYH7u
+tvfyFZG/9n7aJzLvTImUKntYbyY6oQimXrjCTSTrD4T29cMTUwc3tKmRfdeN
+LYDnthsn+IiEOuIZBfDk4QIJ+nl3mB72bdlWWCf1fmwhPO1/qUsH/mGdJv0V
+bk6eoJL3nvqg85uMNuP+eKt2VRbWi+y+8S8sns/Y/hP5xm3cnzyEGW++xTyH
+/Z0SR2eIDVy2FcD7fKf2r9DAPkw1zgyGc9Qz7irClReDlurDid7JderE7AoR
+fniqrpOhDWvcOS7XhnkMCvms0IWF66jV6WT/ml42ownTe4oUgmAZ5SUPqfC4
+7hFrW/jXozJtEr9WrfWFDvl8BBrvkCTxLRbmVeEk5oExIVg+47TvJlg4fsx/
+GvWyjjTu0YPTjbvju2HlYDZjN2w7ddfwPsz7mc8fRuKrLYougvX6Ksuuwv5G
+wwLZcPyOte398LJGIeMMcvwirz3S6KfGqJSWBwsH5S64wVbrXW/fgsff3bHI
+hguZj3o74NrkNbeHYDmtvYxvMHPwXM1azHvnudyIP1AvzZy+zBU+1/ZbUQPm
+KLyOToDj3l85QYcLTQ6Yl8PC9S8eHiP9JjB+PYVrVjx9y4bFvWVvvYYHJ6pf
+18DNAlFTw3DxxMfcEXjowKu6ftjIacWfIlvQvx2l+jHsWpCsvwmm/6E8Xgi3
+8CvJW8Hi1ZLNTHj5kpKfPrDerV0Gu+H/JPZrRsJ9zx2CVsOSdzztk2BOBK9t
+BP2197gqsGF2uVV3CZwaV5OdDVtcaBI9DkfpTlA4MNde870ZLFM/disTdtn5
+NF8W/vh80jGNnC8Wpz+PeRfFCJQkwKz6PduH4dzzd65Ewxrrg0d74QHD08aB
+8PiRz/19MINreM4D9hBOtB+FuS1FpfYk/8bY77/h6gR6rjk5/+W6WSXkE7nn
+ftCI9GvqsITsnz7Oh57rkvUZ1YhEuCs0qkCHxNfsNWiBE2TYB/RhebtVfEvR
+/7pz6o4mpH7l6N225Hr43ebshguPuV5lwdXHQ1UOkvrH/y+yAz5gUZ5B6h9P
+nIsSxntzvsry4HSYcvVW0jbY2VJspgquzKl44wF7vo22fgUL53pIR8PlrOMx
+AlsR323ULBmWkrwcowJXLhedZcHt30X07GDeTK1J/Dry/viSfQyeHtnx8Bi8
+e832rDSY/vFHlCMsWmbpdpusFxpRqHCzVtjiDpg9T1f7gXrDhxaE3sEuhlna
+5H7x0zOcmIE1LC8yU2DHB9uYfJr4fRbjvDOc2t/XsBget+j5pAB7X3s+JQzz
+KpeKfsL8tn0NCFkE021vyT8m8/V6/eEn4sVrKsmT/WSnULfiF5jj9IWTAvfY
+rBcahYM6bFrJ88t8rcrlXtgjst+CfE+SrBKYbIYpfEU7L5D9NM5XuhoWz/AO
+KIM3j2zbeIP0s2VuhHxPOqV5YXkBcWmYO9k/hc5eKOGQfnwfrzaAb2gdupkD
+M+wfSYXDgi++5l0h9RkMzFXBNuquz0q2kue1u/Uvsp+a5rqSfJVf/jlFw/y2
+j5TJkPlZiIoo/wMn2YXVjpH6AwIH7sLRuZH1guh/1bPIM+PwD4Wjh9eTeag6
+H16O9/hV93L6LWBKs6LCJti9QW51AMywdHqkD6tPT8ldIOdTrf8zgl0V13bc
+g4Pi2eVa5HvDCjnZV2Td5gd3LbyE/B1AC/fP//9xgPY/mqO4+g==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.0723744310654, 6.280370328210516}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl1gk4VekfB/BDhmsrdBMSyhITum0yBp1QabNniRCKtJAwikSZukq6leWq
+JqbuY4ksIes/opFUY4non61Edjf7UJrv+//f5/Hc5/Occ97f8v7ec63y8LM5
+LEhR1CP8kW/q2w98dOj/f6vSFMe9VsZSl6ZUNraqDsHa+c3eSbBhDWvwBUzf
+XPHyAyw3pc5KhNte/nNs6TqaCvl9Y/QB8rztgKwxnGI2qsWEKXPO1gNw2229
+uprVeN70hrI3sXF4RBAcU7Cowgtm1EhxVWGJM8KTtnCgxi2v5lU05R8b4KAH
+MwuXLrsKp9fsWLcYputEo3fD7p58y07kY14VrbUMvvtjyXQG3LBQXDusgrzS
+Km4Hwmqj+tFNcKBsxvNtcFxQ8981sNrI4TYmbKZg/MtLOF3i0SAf/agMV89o
+gzcVFyW0wXZebpYTcPn8kg9v4NkU279kEU9T58FCI2wW7q1Dww1VF8/3wnI7
+c5yOw7OSphIMrD8p3jGdCIdcMWTrwyEWWiUVcEw3VyEIfu3Wyu6G+T8b7yyD
+2+lvmTOwttpBKQbqlYu2HRJEf9zj3yk5wu2HWLkUHNjuMJYGC12bkufjfjb7
+jcAkzG35KtoIt/+5P0qRhT5qUuo8WHj1X2IGcJtkS50vzEg+5G4Nx02cXLQG
+vvfrNO8QLGTM8/yAevV3VTn4wtp2JoNXYMPvZq7H4Fqv+FZ9+AL7wU+HYU2b
+WcFGZfQ/NWHBAVZpe7zXAJZ4Kmu3HWZ5si/kK9EUr8LsoC7xmZjqbXCtvUUm
+E56t5MgMrET/L0X1TyD/Yr0F5Sw4S7RvpgJmL45Wj4GHbehZDuxukt7ChkNC
+rBR84XTVHLcU2GdmXsWC1C9rza6HFfVEDLfCuWFmLdKIV6B/fZDMp7ti8ctD
+MN3Q3LcPdrx6jFUCM98cVTxO5lflop808u9+bJbBJesfyfroCTuezBpohDUH
+u9Y9hC3SdF6IIf8QX6G0TtjEufUgi9QTNhr1DRb0UZZzhPsH9ytS6NeVp776
+EXBKcsHNL7h+83LJfCpMpwR/yoPjRgLy6kh/xjN+uMHB3fpNA3B6KN94Evn5
+OF1nLlqP+Yx1sgmAnw5vDV8G+1ufXt6FemMux55SgYsNr+2nYcf/xBSqwuld
+PL+7ijiPjBVnlMnz1YqL51bg3Oz3s2LCs+Kvn7vBBq4mOmR92kqj9K0C5uUP
+SZsRxO/uXGvnDMucEt7WDFNtF8fm5NHHW+VpJTDnTSKvEN7g6meeTPKVfbXy
+Gjy3ee+nS2TeeqnISNh+/p18AMy9n3ziBqwgV+bhAReXrF1SCpdyWcOkX9zY
+cNMZ4q7vHHvYfCy+yRTxNZ6MvHIm+RiJFybB5i7783xguebQw+Pw53GB0TAW
+6RNXfyfqMSm68yqRzD9Pr+gGPNpvalBM8lNOnXoFZ6cPdbbDUszMHj657nlf
+XQj1s/u/cL7B5a8+22vDDQbLPYbhDeWvs21hVtyOTRWwnsBAYAgxb9PxILhq
+6OzSJFgzXPCrFCyY26VdQPZnxXmZeOT3cJVQdi1Z/6KPizBcaTXQ3gJz8384
++qLe1Jwgjw/Ekro7XsjRVM2MpOV74oesZ6qw3b0i+QY4t9noxKXleD9xGpIq
+4e6j7UlTspizjXnzmSTf0PSRYPj+6abcW7CKspDCEjhO28LlDMzZVXrn2TKc
+pz+elbvCIV6DVzmwRml53HY4Yk3RxTC49sm3m+vIvIjoxUXBCh8f/6pE5stN
+3DYVzjor1ixD5uc5Y74DpqcFrBeTeXNclqyBeFXz4bulYSm3vONnYe75PRMr
+YPOpW3NN8IE5b1ldUp+TcbIW6unseSe/E7ZiT9b9BltUlwkfgRn3XdyL4Gwr
+94RoUv9mOZEe+Kmov2kuqWfv/Olp2Lws0rWN1N8q9WAU1n37Xo3agPW5zlQd
+fFd/Q5s6cfXac2w44NyOdzthuTX9nLXwuGlfthfMTtmq/gT58dieW0Jhd++/
+T2rDDYr2t6/AlNWegluot0+ty+MmnBJvJDLOxHuebr5A3Ob64+s+2GQ03PYq
+8eNDytlL8Tsh0sc5B1vZ3qXkYb76R0tfWCVgd3CcDE35aoaN2cAMf/FIdZhz
+2l/4F7K+yMz3emnE88vep0TyUQ4MSIANnOSjhWCfkPWDZ+Du8hy/EdTvniQ2
+QFye4RH3X5jPSTgVB0fQzVZvYMd4EZUa+Ozvivk1cEo530EM8XT9r/i9IPtp
+yb7gDGt4rWqtJ/s/q3QgH862t33bRfanrtFYHPl3mqz/Mk3225PiuMAbegX0
+mKTe1Pqf/oS9+npj9eDZfZTwW5h9ejjMheSrlTw2AgfbVRyIIv1sv+40Cpcy
+Onyy4IbVPLoJfty5qbcJTn9ZvzoJzmL1rZ4m/SthCJvBTf98TGFuhKOCfFuQ
+36UhQyUd2KePp2kNx1goZxrD+vwEo3LUq5F+otAcZuTYX1aE3UfCpfbAnKH8
+oBApmgqf+G1mO9ytdvvIoyWYT0NtMQO48rNAYuhi5Hkw20wTpnJkeN6SNPVu
+peC4NByh0LgqTAL7v513exb50dz5yGfiOO+7msc6iEMY943guZaigmqy30fn
+QifEcP5Ur6VmwhyW3sInWOiOzuFEcl0sWEIU94+OrTzIJs/nv85wg3Pf2xac
+J/0pi9jVCQs3FRiEk+c3nzM5i/hNYspupJ+cNBO3Nchv+hxHi8xjRFbVhTaY
+mio1SIMrJYOdIlBPXJlYYxWJ5+0gKYN6Dbe0N/UQ7zabiIR9Cu07GKhPqv6e
+Zg18T1LNgQXnSnbItcJ1bMYlx43k93i2Jwe2T9ySeh5OOWmdYgFTFj8L8sj+
+zMcGFiBe7MNC0eekf0ZMdi/yiUrX9O4k94/01PUj/+I8O+lxmC/5OfEF6otI
+iHFaIPFbgvWuoT9R1e2TgpvwPnWWNdkhSlP/+8B88v+rCP0vmGLqoA==
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.28233829669103, 4.3021661698002225}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwd1Q1Uk1UYB/D3oM6hk40Pa8R0I3FNAwRkOgXhTRZsKLCQD5EUNPBMhISD
+FB+KJAOmWE4OJAnogqBpM2d+AQ3BEALF45LpwbAUlUaQSk4UAbX/bee8u+e3
+3fu8z/Pc+57XdcuOyGQbiqI+wUVGikO+5tPU6Bt8XGjKV2aQ7phHU4LNByJv
+wT2Ltaf6eDTVZo3b1QGXi6pWfAAbqtgzrsOGooLBkxgFrZZgK8aopS+LF2DU
+UMdTvDFPnS8rbXiHpuiVQRklsIpxqnMl8Yna0KdwtbxO9sAZ6x3Ojqfhvrou
+s6QW1vBtW8bgy/b7L2bDhucOESrkyYvKtG6FCxqKuU58muLeKrm/HVa8lmQd
+g52aJsqK4LahqzkcAU3949w9/zSsfLyjWw6bRv7sHYYla9zyc4gZsZs8kY8u
+c+3vNTB38unLz+DE8BffnoMNrApdKyzyeSlqg6WmsO3TUB+9qGpDC8zszMhb
+BQ+1lDSfhN3c3/9iG+lH8/CmMrhP6NxRCHOGGA9TYae7HRv2waKS63GB8PRH
+dquzYaU61p1F7ldmkx9B4seEcPSo594edwEbpujlnwcS15tCGpFP+g+PPfrI
+vkXz5obB2scelXnww5C7GhPqo1JTjnnCXO+BfcHwqIcul/RTk5Kw7QwX/WkJ
+ze+FmVl1FA/WKqc/vwKbo59+VPQ25u88POsP2Dc2NPbZW/ChirO2iFfulN+d
+BnP454wRMKtr+fDYXOSV1tith6Oawtdp4HRzSN485DveWXUtEKZDSjU1sHKJ
+mzcDNlmSWE6oN/EXhuKhE+qO+fdmPNy4hvfoNly5cE5UHayyOX9xEPby82+y
+wD2v43bPwPpKTmq80JWm/PeaX4lhZuzWGx/DibGZ0Zmw4KtIx32wLq+H0QQn
+JrPUx+F7A2yxDfLP3i51bYHdtd/0y+Ehx+ot7fB3R+UzS2GvGz5KI9zztz37
+Esy1JA3qXMn5EHdb4HH3K7z9sMy7v3kSplaZfttM4tdcDZyANR+W+/rAGv96
+3QCsPHa/6xXyv3eHF34aXt+QI/+VnL+i7MptMHN+n/oQ6UfGyMRsEu/gpCKB
+nJ9pzAdHSD2yPUFLyXkTTq9xJs5W/8yGp7xYngfQH0XDj8mP0N9niZHCF46I
+07Alphc251hSE+DRwbCVxKpaw8wrDtifKettMn90xeSAHyzIXbDVHvGiVIHl
+TfY01bVBv0oCK1sqloTAErcAlxRYMbCMPcRB3ecLRfUwK37eT0dhdfBiIdkf
+Sr/raCos8S8r8kD90o0xikgOeb5nFWfBKh/r0ggy/5U0ivTXqNij3wwXnKhf
+/AY283cLS/7/fyTd712sD/ATG8n6of7bn8JKxlTTFNx3ZP/uw7B/oZ2jFPlx
+Lyx8coZ42UXFl/B6s19YO1lfY0zrhbUZPWs6YF+7ArU96jWl65c3w/oupksQ
+bNjItdbCxuqDnkkwXV01UgCvpU3qDNjL2GobA1cnD5uUsMgroMoN3lnke0IG
+NyadlDxB/sqxa+0ceH3/ze8bYVoQcOcS6afYxlhI6n39vHEjsfyseB2czndx
+sJB64r3qFsGj2rRM0o8+YXCQLaw1VL9Xy8b57KkfsZL+hruGZtnBYX9Zh2FZ
+cIN/8Bycs2wP4ROYvpzL4LNQj0V0nsJ6aiIu2nY2fl/XGsCHu6TtdnazsI9f
+l3fKifWrh31tEeeC+9V8cr8xsbOKiecm1zOS7A+XvB/gcfJ+cKX/A1GYJ70=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.225285377617156, 7.188392099638602}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl1QdUU1ccBvAHIo5qIIiUImCQsFQkzGLV8CpTBKTWSRFTZZWhyWkUtCC0
+IsMqBhRKiZYhRQqKESUgRUTZGGhEiwzFNAeRikakDFuw9Ls25+S888t9793/
+/e6Iyb6DW0PUKYpKxpdc//+soKmF5LqKpngHL19kwTsSJ3+/tZKmShauFzvB
++c/KGg7DIkFvGw0/7j7fuRrW3vMknQu7eVcYKK1oKqciUmYDn3tX8SAHztcv
+H9aFa3K+1PscFhnmtalMaMpryLlPB367OfNeHey/4NrjXkv8bvqkIhlWjxhO
+/wWmtJx/9IJrOwSax+H6PvEjTfhAx/M3obBiJOlVA4umijTrMrbD+hoFod/B
+rDRxpR/co5q57QavWBVQ9xlpvyLzXQxHfZlVtAeW5zS61y6nqTHH43MEMF9c
+NiGADzQXWZyER11St3Bhzs7rrEvk/ur2+aZw0tzF3U3ERz/qZsHHxtsMB2Ge
+sXL/xzA7JqNzltQX17Y7BDb4k6vQw3jlyu7wEjhXFRZjAUs2NO1/B3ML/3hn
+A1NWGzgc1HfeLcaOmP+wgB8Kr49d4cSGSxKXqOfBtbK1WQzy/LTVF49gg1oH
+HxX6s4yTjS9CPh7XuloayPhNHwZvgE/aXFScgSW98TGhMO+pUdfnMO2e50Hy
+jppXYs2EwzeW+orhfZNa7W0WmL/msiNF8E+bV0sS4LepFxwK4KOekXMd4VSt
+s5EZsNLWYWLEHPOv9u2ZQ7A0ZEFuMVx9OlvkB9/9NPB5KMyf2P3QCM5WzZxb
+A88/M2r+DPXnv/l30awZ8oqxLimGNVPvB/bCOdI1lcFkPscsV9bBsR3C30xg
+1SHry1dgSjSpcYfk1/bxL5dgjtr9DA9YKrQ7UgbXrxsY7DFGLvLkRdWwRDas
+FwdXb/KZugfLpVPp9rBOv2viM5guPTygBtdcVLuujvokOZbFw0ao2+mE0ARO
+FKidIF4hCfvRhYwnQ8wk929dIp0JIO1Npwc4MC8kJVsAj24Sph2CS5W8jG9h
+7ZOMh/dglmPKnjS43vWrZhvUq7dPcCcFZgVf6TkP+7hLhr4h7ZJo5jyMV7f4
+7r4QYg7XywX+rjl2nRsc7q/7vRAOHq8e0ifPn935dRG80O2S+yDJz+tRlwxe
+bb1fTPKhuhvbR2CZX21CMMmr4Kuns3AOJ6LTEG5tbZ03H/PD+TXmbBcb8/1b
+SvUceLhSMpECixzK/hzD/W63x5e7wD38F3rdsHw4aOU/pti/Uz98Ug4zpu00
+foXzh7c2xMF23kf2Hoepta+TXOFuLitvGzwqsP9ZAy5cwGu1gf29Dyw8QeYz
+/Z+YpaTds8B/FnnduNnaPxemjznYx8NjjF4JBddb+hTOgfmv7TxIOz9hwv4H
+zE+Fs0mSDpzY9/tf62BDRtWUOWmPPuU8YYj+bJYqaVixPSWxCW5s7fQOgrW5
+dTvL4eKBMt140j87zFMCD95QLRGT+rr85e0w/7qtmRRmCYz5M/C4xStXGanP
+1fraRvRXr6jK6yfjZce75cJKzf1XlaTd9Hv2LGywzPJTxfvxXr0dRdbjLW7K
+A+KDLpYDMOPKdlYtzDGO8/JDHv6ZWctySZ7ZbP1qOMBkzttouKesLvwD5JdZ
+55HnbErmsYNpDwft0g6cxrnrnPrK5jOyvyLiZFVwjmagP9lPh30X3D8IhzPM
+hJHwkKc81gzWf3vRgJw3B2RdI32Yd7q502Mb7FdMb8uEq+V6CU5kvciKW3zh
+nsqnLeQ89c+a4mjBkjenbatQXwVz2/oe0m9DQK4rPPQo0r0U5oV5mzRhfDJj
+603J5Dm2hYiGM7UD+6Ng7cCXozXIJ3PkGCsI5ruU71oLcx8EyXbDot2LK+qR
+d6xstdleci58FJG2HdYQWn0QTd6n+vvx9DKsw8PHNMj/gFwsHZPC3FKZz3lY
+Uax0TIN1Gtuf3yTvf3naSAh78zhSUq8i39woFv7EkHlqkrzf9mbeOVi0t9aT
+ifEl6jAZrTBvue2wOczSPPpUC/077Vpb6EjaEwQ3wuFmqy1/rSPnrJ3N0U64
+szLpmjPJpyI9az3GY+zX8uEq8r/nmb2kHE6tnenQMSH7U/zECHm8UP/55Wv0
+LxErVckkn6V903dJPjVxaYNwfnvVq1Mw5esabod8RYWhulvgUY/ukSg4QsNO
+l6wLRUkbnQGPS2KLyL4aPR4dfwHXqI2MO6PkHLo5WSmCLzNd5V/AnMf2mpFw
+Y1cz+x7qUvwRJrIm73+3aZCsa1bNDkEf7tOnW/qbyT54oVYqhJPshTsD4Pcf
+eBG5GtL/AZvf91E=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {6.662419809687106, 10.755933890072207}, \
+{1, 0}], LineBox[{{15., 17.00000000000231}, {15., 9.999999999998607}}], 
+        PolygonBox[{{15., 12.9}, {14.6, 14.1}, {15.4, 14.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.9452, 13.5}, {-1, 0}], 
+        LineBox[{{15.000000000007276`, 17.000000000003638`}, {
+         9.000000000005457, 13.5}}], 
+        PolygonBox[{{12.51826734053906, 15.552322615314452`}, {
+         11.280184249251306`, 15.293188945044921`}, {11.683281069670574`, 
+         14.602165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.823799910437668, 15.984057296392571}, \
+{1, -1}], 
+        LineBox[{{15., 9.999999999996362}, {9.000000000001819, 
+         13.499999999996362`}}], 
+        PolygonBox[{{11.48173265946094, 12.052322615314452`}, {
+         12.719815750748694`, 11.793188945044921`}, {12.316718930329426`, 
+         11.102165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.823799910437668, 11.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{3., 9.}], PointBox[{15., 17.}], 
+         PointBox[{7.5, 7.}], PointBox[{15., 10.}], PointBox[{9., 13.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T6", " ", "P2", " ", "N12"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbf/cgdhei/fhhjgigjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdhei/fhhjgigjij.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: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]& ], {2.8245590828532245, 13.052815449711932}, \
+{-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]& ], {0.17544091714677545, 8.052815449711936}, \
+{1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000000416`, 17.}, {15.49999999999958, 17.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.75, 17.6952}, {0, -1}], 
+        LineBox[CompressedData["
+1:eJxFlAtMFFcUhoeisYKCluWhVh4zI9BIKcywsK2UHm2KUA0KLBZEZXWBWooV
+2fAQEOVVd8lCjYq81rIoBeRVUGK1lZfQEhYEUSuSSOVhk+Vhu0UoCAvbO9bc
+nWQy+XLvnHPvOf/57Y4cD4h4iyCIUPRyX56Oe5yBeP3Q0CCeWfjN8wMgRMUe
+3m401LSNDqSlIz6qWed3gIZGv/LVil7EGu/YV3E0yJ0/CzY3dQGivrF56jQN
+bSE1pkYeiNUXPyo9SYNV/NkXioOIg2VO0WIaeoqeHvNPQ6w8sj/Ji4ZXm+6o
++5WIYYNN6xoaVLFDPxj8wrH8nz/uU9AYcmDKuA8x8fCuQS4F+9K/33H8KeJb
+WovrOymozuR7rxhD7CPbXGlAQUKUqEU3inheGlDQQoJ904lHf3P7h88HGGSR
+UCgRZzT2IxZMSLVCEr7QdndK7iI+EyXgMSTw8wbXZtcjtvWwtLMmwWRirCPh
+MuKj+X6uG0mwyZ8yupfN5fN2TbInYUBolMlLQnwu46ugHSSk9o4mN0cjjjH9
+1TeaBFlm7NdrwxG7GDvaXCEhYEA5seIwYs3jAu0wOh+ZOhPKrUtDenO3UFAV
+4i6QfMPV57k7P5qC9/mWC3tOI94rsGAbKDCsCFUVX0LsWGE3qqFAqyEsrt3g
+8uumxhxoiGjZKkz5nbtvR/aeQBpeCHnCwQXuvPmzT2JoqL8ingskXVH8NidN
+Kg3+pChe/DniVt9Dj1NokChbHRNOII6p1FVE0SDd63/b+BLi4d27Q31pSPZU
+l7XcRCwK8rqxkYafPNr/iniAeN78usMIBbWkao2Fmov/cK69hILvCle5CeYQ
+27YVLIVQsGpy8lCOjtv/56ksMwqGI/9VMgYMEFZ5L83vk2DVY1lcokXrVknO
+cIEEuwvW9sppLn/30jYRCfEnd8p8n3Px8gV3PiQhMtG9b5LL7zjOquzI/3Xc
+ilgQ5FK1AfX7bJcLr1a/Lvv2VvzNYv3/S1+ODIbl6OOrWXW4KEOf37Zwddi9
+VFd8vnkerzT2jP78MZHz3Z1S/f0Ch/gvx/P1949s91xfVKuvT1a7ZSh06euX
++GOd98y4vr7ysE8GpCYMrn/dUIlMwWdwf44FK96uOcjg/plVT1bbZzG4v8Xw
+qDqjisH9NzTVje/rYbA+loLL+OHjDNbPA5V6ZT3BYn1JSrs65etZrL/BoTTj
+sk0s1medY5j5ojWL9RufnHNxmlt/o+80182Z281YrP/3qmeTJ1eyeD6WxWaz
+zCyD52fa/N1t0lEGz1d3lP10XB+D56/S0E0gb2LwfEbKFSm76hg8v3Mf525d
+d5XB8y3NKwHiMoPnX5isur2oYLA/XDt1uOkct/+Nf+wqv2o2U89gf3HPIfcv
+dzDYf7Y8+9TS+RmD/YmNoM7XLTPYv9SyxHfEJIv9zas8UDPrw2L/k/T/XDER
+w2J/LH/itNhQwGL/9Cky4bU0s9hfHXqz0hUjLPbfuNeCdsP+/B9S6DsJ
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.75, 8.354800000000001}, {0, 1}], 
+        LineBox[CompressedData["
+1:eJwt2Hs4lNsXB/CX3C+FijBpdCIiplCSNGlcKjEkl1yanEguNR1CJU1CkphK
+JVQTFUo4pahUQyoj50RyQhekRIcaNRUiv+8+z88f1vN59rvXXmvNfkdP+kHb
+PYKlKYrSlKIoEikZ8ovOpP77mcOkhMFj/i6wj/JsjjIsWCvtmAM7TykzUYKp
+on0WH2BBNb33529MyiVGrpihz6QUtDwKu+C2gVT3aDh1C1fnFll/8Y92OZz9
+PCgmBa7WMnd+C4t//dq+GqY7tWcqzmZS/PhCQ3lY5kzfLAPiAwyV+4iv1vNK
+LBGr7tNE0Yhx3ow/rBFTayP1TIiVWBYLiAcDH71D3grb2eZ02Lo/cv0FONSH
+Pk0epszVZkbAY/ZhAx8QZ6gEqduRuhXb5B4iCkpGrukiSnKqXgkQu262j8si
+qjnd+baX9PMPK3AcfYsbFz0JJPsGxVekEMslU0scSD/rmkw0EG0X5+Rbkn0S
+/+z5iEUnnAJIrDKRZ3iQ+hbe1l2AGNcxR0Ty0vWSBEzEtn0JH68iNmqmGfkj
+cvt//9CJKFzmFnqA9PGX4i819DF20iXzBjx88UWMHexy1cx9CLbeaP8gGI4X
+8SVkXpzQ1pwkxPr2jJAExPJV9OmnEZnGbI8niM5aQffPIwqa9y3VxtyFUWMl
+Z4gjUnKC4T69r/vT4WlRrJGrsOAmFbsNtu2UmyKGjVZqeLNgFjuuwxj3wmeh
+Y8wUuOT+lipfmGvYmt+MupKebopJgJvm8dWOkLnbruKcgqvCXy9nkXkNrnO+
+AIded+sewXyHJeqHLsLiSN3Kcph7fotUHpyqW7czHK4/XaR0CG77J/iiKbmX
+1ayt22C29mfFwVn4/GbesHYl+9Wzu0/AjRFHWubBama9OV4w81JNlRzM2/f8
+MwOOuOK2/R364XUKYg1gmn/G1kdkHnZaAgtYKNzSXwqzZVQrfGEO61bvObI+
+6cGnLDidPzacAzNWeeR2w9F+ixzOwz5/bjw3E/V5Kg5zr8OhceHBrnDbIfnc
+ZpizTBTOI+uvqQ3kPeLQlolJv/wxqsaczOfgxRWvyfNcg7BI0k9p+htpzKvu
+8daUa3C2zpmjs8h9nWn+ZYzMx+xmGrlXvB9Ja1cbYC7pB6IWw8z2WVrZcCjr
+agJ5Ty0PPqnvgXkmEi6N3KOG6ZJ5hji/+lnBT5yXJD0QEA6nFiZJPSX3PX1I
+qwBuW5w/egqult5+somsVz/c6QOrtXTVfIGN3ktuacDWlwMmKc7FPPpTio9h
+Hj63ndZMhbsiLo+O6+E9/DqmrgHzTNX/jYDz0hI85GCxCrv13UzU0eGybwj5
+KE/l0jD4VeT3Ha2wMKTiiTRs6jHdqwJWc3W5UU7DfUos5vNhQZbvaAxsG9N3
+IYL0k/Niujdcdeqm1hpY/DU0wB2W8Zm8zgzmcw6Pb4ZLAk+nzSD5Qoal+TAr
+61q+MtnvWM99Cou3Degowrx1/kGzcH6q1JRxdZgrx1+8B04qdW02hLtyl4pe
+wzI2K7KdyP6dFQUr0J9aX2tDFMnvdZ11HuZbu3Muw4z6bt8f8OZ8hY5+Yl/n
+cTtyv3b6ejIwj3LrzwNRsFigk7cH5pguuUPmWWd60klE1lkt37JhmZFPzZpG
+yFuZsCIZZl2/U7kJFgzFbfWGu1SOHS8k6zeebVIj+5uXLemFqfJc22s4vyRh
+29+6xji/NECDCQtrajsdYU73lzd30Y9/rv2OEFgscfRkwOlN6Yq7Ye4S2Yt5
+mI9CmXXlflit/ugqBbiJZq6WAJfPHaiJ08X7lSVtwiXr7bbeX3Vwzvejx3xh
+wZ1nnfGw+EuipS3Jx1mSqg1nBfqt0TEm835R0KiNz3PjQofvqJfeOv9gNiwZ
+nlH0DGYYhEQmwHOWRX37E+au8gkjdnY8eOQksbB46ym44lJSViLMnD156WOY
+YbyoI5b0/0jvihLOa0rY8ZCYX1tWGEAsa8Y6QPLby227Awtm/hDmkHzDPUI9
+9GP91wK9e8SHpOckwpZJ4ZUDsFjkp9MFC/0KQg1Qv7B2z2YLzIMevTSXzE94
+a4ZtLNzWPuFdSua90iWtEH51JiZglMxriaxmDSxUil/iPA/rlflFxM5rFYJP
+wMzPWnOLYMbCHk4nLNTaczYazn4/0fybCfaf4q40IvtD7PI4cJfers0PUQ8t
+JWj0OCzcfM/NDWYOmR+rhhmxqfMb0J910aMD7TBnk1yzDWy0/GjUR5Lvr8T9
+l8j89DwzPhMvi7qnASuIzA/2w+wbSlLJM/B3bKIkk+xnC6clSMNVkfNX18CU
+U8fHTC18PhZ+lfkwf7jUaQFcFx42iwc3lSRf69fE35cl5sN+sOBzxso7cFaB
+mcia1Dv0x7dLcETsh8naMH2nZU4JWf+WrTdB5lFp87oBTt3/WHmQzIsV7jEB
+N+Ve4b+DufFFRx1xHo9zcrQXZk/ZG5AHX+g01v0Gi9uXtfyEk76qLJ+C/OJ5
+vPyNqN+WnjTPClbT2b6qFmbaa9JCyDznrlunh/6FLrNaBaTehSknt8FiXXFh
+D8zVn7a9lHjDyzRTU5y7dNvXdrgxxdt8F1zu3EH/RO5zvjntMczfdmG8jzzP
+Pi2aOh/rqpllIng4aOiuP8xN3p/Mh9vc2orPETfIS+zI/dbbntgBq11qSHqB
++sQRadnKZoinq28FwNyWlisL4C6Dle9b0V+bDjWyBha46I+wYO7DOPsNMJ3h
+7lqOeUWnarb4w+xbq0NnwnN6/trtSfbLbr15dDo+39dRyfYwL8bKSwPOpsmU
+GMHUU8/2gmn4vnk7RUoRLg8vVl8NG8Vatr+fT97z7+/lYcGuC+U1MD30K6Nz
+Kr6vzosnk374LTYlTfDz5ewwHsw+M63vJUz3L1MOhQW7t7AnYMrrvsQbFqte
+sLNGvldWDJE7zJF9qXWAnN8zrdoLpjKKd76EPZ0dErfATWMmPraol9fmszqJ
+7FcQBgpg2rGs2yVkf4qGrDT6HTZ8J+kkz+c+6PaDy3f9KaCReTI6eorgd6om
+oxzSf55L+jvYyM+l9zLxRzV9Zcxz+E2d0jB5fiv3hTacXl3a52COekLufp0M
+VxS/Hz5q/t/3xWty32mO1fXtMG9m429XiJ+/S1NlYB6/7u7xhBPSRV+NYbHt
+8qI+1PtM94fHCljNWisgHD6WmDF9HdyksmlaN/oNGwnrCyTPs6+/dIVpn5rv
+bCbP/3tX5zbm56VjUEfM+dG/3gi2682I3UjOe1Lx+awGkzIsfJC6Hi4POPLv
+bHg0bmqnE8n3o7+iSh3/nhwwTF8M05Vpg7/D6TYv7xvAbBdd+7nwvIHHt6fC
+VKwuWwZeJCcvlCbruQ6ZP9Xw+VrUqvaRfq02u6pgXXxswreZeNe925ZwX07K
+ugdwV51IsgOusjqRch/mZD9iCOH6yeuVH8NspxfdOqiPMX37rg6YX1A4GA/H
+m7p3j5D9Z/16u2D+slvBGqTfaAvnFeg3dNtTvfmkv1zjqmzYpVXudxeYue8B
+8y2sYNTjsJ2szw1K08b8GqIb/8yCubLHVZbCdUcCo++Q/v0Zi1iwZvfEmrdk
+fgsOpVnA06INvssvIN/nDtcUyH38fn6ZCcwcY+2rQ/429wCFNTCH494TCjc8
+afs9BOa2ynYMo97VIUOZ8TD72yfHOPi2WYj8EZg6vlH0L/o3yqhJPkXyjw8d
+9IEruEFKeSS/rNL3B5hvY0tiWw7c5SQ+YQHnH14anQULlx+O9p2Cc10L8w7B
+PJHx8dDJeP/qt6zcQ+op3KR6RpWcN7g/jDwvvCwcV2FSlxeNpvuQfEuCsjLh
+YZsvlxxhgZ2+/Xr4D9oR9UXkfPHfi9zg3drHJ+aS/Qsbj+yBu2LtD84k+Wdx
+Df+BNZxGTmiR/endz3xwnr9e2XtNmB5rc/YnPGp6U6JL8g22G95AfYZ0fYrk
+4/3qUdiD+m9yVaWsybzKdOfpo7+sD+ISV7hcyk2GB/NkP8SR+rsi/ETP4Vcj
+befSYLGifL4O5kVF2ZiUwvzeg5y18L3lw+MtZP/rkbKtsNpDWvcomf9hK5tI
+OPrvnKP6C7HfakOtF1xKy//bEeZ9ebXQEM740LFlK7Hp3rOvcJ7t8d7VqTD7
+9lTLePjyjPTMfLI++7GBAhxYJZtYCQuVExQV0Y/k6ejlR8RXew0G0P+FuU+e
+PyW+56xTh3n5H/+s2gIzVR68yVVmUpcknkVNZP1FUmSCEvpUvWUlggXmJo4x
+ikxqw9mF++/CnLX87+kKTConzCyllJxfvL60QZ5JxZQ5BZ+BKZ8f3VawULTb
++zDcdT1FqkUO3/f7Vgp2wfT1axwvwKZJrH2kP2Zs8uli2EVJd7Y/2a/KPdEF
+x82aOOlBzteKFbCQbzS1XriW1PcwUv8prCDpdHEl+T2jG2JRj1xqxhVPYnfb
+H5aod3TKJOVNpN6Pe3XGSP0rHNZHkXWvOqta9Fcdbbbg8H/zWeEVj/6/9PnL
+FZF+BujqdMyn6a1kEumf5/ZspAA2Ne4xHiTPq2uoUpjnzfeLPadaoP7QfmUz
++C1N29kGprzP1RrDm0W3ajhk/csf1kPYryBTmZgMCwKpR0kwTc6aUwjTf7mr
+f8D51F4G+yHMS234TINP7jDb+YbYys58PuoNSZ9v9IXkW3TFma74//9Hsfx/
+VGD+D6J4HSk=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           
+           9.996694214876033]& ], {13.471090192570806, 5.161297472978525}, \
+{1, 1}], LineBox[CompressedData["
+1:eJw9lXlQE1ccxxcLNYCYDSErJgri7lKtyGWHVDvVn+JBCw5gsRILSCkEWxA5
+goLgBRJxMAoZ5FIGGSynpam24oEKapCrXqhUUauIFKIVi1Qy0EJf+sfvzezs
+fGbn7ftd3+9ziti6LmoKRVFR5DG9C0cnyXIE6v/FwcZiv8LQQ4RbNZ4Jt1go
+nOI2cc+GMLzIPVrLQsHAqklJhgNQ9t9sc8hloXT/zNJVQ7OBis+sn5XBQuV6
+67iHCsLV58bd9rIw8jqhQtkyC6iiKbsjNCzkPV9+X7mYsLHWx7WSBaNY1kw3
+yID6TTgjs52F9gilBe9N+Knc/I6RhRy9dlT/VEp4uNzBjQNoF8jXawlTma12
+MRyoVPtzFArC2Uvnza3l4JzTduc4LxMHZmkHOfBs3DH5yXzC7nnRPzjzsE+7
+IX+nO+GUWGNXGA97PYJ6p31u4lnXSw/zsDphdGIs0bT/K/nbMzzccj7lp6si
+PHAkheviwefS5UFxH+GPj1n+08tDe3Nq9VmWxBtw8d+OFzyMHXtTYRMhM+Wf
+kNzDQ/Sf00JySwhntzz59hoPuk7DoolWU77STyvLechb2rgoc5Cw8esF1Soe
+ak+m2/QZCdtbaUOX8SCtTCwsHyFcZEgWmvOwpGPcy67HdF5Br4+eA++q8Om7
+6gjHF02ez+Jg+7vdvFhJ2H08w9GHg4UN9KJRa1M86XqpkINneZSDRxmJH940
+OTxmgUtLupw/l3D8OnnAzywcnit9UFE8k+yPmb+1gIXlC1T50QLClKbs6j4W
+XI23PVYm2QO1+WChcA8LH9hNvdH6ZAZQc3JOqbNJf42vA3b6Ew5+f6KjlIWb
+H82v07UxQOXuevP3JdLPPRL1Z4GEdQNbigwsOMVaxx0dlJB63Iu668BB+GT8
+2hVHCNNnN8UqONB1l7dZfEnYXS1+XMhBT+/1C3oXwgFaKrWbg+HurKPxMwnr
+tF1ZEh5W7DR4m8sIC4SKjf48hGnUlsVupv1xp9MyeCi74lK1LYhwk0X+2ZM8
+hLjJZZ5qwgOxfss7eeiOcV3Y1UT4uJnuwu88JBtM+iBsn/UysJ8Hj4bbd1yW
+Mfhd831r36+pDO73te0KPlDH4P9z1qS+U95i8PyqDZLG8T4G45vhuyPycD+D
+8U8flq9c0sVgfgrfMK+xGgbzP3Dv0KmL3zFYn4EzI3mRDIP1CwsypJ6pl2B9
+pcfvB/l7SbD+wY/oHzN0dtifK01GD7mTHfav50PXGxcOirG/1TU5MUWjttj/
+HVS/c4jSFudDrzgIMY9FOD8C78lnN8JFOF+Ns4c6BSM0zl/ik90PXxXTOJ8t
+aWV/7Q2icX51luZtLzka53soXbM5zJrG+Yd5mcOyqTTqI6XPuzOdoVE/iwWS
+TjM5jfrK/GO4YmsUjfoTqoUhw6U06nOOWL1hzSMa9dscCcwrmQj1La1fe9o/
+WIT6v/qTwMxCI0J/2FxRN/vtLyL0D+WK6piMmyL0lwb7LOrafRH6j/vp7Ad5
+bSL0pyP1KarKShH6V43VaGvtFhH6267QLYIljiL0P8fE4rGHjTT6o63wxdIh
+Hxr9U9eb9oWnRoj+auiQnfNMmo7+21IyyPr62aA/F5d06lVO09C/+1Uqs7vj
+VujvJ06UvxfUZ4n+v0kcfXvlcwHeDyfOm/QxFe+P/wBzMXw3
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.5, 9.0548}, {0, 1}], 
+        LineBox[CompressedData["
+1:eJwt0w9Q02UYB/BXioG38WcxYlDSEISBKOgdCfLHn2ODAc6I02utEJLoAE9F
+0LH4szAFByVDizI5Ok7GEgrYIjzDi6vAThDYFKgEzoQgVwhbIPEnjL5v13v3
+u/c+97zv83uf597X5/DxlEw7QogMH53J8jrGZobY6BzEEFeyb8DNlyGaptWP
+u+AHr060boIVbF1JIcysOxPqQ0nRRWGw3LG3hAuP5x/J+DOQIVlFvIS/kS/l
+XCoxwOEzI9Oj8OMi5ql8OHTN6UUjLI+9/DgSlk+3nXgHFtc/78+h61Wpz8XD
+uax8/ZSQIfV/5M5vhIdTi3f9ACdXjEz2+jBkyi0p3ghf6hQvaGDnsOBHjTSu
+eW9nApy7bfTXBjh8uEzHgZ89PVnTDJMldciIgCF5AqHn17BhrKFSBxfvfSlq
+EGa+EW4vhtM7eqot8K25rySpcJdutYCF8wm5Fxul8Lui9J3+cP0Fu+4Y2Mar
+tErgb0NYhj3wW1WL9zNofXXtXkkwz3uAUcNXI7clp8OhVq7yA/hng3usGq7y
+/8jlCl3fJa1pgKWp0WNX4epatW4QznLaaNXT/D6ZnzyBP31UaayFiaJBtR31
+GXYc/6Wc5hMFhaXBwZqZ81n0fxcDu8/D+k1rgXthjWQl6Dqc03zqJBcuFSTU
+jsO7a1yLRlGvo/3c2yuwKLmlqg5WtRjznND/UOPWXa/D/KHaMx5wZYVkCx+2
+cGNZ1LsDrJuHAnB/XjN1sGk8cNBOCycrlMZF5POqTtPK4NA7iqIR2Pwwq9A1
+gN6vewufwzyTTHbPH3W6HXu5EJb2jSqaYBKmdhfBpbOO7adhi/joP0/Dy9qt
+nhkwv1291IN+xM1Mrsng0t/5Dmdh3RBPKaL7h52ixLDXNVcxA9umay470H62
+/WaKg9O/U7jVv8CQuZmxHQfpfndyJga2XOuNyIEN+eyCWW+GHGjyLDwLV//U
+k9AGJ8avHLgCM2qXz8rg8vlE9vdwaPxy8Qk4hdPXP0Et8F7Ig/sDB26tww9u
+x2ZXwH3vs/d4of5chl/SDidzbmtD4FIx8bDCfPeJxBjaT+ZISQTOc0i0FiWh
+/btLjmnhVduNwljY8EVX5Cz8ZVpIdjiN71OpAlBf1MOj3b6wOXsqQg7f1fDq
+7GHVK74/lsOVNy68cZ+eT8s6aKRxk8TcCgs6M6fo+zCX1S4W0HrNC5Z5+l6U
+cp9IWLjf08kB/d+vU4+ubMH5+YkyLqz0CLnTAV9ffnMDtWXaxZQL8203J+3h
+5vGb+mAajxhytiFf6yUv3xk/1H141t4Mq2w5f7XAUlm/Xk+9YalZCcufOel/
+Cha6NH4YBwv8OPbR9D0+6ezxhv8bgv9nP+ZfkwGqQQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           
+           9.996694214876033]& ], {7.286723682459369, 12.031518421803128}, \
+{1, -1}], LineBox[{{15.5, 17.00000000000231}, {15.5, 9.999999999998607}}], 
+        PolygonBox[{{15.5, 14.1}, {15.1, 12.9}, {15.9, 12.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.4452, 13.5}, {-1, 0}], 
+        LineBox[{{15.500000000007276`, 17.000000000003638`}, {
+         9.500000000005457, 13.5}}], 
+        PolygonBox[{{11.98173265946094, 14.947677384685548`}, {
+         12.816718930329426`, 15.897834175673825`}, {13.219815750748694`, 
+         15.206811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.323799910437668, 15.984057296392571}, \
+{1, -1}], 
+        LineBox[{{15.5, 9.999999999996362}, {9.500000000001819, 
+         13.499999999996362`}}], 
+        PolygonBox[{{13.01826734053906, 11.447677384685548`}, {
+         12.183281069670574`, 12.397834175673825`}, {11.780184249251306`, 
+         11.706811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.323799910437668, 11.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{3., 10.}], PointBox[{15.5, 17.}], 
+         PointBox[{15.5, 10.}], PointBox[{8., 10.}], PointBox[{9.5, 13.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T7", " ", "P1", " ", "N13"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbf/cgdhei/fiijghgjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdhei/fiijghgjhj.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: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]& ], {2.8245590828532245, 13.052815449711932}, \
+{-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]& ], {0.17544091714677545, 8.052815449711936}, \
+{1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000000416`, 17.}, {15.49999999999958, 17.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.75, 17.6952}, {0, -1}], 
+        LineBox[CompressedData["
+1:eJxFlAtMFFcUhoeisYKCluWhVh4zI9BIKcywsK2UHm2KUA0KLBZEZXWBWooV
+2fAQEOVVd8lCjYq81rIoBeRVUGK1lZfQEhYEUSuSSOVhk+Vhu0UoCAvbO9bc
+nWQy+XLvnHPvOf/57Y4cD4h4iyCIUPRyX56Oe5yBeP3Q0CCeWfjN8wMgRMUe
+3m401LSNDqSlIz6qWed3gIZGv/LVil7EGu/YV3E0yJ0/CzY3dQGivrF56jQN
+bSE1pkYeiNUXPyo9SYNV/NkXioOIg2VO0WIaeoqeHvNPQ6w8sj/Ji4ZXm+6o
++5WIYYNN6xoaVLFDPxj8wrH8nz/uU9AYcmDKuA8x8fCuQS4F+9K/33H8KeJb
+WovrOymozuR7rxhD7CPbXGlAQUKUqEU3inheGlDQQoJ904lHf3P7h88HGGSR
+UCgRZzT2IxZMSLVCEr7QdndK7iI+EyXgMSTw8wbXZtcjtvWwtLMmwWRirCPh
+MuKj+X6uG0mwyZ8yupfN5fN2TbInYUBolMlLQnwu46ugHSSk9o4mN0cjjjH9
+1TeaBFlm7NdrwxG7GDvaXCEhYEA5seIwYs3jAu0wOh+ZOhPKrUtDenO3UFAV
+4i6QfMPV57k7P5qC9/mWC3tOI94rsGAbKDCsCFUVX0LsWGE3qqFAqyEsrt3g
+8uumxhxoiGjZKkz5nbtvR/aeQBpeCHnCwQXuvPmzT2JoqL8ingskXVH8NidN
+Kg3+pChe/DniVt9Dj1NokChbHRNOII6p1FVE0SDd63/b+BLi4d27Q31pSPZU
+l7XcRCwK8rqxkYafPNr/iniAeN78usMIBbWkao2Fmov/cK69hILvCle5CeYQ
+27YVLIVQsGpy8lCOjtv/56ksMwqGI/9VMgYMEFZ5L83vk2DVY1lcokXrVknO
+cIEEuwvW9sppLn/30jYRCfEnd8p8n3Px8gV3PiQhMtG9b5LL7zjOquzI/3Xc
+ilgQ5FK1AfX7bJcLr1a/Lvv2VvzNYv3/S1+ODIbl6OOrWXW4KEOf37Zwddi9
+VFd8vnkerzT2jP78MZHz3Z1S/f0Ch/gvx/P1949s91xfVKuvT1a7ZSh06euX
++GOd98y4vr7ysE8GpCYMrn/dUIlMwWdwf44FK96uOcjg/plVT1bbZzG4v8Xw
+qDqjisH9NzTVje/rYbA+loLL+OHjDNbPA5V6ZT3BYn1JSrs65etZrL/BoTTj
+sk0s1medY5j5ojWL9RufnHNxmlt/o+80182Z281YrP/3qmeTJ1eyeD6WxWaz
+zCyD52fa/N1t0lEGz1d3lP10XB+D56/S0E0gb2LwfEbKFSm76hg8v3Mf525d
+d5XB8y3NKwHiMoPnX5isur2oYLA/XDt1uOkct/+Nf+wqv2o2U89gf3HPIfcv
+dzDYf7Y8+9TS+RmD/YmNoM7XLTPYv9SyxHfEJIv9zas8UDPrw2L/k/T/XDER
+w2J/LH/itNhQwGL/9Cky4bU0s9hfHXqz0hUjLPbfuNeCdsP+/B9S6DsJ
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.75, 8.354800000000001}, {0, 1}], 
+        LineBox[CompressedData["
+1:eJwt2Hs4lNsXB/CX3C+FijBpdCIiplCSNGlcKjEkl1yanEguNR1CJU1CkphK
+JVQTFUo4pahUQyoj50RyQhekRIcaNRUiv+8+z88f1vN59rvXXmvNfkdP+kHb
+PYKlKYrSlKIoEikZ8ovOpP77mcOkhMFj/i6wj/JsjjIsWCvtmAM7TykzUYKp
+on0WH2BBNb33529MyiVGrpihz6QUtDwKu+C2gVT3aDh1C1fnFll/8Y92OZz9
+PCgmBa7WMnd+C4t//dq+GqY7tWcqzmZS/PhCQ3lY5kzfLAPiAwyV+4iv1vNK
+LBGr7tNE0Yhx3ow/rBFTayP1TIiVWBYLiAcDH71D3grb2eZ02Lo/cv0FONSH
+Pk0epszVZkbAY/ZhAx8QZ6gEqduRuhXb5B4iCkpGrukiSnKqXgkQu262j8si
+qjnd+baX9PMPK3AcfYsbFz0JJPsGxVekEMslU0scSD/rmkw0EG0X5+Rbkn0S
+/+z5iEUnnAJIrDKRZ3iQ+hbe1l2AGNcxR0Ty0vWSBEzEtn0JH68iNmqmGfkj
+cvt//9CJKFzmFnqA9PGX4i819DF20iXzBjx88UWMHexy1cx9CLbeaP8gGI4X
+8SVkXpzQ1pwkxPr2jJAExPJV9OmnEZnGbI8niM5aQffPIwqa9y3VxtyFUWMl
+Z4gjUnKC4T69r/vT4WlRrJGrsOAmFbsNtu2UmyKGjVZqeLNgFjuuwxj3wmeh
+Y8wUuOT+lipfmGvYmt+MupKebopJgJvm8dWOkLnbruKcgqvCXy9nkXkNrnO+
+AIded+sewXyHJeqHLsLiSN3Kcph7fotUHpyqW7czHK4/XaR0CG77J/iiKbmX
+1ayt22C29mfFwVn4/GbesHYl+9Wzu0/AjRFHWubBama9OV4w81JNlRzM2/f8
+MwOOuOK2/R364XUKYg1gmn/G1kdkHnZaAgtYKNzSXwqzZVQrfGEO61bvObI+
+6cGnLDidPzacAzNWeeR2w9F+ixzOwz5/bjw3E/V5Kg5zr8OhceHBrnDbIfnc
+ZpizTBTOI+uvqQ3kPeLQlolJv/wxqsaczOfgxRWvyfNcg7BI0k9p+htpzKvu
+8daUa3C2zpmjs8h9nWn+ZYzMx+xmGrlXvB9Ja1cbYC7pB6IWw8z2WVrZcCjr
+agJ5Ty0PPqnvgXkmEi6N3KOG6ZJ5hji/+lnBT5yXJD0QEA6nFiZJPSX3PX1I
+qwBuW5w/egqult5+somsVz/c6QOrtXTVfIGN3ktuacDWlwMmKc7FPPpTio9h
+Hj63ndZMhbsiLo+O6+E9/DqmrgHzTNX/jYDz0hI85GCxCrv13UzU0eGybwj5
+KE/l0jD4VeT3Ha2wMKTiiTRs6jHdqwJWc3W5UU7DfUos5vNhQZbvaAxsG9N3
+IYL0k/Niujdcdeqm1hpY/DU0wB2W8Zm8zgzmcw6Pb4ZLAk+nzSD5Qoal+TAr
+61q+MtnvWM99Cou3Degowrx1/kGzcH6q1JRxdZgrx1+8B04qdW02hLtyl4pe
+wzI2K7KdyP6dFQUr0J9aX2tDFMnvdZ11HuZbu3Muw4z6bt8f8OZ8hY5+Yl/n
+cTtyv3b6ejIwj3LrzwNRsFigk7cH5pguuUPmWWd60klE1lkt37JhmZFPzZpG
+yFuZsCIZZl2/U7kJFgzFbfWGu1SOHS8k6zeebVIj+5uXLemFqfJc22s4vyRh
+29+6xji/NECDCQtrajsdYU73lzd30Y9/rv2OEFgscfRkwOlN6Yq7Ye4S2Yt5
+mI9CmXXlflit/ugqBbiJZq6WAJfPHaiJ08X7lSVtwiXr7bbeX3Vwzvejx3xh
+wZ1nnfGw+EuipS3Jx1mSqg1nBfqt0TEm835R0KiNz3PjQofvqJfeOv9gNiwZ
+nlH0DGYYhEQmwHOWRX37E+au8gkjdnY8eOQksbB46ym44lJSViLMnD156WOY
+YbyoI5b0/0jvihLOa0rY8ZCYX1tWGEAsa8Y6QPLby227Awtm/hDmkHzDPUI9
+9GP91wK9e8SHpOckwpZJ4ZUDsFjkp9MFC/0KQg1Qv7B2z2YLzIMevTSXzE94
+a4ZtLNzWPuFdSua90iWtEH51JiZglMxriaxmDSxUil/iPA/rlflFxM5rFYJP
+wMzPWnOLYMbCHk4nLNTaczYazn4/0fybCfaf4q40IvtD7PI4cJfers0PUQ8t
+JWj0OCzcfM/NDWYOmR+rhhmxqfMb0J910aMD7TBnk1yzDWy0/GjUR5Lvr8T9
+l8j89DwzPhMvi7qnASuIzA/2w+wbSlLJM/B3bKIkk+xnC6clSMNVkfNX18CU
+U8fHTC18PhZ+lfkwf7jUaQFcFx42iwc3lSRf69fE35cl5sN+sOBzxso7cFaB
+mcia1Dv0x7dLcETsh8naMH2nZU4JWf+WrTdB5lFp87oBTt3/WHmQzIsV7jEB
+N+Ve4b+DufFFRx1xHo9zcrQXZk/ZG5AHX+g01v0Gi9uXtfyEk76qLJ+C/OJ5
+vPyNqN+WnjTPClbT2b6qFmbaa9JCyDznrlunh/6FLrNaBaTehSknt8FiXXFh
+D8zVn7a9lHjDyzRTU5y7dNvXdrgxxdt8F1zu3EH/RO5zvjntMczfdmG8jzzP
+Pi2aOh/rqpllIng4aOiuP8xN3p/Mh9vc2orPETfIS+zI/dbbntgBq11qSHqB
++sQRadnKZoinq28FwNyWlisL4C6Dle9b0V+bDjWyBha46I+wYO7DOPsNMJ3h
+7lqOeUWnarb4w+xbq0NnwnN6/trtSfbLbr15dDo+39dRyfYwL8bKSwPOpsmU
+GMHUU8/2gmn4vnk7RUoRLg8vVl8NG8Vatr+fT97z7+/lYcGuC+U1MD30K6Nz
+Kr6vzosnk374LTYlTfDz5ewwHsw+M63vJUz3L1MOhQW7t7AnYMrrvsQbFqte
+sLNGvldWDJE7zJF9qXWAnN8zrdoLpjKKd76EPZ0dErfATWMmPraol9fmszqJ
+7FcQBgpg2rGs2yVkf4qGrDT6HTZ8J+kkz+c+6PaDy3f9KaCReTI6eorgd6om
+oxzSf55L+jvYyM+l9zLxRzV9Zcxz+E2d0jB5fiv3hTacXl3a52COekLufp0M
+VxS/Hz5q/t/3xWty32mO1fXtMG9m429XiJ+/S1NlYB6/7u7xhBPSRV+NYbHt
+8qI+1PtM94fHCljNWisgHD6WmDF9HdyksmlaN/oNGwnrCyTPs6+/dIVpn5rv
+bCbP/3tX5zbm56VjUEfM+dG/3gi2682I3UjOe1Lx+awGkzIsfJC6Hi4POPLv
+bHg0bmqnE8n3o7+iSh3/nhwwTF8M05Vpg7/D6TYv7xvAbBdd+7nwvIHHt6fC
+VKwuWwZeJCcvlCbruQ6ZP9Xw+VrUqvaRfq02u6pgXXxswreZeNe925ZwX07K
+ugdwV51IsgOusjqRch/mZD9iCOH6yeuVH8NspxfdOqiPMX37rg6YX1A4GA/H
+m7p3j5D9Z/16u2D+slvBGqTfaAvnFeg3dNtTvfmkv1zjqmzYpVXudxeYue8B
+8y2sYNTjsJ2szw1K08b8GqIb/8yCubLHVZbCdUcCo++Q/v0Zi1iwZvfEmrdk
+fgsOpVnA06INvssvIN/nDtcUyH38fn6ZCcwcY+2rQ/429wCFNTCH494TCjc8
+afs9BOa2ynYMo97VIUOZ8TD72yfHOPi2WYj8EZg6vlH0L/o3yqhJPkXyjw8d
+9IEruEFKeSS/rNL3B5hvY0tiWw7c5SQ+YQHnH14anQULlx+O9p2Cc10L8w7B
+PJHx8dDJeP/qt6zcQ+op3KR6RpWcN7g/jDwvvCwcV2FSlxeNpvuQfEuCsjLh
+YZsvlxxhgZ2+/Xr4D9oR9UXkfPHfi9zg3drHJ+aS/Qsbj+yBu2LtD84k+Wdx
+Df+BNZxGTmiR/endz3xwnr9e2XtNmB5rc/YnPGp6U6JL8g22G95AfYZ0fYrk
+4/3qUdiD+m9yVaWsybzKdOfpo7+sD+ISV7hcyk2GB/NkP8SR+rsi/ETP4Vcj
+befSYLGifL4O5kVF2ZiUwvzeg5y18L3lw+MtZP/rkbKtsNpDWvcomf9hK5tI
+OPrvnKP6C7HfakOtF1xKy//bEeZ9ebXQEM740LFlK7Hp3rOvcJ7t8d7VqTD7
+9lTLePjyjPTMfLI++7GBAhxYJZtYCQuVExQV0Y/k6ejlR8RXew0G0P+FuU+e
+PyW+56xTh3n5H/+s2gIzVR68yVVmUpcknkVNZP1FUmSCEvpUvWUlggXmJo4x
+ikxqw9mF++/CnLX87+kKTConzCyllJxfvL60QZ5JxZQ5BZ+BKZ8f3VawULTb
++zDcdT1FqkUO3/f7Vgp2wfT1axwvwKZJrH2kP2Zs8uli2EVJd7Y/2a/KPdEF
+x82aOOlBzteKFbCQbzS1XriW1PcwUv8prCDpdHEl+T2jG2JRj1xqxhVPYnfb
+H5aod3TKJOVNpN6Pe3XGSP0rHNZHkXWvOqta9Fcdbbbg8H/zWeEVj/6/9PnL
+FZF+BujqdMyn6a1kEumf5/ZspAA2Ne4xHiTPq2uoUpjnzfeLPadaoP7QfmUz
++C1N29kGprzP1RrDm0W3ajhk/csf1kPYryBTmZgMCwKpR0kwTc6aUwjTf7mr
+f8D51F4G+yHMS234TINP7jDb+YbYys58PuoNSZ9v9IXkW3TFma74//9Hsfx/
+VGD+D6J4HSk=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.471090192570806, 5.161297472978525}, \
+{1, 1}], LineBox[CompressedData["
+1:eJw9lXlQE1ccxxcLNYCYDSErJgri7lKtyGWHVDvVn+JBCw5gsRILSCkEWxA5
+goLgBRJxMAoZ5FIGGSynpam24oEKapCrXqhUUauIFKIVi1Qy0EJf+sfvzezs
+fGbn7ftd3+9ziti6LmoKRVFR5DG9C0cnyXIE6v/FwcZiv8LQQ4RbNZ4Jt1go
+nOI2cc+GMLzIPVrLQsHAqklJhgNQ9t9sc8hloXT/zNJVQ7OBis+sn5XBQuV6
+67iHCsLV58bd9rIw8jqhQtkyC6iiKbsjNCzkPV9+X7mYsLHWx7WSBaNY1kw3
+yID6TTgjs52F9gilBe9N+Knc/I6RhRy9dlT/VEp4uNzBjQNoF8jXawlTma12
+MRyoVPtzFArC2Uvnza3l4JzTduc4LxMHZmkHOfBs3DH5yXzC7nnRPzjzsE+7
+IX+nO+GUWGNXGA97PYJ6p31u4lnXSw/zsDphdGIs0bT/K/nbMzzccj7lp6si
+PHAkheviwefS5UFxH+GPj1n+08tDe3Nq9VmWxBtw8d+OFzyMHXtTYRMhM+Wf
+kNzDQ/Sf00JySwhntzz59hoPuk7DoolWU77STyvLechb2rgoc5Cw8esF1Soe
+ak+m2/QZCdtbaUOX8SCtTCwsHyFcZEgWmvOwpGPcy67HdF5Br4+eA++q8Om7
+6gjHF02ez+Jg+7vdvFhJ2H08w9GHg4UN9KJRa1M86XqpkINneZSDRxmJH940
+OTxmgUtLupw/l3D8OnnAzywcnit9UFE8k+yPmb+1gIXlC1T50QLClKbs6j4W
+XI23PVYm2QO1+WChcA8LH9hNvdH6ZAZQc3JOqbNJf42vA3b6Ew5+f6KjlIWb
+H82v07UxQOXuevP3JdLPPRL1Z4GEdQNbigwsOMVaxx0dlJB63Iu668BB+GT8
+2hVHCNNnN8UqONB1l7dZfEnYXS1+XMhBT+/1C3oXwgFaKrWbg+HurKPxMwnr
+tF1ZEh5W7DR4m8sIC4SKjf48hGnUlsVupv1xp9MyeCi74lK1LYhwk0X+2ZM8
+hLjJZZ5qwgOxfss7eeiOcV3Y1UT4uJnuwu88JBtM+iBsn/UysJ8Hj4bbd1yW
+Mfhd831r36+pDO73te0KPlDH4P9z1qS+U95i8PyqDZLG8T4G45vhuyPycD+D
+8U8flq9c0sVgfgrfMK+xGgbzP3Dv0KmL3zFYn4EzI3mRDIP1CwsypJ6pl2B9
+pcfvB/l7SbD+wY/oHzN0dtifK01GD7mTHfav50PXGxcOirG/1TU5MUWjttj/
+HVS/c4jSFudDrzgIMY9FOD8C78lnN8JFOF+Ns4c6BSM0zl/ik90PXxXTOJ8t
+aWV/7Q2icX51luZtLzka53soXbM5zJrG+Yd5mcOyqTTqI6XPuzOdoVE/iwWS
+TjM5jfrK/GO4YmsUjfoTqoUhw6U06nOOWL1hzSMa9dscCcwrmQj1La1fe9o/
+WIT6v/qTwMxCI0J/2FxRN/vtLyL0D+WK6piMmyL0lwb7LOrafRH6j/vp7Ad5
+bSL0pyP1KarKShH6V43VaGvtFhH6267QLYIljiL0P8fE4rGHjTT6o63wxdIh
+Hxr9U9eb9oWnRoj+auiQnfNMmo7+21IyyPr62aA/F5d06lVO09C/+1Uqs7vj
+VujvJ06UvxfUZ4n+v0kcfXvlcwHeDyfOm/QxFe+P/wBzMXw3
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.5, 9.0548}, {0, 1}], 
+        LineBox[CompressedData["
+1:eJwt0w9Q02UYB/BXioG38WcxYlDSEISBKOgdCfLHn2ODAc6I02utEJLoAE9F
+0LH4szAFByVDizI5Ok7GEgrYIjzDi6vAThDYFKgEzoQgVwhbIPEnjL5v13v3
+u/c+97zv83uf597X5/DxlEw7QogMH53J8jrGZobY6BzEEFeyb8DNlyGaptWP
+u+AHr060boIVbF1JIcysOxPqQ0nRRWGw3LG3hAuP5x/J+DOQIVlFvIS/kS/l
+XCoxwOEzI9Oj8OMi5ql8OHTN6UUjLI+9/DgSlk+3nXgHFtc/78+h61Wpz8XD
+uax8/ZSQIfV/5M5vhIdTi3f9ACdXjEz2+jBkyi0p3ghf6hQvaGDnsOBHjTSu
+eW9nApy7bfTXBjh8uEzHgZ89PVnTDJMldciIgCF5AqHn17BhrKFSBxfvfSlq
+EGa+EW4vhtM7eqot8K25rySpcJdutYCF8wm5Fxul8Lui9J3+cP0Fu+4Y2Mar
+tErgb0NYhj3wW1WL9zNofXXtXkkwz3uAUcNXI7clp8OhVq7yA/hng3usGq7y
+/8jlCl3fJa1pgKWp0WNX4epatW4QznLaaNXT/D6ZnzyBP31UaayFiaJBtR31
+GXYc/6Wc5hMFhaXBwZqZ81n0fxcDu8/D+k1rgXthjWQl6Dqc03zqJBcuFSTU
+jsO7a1yLRlGvo/3c2yuwKLmlqg5WtRjznND/UOPWXa/D/KHaMx5wZYVkCx+2
+cGNZ1LsDrJuHAnB/XjN1sGk8cNBOCycrlMZF5POqTtPK4NA7iqIR2Pwwq9A1
+gN6vewufwzyTTHbPH3W6HXu5EJb2jSqaYBKmdhfBpbOO7adhi/joP0/Dy9qt
+nhkwv1291IN+xM1Mrsng0t/5Dmdh3RBPKaL7h52ixLDXNVcxA9umay470H62
+/WaKg9O/U7jVv8CQuZmxHQfpfndyJga2XOuNyIEN+eyCWW+GHGjyLDwLV//U
+k9AGJ8avHLgCM2qXz8rg8vlE9vdwaPxy8Qk4hdPXP0Et8F7Ig/sDB26tww9u
+x2ZXwH3vs/d4of5chl/SDidzbmtD4FIx8bDCfPeJxBjaT+ZISQTOc0i0FiWh
+/btLjmnhVduNwljY8EVX5Cz8ZVpIdjiN71OpAlBf1MOj3b6wOXsqQg7f1fDq
+7GHVK74/lsOVNy68cZ+eT8s6aKRxk8TcCgs6M6fo+zCX1S4W0HrNC5Z5+l6U
+cp9IWLjf08kB/d+vU4+ubMH5+YkyLqz0CLnTAV9ffnMDtWXaxZQL8203J+3h
+5vGb+mAajxhytiFf6yUv3xk/1H141t4Mq2w5f7XAUlm/Xk+9YalZCcufOel/
+Cha6NH4YBwv8OPbR9D0+6ezxhv8bgv9nP+ZfkwGqQQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.286723682459369, 12.031518421803128}, \
+{1, -1}], LineBox[{{15.5, 17.00000000000231}, {15.5, 9.999999999998607}}], 
+        PolygonBox[{{15.5, 12.9}, {15.1, 14.1}, {15.9, 14.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.4452, 13.5}, {-1, 0}], 
+        LineBox[{{15.500000000007276`, 17.000000000003638`}, {
+         9.500000000005457, 13.5}}], 
+        PolygonBox[{{13.01826734053906, 15.552322615314452`}, {
+         11.780184249251306`, 15.293188945044921`}, {12.183281069670574`, 
+         14.602165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.323799910437668, 15.984057296392571}, \
+{1, -1}], 
+        LineBox[{{15.5, 9.999999999996362}, {9.500000000001819, 
+         13.499999999996362`}}], 
+        PolygonBox[{{11.98173265946094, 12.052322615314452`}, {
+         13.219815750748694`, 11.793188945044921`}, {12.816718930329426`, 
+         11.102165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.323799910437668, 11.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{3., 10.}], PointBox[{15.5, 17.}], 
+         PointBox[{15.5, 10.}], PointBox[{8., 10.}], PointBox[{9.5, 13.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T7", " ", "P2", " ", "N14"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbf/cgdhei/fiijghgjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdhei/fiijghgjhj.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:eJwl1gk4ldkfB/A30c1OSdas6dqvLUTuaynNpAkjLmWZwpjIUiglrmhki6JJ
+EpUWKkJlFIosoyRL0hXFIG5GISPbLf/vO//7PB7P5/md95zf73fuOe9V2Rvi
+7MdHEMQz/FH/idklfNRI4r+PPkksemYl1cP0zZlvm/XI2veqkxeOw6VGD/Zc
+0iPJnIO1+QxY+epITaweScyZaAb0q5IEZ+jisTDYaTVjPhWWuMXccgjjn1zW
+/s0Spt9aNp2AuPkVtweTKiSRfXs88Trmr8t4dOEOXDi7gfkK8RDa4aCD8GXz
+8gJhfZLNsY34bguH2ruVbYfdrQTjVeHaMI1v6fok+fJUb6wYvM37x6EuxKMs
+xhtpsN3dT7uFGSTRyRUJF4WNC8R4dAZZ+8+Nu3zrqPnI59XWDJI9YBjEMqWe
+P7r5RxeMb7u+YcQVtuwsLvCGk1T8nkXBDYOL9H143jF9+ksuXBq8osAL8VUO
+X3bWwBlZaVudGSQZsZs2/Qb2iQwps8L8Xcr5FmPw/T37BtUx/ue6DfNTVL3q
+V7VXYD6dTyGnPlH1JnnaNCP/nyTzP/bClY9ZtDjsh/iH/NZqql9aVU6bUO98
+1bacDFgmXKJpFv06LCfox4LJEbGOarjZZN/wGrh99GZUKvp7q3ia1aKM8XNB
+Zr/Br1wtQo7BrLX7u13gwOBaeU2Ye9xwlyOeH4/uGClRglV/+Xs3vJdpw78a
+LrS3aY+Ek3ct2iasQ77BjYX5eiRbauJzEQ0mi5imXfC2dZlbrygiX2LmliTq
+mbnnQ7jA5Mm+KhfUY/FyKkgFPsK41n0BcY3U5ipBWObbdYd38GHTnnvC8J4D
+15+Kon+urNl6dXhliup57B+bK7ltvRM8/ET0/mb002twTDQV7pJkfd0OsxQM
+ptpgB6n+P7AfbBkm7bk08tOR6zV2glXMbwd6wMofJt/awzlHI7uy4KDRq983
+wqtm/WNqYfZZzaNKsKQlo4gD5+oIxPFh/hsL0xd6YLOKBqV61KOSsr2VGj8Q
+51wWjfz7K/lk0+CA+QQ3E8T5fB5XWcHcpJNPJtG/grAq9zfIj9P4e1g5+sVJ
+bR9xh7kHfa8ch7U/v4l5roBzZVWyfBd8ezJTTw+uTfIs2oTn5cym7ibLI+6g
+OKwP91YbKY7IYT6TbGMTjH9vI52/FTaLfmT7I+L2IxvkymXR7yXr0QMwJ66m
+Xxdm7fc2yMN4Q79c/8cyOK/pfyRzEI+olBf/FWbdONEli/wvBfbPaMKlr25n
+esGvVVPe0GB2huW6AtRLBo2uIOBmZ/XWIcS3TC9GSMCpusl/iKF/w8oFHSZw
+7tu90hpwIaleEgivJMTUTNHP2sDjT+/AhX99byMRH7S20Z+m1ruRlmmD+NYH
+7q1myDdAXe8nS8TrGNHsw3BW7xoHPcT71VWSiuDwTCtrWdjw/NmOZ3Dzu6lY
+HvLjflU07IInBRV21cDxc22FjbLU+fCxPgLvqGmLy4XNPAJfMZC/6EqLYBZM
+tEU+HEN/7pzbeWqB6o/Kl/Qi2Mes0O4kHBArURYKX/V0duKthSU7abboHzMh
+3NcXLi3q56oiHm8t/+2pNNZv2zotCTt0Rcuug5v/ergggfH/2p8ZObYG5yPt
+ME8JcY+xjQcGpbB+ZaiSFeJqMxbWbnAz6+YTnF9iTVrqxv7V2H9lg4TLsHRE
+mHIMTP56P6Yffq5ll7cRdvR/6KyG+oT67ecEYfqq2r0BqM/3yXGxuVXI51wN
+cRtxRw93jyW48Ftk/igc1m65XBHjM9Il43D+iMm6Qv4dcGHimJEK+r9WTsk3
+GR5PM+bowg7vPhxqg+/fOVFtiPHVxtpK0si3b9TtvD7scum0BQv2zSFScP+x
+PbVaetNhh+QmtVVw9nn9/D+pelP1r3zB+vuTq+afw+2JAsUVyPdGkHxYE1w5
+4xV7CObNOLbcpPrhdChNB+OFh8/pBMOkIl/sB9Tv1T2iKgcH8By+XUE/z/Ln
+5BVT/frAi/Oj+vlgH0cbHhA8STeCX/ytpnEB9ct0hCeIYrxcw5PaBUmMJ7kx
+X3VJosJ/dYwrXHhpxHJCl2TPZd08US6B8+pKk5iD30fbT0jBAX7aB6n9NKg7
+o0gTx/0YnyBiCp8RKJGgiZEEYyzlGbV/d6RvGhuKYv3A2Um8/4jZjz1PT4ug
+nhITBy4sK9/iqQyzOIlOuqj3SvahgVFhrL8r8ucw6vwd6HYegiel1MtLYc36
+CH4xjA/NHhPmwruOWLf4wJXx7iZC6H/flrJ9nSLU96X7AXU+SoaJT25YX6Hr
+2l3sJ9EVLXLsA8wd+vyfM6W1K4KRL52/o4QaX9dQxB6Fg1Y3ilPzZagxL9ih
+PvIgxwzfFyKBmDWIhgeCvk+XwCnddw/9DjsODhsFw6azW0c9qbiy6Q467Lk0
+8XgJ8ynTK3sGUK9747vFQJjIn0u8SL3PBsng68inUnrmI/X+Ke3ITi9D/vSP
+hlvWw2OnfzLPFqbu+ff+C9gfTkSIxT4h9FfBJOYdnDcv3KMoiOfyNi21wS6t
+ygZdNMwnYpreCUeKz148uwLfL1Vx3jC8dD5ewE8A96PUsNUK6vdHfcQOV370
+c6YnyRjeHub+IGQ51ovd7kPdn6HDYb6VfPjvolFZDCe2vaSZwCuXlap+gcvO
+Xs4cXYb3X17GwkbU28CT1GyDZbweZuG+IcItl6ty4Wa+82H34L4mARsdPF+a
+wAschlu7BYQyYbpvYRg/+i1gZ6W1CusbE34h4nBzWIxIHhxuPZGJ80NoWp8M
+0UK+7Z52xdR5vTyyU/g2PL7eZoaANfrqTaRQX7aGleJbzG+yXzp2Nxw62jx3
+Hf6m/nTzEZhsfUin7odcVgWfL0ys8HiL+4NIvVY0IQebmYuc7UN9IkdX/nMR
+89ODVXjn4A5mQwkX+RTWnKv6GWakmZcJwAOHfzCXhetCfT7Oo142bUvkR/Q7
+d8Y/7CWB8foHhppgRz8jWYUlJmHm20Deg81mCL0kHpPgPpo8eZfaT/X4F7x5
+JsHJsX5dBWcYbNuWPsvEeRuKegMXVtS6us0wiVKm+xSB9Txe5bwPmGYS7c01
+S3gfEs75HeOvpphE7d+PWvF7lAi2Cn5XMIn57G+I/QlP7mT/XjOB8cn1OjyY
+vCWgKwTTE9yjmKhfR9PTUw12tJH2Og6/2HNC/F944KtWWjnMEGK1lWC+9pYc
+3T544aFReS7WY+TuXzYHi8x4exd/YRLRvRxr6vdDZ9+Be83IL8s7OobaH6Ha
+tbzX/zKJ7LLXqZ8wPtja27YG9Uw62tFb4E3TnRkBX7He+o7Ui3B3lrZEI1xK
+s9X8Be707xJtgB3HF3nr4FKGevVumGXSFEK9zxU2T1QkYr7LOzXVz8DfdyRZ
+/YD1Tn0uanKAtYTlNtxEfjI58X1isOp9xePFqOdIVGjWW/SX8bj0r55x7Mfr
+uYvl8LUq76DpUZieuJgNnwrf9M/rQbhNdfE0zFaVd/XtZRIS4UzJc3CoaOuL
+gx3IZyyx7xY8EOW1Z38tk5gbnqVT5/O/T8rm///XI/8Hiw6/aw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.887640361876243, 16.89239276247515}, \
+{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., 17.00000000000182}, {13.500000000003638`, 
+          6.500000000005457}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.644786852214096, 8.754409509855492}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJw11wk0lVsbB/CTIZIylFJcUTJXh+i6kQ65hlC4J1SSRJHhGiJl6FTK0eTo
+Cg1kdpKKhi9JOiQUlanbIWRKkoRK6jZ8/+d+67OWtddv7Xd49n/vd7/vUfP6
+09lHhMFgvMI/tf/7U2cxJKldxmK0Hjm5wBYerBxNkYYVe8emJ8M2Rq1PZsBC
+2RMpXXBdWKG6KCxWUZKssZjF4BQa84aXshg32kQn/OBGWY+4R7B02uO2fHj0
+WvBQOhxgsjP7Bew4o1nRFxYOvRGX0GAxGG+VH+jAjc84SlqwTXTU+OslLIb9
+myfeZtS/vqMjC5Yck2ixhbvVOns2wZnx3Nq18KjGJl8FOKBtQMYCjlydUdui
+h+sr5XUyYdkYw2Vp8Lf7L24rwrwsNs8bjmRuDv8H9aQVtySshDveDSpQfbJZ
+O12V4Oqjmypvw6p9Q9UScHGPT8EZOHLRIg0GLPt1+ttomLvY8w8xOPhC/HEf
+ePCUwqVZcLJ/DnsDzFy9VXEJbBhuX+VAx/P1VNbD7LsL/lkPG0dmDuyBc28n
+3XOnfLaJu+TBjaY623dTnreSVZ/B0aPqD1Ng4eiSXjGMN+2PMz73Kf+FUr8a
+wOf3qqz5Amu5B7RSPo4JxdK/Yrycu+szo2E38VClKMrzpErtaThX4k78fcrr
+WdKTXJixo8Z0pibyd5jI5cPRp/VnboSZ94yLMuFW/ZAnWXBmgrXgOGwp5+wz
+AHPXxhsHwgKjjFfqWsgh267fAq6rEM/aDJcmR4rI0PwMxPyWAAvn5xjS/HSw
+va4WwaPyK4KSKM/sGv8H8GS7bbcdXOR6wqoFVhT92Uv5SieKc/+G3XSsOit0
+WQy98z9ePYU59jJ60bDWsuBoAZ3f1j1tNTwqLVp1EeZea94zDW5QHIs8ATde
+btfq1GEx3HXbzgfC/K2s4DtwZrrFOnu4eNm75XmwokluuS48+GNx31nY90ST
+zEy6nvTM0PN0/IlbTp8wfsYutU0X4eSYdRv7YGP57AsC2FDr7K02mH/p3otu
+2DIhuoCsaiBnJ4l6ygVTpvTDpbr1Lw3hbl8+8wvMCp9w8YbTnBnL5+F+3fkN
+65Nh78mG5DUwT2jjXQU3/lm4Zw+NZ9p782E4Tln83HXYWPtRpQzyqquR8Jug
+PGr4P3RofdZ+nWqmjf6ka76m8Mct/r5cuFjp+DMLel5CN3i3wEwJr+OrYF/d
+8Hpl1M2Y9HDQg2/kt8V6wdylq9l0/W8Hnx7Ohlm/vN7wGvevPsBa+ALmjyvs
+vUl5H7vZK4VWkLt/bRRaYR2rhIk2+NTDopVov8Xd7LJDy3KTefAJ56n23tZ2
+J1vd7r8CS673q9wGOyYmhPjCHfkBa7bApVefN6hTnh3nbq6n3N5+WTmAuqNX
++UfRdYvb2+uvwJZNSdYL4LrKot85cId9jBQD5malyLvDWnNtu7ponmcoGqyB
+Wbskxu7SPPPKlq6gHLpNgy7AvH/2KRrBrYMRvodh41Xqcavp/Kj++yF0fkR2
+Ihsuan+8cAcse0ntbSj8bexG63bYUeTsQBrMd2mo84e1qlYdqqbzMxzjYul4
+AwXuBzq/QPMXWlec7A9pi2h9hX43ribzhOuc0bq1vpadoLznVzrGoDUt8t9L
+eWa6v/GneSgSSRoJobzkDhXeg70TE3JKKfeciZ0tsL2RzWkRzJuqc+e2Dlg6
+wfaCA+2DtWIP2nRo//lPUir1p34yqqe6lX9Yd9E+tCO3tRgWVH2uWIDnWPac
+pskxWgcqJdq0z7C6Y/dsprpSJMVoX3AbKWJQ/ZPH3RbegEetkgv6MD5hbeLd
+JtrH9y+PuwAnK62M6odLlUW73SiPLRohwzC3iK0iDzt+PaQ+BEeaF+Q8xjqW
+PXYgrgtWXDNaTs9xnX5u9yOY2fQ8nk3rXmjyopjqU+vqWETPaTTH7RSdH2Rn
++l2TjpfwD4G7za5W9MCDz9zMHKl/9OS0Ztj0SjxDn/atzaU2T2Blr0v19F7h
+BcTo/Q3nlunyGOSRoeFB2F2rjPEB+XD82pzEad8rqOOM0HP3PO6eNjz8xmDO
+R3jQTtua6rMpu+xB+/bo3C9lB2HLHL8EytMzIKP6GtWbrbPhd7q/jOf3Htr3
+ygblw2lfFr6fOhN5RIZ1FV2mvDN7cwxhTkl5yTsaT1/rkz/g2R687cvxHmXU
+2D/1gxvWCh5Gw9yMA3bhtP7/8ntQC/OXObmQd6+20ZTHe7xUszmSjm8ts63Z
+CBsPq95yovt1vzx9nvoljHhLYeUrS+4IYdnPgkkGnO88z3EqE/Pt4eT0iObH
+cu5BJSaNX87tONw8bhunC0uefDTH9t99aMovK2DHrsbHIpSX1L61JnBxeXXH
+HeQ5/+qQBTnTfHphBHwwwjWUjvcViB41gtkmyyOWwJExn/O/4r3Vmyg2V436
+48qHauk9z3FgycPc2PGhDJhpIPV5CvUfyhNyYHe2U0Yv6hdU/gwLglunPBZU
+wY2TXDFfWDhbJiIfzqxY4xII57Zfv51IebjV3ImB4yTHHTiw1pHfFNLg2RtD
+Lu6FJZU/vSiDLbcuGYyGfVMtDPrh6liG4CjMU8iZkEP9ejYOe3Poenea2sxh
+MQn54RrYk30hIgT2bIw78JG+uxqKd2VQHk2z0hVQP69H9c8a2Ex8eochjT9l
+avBreOacJA1XGu+yd1k/4YX1c49EwfzWrckzkO/sXcdHMuHSaQ9ZsnCDmrZt
+DRy8VFpBAs5g39w/RPO1zf/LGL2HIgTx0voYf220UxMs8NoeqEu2XTyZB38b
+UNxiBfODqlZQvbuLrYvc4eLrXbcM4Y9mi7sDYeHwl/BxjF+1oPDaXji4fG5B
+EeX5aqcCB3aMfp3nA59KVTQ4ADPLQtoWUL/2R98YWHDG6nwnvmN4EvX24dS/
+f4l6FjwpPy/dD5ad7+QfAKtUrTXbDBtzWpTMYYOXcUw7uFQtPVYVNjNZd3gl
+nMZQDJoOhy4+wtaBObM9HUTgdXnzSpToelVrxMThYanhdBl4sGAVYxacYu8j
+KgHzSras1IUtP8jli8B1+/rN7WG+w00VUdjm9CI7+k4LvrWgVZLy0J9mQfUG
+n5D8PAuOrE592Qj35s/hqMOq0wIqGRgv66ouk+pjRXkcXArPDHx/ik35tpu3
+uNL6eswRDaPxyN07tY/W0xbl68lUz4BrXzI89WJYSSnVP1JklkfPw6atE53U
+H776cCF8Yz43QNQA/YHSUrlw3WTqN0141Jp7JgneUcVJWwvXpV6PCqPn4aKX
+1S7Yt9MghL6rneOydY7ArPz4S3NhHataXjr1+98RdGA8VVPvj1+Fgx/8c/Yc
+bKjv/qOcvLvJ2wVuHolNq4a1nlaEysDnD7O7aqh/XE/3IX5HVIcpqFM/d0/m
+u8Owd1L2GJ3PfGb01RouipX8XgKXnvXaJAdnLtNYlAsbH3lb37cI6yGryiMZ
+9swavCKAm4cDKw7Bqj94n/nwLouUjWFwZK6nejo8etH8d2/Kw+WHMXlI2M11
+pfE9Vqig47MPX5m1Dm78qVlTAQe1S163ofrvLfjcCV87oyVFNu6xThNDPdK7
+jh2zp/v3yecyYYNVG3a7wJJHv3VshecfEj70of73l/sT4aCrHhv3wcUy4ewK
+mOu1vOwvWKAy6+9BWP3XTica76R7j8kM5HW2zG1TM+U16JyqDWtsUBj6RNfv
+GbI3hffd3vZ9/nLks1eobglf+WuAw4JH9U+4smCdlffdfWDe1PrTTOo/1raf
+C0faPJ+uAHcwW4f4MF+0ZOsI7t9gFl72gM7fs6XwLvlcFbMLDv6SGBAH72aV
+lI/Bk0kL91vC//6INGT9/3fkfwHRDx6s
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.31544096567158, 14.714519496373413}, \
+{-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:eJw9k38slHEcx5+MdmRhKP44sud5lh/P41ey5uenOVTKr+RX4Xal4SqrrqXp
+/LgsxqwzoUJnYmWGW8NIawonhFPikunc7CRb0dQRo++t9n22Z5+99t3zfD+f
+9+f9dhBkRqcaEAThj159/fdQoLXRVycgpDdMa4dI8CrwOCDxQxx/8nJPHQlm
+y1YfWyWIVVO8rkISGseyHEvGEZuHjxvlkZA/z6W77Z2BOCbcsC4mwVi2LG/K
+RBzZMXS6kYTc2pLAiR7EdfbbLkoSZkpjI2cJFyCKYpIpDgXKoPstal/E647p
+xAkKDLKjy4syEOct+a+WUWC61RtwuATxyvzm6GcKOkTN2n21iG3izkSRNISm
+a18cqUOcFaeIv0BDl8LYJ68Csbxz0KGahoXh1K+yHMQgFeX306AU9LPbSYgJ
+I6HlHA07tZVjZd6IVQOeSVoauqMK9nbuQayc4i7M0iB7ctRoQ436B4Lv9YYG
+/3ETw8VuxHKzNVUVDSMeydZTD/Xz9Sp4fBpU3hxZ+x29HrqsVjsazqVdI+Zu
+IV6JmFBPUUC161p1YsTSnBqDUgpW3ionVVLEqhmfhGAKCIH5rPg54mfCNGND
+CgrCODKORn//ocVP70iYbIj3G+Xq5x+r2qwnITbx5UTGecRdAX4zRSSIq7jy
+722I3aV167kkhNvp98vg88oyTYRFJIO/D9EEuVbUMPj/gQVP+zw1DL7fZlXH
+13FZ3J/l4A9ScorF/Tdfd3M5mMni+VZEnCiOhMXzw2TpjsNdFuvj91PHD7vN
+Yv2UJvXfnC6yWN/phF+bNiEs1n/rwas/u+1ZvJ/E6ezV42sM3l/N43SPK0MM
+3i9P4ft+Vz2D99919dF+fj6D/XFW8HsgN4PB/on5YBs8mMJgf6W0x9guCRjs
+v3sQ+HpYxGB/WrS2XLpZwWD/jqwLo+37Gexvn+qmNnKHwf7nykS9rjwW58Ok
+2CoiVsri/JSHamZC1CzOV2Zi4bTI3RXnzzBg2TlK7IrzqW4Y+yLuQ/w/v6y5
+vrrBX/TafLQ=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.0548, 14.}, {1, 0}], 
+        LineBox[CompressedData["
+1:eJwl0wlIk2EYB/CPeZCmNe9pHohFORPMIsycfpKZqHkfiZozTczSrbCmUTHy
+jOZtLUxIY4WkxnQJZeXZMTBrc7NATWdLmZQwdGoeYf+XPhgPv+19n+f/vtvc
+z/HizjMoijqKF6n/Hyea2trG40hTwvyq6CCY+Tp7PBlmfi5WJcDGI5y+pyya
+0kSxVziwWrCUvOZAU7XB2pxNrOsINrglwApVo30drL6z2vHBnqYGjLK1JrDo
+od96EnFq4Z4s9NFZpIyYw/pR8YgM+5jqubA5O8yPX140gm2fDPfOwzSbVZGB
+dZHX1BUWqJQ4bUiJ91v2B+XEwi3aCNds2M/3eX8nzExUvXSBj8zYBbPQZ4BR
+JGfAlaGpd8thH7Eo0pb0VcrXFslcxumNaFgSI88MQS5q4mSuFFZo/swLYalg
+rNAbfV9kFdQ0w3Sxq+YNXHqrXVlPPHVqVzz6WNxs1GXC/PBQrZbcy85tgzks
+XIxrI+cVdnJ1deR+er4ufISZMi//v+gTE3CZswP3U7qQmp9IzpdeMOsKPxgN
+5EmQg2s36WkGy89kTRps0Ze9T0b2y6uafWPhlp6ypLMwy2vdZtgGeZqtZ1WY
+E5LCK4+DqSvT9YdgiVk/1wQWDnbzbpP8QYqJaWus784oGMMcn5q+mBmYS9ve
+94YjBTYBxlivjy5zeoQ5tLgjK4z0M+uv8IGpL28DJTBzI9ZyAVXnIy7ZRfJM
++q9+gnP1Td9uwMyuxuTvZJ91esNPWGpw2HJA5XtcFB3HHKnlryoB3HZQOV5E
+7t2zc3MZVmS6X7gH81tPWJWQ73tQ2C4iddrlmCPy7331410ayT0lSX4Gq69v
+D5nCtVebpGyc94DgUlk1yenGe18DG69EFG4gR201y1kJl65umsaT/A7SGR28
+1dXr8Rjn14QtR6lhXbxz9pIVzp8n0DeQzzmHI6NgPtVd6QX/Dgsv6Wfi9yVr
+GGvFfEmewTkK1pP/EXIMkLqb/gf1UjjI
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.515727445508166, 6.085629021796733}, \
+{1, 0}], LineBox[{{13.5, 6.5}, {10., 12.500000000001819`}}], 
+        PolygonBox[{{12.052322615314452`, 8.98173265946094}, {
+         11.793188945044921`, 10.219815750748694`}, {11.102165824326175`, 
+         9.816718930329426}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.484057296392571, 9.676200089562332}, \
+{-1, -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., 5.5548}, {0, 1}], 
+        LineBox[{{10.000000000007276`, 12.500000000005457`}, {
+         6.500000000003638, 6.500000000001819}}], 
+        PolygonBox[{{8.552322615314452, 10.01826734053906}, {
+         7.602165824326175, 9.183281069670574}, {8.293188945044921, 
+         8.780184249251306}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 9.676200089562332}, \
+{1, -1}], 
+        {PointSize[0.04], PointBox[{10., 15.5}], PointBox[{5.5, 4.}], 
+         PointBox[{13.5, 6.5}], PointBox[{10., 12.5}], PointBox[{6.5, 6.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T8", " ", "P1", " ", "N15"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdfeg/figjhihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdfeg/figjhihjij.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:eJwl1gk4ldkfB/A30c1OSdas6dqvLUTuaynNpAkjLmWZwpjIUiglrmhki6JJ
+EpUWKkJlFIosoyRL0hXFIG5GISPbLf/vO//7PB7P5/md95zf73fuOe9V2Rvi
+7MdHEMQz/FH/idklfNRI4r+PPkksemYl1cP0zZlvm/XI2veqkxeOw6VGD/Zc
+0iPJnIO1+QxY+epITaweScyZaAb0q5IEZ+jisTDYaTVjPhWWuMXccgjjn1zW
+/s0Spt9aNp2AuPkVtweTKiSRfXs88Trmr8t4dOEOXDi7gfkK8RDa4aCD8GXz
+8gJhfZLNsY34bguH2ruVbYfdrQTjVeHaMI1v6fok+fJUb6wYvM37x6EuxKMs
+xhtpsN3dT7uFGSTRyRUJF4WNC8R4dAZZ+8+Nu3zrqPnI59XWDJI9YBjEMqWe
+P7r5RxeMb7u+YcQVtuwsLvCGk1T8nkXBDYOL9H143jF9+ksuXBq8osAL8VUO
+X3bWwBlZaVudGSQZsZs2/Qb2iQwps8L8Xcr5FmPw/T37BtUx/ue6DfNTVL3q
+V7VXYD6dTyGnPlH1JnnaNCP/nyTzP/bClY9ZtDjsh/iH/NZqql9aVU6bUO98
+1bacDFgmXKJpFv06LCfox4LJEbGOarjZZN/wGrh99GZUKvp7q3ia1aKM8XNB
+Zr/Br1wtQo7BrLX7u13gwOBaeU2Ye9xwlyOeH4/uGClRglV/+Xs3vJdpw78a
+LrS3aY+Ek3ct2iasQ77BjYX5eiRbauJzEQ0mi5imXfC2dZlbrygiX2LmliTq
+mbnnQ7jA5Mm+KhfUY/FyKkgFPsK41n0BcY3U5ipBWObbdYd38GHTnnvC8J4D
+15+Kon+urNl6dXhliup57B+bK7ltvRM8/ET0/mb002twTDQV7pJkfd0OsxQM
+ptpgB6n+P7AfbBkm7bk08tOR6zV2glXMbwd6wMofJt/awzlHI7uy4KDRq983
+wqtm/WNqYfZZzaNKsKQlo4gD5+oIxPFh/hsL0xd6YLOKBqV61KOSsr2VGj8Q
+51wWjfz7K/lk0+CA+QQ3E8T5fB5XWcHcpJNPJtG/grAq9zfIj9P4e1g5+sVJ
+bR9xh7kHfa8ch7U/v4l5roBzZVWyfBd8ezJTTw+uTfIs2oTn5cym7ibLI+6g
+OKwP91YbKY7IYT6TbGMTjH9vI52/FTaLfmT7I+L2IxvkymXR7yXr0QMwJ66m
+Xxdm7fc2yMN4Q79c/8cyOK/pfyRzEI+olBf/FWbdONEli/wvBfbPaMKlr25n
+esGvVVPe0GB2huW6AtRLBo2uIOBmZ/XWIcS3TC9GSMCpusl/iKF/w8oFHSZw
+7tu90hpwIaleEgivJMTUTNHP2sDjT+/AhX99byMRH7S20Z+m1ruRlmmD+NYH
+7q1myDdAXe8nS8TrGNHsw3BW7xoHPcT71VWSiuDwTCtrWdjw/NmOZ3Dzu6lY
+HvLjflU07IInBRV21cDxc22FjbLU+fCxPgLvqGmLy4XNPAJfMZC/6EqLYBZM
+tEU+HEN/7pzbeWqB6o/Kl/Qi2Mes0O4kHBArURYKX/V0duKthSU7abboHzMh
+3NcXLi3q56oiHm8t/+2pNNZv2zotCTt0Rcuug5v/ergggfH/2p8ZObYG5yPt
+ME8JcY+xjQcGpbB+ZaiSFeJqMxbWbnAz6+YTnF9iTVrqxv7V2H9lg4TLsHRE
+mHIMTP56P6Yffq5ll7cRdvR/6KyG+oT67ecEYfqq2r0BqM/3yXGxuVXI51wN
+cRtxRw93jyW48Ftk/igc1m65XBHjM9Il43D+iMm6Qv4dcGHimJEK+r9WTsk3
+GR5PM+bowg7vPhxqg+/fOVFtiPHVxtpK0si3b9TtvD7scum0BQv2zSFScP+x
+PbVaetNhh+QmtVVw9nn9/D+pelP1r3zB+vuTq+afw+2JAsUVyPdGkHxYE1w5
+4xV7CObNOLbcpPrhdChNB+OFh8/pBMOkIl/sB9Tv1T2iKgcH8By+XUE/z/Ln
+5BVT/frAi/Oj+vlgH0cbHhA8STeCX/ytpnEB9ct0hCeIYrxcw5PaBUmMJ7kx
+X3VJosJ/dYwrXHhpxHJCl2TPZd08US6B8+pKk5iD30fbT0jBAX7aB6n9NKg7
+o0gTx/0YnyBiCp8RKJGgiZEEYyzlGbV/d6RvGhuKYv3A2Um8/4jZjz1PT4ug
+nhITBy4sK9/iqQyzOIlOuqj3SvahgVFhrL8r8ucw6vwd6HYegiel1MtLYc36
+CH4xjA/NHhPmwruOWLf4wJXx7iZC6H/flrJ9nSLU96X7AXU+SoaJT25YX6Hr
+2l3sJ9EVLXLsA8wd+vyfM6W1K4KRL52/o4QaX9dQxB6Fg1Y3ilPzZagxL9ih
+PvIgxwzfFyKBmDWIhgeCvk+XwCnddw/9DjsODhsFw6azW0c9qbiy6Q467Lk0
+8XgJ8ynTK3sGUK9747vFQJjIn0u8SL3PBsng68inUnrmI/X+Ke3ITi9D/vSP
+hlvWw2OnfzLPFqbu+ff+C9gfTkSIxT4h9FfBJOYdnDcv3KMoiOfyNi21wS6t
+ygZdNMwnYpreCUeKz148uwLfL1Vx3jC8dD5ewE8A96PUsNUK6vdHfcQOV370
+c6YnyRjeHub+IGQ51ovd7kPdn6HDYb6VfPjvolFZDCe2vaSZwCuXlap+gcvO
+Xs4cXYb3X17GwkbU28CT1GyDZbweZuG+IcItl6ty4Wa+82H34L4mARsdPF+a
+wAschlu7BYQyYbpvYRg/+i1gZ6W1CusbE34h4nBzWIxIHhxuPZGJ80NoWp8M
+0UK+7Z52xdR5vTyyU/g2PL7eZoaANfrqTaRQX7aGleJbzG+yXzp2Nxw62jx3
+Hf6m/nTzEZhsfUin7odcVgWfL0ys8HiL+4NIvVY0IQebmYuc7UN9IkdX/nMR
+89ODVXjn4A5mQwkX+RTWnKv6GWakmZcJwAOHfzCXhetCfT7Oo142bUvkR/Q7
+d8Y/7CWB8foHhppgRz8jWYUlJmHm20Deg81mCL0kHpPgPpo8eZfaT/X4F7x5
+JsHJsX5dBWcYbNuWPsvEeRuKegMXVtS6us0wiVKm+xSB9Txe5bwPmGYS7c01
+S3gfEs75HeOvpphE7d+PWvF7lAi2Cn5XMIn57G+I/QlP7mT/XjOB8cn1OjyY
+vCWgKwTTE9yjmKhfR9PTUw12tJH2Og6/2HNC/F944KtWWjnMEGK1lWC+9pYc
+3T544aFReS7WY+TuXzYHi8x4exd/YRLRvRxr6vdDZ9+Be83IL8s7OobaH6Ha
+tbzX/zKJ7LLXqZ8wPtja27YG9Uw62tFb4E3TnRkBX7He+o7Ui3B3lrZEI1xK
+s9X8Be707xJtgB3HF3nr4FKGevVumGXSFEK9zxU2T1QkYr7LOzXVz8DfdyRZ
+/YD1Tn0uanKAtYTlNtxEfjI58X1isOp9xePFqOdIVGjWW/SX8bj0r55x7Mfr
+uYvl8LUq76DpUZieuJgNnwrf9M/rQbhNdfE0zFaVd/XtZRIS4UzJc3CoaOuL
+gx3IZyyx7xY8EOW1Z38tk5gbnqVT5/O/T8rm///XI/8Hiw6/aw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.887640361876243, 16.89239276247515}, \
+{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., 17.00000000000182}, {13.500000000003638`, 
+          6.500000000005457}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.644786852214096, 8.754409509855492}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJw11wk0lVsbB/CTIZIylFJcUTJXh+i6kQ65hlC4J1SSRJHhGiJl6FTK0eTo
+Cg1kdpKKhi9JOiQUlanbIWRKkoRK6jZ8/+d+67OWtddv7Xd49n/vd7/vUfP6
+09lHhMFgvMI/tf/7U2cxJKldxmK0Hjm5wBYerBxNkYYVe8emJ8M2Rq1PZsBC
+2RMpXXBdWKG6KCxWUZKssZjF4BQa84aXshg32kQn/OBGWY+4R7B02uO2fHj0
+WvBQOhxgsjP7Bew4o1nRFxYOvRGX0GAxGG+VH+jAjc84SlqwTXTU+OslLIb9
+myfeZtS/vqMjC5Yck2ixhbvVOns2wZnx3Nq18KjGJl8FOKBtQMYCjlydUdui
+h+sr5XUyYdkYw2Vp8Lf7L24rwrwsNs8bjmRuDv8H9aQVtySshDveDSpQfbJZ
+O12V4Oqjmypvw6p9Q9UScHGPT8EZOHLRIg0GLPt1+ttomLvY8w8xOPhC/HEf
+ePCUwqVZcLJ/DnsDzFy9VXEJbBhuX+VAx/P1VNbD7LsL/lkPG0dmDuyBc28n
+3XOnfLaJu+TBjaY623dTnreSVZ/B0aPqD1Ng4eiSXjGMN+2PMz73Kf+FUr8a
+wOf3qqz5Amu5B7RSPo4JxdK/Yrycu+szo2E38VClKMrzpErtaThX4k78fcrr
+WdKTXJixo8Z0pibyd5jI5cPRp/VnboSZ94yLMuFW/ZAnWXBmgrXgOGwp5+wz
+AHPXxhsHwgKjjFfqWsgh267fAq6rEM/aDJcmR4rI0PwMxPyWAAvn5xjS/HSw
+va4WwaPyK4KSKM/sGv8H8GS7bbcdXOR6wqoFVhT92Uv5SieKc/+G3XSsOit0
+WQy98z9ePYU59jJ60bDWsuBoAZ3f1j1tNTwqLVp1EeZea94zDW5QHIs8ATde
+btfq1GEx3HXbzgfC/K2s4DtwZrrFOnu4eNm75XmwokluuS48+GNx31nY90ST
+zEy6nvTM0PN0/IlbTp8wfsYutU0X4eSYdRv7YGP57AsC2FDr7K02mH/p3otu
+2DIhuoCsaiBnJ4l6ygVTpvTDpbr1Lw3hbl8+8wvMCp9w8YbTnBnL5+F+3fkN
+65Nh78mG5DUwT2jjXQU3/lm4Zw+NZ9p782E4Tln83HXYWPtRpQzyqquR8Jug
+PGr4P3RofdZ+nWqmjf6ka76m8Mct/r5cuFjp+DMLel5CN3i3wEwJr+OrYF/d
+8Hpl1M2Y9HDQg2/kt8V6wdylq9l0/W8Hnx7Ohlm/vN7wGvevPsBa+ALmjyvs
+vUl5H7vZK4VWkLt/bRRaYR2rhIk2+NTDopVov8Xd7LJDy3KTefAJ56n23tZ2
+J1vd7r8CS673q9wGOyYmhPjCHfkBa7bApVefN6hTnh3nbq6n3N5+WTmAuqNX
++UfRdYvb2+uvwJZNSdYL4LrKot85cId9jBQD5malyLvDWnNtu7ponmcoGqyB
+Wbskxu7SPPPKlq6gHLpNgy7AvH/2KRrBrYMRvodh41Xqcavp/Kj++yF0fkR2
+Ihsuan+8cAcse0ntbSj8bexG63bYUeTsQBrMd2mo84e1qlYdqqbzMxzjYul4
+AwXuBzq/QPMXWlec7A9pi2h9hX43ribzhOuc0bq1vpadoLznVzrGoDUt8t9L
+eWa6v/GneSgSSRoJobzkDhXeg70TE3JKKfeciZ0tsL2RzWkRzJuqc+e2Dlg6
+wfaCA+2DtWIP2nRo//lPUir1p34yqqe6lX9Yd9E+tCO3tRgWVH2uWIDnWPac
+pskxWgcqJdq0z7C6Y/dsprpSJMVoX3AbKWJQ/ZPH3RbegEetkgv6MD5hbeLd
+JtrH9y+PuwAnK62M6odLlUW73SiPLRohwzC3iK0iDzt+PaQ+BEeaF+Q8xjqW
+PXYgrgtWXDNaTs9xnX5u9yOY2fQ8nk3rXmjyopjqU+vqWETPaTTH7RSdH2Rn
++l2TjpfwD4G7za5W9MCDz9zMHKl/9OS0Ztj0SjxDn/atzaU2T2Blr0v19F7h
+BcTo/Q3nlunyGOSRoeFB2F2rjPEB+XD82pzEad8rqOOM0HP3PO6eNjz8xmDO
+R3jQTtua6rMpu+xB+/bo3C9lB2HLHL8EytMzIKP6GtWbrbPhd7q/jOf3Htr3
+ygblw2lfFr6fOhN5RIZ1FV2mvDN7cwxhTkl5yTsaT1/rkz/g2R687cvxHmXU
+2D/1gxvWCh5Gw9yMA3bhtP7/8ntQC/OXObmQd6+20ZTHe7xUszmSjm8ts63Z
+CBsPq95yovt1vzx9nvoljHhLYeUrS+4IYdnPgkkGnO88z3EqE/Pt4eT0iObH
+cu5BJSaNX87tONw8bhunC0uefDTH9t99aMovK2DHrsbHIpSX1L61JnBxeXXH
+HeQ5/+qQBTnTfHphBHwwwjWUjvcViB41gtkmyyOWwJExn/O/4r3Vmyg2V436
+48qHauk9z3FgycPc2PGhDJhpIPV5CvUfyhNyYHe2U0Yv6hdU/gwLglunPBZU
+wY2TXDFfWDhbJiIfzqxY4xII57Zfv51IebjV3ImB4yTHHTiw1pHfFNLg2RtD
+Lu6FJZU/vSiDLbcuGYyGfVMtDPrh6liG4CjMU8iZkEP9ejYOe3Poenea2sxh
+MQn54RrYk30hIgT2bIw78JG+uxqKd2VQHk2z0hVQP69H9c8a2Ex8eochjT9l
+avBreOacJA1XGu+yd1k/4YX1c49EwfzWrckzkO/sXcdHMuHSaQ9ZsnCDmrZt
+DRy8VFpBAs5g39w/RPO1zf/LGL2HIgTx0voYf220UxMs8NoeqEu2XTyZB38b
+UNxiBfODqlZQvbuLrYvc4eLrXbcM4Y9mi7sDYeHwl/BxjF+1oPDaXji4fG5B
+EeX5aqcCB3aMfp3nA59KVTQ4ADPLQtoWUL/2R98YWHDG6nwnvmN4EvX24dS/
+f4l6FjwpPy/dD5ad7+QfAKtUrTXbDBtzWpTMYYOXcUw7uFQtPVYVNjNZd3gl
+nMZQDJoOhy4+wtaBObM9HUTgdXnzSpToelVrxMThYanhdBl4sGAVYxacYu8j
+KgHzSras1IUtP8jli8B1+/rN7WG+w00VUdjm9CI7+k4LvrWgVZLy0J9mQfUG
+n5D8PAuOrE592Qj35s/hqMOq0wIqGRgv66ouk+pjRXkcXArPDHx/ik35tpu3
+uNL6eswRDaPxyN07tY/W0xbl68lUz4BrXzI89WJYSSnVP1JklkfPw6atE53U
+H776cCF8Yz43QNQA/YHSUrlw3WTqN0141Jp7JgneUcVJWwvXpV6PCqPn4aKX
+1S7Yt9MghL6rneOydY7ArPz4S3NhHataXjr1+98RdGA8VVPvj1+Fgx/8c/Yc
+bKjv/qOcvLvJ2wVuHolNq4a1nlaEysDnD7O7aqh/XE/3IX5HVIcpqFM/d0/m
+u8Owd1L2GJ3PfGb01RouipX8XgKXnvXaJAdnLtNYlAsbH3lb37cI6yGryiMZ
+9swavCKAm4cDKw7Bqj94n/nwLouUjWFwZK6nejo8etH8d2/Kw+WHMXlI2M11
+pfE9Vqig47MPX5m1Dm78qVlTAQe1S163ofrvLfjcCV87oyVFNu6xThNDPdK7
+jh2zp/v3yecyYYNVG3a7wJJHv3VshecfEj70of73l/sT4aCrHhv3wcUy4ewK
+mOu1vOwvWKAy6+9BWP3XTica76R7j8kM5HW2zG1TM+U16JyqDWtsUBj6RNfv
+GbI3hffd3vZ9/nLks1eobglf+WuAw4JH9U+4smCdlffdfWDe1PrTTOo/1raf
+C0faPJ+uAHcwW4f4MF+0ZOsI7t9gFl72gM7fs6XwLvlcFbMLDv6SGBAH72aV
+lI/Bk0kL91vC//6INGT9/3fkfwHRDx6s
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.31544096567158, 14.714519496373413}, \
+{-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:eJw9k38slHEcx5+MdmRhKP44sud5lh/P41ey5uenOVTKr+RX4Xal4SqrrqXp
+/LgsxqwzoUJnYmWGW8NIawonhFPikunc7CRb0dQRo++t9n22Z5+99t3zfD+f
+9+f9dhBkRqcaEAThj159/fdQoLXRVycgpDdMa4dI8CrwOCDxQxx/8nJPHQlm
+y1YfWyWIVVO8rkISGseyHEvGEZuHjxvlkZA/z6W77Z2BOCbcsC4mwVi2LG/K
+RBzZMXS6kYTc2pLAiR7EdfbbLkoSZkpjI2cJFyCKYpIpDgXKoPstal/E647p
+xAkKDLKjy4syEOct+a+WUWC61RtwuATxyvzm6GcKOkTN2n21iG3izkSRNISm
+a18cqUOcFaeIv0BDl8LYJ68Csbxz0KGahoXh1K+yHMQgFeX306AU9LPbSYgJ
+I6HlHA07tZVjZd6IVQOeSVoauqMK9nbuQayc4i7M0iB7ctRoQ436B4Lv9YYG
+/3ETw8VuxHKzNVUVDSMeydZTD/Xz9Sp4fBpU3hxZ+x29HrqsVjsazqVdI+Zu
+IV6JmFBPUUC161p1YsTSnBqDUgpW3ionVVLEqhmfhGAKCIH5rPg54mfCNGND
+CgrCODKORn//ocVP70iYbIj3G+Xq5x+r2qwnITbx5UTGecRdAX4zRSSIq7jy
+722I3aV167kkhNvp98vg88oyTYRFJIO/D9EEuVbUMPj/gQVP+zw1DL7fZlXH
+13FZ3J/l4A9ScorF/Tdfd3M5mMni+VZEnCiOhMXzw2TpjsNdFuvj91PHD7vN
+Yv2UJvXfnC6yWN/phF+bNiEs1n/rwas/u+1ZvJ/E6ezV42sM3l/N43SPK0MM
+3i9P4ft+Vz2D99919dF+fj6D/XFW8HsgN4PB/on5YBs8mMJgf6W0x9guCRjs
+v3sQ+HpYxGB/WrS2XLpZwWD/jqwLo+37Gexvn+qmNnKHwf7nykS9rjwW58Ok
+2CoiVsri/JSHamZC1CzOV2Zi4bTI3RXnzzBg2TlK7IrzqW4Y+yLuQ/w/v6y5
+vrrBX/TafLQ=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.0548, 14.}, {1, 0}], 
+        LineBox[CompressedData["
+1:eJwl0wlIk2EYB/CPeZCmNe9pHohFORPMIsycfpKZqHkfiZozTczSrbCmUTHy
+jOZtLUxIY4WkxnQJZeXZMTBrc7NATWdLmZQwdGoeYf+XPhgPv+19n+f/vtvc
+z/HizjMoijqKF6n/Hyea2trG40hTwvyq6CCY+Tp7PBlmfi5WJcDGI5y+pyya
+0kSxVziwWrCUvOZAU7XB2pxNrOsINrglwApVo30drL6z2vHBnqYGjLK1JrDo
+od96EnFq4Z4s9NFZpIyYw/pR8YgM+5jqubA5O8yPX140gm2fDPfOwzSbVZGB
+dZHX1BUWqJQ4bUiJ91v2B+XEwi3aCNds2M/3eX8nzExUvXSBj8zYBbPQZ4BR
+JGfAlaGpd8thH7Eo0pb0VcrXFslcxumNaFgSI88MQS5q4mSuFFZo/swLYalg
+rNAbfV9kFdQ0w3Sxq+YNXHqrXVlPPHVqVzz6WNxs1GXC/PBQrZbcy85tgzks
+XIxrI+cVdnJ1deR+er4ufISZMi//v+gTE3CZswP3U7qQmp9IzpdeMOsKPxgN
+5EmQg2s36WkGy89kTRps0Ze9T0b2y6uafWPhlp6ypLMwy2vdZtgGeZqtZ1WY
+E5LCK4+DqSvT9YdgiVk/1wQWDnbzbpP8QYqJaWus784oGMMcn5q+mBmYS9ve
+94YjBTYBxlivjy5zeoQ5tLgjK4z0M+uv8IGpL28DJTBzI9ZyAVXnIy7ZRfJM
++q9+gnP1Td9uwMyuxuTvZJ91esNPWGpw2HJA5XtcFB3HHKnlryoB3HZQOV5E
+7t2zc3MZVmS6X7gH81tPWJWQ73tQ2C4iddrlmCPy7331410ayT0lSX4Gq69v
+D5nCtVebpGyc94DgUlk1yenGe18DG69EFG4gR201y1kJl65umsaT/A7SGR28
+1dXr8Rjn14QtR6lhXbxz9pIVzp8n0DeQzzmHI6NgPtVd6QX/Dgsv6Wfi9yVr
+GGvFfEmewTkK1pP/EXIMkLqb/gf1UjjI
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.515727445508166, 6.085629021796733}, \
+{1, 0}], LineBox[{{13.5, 6.5}, {10., 12.500000000001819`}}], 
+        PolygonBox[{{11.447677384685548`, 10.01826734053906}, {
+         12.397834175673825`, 9.183281069670574}, {11.706811054955079`, 
+         8.780184249251306}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.484057296392571, 9.676200089562332}, \
+{-1, -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., 5.5548}, {0, 1}], 
+        LineBox[{{10.000000000007276`, 12.500000000005457`}, {
+         6.500000000003638, 6.500000000001819}}], 
+        PolygonBox[{{7.947677384685548, 8.98173265946094}, {8.206811054955079,
+          10.219815750748694`}, {8.897834175673825, 9.816718930329426}}], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 9.676200089562332}, \
+{1, -1}], 
+        {PointSize[0.04], PointBox[{10., 15.5}], PointBox[{5.5, 4.}], 
+         PointBox[{13.5, 6.5}], PointBox[{10., 12.5}], PointBox[{6.5, 6.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T8", " ", "P2", " ", "N16"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdfeg/figjhihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdfeg/figjhihjij.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:eJwl1gs01GkfB/C/uxrKZdx2ZN1y2wbZVRTNX1FCkq1t3Daly3RlX/ZNN0Qb
+YuWSxjrE6YZyqbPjTSWXUkwSXqphrEpu8+besEPS+33ed85x5nzO8/x/z+/5
+/f7PM0z2hPvvk6coio8/8k0Nf8VnGU3JyLctTd1uOPkuFb5j5HFKCGd5lMWp
+wFzG25J8+Eav2C7KEOP7Cwti4MqM6yNvWBifK289CvubsC2c4OLmTXOHYV5F
+0/Hcb2gqYt0WsxOw+S+/7FGEuda6mZdgn9g0lVMGNGW8Ka67Gq71OTosD4d2
+dYyNwypNuWUF+jRFB/Kdv7PD/Ef9sh/hdM6SmsOwUaSHuwls/EnoWg4HlnJb
+VWCN8Kjd43Cs/vo8ZTiq6uCkjj1NHZq2Oc2CufOzgfbw/foqmw1wNaea7wHz
+xk2Pn4AjHJlZ22FxdV/0fTg6Vj0xGBaoHGj5Ag87M5VD4I65BjGNfAXHf6J+
+IuZrs87AnqyUhk1wcsbCzjL40mbmvAOs+dJi5gWcp1p+VZ/kY8uyEcEaWmbS
+T8g34YuGNRnXF/tJ78B1dxV8imDeD+wzZL8r8s6aH4SLzZUGLOCuAaN4LThJ
+2/H4IOq1yWQz7wby8xt86FUGu7nOSc3hOkYoi/RLcW2Sc7Ye6rVqq2UQnLI0
+RuWzLp7nSLQ2wpM2coIguNDaoJMDtwXVdFbr4P0woW96wrLUW7NmsFW+l0oo
+vLuPceAyE/1wZ9acgy+ru3Tow1XezyUCuKRg33cV2uhnxgWDMfi3V8v3BBN7
+6x5mI//2Y7FeprDGZ52KcFi9bTxODpYds8i4S8bjn4bNaiEP9Xv1pJ9FtB5L
+FeM+Ua8uaqN+8atnKmzgaL4o3AYuUbi3MgTmOv+5cy0ssT49lAv3568/SPrr
+vj4rpRfOywwy9IRdFz383RT55jie9NgARylqBeyG1Wb69VbDW/mc3Gw4WGZp
+Zg7/Frs//gEsjVP1YcBdj/gKL+A2SUa8GPnt3fJSoRGm2dldf8AhEVMJJST+
+tYtPtsONEbNV/4B579Uyl8If+/p1zOBC/2l+C+pzKMF0YzXy4+U9/poBH9uc
+qe8GF4srru2CXWKcgytRj6SYbokTzPX7+c4yeHhB9+a38AfD/V6xmui3wbS8
+DvzmyzbBWw3Mr2VGGsCpYVqJ7nBO8LnbK+AVE66e+5cifnB40RY470bmh9Al
+NDXBHxOchIMrXdaeVcfzYQEX7sLG3IetLWo0JVJkhJHz+dhy9bQXbBznYLoS
+++l+tix/joF8hDMnIuHqPbWuPTBXTkHnT7jN0ahrBG6zj6gbgY01c0wt8fze
+5wvCJajnrei0+gRYVeKbYgLPqT0rm1Uj5+FZORv2e/qpMAb5mI+uyiTn6bnx
+AF8F+Ubb5ozZwUYWo8HJcKFPsng5mT/XzJyFUwuWv2TCnlcsG32w3/SpZIvP
+JN9/fxCfgq2mRBceww5mDomxxIl/nYmHR/Yzvv0Rzhnq0FwHCxhvd0gRL11h
+6qKM3F8hl3aGwXS27tZK+GTnscaryE/W05x8HH53ZPTKPeRvpVTuuP5/9dww
+Xoz9R7d+36sHn485kxS7GPUWlJ2bY9PUntBbFzwWoX6mSxI/wsH8hEElVdy3
+7Ko0YiO31o5mZezDgJ1E5vtWe7hfVaIp+5Ny10m8S08lAVmK6M8H9d1ucK9P
+zlCRAuIPBBb8Stav15Yfksf6a7ofkH4q2y/c3AGH9uSVTpH7YdA4ZkaOpuJs
+++0dyfscyawSwtztdhO/wrTufxgtsOwIXULO54XUyY7PsJXfosABcj//bOe5
+FfE6i2ocVFBvxXXXOmpgwbZVgeT+rWtjx9HIR+QzeMAQpkaEkUK40zpjlgVn
+7pBG+yL/np1MBulXjEZGSgPcpp83owiPqOwLM8F+6fbD73qxXtosdzoIpqST
+s8XwP0vYA0fg4YcHXhyyI/ewWp8v7NQb528JX3fYJ1lAPI2oTOF78j5ve33k
+NMz7/U0S+X3jOvwQQPIJTQ9/EwJXae9ekCB/XprFk+XwVDurqx/7VR1Vn/sb
+9e8dCXd7TGG9yKbi13Cd7kUF/a8cKrRp5a4nsLk47d4f8xyqKfz+fA1cnK0k
+bzzHoXjZvBtC+JxiiFr93xxKv9awrg9eIXe2ImOaQ92pVl9QJed9c+nR6584
+lIYFfXgNsXFRsuoU4h/SSYyCJ8RDG4UTHErEbQgj9y1VJFfVPc6h6qxtm2fg
+QsVcl9ExDuVZSh9wwv6trs28egKr3pZ8JP2MqLTK98V8aiGFLoUNHZUOrkG8
+Cc3RmyJY9fv1ixiTyPfy3b9k5H2wEMuUsH6ONOiKEulvWPyoDvJ7tzC9l/Rb
+Nn/7krkU8VMar8rBhmXmpSzsJ44RwJaQ+M09BoNwjsj7X/XwRAt7OmIG6306
+/yiN/L5pXY4qhWXGXXf8YdHsOkEq3KS3OkIDLk1I9V4M+z24bN2M/YkWBd0y
+Rbw2nWn78+Q8xvs7i5BP9N0zr92JvxGsdUC+hd7vXRbDTkYGUS7Yn/3I0Mou
+1Fu/cZWJ+gie59gyBDBX6te8cQj96BQm5cHpmrvk/fo4lFWBR20WbP/FKfFW
+N4dKEjMW58KUJuO0cjviOw8rV8ChV+zOatXBk9257WScfDIe/f//Kzb9X7fX
+dwk=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.6003322263215085, 16.89021660517737}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwV1QtcTFkcB/BT2kw7qcmrIjVhLXnksZVHuVfWSDamVh4rzCbbQyr0ksVk
+bJtYOxLVpp1BqNg1KjVKGonQO6/S0EgyUUxEg1b7O/fzmc/9fO8595zf/3/P
+5zP2/uE+mwwJITvwo3fSNIDLgiU6erdnSfaDtGYt3OXdOuMiLP9pv+gSrD+f
+u2ETzLnmFf8L3N4yU2YH8+9WJn3hsSTCv6aojc+S2Hx/Xjw8PM7/iwKW82Qx
+z81ZUl/n7nIQrg8NsM8zY4nfiaV7omBhzTHPyCEsCVoc77YF1umiz842Zcm9
+zEdjtsPEPL+Oy2WJKEc8IgGW2h3I+GjCkqx1SyOyYE3a6SRTeEpxdUcVPF0m
+dPXiYFxRXfIR5h02IeWDWZLIUbY6IO/0qJeSMLgi2cXKj9Y3Z9TpH2GrkDeT
+kmDFtNMB4bDGw9MwD9bYeBmUwqHHv2utpx43yMkJ669uvrGtHY7w7kmuhaev
+4hq8gkV+vga7kUffsj36GV2v3HiJy9eYJyyOqoGFY0Lyu+HzLRl+OTBvb9O/
+KahPKLZhYmE2Z+pWPupf7Z7aPA9WbRRIE2B1gVfcB9oPl+LEq3DKubRnuXAE
+l0wph7ts5k30o/1esln3B7VjlmQI7c+rXlt7WLXle9E+O+TL363eRfu5XBD3
+yRbPn1ma5SCPXORWtxfme+Ra5yI/J3ZFtz0dj1mYkIT6dHpD15YxqOddg9gX
+/eBYGdYrYE1A8lJLY5Y0KUXCU7C0/FeZ2gjf+cDQ1xdhXdOlwXmD8H3PBIY9
+goVOK5lThhi/377YGusrApXpxQYsUbYZ1wfDZF3frwSu/yCLuQmLqta8jyM4
+l+JrQychv7hyfOBUmCj/nHgAJvtv+lvBqhfvBR2w5sKhzDmwKJpMHkX7tcrb
+/CB8fKzvOxdY/CBqFgfrTyk66OpJ+/VgYkgWLO0JXLucOvROpC/yGTlqlwlg
+ha33YHPkVxp71kyj5y9laWAFfMW1bLEJLOLG8YJRr6Yo/PY/2F938sLKHli3
+ntM2E1YV1vT7fIV5n20Pn0E94kMul3+DtQaqcDO4Pot7QgLLHasvRKA/vHOX
+IpfAJFddddcG5+qz/vYDrCffETtrPix28rGYBscaP+y7NBrjecHRK5BHfiBg
+FwuLjR0zvZFfJyDObaPwXDMw3xH1CZN2Bv4Ns2UFa3oGGCJd7m4QA4scdDsi
+/2OIttBbEkrnm21bafCZIUE5qr5dMHHQaBV6higWTBvIpvOdK4P/+sAQj5rI
+N510fLfv+MZevH902CBX7C9/3Bce9I4hwh86j6XDmrGWj4Pe4v1au+39NN+p
+TFlzD/YPSx+9HvXwF9bOL4G1/LpxSmpJ9CEO5nu8a4s3Qj/4bGNPIRz7sEDt
+BhN/VXsh1g8q4DRsoA72q+jF/ppQ1iGQ2vBJ9Rrk00yo4fpQS98wNX0MkWew
+JnxYZX4iy+kjQ6zSKic3Yj/R2npe3CeG6G7dbA+BWdOAzRLUr/td8LobeUWG
+Fqlu/QxJFNwYJYLZ+dLoNFhb8GRkJern29mUJsK3jLrtJsHi8GwxB54Yvjr/
+oDXeHx6WYIn10sZkz9VbYVzWuagE+8tNkpVbYXnq+JNfkG92+9ydXyzhLLVf
+z3uG8NelPDwJa45ne55Fvdkin56fYTZxs48L+sXheCW7weSyXVJkN0NWL1k3
+zBlWuQ6Zc0SLvKaaVZ50PGN/QP8zhpAsa3UMLH6b2lfSyhDWpux+MXXqVUVZ
+E1w3EGCGPKS1NmrhXYbwTFPuhlL7HynvqMX39Jc/qaNuO9dcdYchqtkXB89A
+fWSHLNMJnq0v1O6ntnTqf1+N75VbkXCP2oyo1zSg3k0bZVx6XtQWUTH3UZ/7
+kS4H2q+utyWSR+i3L9fPkZ7PtEmeFhr00/aNsyWsmvDWVd+GevboXdqwnrjo
+2PXrz+Gh+kOHYRVzyssd9Yoidjd8S138YargJfohjGzORl6V9ljn2Vc4TyXC
+I9a0//owZ48uhogXRFzdQ/tlPl5qAcuTrp98OhL5qiTLPuJ9ftHRskWwKnG7
+I+nEeTu7LyZvBLxyo9fMDuTlvCydCotTSveeQT5RxdPbV4bDW3fu+6RmiJLf
+2LiROkTQUYp+3prc2vwNTFp6019cx361XIkRNb2kpURP/3+Hsf8DvRPe+Q==
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.3599813626326804, 8.076870967038232}, \
+{1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000007276`, 17.000000000005457`}, {
+          14.500000000007276`, 10.500000000007276`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           
+           9.996694214876033]& ], {18.003845503734127, 15.345156917263754}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwt2Hk8lGsbB/CJsmWZkC1lTXZDNU1JiFASKR1OKltO2ZoTMcm+nMaSo5LG
+UqFIjuRUMpyspxCVeEuWbKUsiSkSKt7f/X7e/uj+fD/3/dzPdV33Nc/zfKh4
+nHA8ykehUCSXUChkpAiR/9aYUf73z8CM8pTO5qTDI+aWB6ThUqOPm9YrmVFo
+MvWzq+A3ax5VvoBtRqYUZeCSLblzG5Rhe/F0PlhoR8+XMJidu/z1oL4ZJTne
+Z0k1mQ/0/XQfjmqO1Z+BGZHvgsLhIR29j2oqZhSmyIU4E1g7J1jVCm5qPpf+
+Tc+MUqCuZOUK29A/+5TAKdclnbzhzg/3hr1gxd6gHi+yfknzzGpYXX3zuDPM
+Kljp9UYX67dckLaEhTy5D/Ng5fRnOzXJ+tjthoGwQHRAuyCsHK4YZg/rf0nT
+eY/4Zrc7PWPAugrDH+tJvL/UPTSAdyXszb8Oy2WJWmyAk00WGxLgwlaJyh2w
+4+aRqBCY9uHokAecWbC9KIDslzPyPQGe76QUM+EXv/k2cOGA7b8wI0h9rOvv
+jMOUZhFnDrHa+2FV5FOdsJRO6ucm0RrrDBf3Ht47CVNLM64lwvdVX/prk3os
+7oh6AG9bptftD/NCb97rgsWVBeLKYZr/D90v8A9dAeoyVZzv8JDrAvxw4fjX
+fTBjSY7FT7jT8UZWLsyargibgBMly1kf4VRWnkU7bDX3Vt9ADfW6/pV5C166
+1bHQB7ZZd5l5Cu44EmqQDRdWSxky4GP9srH1sPOW5WLTyG/Dk66hN7Bb2F93
+/oL7/l2h+hGeNYv46k68lD/9E8yKn2mWh2Miy9a+h0vTLEU6dMwofGERG/8D
+18pTfs2APxys4FTAtAo9cW9YdcuJsEwSj7iI2Da4aMOwHQtmt7zmqsJyr22u
+OsG8dff7pWGGbvbSjXCOt/5d4i8f4hfl4NS91DoVOEZYpZOfxJ/yO58xXLlv
+19lvqAftUnfvYdjN4NLVr7DmtdFtSbDrym8bF0m9Bq7droKNQhb7pHF95w5j
+3yk4lG14lU5cZntBC/lpNDwb8yReTGYcgkuFxMuyYGrHXGoSbHUr6SSpl3Jk
+guhduNrUlKaubkYx85RnPYe/zFnfYsLcDHWZfrgkjeleA5dmKd57C4+t3Fov
+thbz4qfudcK8Ao3NLvCx3dUKdbBzKdfpGhyVeCYpm/we9oh+6CW+9MDUj6y3
+C6FKaSBPvsJ5Q9LPTnrHTWBu2arpSeQTzNfL5wrL9cdUF8K0ovjTATC1+q3m
+EThzteC3ILL+5eJqGZjpQDdkwkzPHTEvtHHOt8+5u8M5D76tOA/rFnXTd5H7
+WW01/xXmC0it04U1lf2V9GGv4fyDy2FWpICpOEy/LH9uBPEq/219/bsW+vGI
+60QDnFN76P4MbDT1Q/gWLKeQt2UR5qnPbDsP826pu0vj+tTS+RvRMKvbs2YD
+3DCxZPoM7MBfd/wwHNpqxCTzDNpnwT/hLRdley6QejK8eP/C40qNPqVk/SoP
+63k48YBvYxcspBiobIB8OzLMJcQR74hFcg6pR47K8IAtqVczUykBTtM57Xue
+5LOq3uoWvDD3NPYN3Enfp1cNe483VmmvQ37cSP8GmJ53h30aFlofvbEOvmu4
+zq4Brq3l31tC1leEJolr4hxuJuikwGZdHbP28IBOTIs7qb+GTCYb5qywa9Am
+9x8a634Au4mW631E/OljTjldcFRbY0g+rFh0wYkHy/3nh7srLG05+GUeVtYy
+b5Mk+Qb1/5yDKRvkS1tQ38KLfrETcKH/uacJcHCY2/JuEg/Xo9we3u+Z/0c1
+3KSmVKAEB2z8g3GVxHNks8t3MgoZZ58h++3OERzCuDA4Yu2C0ex+ggPZp7j8
+t+ebyf5Dehv6MGpUGOQqYWR+eyQ1iXHm59MpUYy8xcfc5dh/uksjjx+mRkt5
+GsHbqI0Ky+DSf070usE/WGv2SMLH+HddTiP9E514XQdOfVRe3wzH9WRNO8DO
+isanKMh3zYtXKdGwjVDnEyNYeUW78UOyvm2U7wjpDy8f+0VSb3W9ohi4hGLx
+jw32adJi386ChbLaNNLhYzzTkEI4J6JJ5D1MXYikEIta5T8n+/K0DvZmkH68
+KDwcpk3ePxXmERh9noRO1WIc8JpdcMK4cEW3+wdGjoJrqCrGedvzA/o410L+
+qmyyb0rnnzVOMFVn48NcWHoi8C4T5k60RrnABzgjkZFwqnfYYwl4Dd+lsBji
+uNvBjeScPm49Gwpz5PWZsfDumAsLx+BSNe5BK/gtn+Hf9vBA7avzpI77u840
+0UifOYYsjKIvmyNc7oiTvp+NEHkOq+Z9/kr6zC3bOqkGLn3DXd8Cj3QPc6vh
+A33rRktgM3aeTgvp+/uRHqQOtHt5A+/g3b687GS4drxlhyDulxh80CARZk9I
+714PK6yu23SRrHdJjzxKzrXNcA+pKytzg3oWPE95E/4EntVPd2qDS+6etZwh
+8y94msuQf4ntHxw9xOvAVm1dDz+MbJv2h5tE2GW/womGT33KSD3dqDdCYNra
+Du4SPBe50vqv2XDlSJGXA8wJCpY+Bze3/9J5lTzXE35yY+EP0cFRY/BsV0Ot
+H8zeuWuMhvckq2OqgfRJh67bwAk4Z+j2ghzs7OkRlw8zp9es7Ue8d1d/9noB
+O79S9L8Ce/dFpUzCqbqnjh6AHSROp/PhO2qkSqCH/A40B6k5wrBcxTLuv6hf
+Suvfvy6DmY9HB8PhsCVTczO4fkQgTXYbXFyctG4Apt1htAmQ89AenKwn899i
+1LrxXMrzlC7Khd3SLW9WwCkPCt5EwIzMp94F8C6lGaVDsMPlmrYcOCZ8dHEb
+yU9osbwQ1lAz6NMg+QX02FbBV6nHO2Rg5dQQnV7YpyQpnwpTd04yyf0zY1Mu
+rYTNDsU30eESftcAcj1336skX7jSp9TPglxf1TKQCzuccDT1gzmy37s7SL/E
+N4jkwJTWxiukXyzb9wb2ku+SsZ5wQzhtW2exKuqhaXVQ2ZE8Ny6/+dMfZvv6
+pv8GH869ffcfmDH/NJBJnj+zGfEi+M5t2hrR7wtnag4yf4HlLG5cIc+pxCr+
+qWsw85yV5BbYq1yiepB8RztWbSXPZarxzuNiNNRzULD4NeKrcQttUYdzci/6
+ceDgetlTdJg3asNzhKtokXLbYebHr5+F4WXvQkusYcrUUada1GvtRFow8YBm
+5rLTMD3MYNocTr1Z0k6HdSdiRzbBsxHzDj/wXnpg27pTG2ZXjFW2wAOHpBgK
+sGbUbEcBvFOENykEC/0+9jYFDvA+xJpE/Jpe++LjYA/pvc9ayXf+t2+Pz5L3
+7DGmYxnMuxkoxoFnZZ5tyyP1KFbRvU/em75TJznE/bO/dcN04+8eGbANf0Wq
+EOIT+CtpWQE8UhsuvxVWX81pqib14ibTT8KhX12S38GMaL6Fm7CBmHu7MOIr
+rBtIIP1Y8qqQpwG7uU/KC6I+Tx0j7WxI/A+G1uvA7aZ17/xgxnXXWks4g8th
+XyTr+2zVSH3VvqvMVcIs27Y9xOxXWqODpB47ElrJ+g4XF0lBQ/Qbp71Ni/jI
+agstuDO1UYkPlvTL8rOGR1r55FoRz+1c6h03uEko+8oF+K9pYa8gMj8ny2cP
+By5dWBsD81rtxgTgx9zJlwlkv7kIgyrURzvs3eUkOKpfpDoIjtaU6TkLUx5Z
+BNLg+vsitpGwpt709y/4zuMrLnx6Ei6kKJZVwyL1jSc9yXycY+olWGow73dH
+cn2LxE8W7B76mGpO1jd/eH0cFr4km02DnccD3Y7BZTvL96vCA7dO0YNg50sO
+HrLEKoaHk+FnV64+psJyHpO2d+DO8Xu7JWCGndhMNxx//EKCFEw1aRkXRbzM
+oaiW1WT9/obg7XC4vN8qfZgz+ryUBSckhRtbkvWyhXeKYWvdT7eOwOzFtXk9
+sOuKTwUk3xezq77woV7TW3xMrsOssxkeynCQ/dY9T2BanLS2EXyq1PwKj8zv
+3yO4CT748Hm/rBH68uGivT45j7DGFhPYOe/arCyxyj0Nd7izajRtGverGZJ7
+GQUPqCrtfQynMSLeZsHcdPuhJNh7fUD63zBn8+6wXbCZsnBgHXxMTf8GP+xG
+5Zq2wKyZTI1K1OPRkzqRVrJeVe0T+U43+Zmn+Yzs77GpTxv25hjSGmCmq8U/
+Y/jOf3aOO1UJy4WcptyDNV+7hhTDhZpNjfFwk8bW9ySezg+2pV6wtvmLyETY
+LcK1xQFuUKZfPE3yWy6Vugtmfljq7QOPmHa/2guL5h/VPgw7nLLpOEosqcBz
+glMn9ehk/6ObVnIcyf7X/VeWwI0T9Ob9MDV2WL0P9lqa98mV5OcVVCeJ+Kfi
+BdR9iY9zJXfCIY6yNpEk3yZP3QjSj2ImkxyY4nuIRvpFoeFkQDlZv2DN7IIZ
+NVJvu8j5nO9Knocf25gyFuEcg8vnqain+EkXE4316Aex0uUKsFaUTJEd7Pxx
+XEEGTl/ibxQEdwZ/OrOU1P9BTRqHzA8bJ73HfvuHzhVWwIyXkubkPEQNF3w7
+YLkmAY042C4qX2ICZlnIme8gvyfyd5AN//97iLrZfwF22yVu
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.246230799468776, 14.874866310565288}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwdlAs0lGkYx79hxp2WqFhKS0p2SMbmkvXKJU1FozK10s6gclQutUesar46
+JZeSUHKfqNYlVMqti1mxbZKEOqodjZI75RabxT5Pc87Md37n+b/P7f9+s9Qv
+xGuPHEVRIfDFJ82AH4pNqG8fNUI/KJoOcQWW6TaP1gH7+picTQaWJN4x9VAn
+lH562Wg36itODSapE7q2LuyzvTno4zpzEiC+VuVuVQKwYEhLzQni957eu/oW
+mPpRIChRI9RLY2W/JRaEEkfdHO1QJXRgM8+CDywJ9qrpUCH08IEBxglgoiW+
+eV+Z0JqOltczgA3nUqpilQglHJt+cR1YFmD4gq9I6DgLTdM8PL9OKrVRIHT/
+u/VWScC0fEOuA4vQ6d99dQkHFmyPefAbk1B5sRY+XphPnFPfJ0+oirr8IdNv
+cZJ+FThl+GwVhfnN7fvygdlew2feYP8moV8mgAUrLo9VA5MAvT+imYS+n5Rn
+eQ3nLd/YzIN6DqMmsgxgSUPnIy70o+kxIRUDiz1F8/2g31fF7ey7eD6p7Vg0
+zFO1Ra6nHdl+avIazKs9J7ZShfrUSVltCeyje/cdXy7uo5J3NFGVUHG2O/uS
+sb+ut3oOsE/dZdPVXTjPodr6AuBE98Q8/VXAx1qjnqOfUxFdbsAyxnJREfCC
+nXo/hwBT4RtFjsATF7MHkpEfeosuqBIyk1MsKAOmW4Iii1SIZGujg7ARuc6h
+Pl2ZUAZ2idodwALyjhsC/Z+f5Wj1AkuaNBPsFAllbOEZ2I/5JgbEGjB/61Bl
++kfUl35Wn4H9T7vpZLxBvQKvQYdJSOY+bnUDxllxZK88kWT0OqdUfDuvd3JK
+jhDjNM5kLjKv/EaLHKHsjdseJwATns3ZL3KE9lR37jqK/TGVREI4b2qwTRHn
+E0fGZ6uBP5m248V7sV6Mk+kQ8CH2BmoPntc1WjHBgj1RPTVBWD9+t6u2IiEH
+YthrIzDfaMxjGyVCz/x+YvM5jF+2yN0C/hSPF/ILMF4YFM9VIRTrhvXWp5j/
+30esheCPt5GzdATrux3xKIB9ynW93fS9JdQxr146BffdaeZIoyswreG4YRb0
+DTLr8BBgQbhwsBr4iYN62CXU66/MslQlEqs1a9WrkA39lgbBfSizsu14CSz7
+SX46BPy41p7WPAAsWWZdwYN+d5hl231F/eujGoaKRLIrTthNrYZ+5l34MMgi
+xMRYRweZHnFf1cAkEmGbVtSUJfZrNvI33G86gGWN+QwX2hrC/iW9oc/KX2O9
+3XlN/uBHtOfKu/XY/xHH/doQz449rnoL9blSogF+9Go452ShfjGXwwO/+Lff
+rTsHTLqH69tBH1OWn3YC49oz3pnyhDY6Uzobhf2fniw+D/dj4dO+kGOon1d4
+Ow/80e0ePh6N/MTF+7ECoULN1rinYr38orRemK8zwT+sFDnFNncC7mPL53zz
+Jsw/7t0oVSaSEmc1z1FgSjOgKEmFkMrXZR56MD9hXOpRAj/GhZxgF2CJaeig
+DbA7+/Cz4NV4H319l4B/x8dEManAlNh/wwPwu/Gfgrb7yB+leovAj8Pj8/Sl
+qM9a6WKrTIhWEnPBJLAs3reEDf3wtza+UbaCfXELR5nQ743+mBFtYDIVGdQM
+fnAmI/mLgAU6qca5MD+7xZjGuFgn4nk8+NF/WuihgvE4fkEW7L/Tr1JhGvIb
+xgRHf2QQemzze/terF+/5b+DDCLJbE0tb8V5EsxrHBjgV+8Pv9TgvIF/2vEZ
+hDJ5vkOxGP23n3+wEuJmQ1WibJxHbRfLB/zJVDnMvYj3ZbF+PQfqu+V2ZCah
+vjTbwAben1bPT+txH7QslNoO/c+ZXSnKw/Nf3F9Fgj+bRFa3KnD+wLhzKfB/
+p2lwqrEF9b8uv5msRIiSUQRzHOMf2KH74P4W7Rxh6OE+CqTpcrDP2tggY2dg
+mUWhvw/se/PATPpBnH/5xNf9wE5XttGpwBQnrGc18F+cF5MPUe/6TL8M3k+X
+T1bc95ivcGPTGLwPs3PwwTg+Fcn/B32cLQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.04629457140433, 1.614040285447666}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwt1n04lOkeB/DntITlYvIWhYQJa0ajRByrx9shsY2SiIPEQaeikzphGlbe
+s5ntsirEbN6mjW1qy0ursxMrytsQ0clqLuqE2po08tbhfO+9zh8812ee+75/
+39/veua5ZmNUwp6YVRRFCfBHrhSD/NOmKVVyNaMpmch1YXANTYnu+QbshqWh
+afs74YLY9mvfw8KFYukzOPMryU8fiJl7wrWw/9eyNmN3c5oyze9yPQhH+53q
+zIMT2S0avXAuX/q+A5Zrn3zL1aGpeWWP0EWY++PcyATs0toWt8GCpgS7CybS
+dGlK/B+GowPMuRZQa6xHU0oGc7WuxO6l1Xdgbo/8kBMsfl58g9anqclVav2W
+sLylYmcTLFpJW1GHTQvGldaupSkjkes3k6gnSUx9FAxzxiq/lpC82pRuKixa
+EJpfhGU34zTPwJG/xHUnwNRnp6ojYOku82Z/kpf+eIoJW1VvGtsKi10v/ziA
+ep18k39ZkPNXe3cfgVle+73NYOkZveBF5BX0qDezYUbHXE4GXJCx6YI3qV+m
+MqoBK/Ki80k9gW1XgxD9C62ci6vgSE3tOU+Yw/aYfUHqq7y9tIJ5bU8+7WtL
+5jU5HTUEh5WMtpyBhcvLlQ9hluWoiZT0L3mgPAb7FbutM2Pi/u6sk9o4T14R
+Fp4ISzhWzBg4/cRYTyOcqEVXDRA/fXdtFhbfKdIKQj6fUlaT5SZ8fvB+4BSc
+ZHfqoB8s5dtlZ6Ffnw8zHVFwYtQHZ3PMxyJK7fFhcn/71tm78Av1W5wYWFg3
+mOdlQFPB7pp+e4lbL5xtgTNzHjg5woL6Xbx1hpjnDF2qA8vO18SGwmEHXFNe
+I4+0Tb2LB8teDJm0wulZ08/PwC4s3fEScv/IP8ojYA365sppWF7NElvA88Z/
+jY8g6wfYu/pRz0dHo5xL+p8enTsMJ1mezPkK5sac8JxH3jCLiogDZL9o/+F0
+uOr6VEUSTF11mP4c5s3zFstgU6GbRQX6NzqSGj4AMxJsZjxgQd7Pq0l+xlis
+zwrmFcfbcSGM9DPaPTEEd+YbMOtg2lNNtYs8zxx54TJZn8/bI4ONInR5XEt8
+Xiir1MN5RdXVl8thTvvixnh4xCyu5yUcafxlwDBcsNASam6F/f0fPEORz8Dm
+uOY+WPgseuLtWjLvoL3JMGWwxfkc+mWw/xtQCEuZx8asMJ/cor/NFRPf2bJX
+Ahu5qMwJiP3Zx33X4fs8on2fD0fezn8ogQuCi45FkfPLp5aN12NO9bFVrrA8
+PkcrHLbfVHtMH5Yp1xTwYZe8bP3fSV4Ju4V4++S4oh2Whty9GgFbOC15VMF0
+Su6sOfzGrn8mH5Y/Up7tQ703zSU8Hum/VXVLPHxaN+lBCtlvPEp/RF5JPks5
+hzjaK5wPK0ov1n0Pm/YkqKvBTYd3xj+CKSfzmivo3y9ej0mRfGXjqzxg6t4a
+fTdipxOaK5iX5Ax3OJ/0o3iV+gT2rF3I+zecaFFxtht2+frTJ5Y11nc0NIzD
+cdKtT/nE4xFTBjjPiC7p64YFql9uOwqPXtDq0PkC+TnXdUbhN+/sVQJg+a+5
+5yORz+qBZngGLM4ezlTAYuNDrjVwuunZFQH6ZT3fPPQzLLNu/NYW8xHqM/Ta
+YPp24S/tsGf3TEMLzNC4FLPbCO/ztes4PxBXpK9vh31O/37lGzixsLFgozHe
+lyGNonhY8t361kiY9Wk83I3Ue9cbnA77XWr83ACOXLSvTIOjQ54qvUc/9L09
+tyJgWkc5uw9mtDO8zWHBUlZKA7k/bl3Xi3rBFd0hItI/fzAlFs79Yp9SLSz3
+OuCvQN5o6va1n2DOza5DPFhht7mpF+YG3duhAkuvdzyZI/O0SHYpQ/9ShdI0
+m/TrsMPaHQ7uczNPgKUSvdfL5Pv+tsawGRae32EzDPutTn2taoP8mff1e2F7
+g08xobBk5MSWlzBLt9SuHhY4rngZ4bxJZQdqCTatnww/Drf8qf+uGwvrdTNe
+y8jzNhhYx4epyZ1vYkj+zM9qb8DyDk2nRThXUWr2GBaXGT4pRr91YecCJmFa
+1BZoj/lY7FdhvSPrHWjnLlhs989Ecp/zZ43YQBOs32d5eQiOLD+a/BCWyYc6
+msh5EjGTuQHPW7K9qIi4MTLtEExf/Oh7hOT5IXtzBhzcenTJHeb+tuq7dJia
+WFpjBMsu0z0RcGD1QPsi+uOWdVeZkfWFfGrchryPrib2oJ5wsnLbICw38B2I
+gcvSDd0eE/Pn42eQl8fb5i8j8/GYTUmBFR43Wsm8hInWOcpwWdqsOxP10rP9
+XpWgf93f/lIfCjN6fGLc4Pk2b9srJI/avrFlzKvF2TXkFSz9+OT9MDzYcnGn
+Ixv7HY/f74M1FFOP8mCh2q32V3BBkFfWM+L4u80bcB7j2yQba1vML2iu/CTc
+eUskSoC555pHXsLidsNddbAslx3+d+SryvKfGoX/+L1j8v/rZvp/iCs6Xg==
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.1974629540243, 12.294740175065709}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwV1AtUU3UcB/AbI0EZMd4okMMItnAwjoWTwCYCEfFSTB4J0RJd1kGcr2FH
+JFDP1JQpoOMhrCAeKTRFEljiOrOBrzYwaB5TlsgOosHFI7RDjfX9cw7ndz7n
+3vv7f/+/+78LEO3cmG9HUVQ2/kmlaBv+2EKKReAnpIS7B0ovwarDrQVGXyHF
+XBcjzYPz9rKL9LDfW9y1LJhd97jBDDs6ziTLluP5Z9eb/fG8Jl5/buF19CkP
+UEhgmdSqlcEsBs/0Fyw9FsoNgWnthuJt/kJKXtfw2wQqv+F04jyqShsco0VV
+xmsTz+K+zJErpb0wdSncfRXWUYznUndhoTaHdxPWrGdd/ofcX9t2nYNc9FDl
+exF4TrzMOiKCOe0D0WWwqvB4pBwu2ddYZITzetwtHbBpByslDH0M/ryJazD1
+4ZStBC4RRPT9DMt/j/bth4XjxcyLsOXbvXf+hS3BuVEnYSOj0scZVXyk9QBZ
+z2LSJ7uQPrMV1aGoEwKziIFq6Eu/9xTP8Q/20YOocrPOW4Iq3bgwRdaTd40U
+W5FLyQlb6gVTjdKPK2Aqo5pXhWqwDe+MRDXxt/gxUPmeneUW7FsR7a7NJ/Mp
+6U0dIvPkK2u1mDMd66S7BRc2HhS9AauYRZ+MwbKv9/ScwHszcPW3fdGHc1dz
+2w6mbcF2Eljq1GA5uQw5yvxyHsNG+zFZOGyYj727neRva9hNL8X1gZTl/8FK
+rdc7d+DM539zkrBPfgG39wZsuh/zVQ05J6fzPzXCYp4oaRxW3Fe62qOfdLrC
+jRuAeV00b11P+g+3fC+CaU7+uBzmjLTtKIfFAmaWGaZmXuxvh2V6nXc08mpS
+G39Uw5z4pu2nYMshb30PbHp37v49WG5XJmmFpfrsJgdyLlOLmcdgSjdGB8IK
+Z+tgDlk/elEAB56Q/1JL8mRu6rK9BltCXvZNI+9A1YtR8h2IS2yPOsn+ZlY2
+HyX+iK8uIu+785l6GXHC0Hws3Gq/c0qBvD5/npv3Id9VgVvkIpi9zTNqBvNi
+n0k4IsY82G+7pd6BBVWTKTof5OubC9fBpsm4TUEwa9d4tAl2jNStKvdGjqB0
+B3LOLC0Jrg6w4NfFNwQkX5LLugovrP+grWgXOc/OtHU1TDsFVV+BlVl9oRZP
+XKfWMch3Xrjgu3YYdtx8a1Uy9ptmeLhIDyta0iS1ZF4r3UfG4LTA5lfNcPea
+ilIW+rFjC7ZzV2D99AFFGmw0T+4RwcaLWYp6OOFAfs0puJWxRfgSLjz6YO4C
+XHjh6Xgi8irffGVfD0yrJYZaWHwhfPQncr+u/6zJm5yLQ8YmmDP9x3537L87
+Sv3wMJzmkfFDGEwPmkOyYNXlhfpwOG066rtAmB83HO4NG61f1kwir/Hzof5R
+9PNxW9PbAQvj4jK+gbs/mNXsgRVMWfZymF7SlC6ES8qvttchb57q4C0PmDX1
+ftZimK+ut5vFvGSqzKQvMA9BZm7EGPmen59YctMD+Z9IHpnI+e4Y3MCFNTz5
++Snyvicdr51xR7VWr2ain3ysTOwECyafVApgjcvW8wo3zCsjc3AXOe9un8nW
+wsKrDZu7yHXye+yK/OT3eIXwf6LyDKI=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {6.411618926975065, 7.21843785395013}, \
+{1, 1}], LineBox[{{14.5, 10.500000000002307`}, {14.5, 3.499999999998608}}], 
+        PolygonBox[{{14.5, 7.6}, {14.1, 6.4}, {14.9, 6.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.4452, 7.}, {-1, 0}], 
+        LineBox[{{14.500000000007276`, 10.500000000003638`}, {
+         8.500000000005457, 7.}}], 
+        PolygonBox[{{10.98173265946094, 8.447677384685548}, {
+         11.816718930329426`, 9.397834175673825}, {12.219815750748694`, 
+         8.706811054955079}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.323799910437668, 9.484057296392571}, \
+{1, -1}], 
+        LineBox[{{14.5, 3.499999999996362}, {8.500000000001819, 
+         6.999999999996362}}], 
+        PolygonBox[{{12.01826734053906, 4.947677384685548}, {
+         11.183281069670574`, 5.897834175673825}, {10.780184249251306`, 
+         5.206811054955079}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.323799910437668, 4.515942703607428}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{7.5, 15.5}], PointBox[{4.5, 9.}], 
+         PointBox[{14.5, 10.5}], PointBox[{14.5, 3.5}], PointBox[{8.5, 7.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T9", " ", "P1", " ", "N17"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdfei/fggjhihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdfei/fggjhihjij.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:eJwl1gs01GkfB/C/uxrKZdx2ZN1y2wbZVRTNX1FCkq1t3Daly3RlX/ZNN0Qb
+YuWSxjrE6YZyqbPjTSWXUkwSXqphrEpu8+besEPS+33ed85x5nzO8/x/z+/5
+/f7PM0z2hPvvk6coio8/8k0Nf8VnGU3JyLctTd1uOPkuFb5j5HFKCGd5lMWp
+wFzG25J8+Eav2C7KEOP7Cwti4MqM6yNvWBifK289CvubsC2c4OLmTXOHYV5F
+0/Hcb2gqYt0WsxOw+S+/7FGEuda6mZdgn9g0lVMGNGW8Ka67Gq71OTosD4d2
+dYyNwypNuWUF+jRFB/Kdv7PD/Ef9sh/hdM6SmsOwUaSHuwls/EnoWg4HlnJb
+VWCN8Kjd43Cs/vo8ZTiq6uCkjj1NHZq2Oc2CufOzgfbw/foqmw1wNaea7wHz
+xk2Pn4AjHJlZ22FxdV/0fTg6Vj0xGBaoHGj5Ag87M5VD4I65BjGNfAXHf6J+
+IuZrs87AnqyUhk1wcsbCzjL40mbmvAOs+dJi5gWcp1p+VZ/kY8uyEcEaWmbS
+T8g34YuGNRnXF/tJ78B1dxV8imDeD+wzZL8r8s6aH4SLzZUGLOCuAaN4LThJ
+2/H4IOq1yWQz7wby8xt86FUGu7nOSc3hOkYoi/RLcW2Sc7Ye6rVqq2UQnLI0
+RuWzLp7nSLQ2wpM2coIguNDaoJMDtwXVdFbr4P0woW96wrLUW7NmsFW+l0oo
+vLuPceAyE/1wZ9acgy+ru3Tow1XezyUCuKRg33cV2uhnxgWDMfi3V8v3BBN7
+6x5mI//2Y7FeprDGZ52KcFi9bTxODpYds8i4S8bjn4bNaiEP9Xv1pJ9FtB5L
+FeM+Ua8uaqN+8atnKmzgaL4o3AYuUbi3MgTmOv+5cy0ssT49lAv3568/SPrr
+vj4rpRfOywwy9IRdFz383RT55jie9NgARylqBeyG1Wb69VbDW/mc3Gw4WGZp
+Zg7/Frs//gEsjVP1YcBdj/gKL+A2SUa8GPnt3fJSoRGm2dldf8AhEVMJJST+
+tYtPtsONEbNV/4B579Uyl8If+/p1zOBC/2l+C+pzKMF0YzXy4+U9/poBH9uc
+qe8GF4srru2CXWKcgytRj6SYbokTzPX7+c4yeHhB9+a38AfD/V6xmui3wbS8
+DvzmyzbBWw3Mr2VGGsCpYVqJ7nBO8LnbK+AVE66e+5cifnB40RY470bmh9Al
+NDXBHxOchIMrXdaeVcfzYQEX7sLG3IetLWo0JVJkhJHz+dhy9bQXbBznYLoS
+++l+tix/joF8hDMnIuHqPbWuPTBXTkHnT7jN0ahrBG6zj6gbgY01c0wt8fze
+5wvCJajnrei0+gRYVeKbYgLPqT0rm1Uj5+FZORv2e/qpMAb5mI+uyiTn6bnx
+AF8F+Ubb5ozZwUYWo8HJcKFPsng5mT/XzJyFUwuWv2TCnlcsG32w3/SpZIvP
+JN9/fxCfgq2mRBceww5mDomxxIl/nYmHR/Yzvv0Rzhnq0FwHCxhvd0gRL11h
+6qKM3F8hl3aGwXS27tZK+GTnscaryE/W05x8HH53ZPTKPeRvpVTuuP5/9dww
+Xoz9R7d+36sHn485kxS7GPUWlJ2bY9PUntBbFzwWoX6mSxI/wsH8hEElVdy3
+7Ko0YiO31o5mZezDgJ1E5vtWe7hfVaIp+5Ny10m8S08lAVmK6M8H9d1ucK9P
+zlCRAuIPBBb8Stav15Yfksf6a7ofkH4q2y/c3AGH9uSVTpH7YdA4ZkaOpuJs
+++0dyfscyawSwtztdhO/wrTufxgtsOwIXULO54XUyY7PsJXfosABcj//bOe5
+FfE6i2ocVFBvxXXXOmpgwbZVgeT+rWtjx9HIR+QzeMAQpkaEkUK40zpjlgVn
+7pBG+yL/np1MBulXjEZGSgPcpp83owiPqOwLM8F+6fbD73qxXtosdzoIpqST
+s8XwP0vYA0fg4YcHXhyyI/ewWp8v7NQb528JX3fYJ1lAPI2oTOF78j5ve33k
+NMz7/U0S+X3jOvwQQPIJTQ9/EwJXae9ekCB/XprFk+XwVDurqx/7VR1Vn/sb
+9e8dCXd7TGG9yKbi13Cd7kUF/a8cKrRp5a4nsLk47d4f8xyqKfz+fA1cnK0k
+bzzHoXjZvBtC+JxiiFr93xxKv9awrg9eIXe2ImOaQ92pVl9QJed9c+nR6584
+lIYFfXgNsXFRsuoU4h/SSYyCJ8RDG4UTHErEbQgj9y1VJFfVPc6h6qxtm2fg
+QsVcl9ExDuVZSh9wwv6trs28egKr3pZ8JP2MqLTK98V8aiGFLoUNHZUOrkG8
+Cc3RmyJY9fv1ixiTyPfy3b9k5H2wEMuUsH6ONOiKEulvWPyoDvJ7tzC9l/Rb
+Nn/7krkU8VMar8rBhmXmpSzsJ44RwJaQ+M09BoNwjsj7X/XwRAt7OmIG6306
+/yiN/L5pXY4qhWXGXXf8YdHsOkEq3KS3OkIDLk1I9V4M+z24bN2M/YkWBd0y
+Rbw2nWn78+Q8xvs7i5BP9N0zr92JvxGsdUC+hd7vXRbDTkYGUS7Yn/3I0Mou
+1Fu/cZWJ+gie59gyBDBX6te8cQj96BQm5cHpmrvk/fo4lFWBR20WbP/FKfFW
+N4dKEjMW58KUJuO0cjviOw8rV8ChV+zOatXBk9257WScfDIe/f//Kzb9X7fX
+dwk=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.6003322263215085, 16.89021660517737}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwV1QtcTFkcB/BT2kw7qcmrIjVhLXnksZVHuVfWSDamVh4rzCbbQyr0ksVk
+bJtYOxLVpp1BqNg1KjVKGonQO6/S0EgyUUxEg1b7O/fzmc/9fO8595zf/3/P
+5zP2/uE+mwwJITvwo3fSNIDLgiU6erdnSfaDtGYt3OXdOuMiLP9pv+gSrD+f
+u2ETzLnmFf8L3N4yU2YH8+9WJn3hsSTCv6aojc+S2Hx/Xjw8PM7/iwKW82Qx
+z81ZUl/n7nIQrg8NsM8zY4nfiaV7omBhzTHPyCEsCVoc77YF1umiz842Zcm9
+zEdjtsPEPL+Oy2WJKEc8IgGW2h3I+GjCkqx1SyOyYE3a6SRTeEpxdUcVPF0m
+dPXiYFxRXfIR5h02IeWDWZLIUbY6IO/0qJeSMLgi2cXKj9Y3Z9TpH2GrkDeT
+kmDFtNMB4bDGw9MwD9bYeBmUwqHHv2utpx43yMkJ669uvrGtHY7w7kmuhaev
+4hq8gkV+vga7kUffsj36GV2v3HiJy9eYJyyOqoGFY0Lyu+HzLRl+OTBvb9O/
+KahPKLZhYmE2Z+pWPupf7Z7aPA9WbRRIE2B1gVfcB9oPl+LEq3DKubRnuXAE
+l0wph7ts5k30o/1esln3B7VjlmQI7c+rXlt7WLXle9E+O+TL363eRfu5XBD3
+yRbPn1ma5SCPXORWtxfme+Ra5yI/J3ZFtz0dj1mYkIT6dHpD15YxqOddg9gX
+/eBYGdYrYE1A8lJLY5Y0KUXCU7C0/FeZ2gjf+cDQ1xdhXdOlwXmD8H3PBIY9
+goVOK5lThhi/377YGusrApXpxQYsUbYZ1wfDZF3frwSu/yCLuQmLqta8jyM4
+l+JrQychv7hyfOBUmCj/nHgAJvtv+lvBqhfvBR2w5sKhzDmwKJpMHkX7tcrb
+/CB8fKzvOxdY/CBqFgfrTyk66OpJ+/VgYkgWLO0JXLucOvROpC/yGTlqlwlg
+ha33YHPkVxp71kyj5y9laWAFfMW1bLEJLOLG8YJRr6Yo/PY/2F938sLKHli3
+ntM2E1YV1vT7fIV5n20Pn0E94kMul3+DtQaqcDO4Pot7QgLLHasvRKA/vHOX
+IpfAJFddddcG5+qz/vYDrCffETtrPix28rGYBscaP+y7NBrjecHRK5BHfiBg
+FwuLjR0zvZFfJyDObaPwXDMw3xH1CZN2Bv4Ns2UFa3oGGCJd7m4QA4scdDsi
+/2OIttBbEkrnm21bafCZIUE5qr5dMHHQaBV6higWTBvIpvOdK4P/+sAQj5rI
+N510fLfv+MZevH902CBX7C9/3Bce9I4hwh86j6XDmrGWj4Pe4v1au+39NN+p
+TFlzD/YPSx+9HvXwF9bOL4G1/LpxSmpJ9CEO5nu8a4s3Qj/4bGNPIRz7sEDt
+BhN/VXsh1g8q4DRsoA72q+jF/ppQ1iGQ2vBJ9Rrk00yo4fpQS98wNX0MkWew
+JnxYZX4iy+kjQ6zSKic3Yj/R2npe3CeG6G7dbA+BWdOAzRLUr/td8LobeUWG
+Fqlu/QxJFNwYJYLZ+dLoNFhb8GRkJern29mUJsK3jLrtJsHi8GwxB54Yvjr/
+oDXeHx6WYIn10sZkz9VbYVzWuagE+8tNkpVbYXnq+JNfkG92+9ydXyzhLLVf
+z3uG8NelPDwJa45ne55Fvdkin56fYTZxs48L+sXheCW7weSyXVJkN0NWL1k3
+zBlWuQ6Zc0SLvKaaVZ50PGN/QP8zhpAsa3UMLH6b2lfSyhDWpux+MXXqVUVZ
+E1w3EGCGPKS1NmrhXYbwTFPuhlL7HynvqMX39Jc/qaNuO9dcdYchqtkXB89A
+fWSHLNMJnq0v1O6ntnTqf1+N75VbkXCP2oyo1zSg3k0bZVx6XtQWUTH3UZ/7
+kS4H2q+utyWSR+i3L9fPkZ7PtEmeFhr00/aNsyWsmvDWVd+GevboXdqwnrjo
+2PXrz+Gh+kOHYRVzyssd9Yoidjd8S138YargJfohjGzORl6V9ljn2Vc4TyXC
+I9a0//owZ48uhogXRFzdQ/tlPl5qAcuTrp98OhL5qiTLPuJ9ftHRskWwKnG7
+I+nEeTu7LyZvBLxyo9fMDuTlvCydCotTSveeQT5RxdPbV4bDW3fu+6RmiJLf
+2LiROkTQUYp+3prc2vwNTFp6019cx361XIkRNb2kpURP/3+Hsf8DvRPe+Q==
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.3599813626326804, 8.076870967038232}, \
+{1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000007276`, 17.000000000005457`}, {
+          14.500000000007276`, 10.500000000007276`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.003845503734127, 15.345156917263754}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwt2Hk8lGsbB/CJsmWZkC1lTXZDNU1JiFASKR1OKltO2ZoTMcm+nMaSo5LG
+UqFIjuRUMpyspxCVeEuWbKUsiSkSKt7f/X7e/uj+fD/3/dzPdV33Nc/zfKh4
+nHA8ykehUCSXUChkpAiR/9aYUf73z8CM8pTO5qTDI+aWB6ThUqOPm9YrmVFo
+MvWzq+A3ax5VvoBtRqYUZeCSLblzG5Rhe/F0PlhoR8+XMJidu/z1oL4ZJTne
+Z0k1mQ/0/XQfjmqO1Z+BGZHvgsLhIR29j2oqZhSmyIU4E1g7J1jVCm5qPpf+
+Tc+MUqCuZOUK29A/+5TAKdclnbzhzg/3hr1gxd6gHi+yfknzzGpYXX3zuDPM
+Kljp9UYX67dckLaEhTy5D/Ng5fRnOzXJ+tjthoGwQHRAuyCsHK4YZg/rf0nT
+eY/4Zrc7PWPAugrDH+tJvL/UPTSAdyXszb8Oy2WJWmyAk00WGxLgwlaJyh2w
+4+aRqBCY9uHokAecWbC9KIDslzPyPQGe76QUM+EXv/k2cOGA7b8wI0h9rOvv
+jMOUZhFnDrHa+2FV5FOdsJRO6ucm0RrrDBf3Ht47CVNLM64lwvdVX/prk3os
+7oh6AG9bptftD/NCb97rgsWVBeLKYZr/D90v8A9dAeoyVZzv8JDrAvxw4fjX
+fTBjSY7FT7jT8UZWLsyargibgBMly1kf4VRWnkU7bDX3Vt9ADfW6/pV5C166
+1bHQB7ZZd5l5Cu44EmqQDRdWSxky4GP9srH1sPOW5WLTyG/Dk66hN7Bb2F93
+/oL7/l2h+hGeNYv46k68lD/9E8yKn2mWh2Miy9a+h0vTLEU6dMwofGERG/8D
+18pTfs2APxys4FTAtAo9cW9YdcuJsEwSj7iI2Da4aMOwHQtmt7zmqsJyr22u
+OsG8dff7pWGGbvbSjXCOt/5d4i8f4hfl4NS91DoVOEZYpZOfxJ/yO58xXLlv
+19lvqAftUnfvYdjN4NLVr7DmtdFtSbDrym8bF0m9Bq7droKNQhb7pHF95w5j
+3yk4lG14lU5cZntBC/lpNDwb8yReTGYcgkuFxMuyYGrHXGoSbHUr6SSpl3Jk
+guhduNrUlKaubkYx85RnPYe/zFnfYsLcDHWZfrgkjeleA5dmKd57C4+t3Fov
+thbz4qfudcK8Ao3NLvCx3dUKdbBzKdfpGhyVeCYpm/we9oh+6CW+9MDUj6y3
+C6FKaSBPvsJ5Q9LPTnrHTWBu2arpSeQTzNfL5wrL9cdUF8K0ovjTATC1+q3m
+EThzteC3ILL+5eJqGZjpQDdkwkzPHTEvtHHOt8+5u8M5D76tOA/rFnXTd5H7
+WW01/xXmC0it04U1lf2V9GGv4fyDy2FWpICpOEy/LH9uBPEq/219/bsW+vGI
+60QDnFN76P4MbDT1Q/gWLKeQt2UR5qnPbDsP826pu0vj+tTS+RvRMKvbs2YD
+3DCxZPoM7MBfd/wwHNpqxCTzDNpnwT/hLRdley6QejK8eP/C40qNPqVk/SoP
+63k48YBvYxcspBiobIB8OzLMJcQR74hFcg6pR47K8IAtqVczUykBTtM57Xue
+5LOq3uoWvDD3NPYN3Enfp1cNe483VmmvQ37cSP8GmJ53h30aFlofvbEOvmu4
+zq4Brq3l31tC1leEJolr4hxuJuikwGZdHbP28IBOTIs7qb+GTCYb5qywa9Am
+9x8a634Au4mW631E/OljTjldcFRbY0g+rFh0wYkHy/3nh7srLG05+GUeVtYy
+b5Mk+Qb1/5yDKRvkS1tQ38KLfrETcKH/uacJcHCY2/JuEg/Xo9we3u+Z/0c1
+3KSmVKAEB2z8g3GVxHNks8t3MgoZZ58h++3OERzCuDA4Yu2C0ex+ggPZp7j8
+t+ebyf5Dehv6MGpUGOQqYWR+eyQ1iXHm59MpUYy8xcfc5dh/uksjjx+mRkt5
+GsHbqI0Ky+DSf070usE/WGv2SMLH+HddTiP9E514XQdOfVRe3wzH9WRNO8DO
+isanKMh3zYtXKdGwjVDnEyNYeUW78UOyvm2U7wjpDy8f+0VSb3W9ohi4hGLx
+jw32adJi386ChbLaNNLhYzzTkEI4J6JJ5D1MXYikEIta5T8n+/K0DvZmkH68
+KDwcpk3ePxXmERh9noRO1WIc8JpdcMK4cEW3+wdGjoJrqCrGedvzA/o410L+
+qmyyb0rnnzVOMFVn48NcWHoi8C4T5k60RrnABzgjkZFwqnfYYwl4Dd+lsBji
+uNvBjeScPm49Gwpz5PWZsfDumAsLx+BSNe5BK/gtn+Hf9vBA7avzpI77u840
+0UifOYYsjKIvmyNc7oiTvp+NEHkOq+Z9/kr6zC3bOqkGLn3DXd8Cj3QPc6vh
+A33rRktgM3aeTgvp+/uRHqQOtHt5A+/g3b687GS4drxlhyDulxh80CARZk9I
+714PK6yu23SRrHdJjzxKzrXNcA+pKytzg3oWPE95E/4EntVPd2qDS+6etZwh
+8y94msuQf4ntHxw9xOvAVm1dDz+MbJv2h5tE2GW/womGT33KSD3dqDdCYNra
+Du4SPBe50vqv2XDlSJGXA8wJCpY+Bze3/9J5lTzXE35yY+EP0cFRY/BsV0Ot
+H8zeuWuMhvckq2OqgfRJh67bwAk4Z+j2ghzs7OkRlw8zp9es7Ue8d1d/9noB
+O79S9L8Ce/dFpUzCqbqnjh6AHSROp/PhO2qkSqCH/A40B6k5wrBcxTLuv6hf
+Suvfvy6DmY9HB8PhsCVTczO4fkQgTXYbXFyctG4Apt1htAmQ89AenKwn899i
+1LrxXMrzlC7Khd3SLW9WwCkPCt5EwIzMp94F8C6lGaVDsMPlmrYcOCZ8dHEb
+yU9osbwQ1lAz6NMg+QX02FbBV6nHO2Rg5dQQnV7YpyQpnwpTd04yyf0zY1Mu
+rYTNDsU30eESftcAcj1336skX7jSp9TPglxf1TKQCzuccDT1gzmy37s7SL/E
+N4jkwJTWxiukXyzb9wb2ku+SsZ5wQzhtW2exKuqhaXVQ2ZE8Ny6/+dMfZvv6
+pv8GH869ffcfmDH/NJBJnj+zGfEi+M5t2hrR7wtnag4yf4HlLG5cIc+pxCr+
+qWsw85yV5BbYq1yiepB8RztWbSXPZarxzuNiNNRzULD4NeKrcQttUYdzci/6
+ceDgetlTdJg3asNzhKtokXLbYebHr5+F4WXvQkusYcrUUada1GvtRFow8YBm
+5rLTMD3MYNocTr1Z0k6HdSdiRzbBsxHzDj/wXnpg27pTG2ZXjFW2wAOHpBgK
+sGbUbEcBvFOENykEC/0+9jYFDvA+xJpE/Jpe++LjYA/pvc9ayXf+t2+Pz5L3
+7DGmYxnMuxkoxoFnZZ5tyyP1KFbRvU/em75TJznE/bO/dcN04+8eGbANf0Wq
+EOIT+CtpWQE8UhsuvxVWX81pqib14ibTT8KhX12S38GMaL6Fm7CBmHu7MOIr
+rBtIIP1Y8qqQpwG7uU/KC6I+Tx0j7WxI/A+G1uvA7aZ17/xgxnXXWks4g8th
+XyTr+2zVSH3VvqvMVcIs27Y9xOxXWqODpB47ElrJ+g4XF0lBQ/Qbp71Ni/jI
+agstuDO1UYkPlvTL8rOGR1r55FoRz+1c6h03uEko+8oF+K9pYa8gMj8ny2cP
+By5dWBsD81rtxgTgx9zJlwlkv7kIgyrURzvs3eUkOKpfpDoIjtaU6TkLUx5Z
+BNLg+vsitpGwpt709y/4zuMrLnx6Ei6kKJZVwyL1jSc9yXycY+olWGow73dH
+cn2LxE8W7B76mGpO1jd/eH0cFr4km02DnccD3Y7BZTvL96vCA7dO0YNg50sO
+HrLEKoaHk+FnV64+psJyHpO2d+DO8Xu7JWCGndhMNxx//EKCFEw1aRkXRbzM
+oaiW1WT9/obg7XC4vN8qfZgz+ryUBSckhRtbkvWyhXeKYWvdT7eOwOzFtXk9
+sOuKTwUk3xezq77woV7TW3xMrsOssxkeynCQ/dY9T2BanLS2EXyq1PwKj8zv
+3yO4CT748Hm/rBH68uGivT45j7DGFhPYOe/arCyxyj0Nd7izajRtGverGZJ7
+GQUPqCrtfQynMSLeZsHcdPuhJNh7fUD63zBn8+6wXbCZsnBgHXxMTf8GP+xG
+5Zq2wKyZTI1K1OPRkzqRVrJeVe0T+U43+Zmn+Yzs77GpTxv25hjSGmCmq8U/
+Y/jOf3aOO1UJy4WcptyDNV+7hhTDhZpNjfFwk8bW9ySezg+2pV6wtvmLyETY
+LcK1xQFuUKZfPE3yWy6Vugtmfljq7QOPmHa/2guL5h/VPgw7nLLpOEosqcBz
+glMn9ehk/6ObVnIcyf7X/VeWwI0T9Ob9MDV2WL0P9lqa98mV5OcVVCeJ+Kfi
+BdR9iY9zJXfCIY6yNpEk3yZP3QjSj2ImkxyY4nuIRvpFoeFkQDlZv2DN7IIZ
+NVJvu8j5nO9Knocf25gyFuEcg8vnqain+EkXE4316Aex0uUKsFaUTJEd7Pxx
+XEEGTl/ibxQEdwZ/OrOU1P9BTRqHzA8bJ73HfvuHzhVWwIyXkubkPEQNF3w7
+YLkmAY042C4qX2ICZlnIme8gvyfyd5AN//97iLrZfwF22yVu
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.246230799468776, 14.874866310565288}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwdlAs0lGkYx79hxp2WqFhKS0p2SMbmkvXKJU1FozK10s6gclQutUesar46
+JZeSUHKfqNYlVMqti1mxbZKEOqodjZI75RabxT5Pc87Md37n+b/P7f9+s9Qv
+xGuPHEVRIfDFJ82AH4pNqG8fNUI/KJoOcQWW6TaP1gH7+picTQaWJN4x9VAn
+lH562Wg36itODSapE7q2LuyzvTno4zpzEiC+VuVuVQKwYEhLzQni957eu/oW
+mPpRIChRI9RLY2W/JRaEEkfdHO1QJXRgM8+CDywJ9qrpUCH08IEBxglgoiW+
+eV+Z0JqOltczgA3nUqpilQglHJt+cR1YFmD4gq9I6DgLTdM8PL9OKrVRIHT/
+u/VWScC0fEOuA4vQ6d99dQkHFmyPefAbk1B5sRY+XphPnFPfJ0+oirr8IdNv
+cZJ+FThl+GwVhfnN7fvygdlew2feYP8moV8mgAUrLo9VA5MAvT+imYS+n5Rn
+eQ3nLd/YzIN6DqMmsgxgSUPnIy70o+kxIRUDiz1F8/2g31fF7ey7eD6p7Vg0
+zFO1Ra6nHdl+avIazKs9J7ZShfrUSVltCeyje/cdXy7uo5J3NFGVUHG2O/uS
+sb+ut3oOsE/dZdPVXTjPodr6AuBE98Q8/VXAx1qjnqOfUxFdbsAyxnJREfCC
+nXo/hwBT4RtFjsATF7MHkpEfeosuqBIyk1MsKAOmW4Iii1SIZGujg7ARuc6h
+Pl2ZUAZ2idodwALyjhsC/Z+f5Wj1AkuaNBPsFAllbOEZ2I/5JgbEGjB/61Bl
++kfUl35Wn4H9T7vpZLxBvQKvQYdJSOY+bnUDxllxZK88kWT0OqdUfDuvd3JK
+jhDjNM5kLjKv/EaLHKHsjdseJwATns3ZL3KE9lR37jqK/TGVREI4b2qwTRHn
+E0fGZ6uBP5m248V7sV6Mk+kQ8CH2BmoPntc1WjHBgj1RPTVBWD9+t6u2IiEH
+YthrIzDfaMxjGyVCz/x+YvM5jF+2yN0C/hSPF/ILMF4YFM9VIRTrhvXWp5j/
+30esheCPt5GzdATrux3xKIB9ynW93fS9JdQxr146BffdaeZIoyswreG4YRb0
+DTLr8BBgQbhwsBr4iYN62CXU66/MslQlEqs1a9WrkA39lgbBfSizsu14CSz7
+SX46BPy41p7WPAAsWWZdwYN+d5hl231F/eujGoaKRLIrTthNrYZ+5l34MMgi
+xMRYRweZHnFf1cAkEmGbVtSUJfZrNvI33G86gGWN+QwX2hrC/iW9oc/KX2O9
+3XlN/uBHtOfKu/XY/xHH/doQz449rnoL9blSogF+9Go452ShfjGXwwO/+Lff
+rTsHTLqH69tBH1OWn3YC49oz3pnyhDY6Uzobhf2fniw+D/dj4dO+kGOon1d4
+Ow/80e0ePh6N/MTF+7ECoULN1rinYr38orRemK8zwT+sFDnFNncC7mPL53zz
+Jsw/7t0oVSaSEmc1z1FgSjOgKEmFkMrXZR56MD9hXOpRAj/GhZxgF2CJaeig
+DbA7+/Cz4NV4H319l4B/x8dEManAlNh/wwPwu/Gfgrb7yB+leovAj8Pj8/Sl
+qM9a6WKrTIhWEnPBJLAs3reEDf3wtza+UbaCfXELR5nQ743+mBFtYDIVGdQM
+fnAmI/mLgAU6qca5MD+7xZjGuFgn4nk8+NF/WuihgvE4fkEW7L/Tr1JhGvIb
+xgRHf2QQemzze/terF+/5b+DDCLJbE0tb8V5EsxrHBjgV+8Pv9TgvIF/2vEZ
+hDJ5vkOxGP23n3+wEuJmQ1WibJxHbRfLB/zJVDnMvYj3ZbF+PQfqu+V2ZCah
+vjTbwAben1bPT+txH7QslNoO/c+ZXSnKw/Nf3F9Fgj+bRFa3KnD+wLhzKfB/
+p2lwqrEF9b8uv5msRIiSUQRzHOMf2KH74P4W7Rxh6OE+CqTpcrDP2tggY2dg
+mUWhvw/se/PATPpBnH/5xNf9wE5XttGpwBQnrGc18F+cF5MPUe/6TL8M3k+X
+T1bc95ivcGPTGLwPs3PwwTg+Fcn/B32cLQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.04629457140433, 1.614040285447666}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwt1n04lOkeB/DntITlYvIWhYQJa0ajRByrx9shsY2SiIPEQaeikzphGlbe
+s5ntsirEbN6mjW1qy0ursxMrytsQ0clqLuqE2po08tbhfO+9zh8812ee+75/
+39/veua5ZmNUwp6YVRRFCfBHrhSD/NOmKVVyNaMpmch1YXANTYnu+QbshqWh
+afs74YLY9mvfw8KFYukzOPMryU8fiJl7wrWw/9eyNmN3c5oyze9yPQhH+53q
+zIMT2S0avXAuX/q+A5Zrn3zL1aGpeWWP0EWY++PcyATs0toWt8GCpgS7CybS
+dGlK/B+GowPMuRZQa6xHU0oGc7WuxO6l1Xdgbo/8kBMsfl58g9anqclVav2W
+sLylYmcTLFpJW1GHTQvGldaupSkjkes3k6gnSUx9FAxzxiq/lpC82pRuKixa
+EJpfhGU34zTPwJG/xHUnwNRnp6ojYOku82Z/kpf+eIoJW1VvGtsKi10v/ziA
+ep18k39ZkPNXe3cfgVle+73NYOkZveBF5BX0qDezYUbHXE4GXJCx6YI3qV+m
+MqoBK/Ki80k9gW1XgxD9C62ci6vgSE3tOU+Yw/aYfUHqq7y9tIJ5bU8+7WtL
+5jU5HTUEh5WMtpyBhcvLlQ9hluWoiZT0L3mgPAb7FbutM2Pi/u6sk9o4T14R
+Fp4ISzhWzBg4/cRYTyOcqEVXDRA/fXdtFhbfKdIKQj6fUlaT5SZ8fvB+4BSc
+ZHfqoB8s5dtlZ6Ffnw8zHVFwYtQHZ3PMxyJK7fFhcn/71tm78Av1W5wYWFg3
+mOdlQFPB7pp+e4lbL5xtgTNzHjg5woL6Xbx1hpjnDF2qA8vO18SGwmEHXFNe
+I4+0Tb2LB8teDJm0wulZ08/PwC4s3fEScv/IP8ojYA365sppWF7NElvA88Z/
+jY8g6wfYu/pRz0dHo5xL+p8enTsMJ1mezPkK5sac8JxH3jCLiogDZL9o/+F0
+uOr6VEUSTF11mP4c5s3zFstgU6GbRQX6NzqSGj4AMxJsZjxgQd7Pq0l+xlis
+zwrmFcfbcSGM9DPaPTEEd+YbMOtg2lNNtYs8zxx54TJZn8/bI4ONInR5XEt8
+Xiir1MN5RdXVl8thTvvixnh4xCyu5yUcafxlwDBcsNASam6F/f0fPEORz8Dm
+uOY+WPgseuLtWjLvoL3JMGWwxfkc+mWw/xtQCEuZx8asMJ/cor/NFRPf2bJX
+Ahu5qMwJiP3Zx33X4fs8on2fD0fezn8ogQuCi45FkfPLp5aN12NO9bFVrrA8
+PkcrHLbfVHtMH5Yp1xTwYZe8bP3fSV4Ju4V4++S4oh2Whty9GgFbOC15VMF0
+Su6sOfzGrn8mH5Y/Up7tQ703zSU8Hum/VXVLPHxaN+lBCtlvPEp/RF5JPks5
+hzjaK5wPK0ov1n0Pm/YkqKvBTYd3xj+CKSfzmivo3y9ej0mRfGXjqzxg6t4a
+fTdipxOaK5iX5Ax3OJ/0o3iV+gT2rF3I+zecaFFxtht2+frTJ5Y11nc0NIzD
+cdKtT/nE4xFTBjjPiC7p64YFql9uOwqPXtDq0PkC+TnXdUbhN+/sVQJg+a+5
+5yORz+qBZngGLM4ezlTAYuNDrjVwuunZFQH6ZT3fPPQzLLNu/NYW8xHqM/Ta
+YPp24S/tsGf3TEMLzNC4FLPbCO/ztes4PxBXpK9vh31O/37lGzixsLFgozHe
+lyGNonhY8t361kiY9Wk83I3Ue9cbnA77XWr83ACOXLSvTIOjQ54qvUc/9L09
+tyJgWkc5uw9mtDO8zWHBUlZKA7k/bl3Xi3rBFd0hItI/fzAlFs79Yp9SLSz3
+OuCvQN5o6va1n2DOza5DPFhht7mpF+YG3duhAkuvdzyZI/O0SHYpQ/9ShdI0
+m/TrsMPaHQ7uczNPgKUSvdfL5Pv+tsawGRae32EzDPutTn2taoP8mff1e2F7
+g08xobBk5MSWlzBLt9SuHhY4rngZ4bxJZQdqCTatnww/Drf8qf+uGwvrdTNe
+y8jzNhhYx4epyZ1vYkj+zM9qb8DyDk2nRThXUWr2GBaXGT4pRr91YecCJmFa
+1BZoj/lY7FdhvSPrHWjnLlhs989Ecp/zZ43YQBOs32d5eQiOLD+a/BCWyYc6
+msh5EjGTuQHPW7K9qIi4MTLtEExf/Oh7hOT5IXtzBhzcenTJHeb+tuq7dJia
+WFpjBMsu0z0RcGD1QPsi+uOWdVeZkfWFfGrchryPrib2oJ5wsnLbICw38B2I
+gcvSDd0eE/Pn42eQl8fb5i8j8/GYTUmBFR43Wsm8hInWOcpwWdqsOxP10rP9
+XpWgf93f/lIfCjN6fGLc4Pk2b9srJI/avrFlzKvF2TXkFSz9+OT9MDzYcnGn
+Ixv7HY/f74M1FFOP8mCh2q32V3BBkFfWM+L4u80bcB7j2yQba1vML2iu/CTc
+eUskSoC555pHXsLidsNddbAslx3+d+SryvKfGoX/+L1j8v/rZvp/iCs6Xg==
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.1974629540243, 12.294740175065709}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwV1AtUU3UcB/AbI0EZMd4okMMItnAwjoWTwCYCEfFSTB4J0RJd1kGcr2FH
+JFDP1JQpoOMhrCAeKTRFEljiOrOBrzYwaB5TlsgOosHFI7RDjfX9cw7ndz7n
+3vv7f/+/+78LEO3cmG9HUVQ2/kmlaBv+2EKKReAnpIS7B0ovwarDrQVGXyHF
+XBcjzYPz9rKL9LDfW9y1LJhd97jBDDs6ziTLluP5Z9eb/fG8Jl5/buF19CkP
+UEhgmdSqlcEsBs/0Fyw9FsoNgWnthuJt/kJKXtfw2wQqv+F04jyqShsco0VV
+xmsTz+K+zJErpb0wdSncfRXWUYznUndhoTaHdxPWrGdd/ofcX9t2nYNc9FDl
+exF4TrzMOiKCOe0D0WWwqvB4pBwu2ddYZITzetwtHbBpByslDH0M/ryJazD1
+4ZStBC4RRPT9DMt/j/bth4XjxcyLsOXbvXf+hS3BuVEnYSOj0scZVXyk9QBZ
+z2LSJ7uQPrMV1aGoEwKziIFq6Eu/9xTP8Q/20YOocrPOW4Iq3bgwRdaTd40U
+W5FLyQlb6gVTjdKPK2Aqo5pXhWqwDe+MRDXxt/gxUPmeneUW7FsR7a7NJ/Mp
+6U0dIvPkK2u1mDMd66S7BRc2HhS9AauYRZ+MwbKv9/ScwHszcPW3fdGHc1dz
+2w6mbcF2Eljq1GA5uQw5yvxyHsNG+zFZOGyYj727neRva9hNL8X1gZTl/8FK
+rdc7d+DM539zkrBPfgG39wZsuh/zVQ05J6fzPzXCYp4oaRxW3Fe62qOfdLrC
+jRuAeV00b11P+g+3fC+CaU7+uBzmjLTtKIfFAmaWGaZmXuxvh2V6nXc08mpS
+G39Uw5z4pu2nYMshb30PbHp37v49WG5XJmmFpfrsJgdyLlOLmcdgSjdGB8IK
+Z+tgDlk/elEAB56Q/1JL8mRu6rK9BltCXvZNI+9A1YtR8h2IS2yPOsn+ZlY2
+HyX+iK8uIu+785l6GXHC0Hws3Gq/c0qBvD5/npv3Id9VgVvkIpi9zTNqBvNi
+n0k4IsY82G+7pd6BBVWTKTof5OubC9fBpsm4TUEwa9d4tAl2jNStKvdGjqB0
+B3LOLC0Jrg6w4NfFNwQkX5LLugovrP+grWgXOc/OtHU1TDsFVV+BlVl9oRZP
+XKfWMch3Xrjgu3YYdtx8a1Uy9ptmeLhIDyta0iS1ZF4r3UfG4LTA5lfNcPea
+ilIW+rFjC7ZzV2D99AFFGmw0T+4RwcaLWYp6OOFAfs0puJWxRfgSLjz6YO4C
+XHjh6Xgi8irffGVfD0yrJYZaWHwhfPQncr+u/6zJm5yLQ8YmmDP9x3537L87
+Sv3wMJzmkfFDGEwPmkOyYNXlhfpwOG066rtAmB83HO4NG61f1kwir/Hzof5R
+9PNxW9PbAQvj4jK+gbs/mNXsgRVMWfZymF7SlC6ES8qvttchb57q4C0PmDX1
+ftZimK+ut5vFvGSqzKQvMA9BZm7EGPmen59YctMD+Z9IHpnI+e4Y3MCFNTz5
++Snyvicdr51xR7VWr2ain3ysTOwECyafVApgjcvW8wo3zCsjc3AXOe9un8nW
+wsKrDZu7yHXye+yK/OT3eIXwf6LyDKI=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {6.411618926975065, 7.21843785395013}, \
+{1, 1}], LineBox[{{14.5, 10.500000000002307`}, {14.5, 3.499999999998608}}], 
+        PolygonBox[{{14.5, 6.4}, {14.1, 7.6}, {14.9, 7.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.4452, 7.}, {-1, 0}], 
+        LineBox[{{14.500000000007276`, 10.500000000003638`}, {
+         8.500000000005457, 7.}}], 
+        PolygonBox[{{12.01826734053906, 9.052322615314452}, {
+         10.780184249251306`, 8.793188945044921}, {11.183281069670574`, 
+         8.102165824326175}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.323799910437668, 9.484057296392571}, \
+{1, -1}], 
+        LineBox[{{14.5, 3.499999999996362}, {8.500000000001819, 
+         6.999999999996362}}], 
+        PolygonBox[{{10.98173265946094, 5.552322615314452}, {
+         12.219815750748694`, 5.293188945044921}, {11.816718930329426`, 
+         4.602165824326175}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.323799910437668, 4.515942703607428}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{7.5, 15.5}], PointBox[{4.5, 9.}], 
+         PointBox[{14.5, 10.5}], PointBox[{14.5, 3.5}], PointBox[{8.5, 7.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T9", " ", "P2", " ", "N18"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdfei/fggjhihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdfei/fggjhihjij.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.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489721350429*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ImageCache->GraphicsData["CompressedBitmap", "\<\
+eJyU3QW4ZclVPvxL3+6+Pd3TPS6ZmcxMlAgRokCCQwiQoMEhkOAxLEDQIAES
+XIIT3IK7u7sFdw3urudbv9rrrVP3pgn/bz9P0nPPObtq1ZJ3Sdnjn/TMd3vn
+pz/pme/+jk+683Xe+0nv+W7v/o7vc+dj3uO966PDlzk4eJk7/e/OA/+9OzjI
+/z16V8/B0e4///M/dw94wAN23/zN3+yT3bd927ftXu3VXs3nB08evzm7+6//
++q/dG7/xG+/e4A3eYPcFX/AFu8PDw93Tn/70N+mvv+iLvmh3xx137L7iK75i
+98hHPnJ322237f7u7/7uruPrgxvGP4e7f/3Xf/Xp+Ote/eYXfuEX7h760Ifu
+vvzLv3z31m/91rurr7569+IXv/gdx9dndn/5l3+5+9AP/dDd27zN2+w+/dM/
+XQcH6RTdXnvzN3/z3cd8zMfsnv/85/t9d3p9t/CZn/mZYzRv+IZvuHvP93zP
+3d///d8fXN0E/dM//dPu3//938df1zY3vv7rv373Vm/1VrvnPve5u+c973mD
+As+//Mu/HDyq3/vnf/7n3f/8z/+Mv57Qn/3bv/3b7j/+4z/GXzf3Zz3Y8df9
+j5NVzNt9wzd8g7HunvrUp+7e4z3e4+DC+O7C7pd/+Zd3H/zBHzze++///u/d
+J3/yJ+8e//jH797ojd5o973f+73j88/6rM/afeu3fmt14p0bxuAJ6O3f/u0H
+s37u535u/M4QfvZnf3b898///M/v3vRN33T353/+5+PvH/qhH9p93ud93vjv
+3/u939u9xVu8xWDT53zO5xjewcOaHmxC4z/+4z+O337pl37p6Osd3/Edd7/x
+G78xPvuWb/mW3ad92qfVyLxzze5TPuVTdj/2Yz+W4e++6qu+avd1X/d147/1
+j45f/MVfnO9+/ud//hyvsf/qr/7qwSO6/7/5m7/Zvdd7vRfRjd/gAV488YlP
+3P3gD/7gVNoS9eSHvx/3uMft3uEd3mHo1Td+4zdO2r/2a792/Pdf/MVf7N7s
+zd5s9zM/8zPj79/6rd+afCd243vCE54w/q3fHhfh2SHt933f9x3daOaBD3zg
+7q/+6q/ON9U/8iM/snv913/90dpv//Zv7x7xiEfsfud3fmdw4fVe7/XG5+/9
+3u9t5JNq1D384Q/f/dRP/dTu93//9wfnPW/3dm+3+57v+Z6h8iTESv7gD/5g
+fMeCnva0p43/JqWP//iPH9J8hVd4Bf9OKVJGloablPc5z3nOGDktfNd3fdep
+VTRxk+LF3bu927tNznk+9mM/dmijhwafPXt2aFHe/cAP/MCDU6381c7uMz7j
+M8ZfD28a/uzP/mz36Ec/GpvGO7QW7NBQnAYzn/u5n7t75jOfOXniu/vc5z67
+7/zO7xw8+du//dvx7kd8xEfsPumTPmn897Oe9azdqVOnBo88xhXel1YODTBu
+GlN9npQkm7/nPe+5++mf/unx8/Pnz/vvTZLXDj2mb9GZxz72sQPpPuzDPmz3
+lKc8ZVLw5Cc/efdlX/ZlY0QkR5c1R0GKso0xV42fadJAmauvf/d3f3c08yVf
+8iVD1T1Q61M/9VOHuRBcmVoL89IQ5iu+4iuOQXkMHIlMGIMJGCg/5jGPGRj5
+1V/91do51XIlu8C95xM/8RMHOT/8wz88kAYABml8XhA85fqTP/mTw3q5h02u
+9xgkvsZrvMbur//6r8c7v/RLv7R7y7d8y9HOQx7ykN2f/MmfDM7Qezre5Izf
+Yv7rvu7rDj1uUN199Ed/9EChn/iJnxj6rq1v//ZvH99BsUjjm77pmwa93/3d
+3z3YWGM6Kduv+ZqvGZzMA7gKKM435atsPTSe5dz3vvcdjItsaScukf0znvGM
+MSJu4Bd+4ReGxQZv3+Vd3mVQ/uqv/urD2lHvX88Xf/EXT+FyWuH0J3zCJwxu
+Pqz1LcKl6UBGW3AOotz//vcfn2nrlV/5lQfO0mqc5YLoHDQoTmwCu2IYGW/m
+J4ZLZTHMg1TCPWzhIr8Vo8l5SeG+7du+7TD23/zN3xx6+Wu/9mu7r/zKr9y9
+6qu+6gAH5DA+rs07f/qnf7p7rdd6rWEyHsNFD4H9+I//+KCnXNk03IhDvy//
+8i8/dPjBD36w9k4KFwmwAXKn6TKpCJeqEoAHYx71qEcNgWEaUPcU1Ayr82Dw
+a7/2a4/RgWYOx6hiKu/8zu+8u+td7zpMwkMZQBJFIRjveD7qoz5q93Ef93GD
+LP/+wz/8w4w5KE0/B3drOoEFpeNgmQBuff/3f//u+77v+4aSRFJo9VCMl33Z
+lx1KyAPdfPPNu+/4ju8Y3/3Kr/zK7klPetLuLne5y+6DPuiDxmf+1hYpYVfB
+9PicdND/Az/wA7vXeZ3X2f3RH/1Rue6NzqJ50nln0+n3lDGOmFsSXxEDDfEO
+R/4BH/AB43tOlNvj/Ck8uqEf6eON92+//fbd+7zP+0w6v+u7vmv3oz/6o7tX
+eZVXGTR5KL/2GQbeFBRMOkOLv27atOOG1g7DRy60QQZlKts5Gl/fczgjuscu
+7ne/+w3sFGPCTVpDP2mE5yM/8iOHucFrFHBssFd4wfeDjYRH7/7u7z4o58w8
+2sVlkhc7w3QPV8LeQEu1f6YHJPoTKfsrmItxFKAEPk2VqehKpLQJ6F4jPoBW
+mH2Pe9xjkPbsZz97KDCMBX4Uy/PCF75wmK8h+I7yIhlZ2ohfp+Q33HDD7mEP
+e9j02xCQUAyJsWCbx3/rE6oxHII6N2i7gM7prjwgCIp10DziDDFD+fmDO8Y7
+RwPRPuRDPmT4m3vd616DVe///u8PbYs3NZqD24Y/8ZAyGjMeSsWwGA1+oIvB
+aEP8xC/FBxkPetBCAWPIRCqmepM3eZNh/EV/hiOk++M//uM5HJrChSXmh7Tv
+937vJ9zrfGDqJSmRJsWAWJ/92Z/NdDa9vGJkJJj1ohe9aGArxEqwp/VSjlaM
+00MgQnAOt3Rs042Lq/GOh6rToU52Bh/Cd8Zbfr/16vSAazBO/qUP6UlISTxE
+VhgVzQQ7L3jBC5Yo9nB4etGDod/ZgwJrekLor//6r49//e2p1Aplc1C4jgHy
+gxrcYbMNgmOdh5ChWCHMqRaIMS7gOsdqnHpgUz6rZprSa0YsIY4UZ3j0CrAB
+FCoAmBiTrSS2pOP64kRKPw9u7xEiD6itI0x2hIairUd45uQIR7Z1qodJpNry
+gBW6WTaZV6ls0gIPEsL45KrbX9sQyc0QYbznD//wD4fSCbF0pS1DloTxDx7K
+qS1DlC83rj6wGza6dBM9YApQoEY2yWFRTKC6nLLFCVkEt1Xyz8cUEmNZ0IxT
+T488SGjAqZTs0hlfBi4KTWdnPiOqsrsOSw9HKsTH7EbcvRvBFUUUlGO7f0Ge
+lEyQJpwEv+UHR9zItyQIjNiRUjx/aHfBWXAU/rq6Wc5ESJeToJGianBgNNBX
+s1AL673vEYLgIQexsPxluxvNAOWS4hwx5RXqFSfmZ1Jb0i1pTpZTJt2QcHWf
+j2GrwRh8QU0+Bh0ESRLl71cPJN8prJqdsSgYprN8hnWQtcY6dQOLhWJ048H9
+GXV8pVd6Jd8dXDk+u36IBvrkwXK8UqNArfSMThEN+AUGROz7WLA4nMVUVpHu
+4SjJ+etB/Rkpq3kxynRPNft34yEif4MzlsK4RTIcn7jVQ1x4y2l44PQ7vdM7
+ISndU7RO7w6uW6V6ehBLvwy0BrhiKj0pM5x81fHLvdzLLZnx4TAB9Z1CmvkZ
+E1bmMrB8xtR5sL29Xj/4KfhhhwnsMYACUTRJg4GydeEY05KBG6xB+53QT1ZW
+Mnxwj0hR4YorrhgFhTLYLRA/N/CXId55552jVz1pVaBY7E1mjHMirKA8QxJG
++ClnQYO1LIKSNsKpVpKDUOC7K6+8crj78pahAGwK9O52t7uNYM5DMl04DAUQ
+T5C0lpqoqSJJO8pRTBDhYwErAWelH52UVJi8G0BNdeJjWzWK++Uru3SUByDj
+Q2l1BEYvjo6O9D6FSIvFxBURtBDvMtwZAxBTc9fCKxECLEShPAWFRkF43DrN
+5XYIT+DB1mm4trzPwEACjVb0ilIyTBaA1w9pXiNd8ovnhTIbr28auttV5vE/
+TJOWwEn89j3xeQ15yEAOcdI3XbNx+kcV4KRASPSbrnFXjqxeV9zcur5yaEy6
+FeR5DbKTGbXGCaVBWjPErmZ4xWCUn6JMHIkJiRdoSYVWBzdu4t0CmrPDpIEY
+0VFrYXLxKOyS53O7e5u7YUCr6JMYkizoBbuvvfbaUehW7aJoRAjI/Ys6A6Nw
+sC71pcKJaru+rUiZl0ybQEg4ChMpZlTI921aB6/Sn2kTNu9GDLMb0SOGMWQ0
+YaRUUogAgwAhZ03d0JqS9yk2/uhulB/t8lE3etV4SSgPHTQq4+J/6R6nIe0I
+0QlfNV4D7XTg4Na2ZaGJ8ZIUiWkCf2BfNX9qTG/cMNwvt8V2P/zDP3yEqdys
+V7wOFvlQrhncUT/WgOUKTt4hYSzyWVnWtAYUExOX9tbjs6MBo2oc2vE9FgG9
+8jUHb9S/ITbi1g9VxyV9lTYd3Hcb5fXNMKRDaQ+PQAtI32hpBrJTYHjN13zN
+YbwY9uhHP/pgY8EVA0yhNYsKqCKbZfGmyD/VpPG+GM9b03ukK+OUpz149bY6
+/REaay2Sb+2PNc1kGHQpU5gERLvo0453SyPa+DDgtv7YYJgF2cyk43AWWvx1
+n409VzW8CpZkRrhOYavvGorw5OqRslEIygoPVazkLsnIEZXExaMtDq4N7GIT
+hX4cvHjxouZerS2fyT7oQQ8asRczURcoxL5LvyXuxwjOqmwixocWNPnrgd0S
+8aomYDVHztOU1qQlMQ5Oyz5qGGnJKOi2kmHrzEbxLSNMxDMyp+JUWPETUHvI
+T06R2RYoyjw4WCrugcYE6jd+ry16hxLvFtBfbErYNNwr53rwaq1GqOO/2DKf
+o9SMiVKcG3tg3tO8YKLePfNSWKQ5vkNzgBtGlh+5YflaCGOwXAbbK/g783+z
+CqynFOJhlQJcnXgENnwu0IP1KjjGopyCCA8gxm4mQeSiSg/zUpqptsIq1tVZ
+98EDmg2sDQvgWKnx1T0mFJhMVaHkXVX6SrDX9tdaYkXkpcJFcSrbOLoME2Of
+9Eyc6X/lo9IRqOW6lN1oyU033QSGr++3uC9ILWQqBUkHl+HpVou7aagJhGPg
+oAgC0gG2lrorZ6LGappY5ETVpNaG5G9IgPdScAxio+qnj267N3x9gC8wWLDX
+mHB2VARS16U0t956K7d+TX8NJkyOIMHAVHkK6c5dhnPBJbZOqigrDUhHgi41
+Lg/FuPe9700e1zWNkEwH586dG7OCFW8d/J/suzQsjUxYmqETm1gVyMAiVky1
+ID5HJoEptgXAIaGwCvqZqmALilaquq/avUtBwcnW4TYYv8uEpAdalnVe04Nh
+KNTRgJQr1U+uuAzLbu/PYEbj9uwCxii+5xHoF+Be05Tzljyi2B517K6nKf9v
+vh0OFKMKWzy0G0GHnyfKxkuhsxzI5ASxFKM6Ltqm/DOPTJrCaaoqN33l5oLY
+SViDUey1RtlQcna4D+EMEKLOir9l/lEWI+FxIJ6uoGFp8PnL8PCu3ZtWhAYi
+ZmmoEOLi0pxKNg0wShl4hRBXtcauEUbp/pX/O/vu0g1yWOZXMjGMTWUa4Q7Q
+0KBQiN5zqBqvOGLqAXo7aGuZH641xlnPpcV8EqgGpEwLcBb35/gYP3CQ+Kkk
+kEbp3JU9vrCGgCqXWWsM/UyqDKindtqgj4ZBGwVYRwlVQ4GZw1DA13DqdEaO
+QQrT650ezpKFY0h1e3Gh4LIcPhqxLWPFaY/QgJLsy35biswfGRvC5W8AGRtK
+wc4NbTwzmoLVYE4zBecH5/s7UZt6mykqkZvYP56Q1BC8r7MeDjxM7H9tk0G3
+zSwgIzZhZDCpItKLraBCcFkkoftvI7nQ/MFSHpG5lN+61DIhONYFbjLR5YEv
+dFx4fVM3IZjkFMBVNROChSawwl9XNiXCZL6FaknyV0pAEZEQdn1/1SIp4yGp
+NaCnK4UlB/fcpHdLq4OgB2yQEDs2Y1ViONME0PNrrrlmpp2VahYfhaNnR4oB
+bfIdqZQruWJ8fWaYgCUU+bpMbQpMEnfjjTfyY5NIwQJLVfO9ttkqtCd0AXVC
+fFIRzwJFvufmBaiwHWByNpLv+u+ruylfQxb+UYE9NgWtuTH59yah80PIVJQ0
+e7ZqRJ+aFEbRobKZG9sCAEFmSwCeJKZjtQnj1Je7o8wZMdeH38DmhFi4Oz6Y
+X2ERKCxmRSxwkLPHVzlnYUVPRW06IwbhzsQmhH6+v6OacXcC/0pyp0zwTkRW
+6jopVOi9+93vPorc1zVz1vq8sgI5C9NSbqWT9ZvMYhOXGMyqObAA2mok1y6I
+B45QVCxPx9BLkOmvm7vjZTJ0BFQ6hdXCAcGqv2eEd3ZYrqkyHYNZPy3BXdc9
+aAH+rWUgNtLBQgRya3NOnZlaqBQRjnmqsz0G5sV6VUsqmk7IRcPiNwLwAruk
+4xUMHrUGkRUaaQ87FwyJTE0X3tDgxUJFar7PHIZHDFq5XcYlchb7yZG3TPlw
+zu7sJhYejjjr9OnTw4QyfriIJ+L4W7pbys3UmCz+ZL0HR1Eme11zW2Qr04u1
+W7BUyHV9twykXuZlXmZ4ovTGYdDrUthw+z79FdgBYqwlCywZYBeXphOkc/S4
+zKSa9f+Hu0uXLg1o8otE+/ReXkNVyrGsE4zq6V3rudSKpif2zFkruxg6KzAu
+k8Vyh8oCw3FqQYVX70NIUhvh6S2LqjMORMy68BaFq95haNlNiMB3bODXRJwY
+bKiIsMyBTOqV2BHrVX7zdclhndmw+KI8YXh83/6KM+xK/0HEpOjec2lzKByl
+ZH3rZ/vMe5IruHNqFFEOx1S0FbR+cUMPgqVkdje6SoYqlpRJsFJqsFnHxaF/
+4hWuAITxnAwPDFEHGiN8ALB4sgKs2EFze9JPj+iOOkDQF7/4xbc0VYwya9I8
+MjnNW1qqaxBVKhGqREyI1prCO/uVvWCCZJCxUjAMJV9wfnV3hf+WW4B5pfeA
+JytVgbRGoUZ3j+OiQaAezXNEywBPT+nNmif9QKzluxGNHkF8Ic0UoaTbEh6p
+5s1t17QWD7WbUpFFTeB8rgS4YhAssNEE98ePZa2HEK3IbA9yehTfMAAjloiE
+lfU6hikZVGbdQfHyrk2UniiAVyCqB2sJtr4LUYjwU6pp/JkZl6Krx+/X6m5l
+fOOkbtVszItaadnr2J1JaeNV+6LJ1WwL5n6LLUj3dguQwiB+cLUPMVtHBP3Z
+0UhlshbLgzBgq/x+c/+S/RE84642Iz+hsyxKaLQ5nQvDTLGKVorhKTA+4E1q
+8DS1TPAgYQOQoM0GbSjCyUT4a6YW/cJLQvbXXZtEWY129Vc6FhLFy9STyoZE
+BoIU4K8OzEFngav/FrYTjYW82ztnBxQjD1Ikxa1hX+hujEDP+3UO23QnRPDX
+CXlxwYi1ui5AQfF7Yrrd8tGgag0vdAPCOcKEH9rCvER6/lZTZTBClV60vjHk
+0uC/EF3eLPQgFx4Aj8mTSlO6JFxkWSQcNZu9nky37CqZ7iqleyw8kUtYQpvZ
+GOwTwYYwqXlUHHahjAZQtGCSoEI7Zp38BtoyZ9QJIo9aRByWUZEDhaV9pcxJ
++S+TKt6/vzIp0NXZgzVf6YXAsxyC0o4zDu7dI9KTOAbviMFvMkHtb8on87Ya
+SpjET2SNMjdkdPDNAzuoxPkWv89xQl7ARHHBO2uJZuX8yzZN6CEk+UBKqzSR
+ypl8MS7fKzrJGzIBj3OwW8JFHT3cpDA7oTpcFo5z6L0scYY9l2Hxy/VX2KE6
+uNfuLfAwJEpRyWfiU3qDWqsZbl1G2TPmPfLr5i4NMTYuBWUUtEQk6hi8b0Yv
+xiUB5stz44KEDRJlgkMwliKipE+cdDlO39afMdDuoxOdawct9LDbHhIH21dd
+ddUA1sz80zi6rJTOrEifVoCZ4ngKI+JpEZSleEizNrU+W6P5/4Xn3jT7xw2H
+5zqxctWyhoLRSA7k0VpInsQVf9EmSmFLEt7iccxNpEKxs5wPQlYovcX2R3Nx
+Bp2TiNCpXjFcaFBadE1TZNLWuISDpZyX43ayT5oBPaSY2KDoWpQftfB4LnFx
+kLCo61Tj/O7ChQtzYRjXxAwIKWtKCLFU/+puKqUWMTGdKDR8aUXRB/RXpgZ4
+FN4m9RDGmOyj1DVwJG3KvPBNPT6aaaUGVrKzXvSwtXR+mKngPdPDHf2OcTNd
+0F2vJdFkC+QHBXCfSytJXG7i55aFANmiMFBvqjDVRAiACam6sK6sLMUtnILQ
+xeTMOIlfEnzWxy9lfiiTM5BA40LTGkl4JSdUTqg4qnF3q8hitbzYYnU6MR3y
+uaFqMtdMsCGRV2RcFQVltg/yc2W+KnIvN2+YQAS3ac1uxBAbEdyRXhQQLJc1
+JVGyDxGm5LAwNT1WLm6BDEVYiCA/bgDEF52Xm3IMEbSil0d3obN5d2Y4piwe
+QJPXVkjlgCrimU0xeeHv+jsqA5YU9a/sMWK+co9Y0vyQFR5lYQlRIKnx8Bu+
+xiJG+MIXvnDm6pAED6C12C1VSEhYJKTG62fkY7lKhZFhMlyibWSFHzSwegkB
+WAIUgIw3WTSnZ8tRFi8wgZPRGyKEIDX+sEQioRhmbd0x7m6+ipqZ9C8wCG6a
+OYqipAYvEO/KxkHCJtzBJSIujkXEvJ+CzybBbbisWMaXh5MtFxd34BUVOIEq
+rYWvpa4ptbM5qIxRNDaLaYUMSVOMJY4xnJBqabo3BB3beETEK4UEImnMw7nV
++6FQkqGyptqjHN1RRShkM5CX+wUowjx1EaFz9JAmxK0mNYMk2C3/WtZCawLh
+u91c6ffAfoN60Qq2VcYU/E7BRuSSaI/io3sfv5+b60DyICrr7mdAvW0JAH77
+DGOrOpmciqs3h/2BH/iBl5owHGEnTLZavaPfynJeKxJYmbCvgtqU8/RP1/jh
+uYr33MBpw6E3dNtQoJ7ArngbkiTBikUpe4D5IiskkYaRwM0aeEiiPjTMYJDk
+rYWVwney27YGbPQAOTJCJhbSNkCodDrLoFtF7RSCz3ZbsrHUffLZWvdJDpsN
+V7uJzVvabh5a+FT9ZXIWK3wM+kCCILTt5SAlTk1lQwoPaR5HbMEI1nk8sCiQ
+itgNScyvuhYtInbBBUi90CZzcl2e+sfh0neezI/QQqXuLMD3PvrQFk9VShHy
+2S63CyWUGcx4Cc/3KfTRID2a6GHPSlqrATAhymWIIR27QvZ11103guEYRxb6
+54EJVBoN0zo3LFBEjt2Iw8vxbHW4udCakXIxFZ1P0a+1pkQOVD21pqgDuRq0
+CO1CD5hL6CmruchdBLRfs7vV4DBBUjKzxC1oIgbTL7CQK5se4mjMkfmItMAK
+rMc2M9sxJd+JmdWRSr8TPMF5ayNwk59u3B9KoKLLPpa1jLIVJlxAPncwZP4n
+OSQhh3C9EhjXj3CCWAhn29hAX8z2szYssXYrOmBVER9nUjA6AHFT3hXdSE/X
+8o/8wjq6Uz3KRAncaNy8nAM6LRWKEyvtuXb5TWnQDLPXmlaETZPjjfKZgdpo
+pv6eFamEDlxbgQYlRsxSJL7+hiPwq5h2ZzMJfGKKXUxC+UC73V5hEs+Weu6G
+D1eMSg8DkDHEplPiEa1Zfxx7Fv/BI/2QU2d7IQFlvlK1tqQcCRRNoTwkgAOq
+sSfh9EBO4pfj1DDiNKEGF869L2YJqAAeIxCS4FMN4pbjUsEOgZfdHWvyY1jr
+pjhqaSi7GSNscYNkd18e2PIzY/I+3dlvVzg7dIa/Y0yAQuBQfd29x2Fqg7DY
+30zTDkdk00uCGu3OjZYJQ1yRuVnhGKHVWGNLbEimLkiCF+o89+zemCLWyGHL
+X6Y34NW7I2dvAA73ZMERPTUwhvp83XskkAaRemNGW0A055asUKEMuxk2Hg1r
+ShHcYzwpSgUoJZKmq5TZNk5fGLGTCBAXOarEvP7VB0vsjc6zXKdtfFsn6LMd
+az/ibROJXF2pIFMR3iVVIhJ9+k2SHnRIZMXe7Fn/pdWtZWdHrLBuIVPGq/El
+mmZbihVAKUwH0MyYYciVDdPDN1bwdGpM5x0OTnUZohdKzU0gOjQtaKFHySRz
+1LQvhS/OQSKQEB7PZN/C2nJEgR910iyPSNxheps4wZXhMEpKIq0KBUCY8niK
+XacATdtNP7OCAEsVpEBP+aeYIs0VSM9w/RQGFEc1TRd1r2sWPo5CMKd6uE6U
+dzZ9enjRLMwsszzFNOqnOTxkpcZAVFNE/bP4cjiMW4i+n228MKyVSmXlK2Cj
+jpqlCgwFDywnvPO4gLIJ1DRZ0R8BUUYKxY4QorcIiLFYPSSCmznWtvjZigb2
+Xzp/2C0xUHOsEFKVxDKQ+7T8pP9SSa5FvJGZIhvBEnIyeIE6XSwJJEhP/GDI
+pUHRiOyaktgZMV7L4Mo7dLluS4yyM1Wd0lgFwPtVUqcHahkjhKo2w3yE0l2b
+P9el5T6XsQomeAjN0pET09rggjitawqnKRAL4fzNBqq0Jz0TrvSSzxlPoQwE
+UL6yyVChaR9nuQq0wlIiv093JdSz1idLWyrmmL6OYvYxDzPDwJiYjif5q6yn
+VCyelpZhCgigiTS0fvqA/hpFxEH4eoVP9XVwxxu9G3vCoamYrN2KhwV37J0D
+LJ7FnylzECTP42t5VX19Yq6bYmW5XqqY6qqp4/hfNdyM3zZySuB4+vLKySMw
+Q/kJAxPcG5K6fZw0r9M7yY85eBwC+Td0F+TuXW0VtkWOeC4ksiKATKGhQBh1
+gUJRF3NnlKlB40FOe8qKCXhkdmqvrecGKDFoKodUoX5W7ZRUMgpaRqnNGG+x
+wewJpHdy2xRtbtehItmZVIxqH7mtmMspHWXMwQVyFCibVWClVoE8sImkaAaY
++RohpgH2oqor+2c0a9kVPFgKZlhh4UJ6ohaAiTBboNOpkyA0VY+4f4tA+JES
+NvbgA/ZA9WSqcCbbLtfVBtK7LoNEQymydD6bC/nsUogEcPxq7wDuIzOakDMD
+um36z9lkFsrG6MSH/JVom+5zUiXb0wsH14fYwYGxlJmvyQ8U3V7aDw3NYpbb
+e2imTwC10GouQzsaooWu0grEsAlKB0njxpIviSxnNeVwlEmE/9XiwShPdCYi
+avFXStKYnNPI7tZNsgtMBs4FkaFGdCDxkGnKJoT0tEs1O3JjhX4jzI9J8DBG
+YRMNlWKtoNBgC4lCiV4zkXDnIqht2+NWBcNeC1fKRlb3QNfDfQLTm1Ui6/bD
+Psli1iwMHPYDAtEHvho0iwxJPs/8/G2tGNnA4yQJgZl6fWl8aookaRELBnG1
+VK+oPde9nqyUMCcxQElwqh576m3AcwFqNREWLycZNJ/ODEmrnFAE+VBhwaxy
+UhpeiQIJXDRXYHCupZPUIk8yLbxY/ID8WcvZ50bQBWIhihRC1B2b8F6uaQMN
+mCR2tiZ5XzjaKrAKJrTVuNBWVhmLxxlMxInSvrhoJLLyLj2GhuxAVmlJkVaj
+rCc7vxUwJVpizdPdnN9APyZeuhofRTx8qbpgKcu6qq6jm1nP4BTpHL+KC+o6
+8b/+plvW/Gf7J0vCUEiYYlc5nUAWVdakMCYFehjEsPbHIZwfhgj5dB3FAukC
+ND6sNSWUkJHERtJyx2JgRZDkRFFVkg8l1HdK9daoj+ARRYVAGiXYn0qxrWM0
+Fv42wT+H6b2S4TULEf30rMa2wcOSKmGsUBQl5fGCtXoXFiX08jciybrCsIgR
+ARyezssOomJ+Rf3Fc3AC7cXErC4CA70iqplydiCRVI0Pt7RAzlLxW3DQKDNj
+mBUmhrBfMX962C3wp+BLvYLWwi+ujGJjYjE1xNAfwrfu7vbjEiLr9RAd4Fm0
+hfs43eflDYMHO8inYdNXbqG5OBF4iXowA8hxz5EQNndqNSVE87I3SlxnuV05
+pzOtiJSTjgtd0A8zGammU0wtScWE/LxXNE8TMnRyEIqIyYTpibPM8HVm3WzZ
+cJae5FHPmOcgnR9eX1BkIGyb9IVhNIAWG3ixcp0dojs2dEdWekS4oJQDYVEl
+yizl1HIvaeq1Wy2rq4cmquTlRBTjVUPKRAwbIH2ozSCl/aaArSAo1QxLpBgU
+RNlR50raWa2YyQkWGCHRNWXPPNLs+k1YwmwYg6qbehO1JSzyZKRceTWx+lUs
+caCaPEkGJ+1S2rylqVhmlqZ/BEDWz2ZSH6RXTH+2qdAMO1f3w3UD9FMUyJFO
+1N3ZFdYhjlahoNgZApbqfbNhJlzCBcayTgKy1t6XMM9T0qqyE4ct95Anzn1x
+F4acOAzIiE6OWSYqLzJ8kTqilO1v6m78VtDrr1SbqItK1Vrqhj26ppyErd1q
+f2PVdiYQM5cOipeygI4QAcjefM7OOTV+jmn09posO8Lp1KDDIPqNIrafhVqE
+boRUJyGtMgTV28g6N/IMYb3wL7OvOXShzCtZAQaQmhgWBsg/Qg6P3GuPI7bU
+91FEkZOOUEHJgpX6p0aoeWGMBL9gImbouVc0DCZJEoxYlxF91GG326fBVCEz
+cDE6oM0OsxF6v33h/NBVwwFrwEQ/9Fg+CXz9viKZHOCLmZ1hdbR+wwBXHlRT
+MMjwQB75wmooytooNgEodvB1mXJgtKoY1nQJnJ761Ke2YC5OWNEHzEhkh1Wy
+A2EpNsXsio3t8jbL0LcF55sobhwwxlyzGtU7AgX+xRj8nvWgMyfsyDSzgwFs
+S61EywJA2FSWldSQiyKR7WiT3Qw0sMS+dvqFwzRBUevOfg9JfV5hA1FTfOVI
+VjMd5VEpsSdJWEyxFGhyLGJ1c2qch3I49IeHs9b61Chu3jpyeAIReEQX6YRI
+lfxzoAIVx2BeAo6jLNAnSMBso8AA0W9OQKSPOLBfPPSy4/McRukxHEITucMZ
+TkBECsHBFaujHFl+zeQAhqlivhRNhEIpfI+2bLakWMYMc66//vqsxx798kne
+ye5rErrbYjOxoyubbuPvFdpT8DDT3A9xwDmKIQEUHuJZTrwL3ZRLVCLaxi+0
+52gOSoY2SkYr5KXiM3tF8CJbzdBKWYEgIzKTcPemez3drJfEJOAB5X2Aw4QG
+et6b8OdntMkicwfrrDv/TFOXT5qRMBWhdb0Wa7DDRJXNUqVGp8BfGS0IJwGS
+QjFuVKSZPUVACLiYoEoSIJOmBP5KzLgu54qzyVqmdasZhRMROvYsn0EKs7t7
+T3J+MEqiJ1+mdBBMACPRkFiA/kKDwybTKAxUOpRyHB1LTeFSMwWj1B7ofHIA
+emMvQHmZUOQri+ZK5SdFeMhiTVhEnQTS/qYuxF7Ubow7M6J12k0DaAMnc+9F
+e5Om3nxcCygi/u7nqbfPhEf7XO9w1v5XPnIGlNRasXzGOMlg3ZFFsVHtxMSM
+jqwYYc5Zp+Rm3ZX6rBBjAMWBzD2K3gE/hlggzMdlCIBYl2Lni60kYgsqwjcl
+geI/l7LY+KyPXByfJZfk64i8ZJxwiHaY3szJc7QqhUlJIxGDPEzPnoIc0LM3
+vS2kB6mmVS81qQTGpYPVxDpgg+2A4cz3IJ0UfBbycwDEPDptf/D8mhZBOqRK
+uCGOwvhKKrKyji2k0lIkmeo8oTNiWxpYMpoyziFvq35khfRej64dn+EMd+eh
++RyNVCMn16S2xaNm7sln9BIXpmAO51lzwvOseYCnVA7zgVnlGxM24HUfXd84
+ftvwg3C/N4CM7tg3H4KLYTaVZBY5Ws9DID7rxdfjM7jAVJCemVvcRX5hcxZm
++kqazQos3RBOlaqG/zxBCrgXm1LmT32yVczDAEF5FybGZ2IF0SPG5oArvxOA
+YnJUCsApyPgsViKExo2SezauG7AkXE4ksrExL2QaPCZZvnHTcTXJOVLmitaN
+g4xlv+ZkW3bFR67HH3oPQ7b4d6ccKkm9sE5pDlYISnKaLeGxDtZED3NmC6uy
+ZgOnRWMWRRS2JLICtPCigs3Zv2HpvwzxIFtv5GlyOPoSLPee7nE6ukPOqYCX
+kEMFpls+kRUL1uSXFSSnE10Eo1Pao3kMqwxhUsYRamYPsJeGzEQdK4rlEDR6
+ES0UqbF9+lP2nTNeBH0GhQTCseO+SImIl0O1cqDbuhh0fXRkfMAlBAsHu5Y7
+PwOxCv8gO59RRIsOhQnhGRaKM8T1tFCWWt+vmxeT2GaVx1JqnvE1ktYVbxRC
+lUKQsc4cQA6TxDk2iNWqWwlhVOjWQy1Orad2IQKOK1Mm0M8ipT3bjoYBrucM
++x6ErAKGjgTsHOj1/CJlE/uBWaFCVGl5Ah8Kf3J/LUfchwVPkmLj/uqFnDlb
+NDDhrxzCQn1ylLrHf5eyh/ti2V66MROqtc4Z9eKNcp63zRj2r8xjMY5Gjibx
+yasEaJzrakLf9al7fcT+tpK6DysaQCZqKHMMT1ilgsx6MoKgD2tXnng1q0ya
+J6/RP6Cllowg3GPOpAaT8ac8TIse2q/AMVrkYQwOZSk+hShA7YxxB/SFKD/n
+B1aisstSCpKmuRS7baPgbKWMftUBTdv1mKY5WUtk1qZTsLaYssf7mv0DiwGt
+ThCaa0rSVuzLeHkXUYG/HtKvgF9BfzwKDldcu+7+dODAlk8YzbasR25sOi4L
+IDTbGjibFpRA6lxz0JdSpGk/V0UyhZSmZVS6syXsaBlv7w7NAvOMFyc5esE4
+OKBhBROP7a/JVwmdy5N3UrCKPbOKic3jkA3rQlMAgRUm/0tjXrlbYd6GC2T9
+/JZbbhFORvvV3nyUFvhZi2ZoetdXc0gUeuTJXO0bLoYB3cTDd3SPQAVwSqW4
+y15klB7tjZYRCZ0AKJBDoLpI9sVxf0l3t2a3ldDcX2YbaxAz85Kq864bnpvA
+ORyq35uts1YuRzWJTQxW9u2OAnWOx/d3yAIHnJDvnPry8t0Na+sjsaaOk07f
+zTBPZwKx2lYd15bsu7gXrJPgW65qCVyaoQPWfL0EtWdHvCglFfQzQkpZHvdx
+/bXBgDVZlP9GYCW26YxdZqNlOsvipZVm0Sofzr9LuY29lDLN+EiUKPZKMwoW
+gHWh+fbmYub42aN1v8973vMmh+E24XAkCmoVIzeHN6NbjoUa1jMLqmdGoKGk
+QzjqcW/zNm8zPUjOwlwXIGoqswUnuOrn8hEypYIG9/j2NvW1HpQJ5OK0FVer
+5Tfurw2bX8maVDcRlem+6cqFs4MD2UHGXSip1wgjOUWm5By8ruJKSTF9AGXJ
+lQeCGHC5hBN9kFkrzhi+RupX6UNimis5PJSnSEofvBRLCKgzorKGE30YpTWb
+QgBW7Sa5MsH0gThxLctWvzhz5gyBpw/gCmbMREvbbMUri+k+7mjR0jsVJrZC
+e0yXRmN0gBMa74Pf+ka57cwgkM459mbqg256jOhu/+//veXKp2fk1IdCPGT9
+dlseSfyCG9w1QVe/fvDxX1HkJHBySa6i+H7iV3oQ4Km98KcWGT33uc898SuW
+TW5ZvYMN9caxX22xMNvITWliPQoo7t1Ocj344TYLSCJs4QJzqR9CKTmFF49w
+AmVu/WaWNmPNYp+n/LFuOExd/3S36rN10U7/nbL/+nXPEh1bPZKVsY/o36+r
+JvL7dL/OMp1auscXSiJ86ETk1H6JxeFKw8H4Ig36MOO5ZxOgAMNZ0Wcqb+fS
+lUtn64PLc0rrOH2ZPD/BnoWu8/P3jMK0puqUuFSVw3d4U9+/3Cqg7aAJO2by
+SG4LqDImSU/Pjx6s44Qg+8jtqqGMJj08alQUqUugw6f3MdnDwYIXcCl8o1EP
+a4WERvA/t6vwMAxnTcREJ8eP3L5qRFGwTi2bd+2zL4fjTwFMzNFXFoy/tbOt
+gN7aTRlwL7ttolbbAgs5slCzsCl3//kYROUoD6kFx8lNWb9Cd7xeENbrDa4b
+bMq1XJ5cwuARw2Bb2Ch+Md3M5rNcyRBtzrcg//6rII/Ga2vyowQolhDchHuw
+36hOShOk7I/NuGpIlx9iBhBewJeNfKpKsgYPRwdkmArfKC2MNEmRGmYJRq41
+3C8521Zr9mVp88gOOAOWVC9yxIJHhTO3KvF0ottcX6SdXOpI4gCPJvGf8oYN
+s7aqrEgCHcZkGi3iBJpyj+xckztnZQCxEoG2S4RTnEqs69WJ1lD1nop5LEQO
+HVMfyz1lLIRfwhPuQMx4TJyH651187zTLB3Ow4VReK7OFPBe1NeN8CR373js
+06IiDBrLvZcZQE6908w5WY6dDFUx7GFN03Ih4URMLIk6hP1jT4QVjTdm99QY
+vQhXXJoijByFjeIEQzKbHW75PCcwSzjFTtaiyG/K8GKifJajCVImlV/Pi/8u
+vcStdsL+bGY2OANSjQWTPjMrVxSHh6bYs9fDIxjJehkEE3/OO1lvLOSJct1M
+zyadFK+Zj+PivTjYzk/EYoiXFmVpFK1nDUbDYi1Vi8X6nRGw1iyv170Kiqw6
+VxL6jMVSB0cF7K+A3ZY19ZWE3e5dh6yUIiNH6AG7yUy9EecIgaqhDThRRY8M
+khqhlYD0R75o8l3kq1+s5g9MKCXCAIjSnuTq1LxCxtzYaZiEG3bhuICEgJHs
+AVZY4TtJF2DRnWQcO+cNilcN7qEAtUbU04pjVKA4wqVmqCJ8HJDdtnDv3oSD
+VIMEoebo/Hf1emrEqFeO1E025WcQua/iHQU5iE0PEOdk0OJBCAQUtsVivYcC
+Sz7VGQTx0MGj+awxoQ7c51aTuX2I0zv8jBlDlDFNc0HMEbVZDciHIQs5wF1B
+njYTJfIE3h7itkHH+x6MgTR4bs6pVGBdlOkcyrLolvJ2WC+xxFPzxMjb78+/
+boKS34kq/G2ik4UImnl/7agnm7hDNk33uQoE0fMXSpRhp8WhwmeAGLJzLyEf
+kSVacj3qpNxrutkam9Ru1wOJb151YDtLSZPUyXBoISN0t88pUFcuB+ZyAYyB
+ITF+Uu1FSUPxRXP7su+lEUEAyjxitxy6yU35vYfB+h1DLzXeFOCOEZTQPd5N
+Lu1fgqaHfs4O7VIRi4E5eCDwMIy+wnR4OPCnnaxzFMTgWGZ02L0VSMGIImtG
+HFkv5K/YOs5TMgitHYpeEt+KYttNRkikn2pWIAjZEk3QJ0zss8+GnkpRQRGy
+gbonJ8KN/WabDtAXFpdiMmqzj5CsjdiTsylxR7d2pmcXSlY87Hb7Gg/9s3pC
+PJRRgytCKrPMyobgBTXKwido5qclgCxS1buvfFwqsfHk/Hqiz3gYF3vLUhjB
+TMHyIxdQ0ri4UMja/6YTipGv5z0Up0/mKKf2V1htaaZaDQAQQoiPyxrXwDLG
+kQBMOQoT4BPPKmI5WghcCBv/FkWZE1mX5J8g9iC3Ki73s49nZRE5wd/ILav/
+ZCBZyO43uVNpLoTdDnSkCn38cqQM3uUa9j20RB/dY0EE4DBOpkEXS3+zKJWw
+s23mlZbhwzgxJ70EseUx8wqDzCq1bEGiGMcXxm3lY45kvRMIJXDB8Ne7xiRS
+dgRmnFhFmCiuVD4fC2fkSyib+enpEUYovPSWqxCgfsi6nf3TXElpmXEzcuG5
+fwFDKVjObsV9ORiDLcg73BSuePWIfl/4b4pE4ACinRJSIs/7DBwxEL3IX29E
+CrPXxWmqqnvObYd6oLB3qOVjCTKCT5wDk63HSsHpCd8EOC7ry+vZFomB5Wnz
+MTHRMmpVol1zfpKyHTaKynNku3t+R6J9i14mCcJkKSNF9UgiTAiV4qxMlkqZ
+2SmaVrVR0YFsYTfX0fv+hxe19n+ugt+GgNU9cbtin5E50/zO/in0ohN4+Md/
+/MerBpFEnxafFgQksrPyA5O1vLIW1msIeWQx5Yte9KJjeTwcsgohn1EbTDTL
+EjdqPNwxHyYWzwm9ohDk+BfTgRTHYn5if5pMeE0RU0v1UOjKSbOTg70e39N5
+NCrS8gihpvQDD4SeQpNAtUiq7/Ibj/8uoEmzkE8GuV8yvc0YQy6aStlNAfa1
+QnOSRHe6X69hpQ59tSvZ52Nok/WkC+LpWfy2Vk60wN3uL9u4eSiXBJQ0suyU
+q2bZQCeXoEiamFvfKTXKISotuJ/dNTCcSyd97y1GpEkDkiiU5dxwXDgiIP4Q
+GlqXaw66CMjWZmBneLS+2s96aAUiEbTuCN78xSt0i0JPM5qwk/Pz3/OYpW32
+sq/6OUhzolDN6Yk+2buYjQC4YtTCQ7cZirsWINW7iHD7a/v/BCH7O71uHqNH
+iZBM0ALHqEOuWs1IMBHljBD1uSIPOlH59QRO2Oj3MxneYt0cXLEFLn2/3JnR
+Uu7RIPYS8dxXZb4SJjqLOE1l07pFNfGY7ETF0rSBLEMAOScBzw2olVD0LZqD
+0Bx9WlqUAwVpA7qxVaxBsYr925rDW8d9i4apBYYnL6CPWSyYArxoBtE5Qggb
+6akUiys3YL/zWS7KhXtEoZ11IzQqc9X3the8L+rZjK/3PvhJlo/mZN79XXRH
+8xAxFTeDSykHbLxKN5d9wCeaAwVMfF8dOppwz1kIhGg9XnHamz+5Zc5oeOiT
+UMeADV4qnkt8iMVsBWNlZzYi5EopLgS09PHGoy0MIyPtlHmEJF0xMFGuEcBW
+s2RWVG0zqAeP64FqTTAiEZnodGZgeK80GsmvAeeVnDzTFzrnFSzjb7Mk3LT8
+VW1Xxk/hc0tTrh4zHogtExPs+I2wRZq0rodEIZExHLV3feAPPhepOUknG3jk
+p9XssaGemxpJz1NozpkGxfw37J/BOrT1AsjxMwz1WqnK1S1SfeVgRDCAFHUN
+OK1VHIRCMrfEzbgmjjB8j2GREbELjGkie2FDkK6+i+1Dql4v22HunIDnoyiA
+Ke1H9mcYyeJsTM+2QFYo6cN0DMT48n1Zsoff8B0ephlOCrqY9EszTEZx3MCl
+tcKuijy2Zm4dRoj+5IH8kopjiq25NxrvABVr5Pdpm9RTl+pCeMNtRkFz+LXM
+mmjUNMIBqpf1c8eYc3qWnMRp9bNH9McIz3XAS2JEN0EBTtNHEADcVA2u7ldz
+O7PwYAbU2ylOciABR6l+uKVf7llGqTXWP88luvVYJuZRn2TcZMSCORAawT3n
+llmxIwelIMVQcMbnusEZQSSiobFu2av5pe0SkrkZCm70BHkvAbhuBBgrSSiG
+T3Qgl/WxYWwTmHgIjLfJog18sQ4ghR1CzrRX+lmyrfHoF5zA1kxE+A2jShkb
+zupDSUNlR3FKPW6LoS8NP2shnL7YcM58VIjABkZJrpSNVIQK89brbcYMh82z
+i/40o4si5yTnCKWvOZ/XKDNCXOFsJo5uWwN1iClabJvM19lKF1ETafmCsE6U
+mepOOmKmTM5rM6/e1gGoavpfDhEtpcjXuUiMHmUBagk1vPM13AVW657j4F94
+L4bSjG0oFT/lYAGm4nX0wjM7VGgfKHnd1R63mJCU9YRWcUv4yuWriDLtHBPh
+bxDACObZNNsRN5SSOSES9uXkEE5YPU7oY77YBVOX+jtKnEMG2I7MKt1zKJzw
+ekqF4A4K9RFCKeXo2k97j2pm3KmZeTqlMjOkMqXyE1nmg8u+7kNxhnaXxYSL
+jJH69PaLgQVAlgbGDfTRgeOvnK7BSKHs/qrMeTMb2yFutpVp2SIywpC1WWJr
+AotoxVqD2FP7q+zPzaXVZuR6mdzgC79ZKJ6akwYEgRyAholgnuFwNEKnzooH
+uvXe27G1KPTQacUMcWGXx7vuceV6XPt4sikAh3KLiN/gXHnDUKVuLLFFlVzR
+rFbJITfNAXNgkqVABIrwfX57bp6KQAfEQsol1tFIJctYzo/k8czwHWJmKICh
+LuE4199RU3nF+fPnRxxHVOslWWxu3bWrywS6d6wiPRqwy/77ouApCcsxcseb
+70U7+AX+nvjEJ877QALfzHie8bCVzKAisMqZAWWr5xY29tGJA/AFqfMcinPz
+1JacXulBf98FkVUatIhKootKQqGCmdxi5w0ASQ2KY8n78N3yJgEzDRKMhC5I
+Y4QeApA2lSdODgNyGSJ/IAowt1LwkHNCpHA5q8m9coZQOnU0FpaeGx0agepv
+bqWzvqqPIxwTttWKrEZUst6jXv428uXb+MV1Dx0/lNnfE/LluXP9sAf04psM
+JnwEJEIwcziaVpcqPQgfiRgfRXNlsEnxk+PByzLMbMkGOX1D1+gQQpVfDD1S
+jExue3K4h5Ao9LA9sa7aBbrsOSr1X+XKLIW3RUCyOeztFQ9zf7i4jP0leoQC
+5QGzBhFiymoNGsgqYeUmGgG00MidYGoVNi9dMTi8LbA0CLrJNn0/zg709eaU
+zBCSHmHvb2I7GuFG3/01EcKcpZPOWnS5gQJjs4laoG2bRliEZWZbGI9g3RKv
+amK9Oi57kxKRCIQsB+AqvWYALJ0ipVlBjaiZLzO3D2DKHrKKnyYAW6xm2f6d
+59pux+6AJS6CcEz/V/AQokCLj9fiGEvKdGFvZR6yrZD+2GIs+QoeqD24PeMZ
+z3hG7gimvQk05yHS22F/fBTuFXhdXIjIKWQ5LtCwRFRC2Hoty70VWLvWNy2N
+iTQi5XyRS92WVuBJNhFgjiJ8iXDeEsDfCW7zqBkUcqVuG9dI6iW+IJYwVDUU
+Y0Ci9UCJQKAUgjr7GpMG2TGa6WLeXJ7IiKUavRMtRkIxWEEsluCf+cxnRmx6
+pbGy/VAk7sEa0SSCnaYWilg0jFWwF4OIN3K8IDvMUc439md+y9HtZgxyNPyj
+eUaZntl+M3uM0Wb9O1a2nxtaA0HBpmQpJSg8LEZlkBSLmfJjnl5vsl5Oh1VY
+XQNay2G9qrjXh5ybR7QAuj4xbrQo2q/WcxAEdWAMvdF+0KMCR/tz2yuahQCa
+CvdzXGeFkq/aVMhtey3TvAdvveY51AoL+o7bgxz9wwzskmH5OM9PCpQJvEhp
+Hb6qiZZ2AL5MECKKDPnI6DDtMXvP45vyEb8Un2JgRNkn2UwrBzdkI1ahOgCS
+Vzbheu/+DTPmHNI1NdKWkm26lokIwRWgOAcqUe+la4jG3G0nSNcQLQeTyKm5
+Sn8rp71av5eTjFWlrls+y6xLPIx8xLvaX8+gFxKsm5TlL07WsQuwGZwNTNkn
+QsJKFOYaSoGy3xSvDQ6kd+VnViVydLkTPGKHkBYy0D3u2Qju19/5WzeKYUJW
+M97phwD0I2rue4JniQN5uGik8/zo7QBFXQlyAKV49DWaNJCXW7OyPRbS9/rl
+ySyMyRGeuXROnTPrYzx0xewh3TjGvKN5bgUvL5AiS8hERre1vsvWMoKsTsql
+04UBOWEVQNMm7tfUh4ktGmnHYJqifb4DuVlMQX6ynhrFY3pQjLcL9LNIkTMs
+bc7KDkxdnDxGlIz6nsds0clg2RAFVDzIEad450SCHJMjxcSI/TTbuSEbOCNW
+Ff7kJFZUl1rdv39G6pBNeaqvkRkY2SfDB5yNG9hZjrn1cMX4OalxO8Qhtvev
+eVe9qNa8Vr8vmcyBiWGO33W1Z26tWg7N7kMQJiNgEMvu/WLjZ8iyMjMhoSZT
+LZtzttvxm9JMTi+XVANIAWW9kvOu5ZC+lvUnzNYLyewr/dvu1b4n5iA3GxlI
+8sYSR6SAD+CGxKI7ImErYgpaXrvf5uckElC6eo+pi/xy8ELScj/rFY3h0PVt
+mvHpVIFgxJI3NiGaEhuQdTYdYANlX1aEkJNUWf0kFVwW37NPE06FEcAm1TYO
+gxsSvidyxnWxWhYnOZU0R9qyKawSikiUHRUTUsGrMExAofjoAa84UYYSEFGr
+7HWMU6VyXP9+BfPRPOQgBSij1rQj/O/b/OdFs/GuQCz8R2Eza/I/8zL2pTX/
+r+uewJ8oiaD9hOD7MOAe3HZgIR+kjpVadHnVqJtKXdByG9TF8Tcz7ftThyjZ
+mtdzWRnUpUR99vTcrCFwoXvsCmnSjuJlDuAjNraiSXZDsXRV/JoUG42wm58A
+ILqorkIxpZLGrxTnYHcuh0blND4a0hXOOd/Z0z0dGm7XziTlLVKCmvC9F9Vt
+Wd0pvDgmgO0EkFxKmoXhxK7gCjrEEsWRKHv/Of469b9+dmF+lqOZcjkiVchJ
+e6kWZrGWuEHUylXW59swrhnUaCKH6PRdr4Mb/uUZcc9IsksVvrJB3NsXJLcY
+AucFXtJju0TLb+WUOpqGa8SeIy+oT5jRG2nWrT4nF8np4fhnW4kUM3I82B4Y
+T4+uGAF/NC8a2rwb0LPgKYyAoV5PRo4BopjMSnDIvSV0LhsEFkYAe3UblUES
+LbaHrZK18/1xlgTSpOLztoZ6hlHrgXcbR68cVhLJ4AeUNiENFui5YAJRxlem
+sp2idvX4KLNlhAVdcg8iYeYzpW4FH9EyVIK9lWjkmFTVBHmlhQY1xAvNqazv
+Rgho1qpMQF6JIKMHmXrBqcx2M8A+h2QGBQmqxSXyTzoCHkwIj9LTxodl8dv4
+KcJ1rzxHCNQJpHp9HGm/8YFpk53oNWNGkXjCZ/6Gi2rDmrMUXP0WBJSp5xhu
+hTdf986aLCZHlIKSr7gMhAXbc9oIXuGJcWcfkZAEhDK1eYDn8UMd7tWfIVpp
+aO9vN32PFunaobvrObmEvl70nhMetdGL69ajfTvv7OZvHHq+nu0uPpVZ8uUK
+O3RLCukzYO8z7M9nHCnbwlufMb9SoJx9pbCQAlAo1IzsSVl+U7LbBiOZz3LE
+/LxM3n9rmsWbPhZV0lWmqy37+iUpuRoEqmeDGCERVsxcsviUpzxlI+WGUZE4
+derU7NZoWbjk0KhYum7JFiTy0axG8z7jtzUvPPeZkzZynlYfD7UMfVvOoRJH
+F0oa51sUKF5v5GJe9L/XJp8aR1lfGEkaq6HjBgastZbjyWCaNF6JMJUOKiVY
+2sv89JCtzNmWgHlqxXaSAxOiOSlJURn1J0pduUrAGnG5O/e6l1SyXlw4r/dj
+AoyOhC3byxGPCIFr6p2xi+TkKm/Z1USDFEqyrwF2Kvtoj034bQ5+8p10cm8T
+lwaWSnlEw0yYyC1SUzYxMrE4m8k5jsBizMo55ukwVyRy6UVS/aC8GzLXi5Xk
+3tkmy4eQU30eDshCrXZBsawyM5DAEgcEPOGAiA8HrBsNByiaFCmuSHaqdGIk
+DiO0iC8SIMcG4ebAjYNco1V68g77ExExW8pOQn1s7uAEewRqKfUp6QC1/EaJ
+r4Z3sp6mThAt62s3Rvay3GKBt5kDStbF7Pp06cmF3LYmE+41lVFUsyO9pafr
+2VtZALazQsSthwr0SoGXOPwNZftzgg9zbM3y2bYXXHu8lMGbj7qhlZtOUHWJ
+COTHdFOF7PPEpt9+ZrMnN/ZqNtM34i7yUY+2XLSP10jqAvSJBfXKB/v7z64f
+lEBgIkvVwWco7ePnxmdibGL3WRYkCf/AaOrx9X4GmlslMFKzBoo6LvH/GOjJ
+Q+mBSxanr/XExGprPfH61iTt6prrL9VJYpWrp2yZpFVQlC1ZHHTDcY1RKshh
+LOmJlNRMnGKRnA7AMIlVK/APAqifJ9Ck295FaVGX17EzB7Okoitc6teJal2e
+3eulZv7Ml4I5CuB/ICwmkhMBeYKtu0tD+rCGtBJOJqVhpClBM27mxT6Kf6HW
+ILJCPNQyH9bop3Nj2bYz5fhily1gxyt4eHb5jEXQybWCkQpmuqY4Umz+Mlck
+GmEOxzUaPrUXAc46IzwxkpwrikN9fleOGKfGeP24xz3uYLtw4uxs1oMpdHnZ
+Rk8zxDT782s3fnMN+8+2MyP4UlYiJLNKOneGa1Yohvfl3jJQRhrG3dHqJ8Cg
+KdbDUmkDKrhaM0C58L7csfGVTa+fwYFeYDkp1DTeMAcU2qeZSbN1AYzpBdr0
+Ez/xE6GUS+9T56aIaYPtOxUBTEVca6x5d1n8Nz8TmVlO4ITMxDk5OruXyg9y
+KLoIY573uB3ZKts3i9kh7PXdggCKYogcUCHcEcKr3JY4Mn+QuxMUq0wj5doA
+5b/MDyUaziIS1bTo7Cq227trfNN1Fj6TtkEo7BWl6dr4+ma1gU72mvahhXP9
+CquziCaL1oHgrIpcXhSsqDf+zVJQrxYff616q3vdpT1YI94zD5DTR1mYMgXq
+hUb7I3O382w5Hv/qg5KW9d5yXBTCjN4gM3SrsSD1+vBD5INtgiPI4iEKHWaO
+iiqzW3pEN0wMseH9xq3Li4Qupp4TJ4HXIp0CypAgeKEFvB6++imW26OQtSUw
+QGIh/OZ8FRLT9SqPh/RnlgIpL+2WMEbyQeT7/WLbqY+ptkceeM/4IVvkkROu
+YLrwdX+Q07aqs2dV9HHbKofNZ/Fv62lM9DJBVtaB0SAMW6/TgSukq7dQglqr
+BiwJOX369AjKkrq9pBC2i6HYz3omJk50rDFro+bz9L8uCCLkRHJXtPYxICul
+hMqCdAsbyoleThgv3wwiUGhg/UQJMqto8A11npSya8SZmTd4HfWBAwEuziJz
+ISngwwnTZDCFpIxN9NKbX3p+6LruN1cMmzGWf4HGknlOk6elGXSCuizGynW8
+zgPI3UUr03PUFEbKhdXfjBxHauTpgv+Ia1/vZQabKr9SCUmV2G8t7l+OuSlE
+WUlUXaYuQYk1gw1szmKA9W55CZHDLcrWs7yQRkpsxMjLWmJIKZvjExEnzS1i
+79iYem33J0fzMm5wDtvRMmXSN/QPsCQ3oQAQ9hD2JlKH2ayrCJ8J48reHAIK
+MfnP3NgrKgVODnBMf74DaOJAOzFNRIYBa8BcupLM7HJAwlTkxmVCs+aje5UP
+5petamtGDnplcsXQ8BaEGjnPX5gT3soXDZ7SYr9YowZ8jLdH49PMDsk+QQIY
+F55d37+R7queYBfWwHTmINTL2UNrrFvql5RPIaehf3IYYW1lQ1NFiDhtPjxd
+UiNVFD4OOWBdgG8GOV3SYO6kA9Z0uXL6of0Z1vQStKkY64Xi1i45MCMJrFiD
+wnAVy9WGGJTz7w2YrA3a+qW1PtLn6GfyOOeeGgB4zjZ4YcWy1yPXXMGQeffd
+NrWDBbnA0dMbP6abIGNuQkBTr1/VH4sJ41jn8tfDYXWQb3/K8dFonaonTcwU
+53rzvCGbFdvfkXRx6LDEhdxz2E028yUBBCOwosPO6RZy3PVuCWKEbaqwruxI
+AIQO/dpcliXRXIrSMVdhk8rejZ2eCy70N+9ePTNMh06JVsQ2ZuG28us8oTc7
+eYQDVA7jqufEjVCdwXIdgjhAtDHiwjwULA+QtFSMzpAo0QhZ9xsJTg/Z2Nkj
+WC69Cg8gYl/lMG+4wUNBjJgSUgq3ShtCGX9nDZ+vwYYQK5Qx/vWYXpQSv9iI
+vuWuZCzMxCv7w4BVNJbbqW0R/4O7X9GHNEG/4sb9DZxncnD+iK+I0HBiYLkO
+rG9OWoMXyGJ5SwIPDEwC3/HPpt/n5nHrFJpPa8wdTZQyZxG2ASriABv+oyB7
+LrclJtO58NYeAHpTsWeSYqqUo/HncTCHw0/xwf66oS1IlMuPwVwAAZ4Q4lC3
+RP+0m8bn9gPhZgUdWdot6cJhxFgB2yuCsiDIG9RvPemTneX22wd3M7l+PfbK
+HxeGxzGQCXAD/f5HM5cN/TlSt8PllFzk7Zhn3bJcHBRxCkouCVfkn/DwMqLK
+9uk8mTHuxUxhUE4vMj+DE70OeL2OVmQR3LZcOcGwbS6We67BKJmY1xboJHnB
+ZF4uTwASJ4vKWBQLUSW3oltopiQbMiQ2a9HePsuQ4SASZdbi0bEz4WVhsoOX
+7zYMXDk4p42pO0VCHK4Jr5w2Ym3PvL/99MBcDrOvcQ2+US4DgzIoBO+Bbj44
+xx8eu2PraASGyp+0ZT0OQ0F3XXZGqxRyYjkglDaCE8pgkXhpW2JOUGq1AV0W
+0AAt+rFffLjlL6aJ9ihzehgqvjP7+m0WONAf5rAsns0ld5NKKGE0VpCESsCT
+eQeJgDmApz/96aFSMO4jVOI4F43rirKp7xggPSTpsoB1f7ktqAgu/XpQd6hF
+c6UwiTbL3As5I1reRTSSa3PE0cumdYhGGGxybuXajkZCGpkkqVtv62yRXupO
+OEcQhf8qWZxFwUyAOWfBmNo1ieTKpKOFvnV5sCyjiMmqWIoBhmRKkBaYdUV6
++g4AmD1eGRcDs5LbLFpleYmINGOoPDh3QH1L8FlmkKufOEQJHvyZWdxWNuR8
+cpIdYMNuwlsFjN9EQW+oHD2yTWpzw+dHFclqIcv0sS2TOxDQSm/4WQ7xQUu3
+ln5mWx/rthBif9zodr0kXuGRPFTYjE976N6K2MRPDHEe+Cb0iYWsSwW6HpZN
+73yIZpk1bRLeiOAwaVbmt1tBcZ/h+G84VBSf7a+9DYaymkdp9i3f8i2zEhPg
+Egr8KBCI7slS+iDNY+fDCAP4vtLNa5pMblClKdNI0Emn4HYmMWfnzRts1E/p
+ZckqoqbsKnnQ1ZPz4YF94mfuPY6rRntpMankBNOfnZ5L+pUPi13xnZapSnk9
+yGThyz50svSG2CZH91prI6xNPkbFqBy1qo7X5bxosED22JVn58Y8QyZGRRxB
+AFox5xjODOUgKy7JeRUlq2m3OUoWMWgGasXeMEHCwGV0tTOTI2sCHBSVb2QJ
+d4Ro2H0lwxiH0hYrYv7VXAg0DitMECgaffKTnzwJ1BWiAIqFDtx4KV0gKxeg
+azlKXzabTJ32JlUIoZQ9l2aFyanQ+CtbpugF3LGfR0VJNaPi5Syx4jGAC8Dm
+5zCeX+v58GHuiiomgbLqlXPifZn8MbM8HOyMp10rs7Hi8IqPYw+o7aPgZhGA
+nzSzw4szTKiRLTlrqicO408vV88IqXQoCwlXek6erSzlEZNwoqqb1kCUIBLy
+sCDBIvkgT0E50wuZVgAzckErier36+3kSchv6ub0bhQ5t2WbdbM78tysJvc1
+0PPCP+lPKWYGgclUYC1+9lmKbaxbVwar+87ll2mdC0PGIgsunwUJi8G0IDeH
+/SBT0pYCG3RKgfXm47I30ty6m5qmSDbHhEItNlAB3F2bRhmP2haTEHL6KYr2
+PuzyYvVeRpquoG8OwRUjCmhKTrmnALO4M3EMaa9Lh15SRvcYSCS4IQNGr0nV
+LviHRH/DFZCJdEyU6VIR2ilgweBs3hbyQ4gsLMh13fpgTNQn8+kqwWTOW+xP
+kj4z+hUVmL/oM3KnA9KGigx9qUj74ZtsslWZW8oJyMwcPpX93NEN8/sYY68d
+EYm0Lsf/e3RzlJRos2dGyFeakiItOlItEPdYiFyh6OWKrVvsdm7EQpxi39k+
+WmWMvFG54LVur+XyQD3yW4YBOqlQNJGDCHQh/lO7ls2TFsOl2mJx4QJpUXMK
+mEX6OGsZYAor3IF2K8RP2R/7+nbw3JIVLgu3oL8KiTEbew30jv6aL7YsFafB
+sey0Pssc8uUYTQtpnQBNBUKLJcu0SFlwjnMwjF6dkhZfktE3DT3kbtYrwL1G
+l7OWzZP5XkX2zKByjFn9mGSJrNVKrESMlISboov1dmzIoKyTy+K2iwa3FWO4
+zWbUpDIbw7eRtFFnP3Ri7NyxCjFbBLf0a3QGN5ieoohJn9xZjwThXM4gJvSC
+hcvNfeaMegrOgukJDplzvntbHOZn1cG8SfxyTL99BMuYBp/CTMaN8X3j2vhM
+DN+37E23CVBywXV+x/jjhVN2UwSzkIJgu49T4waHo9E1y9GMXE4MIHbb3+R8
+Zszb2OVHKWWlzqFdb5jnHPy+Vx28ZjNBmJfLW+fZmMd5+fj+KbZDPlpWLa4l
+4+P82gKZ41P82+YPQGtf0vbZbQPUxXwknkU4zFwNlaSz2ojSU1x8jeLiq8yd
+FiTmEulos5OV8RmyhSFlitkGRzQUSDyuygn+CmXCrnWFa6/H2fabHJ2MRMdv
+ekXMwRv1bxIM9uT4+E2vQ5l3wb7kiqNtAv7kpQ6sSMVy3U9JG1hOPpN0SJvs
+E81nxMqDWWCY8jD/regs+jerTIuKgQk+10N7et3aY5qydY2I0cmR8c1cc0a9
+rs5guH5jvsxU+Ct1F8uNNjP8EiXifx4VpaI8VMmOu/IWqrY7obZT7emjBFfN
+SkaVHTqo4W2h28o/vqR3HUzPq8jisw5cXr2bRyzLwDLNS5p7anKIhiP32v56
+7iuGLfhMdBcRE6vPiMR82KN64NlQG5JZYDmdVOIA4PH8YLIRPKsX7tdOnh98
+sqI0Rb2c+kDVKaLmKlQJocDLR6puIVQk4zM/t+M+Z6czJpJU/7vQ3QG+tYaY
+o+KzsFs7hUTpjpB9BONiXdRRqsgQLffJaXlcPteNZ7DBHtUiZ1XTHHl6gi8S
+Clt1bbTO8gg/584pu6RFDTDYRxWVPvCy/jt7O+mDj72imqtIl+t9sJPtCLIE
+rMKbcuD3PU5Iqmgm5RJdiwSEHdTltfszOJ2bOa5c3oXh1stlnwauGpz3yxbv
+0R9nQ5+nhNhEPKobUksKhD+hP5MipWSZo1CZimhGzcJ3YvmC/zdch7TVR0jD
+gMuLPaE/JusuMCHh4d0mgvWtZMMWqE+l0yfaFNTJXZ0CUkqWNtXll20MoVOc
+RCySYZM19KKY9AbHR81kECTDyyyxTOMEr4aQhSR5D7AKQssTzfeEUkvyO4+Z
+3h9ItN3XiWMgkjdSrS0xnaAKP/pwtdm6hTgcdh6/cQaWTW+P7veEuH224NzO
+qca1npJOi+1OcwNwqIIlqMojWKj4o6l6o26dYct215uG2EpfNzIvthOtUOf9
+4aqHYyc6ffBX0obUlHvfxPi+wpITvVJidU/zoWlNACpEXnuFj5bRrAui4bEJ
+wv2JVFsuQ+ICVr3La0pSj197PTdkaR07ThmjsiVuQ+DS53RKjLKeUrDqtOC4
+PtOgperOILpj/O7MiAOwD2YKLhDUPb5xy0lPUhjFxz5Ke8zwWBcep0kukllx
+S86g5MYcF/Bea3OHo6qRqynDDgNI6JURyHaO375xOFCsrzA4eM/jzaKOVQH8
+/FyS1Zo5m+XaSW1/Ouvhet3ayWaz4nRdUSam7I3Ys1nwLPNeJwWpUY5W7GaH
+Ov3/uL3s/+W/X3/8s3kBQY2QrhBpO0ejE4gLg+gcRuWRMCgZ8FJdKEttpkt7
+1w+emqrHH//2hpMR5cbbGyRLTgon6s02DP5dmUJIXxlBtgWTLHW1i4DZWnhz
+/yYziwaSTIgJrfVgptkKTB77mfWLWas7h9bnVIz/1g7yVDg8HHg572NreCU+
+HPfDmwYmJtMLDf4VlwIrwbqHrbjccmPVDWMGvq+OGP9miYiAf6VFzp/9edge
+kfjN+r47oo9dR3NhHtjs4aYk9ro1vN5/O6Rp5dpG1tUD1WGKqqpQKWt++cm+
+oHbMW3NTuTxKWE40O3mb7OtwZJ6AZt18aoS6Fw4KiaBLGdX9mlqGYyYnegFD
+ZU0wmIfmp6TOT3va06Yg6Ul2GHkE/h1WDKXJziwPoT3rWc86VnPUrj1tEaTw
+SoCTlVXa0Iegz29z6m4xfAqS8vDIojkcyxFVaM9VE7iKltwSxk9EMjgNn9lS
+ymbHBHntem3UCEdy6K4YVhjhMaUk2NB0dJdeEjA9nIvnr5q3RolJFX2AZBZ2
+8Z+5VkjTuSIInqvARpi4J2EhRP5L6amgaxPmpXmpFKGyGFVpYQAh5lQtGYxI
+J0eczhNDLg4MVlHIk3VUYn1UoTpXajKIMrZjchUBincDICJv7/M6cFukcf9m
+7snrpJR6lDQ9Rob5onUuiPNDKiFAT3U/k5wz4L809k9TU2qADE3kIB8+c5Uj
+9cLYajaUZk20EFtManHd3VdtuMcxbUCEaV9LYfyb5MdWH4MifXLIcZp+D/2k
+dFFUTs9n1ECIsl4iJpSNOhhJNMviDDWvqAO7FigxHADv+KLnP//592ser+qA
+BLakOfFIDs0TAVANOYkIQlSTogAS5jKeK4aJw1tMYnagIqZFq1Z1wFAB4V4d
+tmonjSQXNoQbZeL3awaf1AhY6ecwEPZxOTwanOTliNnn4BrFoJ6bCknEjFzy
+RK4VSNmpT5siTCGY9+E2kkB6GIyD+hH0UAC5QOnG3VbVOBoKtt4xwNJB8X4B
++S3Dv3boNMRG7GwjuKmX+GP+3kR+7h/CSBhoFDKRTOvqB35FzuWEQ7hEiFgD
+qQqJT3ziE6MZwMFYUy7SI2tTS8zBkuqHvXB/9KAQyJ+ZsxKZlRhjfapP9JDy
+kDyx9PraQVjuEwT0tMY2/T/90z+NYmTOGXbrEcJVE1EMqCVVSiEUASyLf6YQ
+UiZV56i0MVOc1YrEJrkjjXswr2+G3INaTjZW2InBCEEpWhj0nOc8ZyoGkjGF
+69MHrC+RtmJs0HHPQQlqqTCWMTLsNbtikCjIVg/YQQl4EzMvRsM9+Cxpck4u
+A6amtlN7t+2fd5KyUjTTMx4j8p5R1aizRpa206NcbYKkrJTbDuq4fvwG/mOc
+BV18AyViZUgXZkQPYYj3iRlewxeaJTcGtBVcRVNU9OyiD9LhPTdPsfAxF6Hx
+WD6HrqXWWX+BKfSWJfHkmFo9bUTfa7zF5IVFggNEkzZsRDA+Qq8sLpCIhGhO
+ihIK18gFgzorGIxAdYJpVJvozOI48vWALkDgfWmjg3Si5LwTfNavviTuJc87
+V425fug6F8zU/Us7xNN0n4TxLaEat+x3WSSVyTVUYX3ZRaBbnT/Ee4QrCZu9
+tj+A7XCWJzeyt//ngSV/BsqgaUSJbOP71cPRsyCUSFj8m8hac7oPdTIF07bA
+DhzP05+20yozY+HpKyAyIyR3CJ71YvC5ukHA3D1MjnMgObmTflGWwoxoOCWg
+YivR2aYFUrAwPFKHhbR+g+hsBablUsziXwaB6BQkPKgu6vJ1TNhDqF1wD6Ml
+Cb1UdsgRhhcOtZbkTm4ZiSI1+yYaFcPc+E0fg2Aetl8Gnq+xHvilKkpVy667
+gzdvdmJlnwwxWYza5kefFratF6QXjMxI1BsqJM5aBvaY9SV5JWgucuZu+I2K
+R/MKweaVLre+2fhnf36tZcLzsM3t/qmswHlI/xQ8cw9kVcaf1SBmZ8W+3Dgu
+W8qXaThBUoYcU2AGOeQpmyPIl7qotaZd+MIZs3ntFkzNdqlSa+2xWYF2s8cH
+ecU82Bw3xQapBwoBRTRm2h/a3fLQKlC6FPmoJV7uOsVsAUEGHyt+rvws1CzL
+lZqB2zU0vDQEzaLHl9Y0qWqWX55wv1XIOxXPQHPDCqwUCdLhajFbWUCw8Zv3
+puJ+YtzyxYe1ComfAB6eiPas5CpYybFkhpm7m6ylIzHK0IdRP7RbAUpa97XY
+TlxZn6WV3F/H1kQZVEzqbZT726tu6YGuU3iZPgYaFpXwLrwCrz03W26bd49f
+PbXVhjgwc/OFfI9saUAyZsbP80MqGjd1L/gn0UUr/9ZXEj28XxUOmIcAAw5o
+tQk9r1JvcJGESDxQn/UU5M3dglyUcjMcQYpFhBmiijoXRBLmQUUGhSZZR5fr
+NJQaK2HMkj/pkV9qtWKHnAkIdKAZz1oNZ0EaY4ErBJEFyOW0ozDZL5EH5rBz
+a6Ry5jm2Ejc4KEVJy5wG3nCwxN1CytL3XPCaRys0gI7PExe7j7NDZOICfWOT
+3LBGdGdzkTNnq3LoXvTXC5CvHGjFSvyPkvIRWZcgzMO+1C5e8IIX3NhNmhei
++jF/87E51z5rdhJnyTSpgLpxDrMF6PwjPEVe5uX6IqLI309QAQp04+DUdINK
+p6uk2oOT5KPCn25yzo1QWTgT+JDRfMmXfMlNx9noW/AqPRbGqk6Xh43CieJE
+1H4mHFWfLOTevMfVo69lEfD4G1IQDEuALNQrByoaE7OUjZWwsn0IqCiQUmu5
+vSi0tOHmHjVjF8IRgAceqSVZW7cyVw+pXZGf/+b2Su8yXACgKKQnMhJGz+sJ
+zk76PMI9kFwizTJ/HYBYQ+qdxQPx+Kbma6YDWaqfCZqy2p9FUZJcB2+RadEa
+XtMr2UisCgKVFWXfWI6ewNMa2Wbc5+fp0In3VAakjrIxWRL8KmTMkqMsV1TY
+XY+3VwnAdukPuip6DVMANkWkC/61B7vcZTYVc8ZQjfcMIBZ9CTBYtQ4tLE6H
+PlMOkFro0C6zUul0iHdsz0/8a/9jsTsdwnlmm9qIfwsFjq123LCQeUCP0q0s
+9FWJIPRcSEU/ik2RAT8sQkpBmAwqBtpkcMXQst4TMf6NbeGByut+OuTskFUS
+FcSoMFSQvm7yRp+RFIezdIXO5EpojBdEF2Zn+RQvDp4UTzg0ax+uXkxgxU9m
+A8z7IMkL3TEbVUGhheVk0zF/aykEiMFhuVO9mY7FRUIzovRTp3wmQBFD6mi3
+hFx0CgfYaK9BjiM2Bhke08gKeu4AtqaYBOBEdxh6R1NoPCAgumhDXGX4OauB
+EdBBJqQIqynQZaY46/jlG+KO1GGkwB/xER+RhY8MFGyaCM256Py9V5KasPen
+PvWpD2yNyBVoBpRrUTzSLnm6aOPiMnBhw3oBgySTjONSWXch0INapqxb01Ax
+oal/+zjT5ux69VPPBs1UkmlyGQoJojTGXeZ5t9YGjJZlCdjKiLJGArJxB3RH
+7dC0YGoxmCcyEjIyBIpd4UUW6+bQx40/m2yophJR3wU7bIV4+a0H9FCJFyrS
+Lh6pg4fB8MLiaA8L7S01s3nYByjIzkNR6a/mH9i/EbxD/uwCBADwvD7Lhoc1
+vfCVegtL2R/AcnbmC7BSPGW9RMH/A/pr0GWqJpt+eqdN0IdhKW0J8fka017z
+SoZtGbuhazgnQEVRWDxggHhQSXBTY3hgf01gWcGoti+KKFeV/YLUi/JzzL5i
+e2k5JyUKOP3bTi8tk53ICAOZHQ0uRTu2qWvbeuIXLA77DYPqUZz4njVoD8P4
+I5pg3siukT7c/fxlXglWiLFyIZoCFUMnLhM3WS1JhIimn0So1JYt+OuupTWf
+OH62xuYqtctVZpgkBNaEILAIXHMEpbSzb7/ps5YHRlshl75pau6TurXbROt6
+8zcE7tXn2aearTiJoxR7lGDjf/rvhzSfRM0pmXjEyOfOnduW854ZMJCHha1O
+BOAwMfNNmVhW5uyjvHKYFbgnZmdLpDAgjmWs5q2zbBwf6JvXc/QlJAWZNebc
+UUFbmE2ufPJQWbo2j3s7HCAl/VE+S6+CPFrg4uqt19MjNiOVPvErAtVp9mrf
+ujJ2c4oQkr2W3NdbsVOD2SD5qsFMKkAFM/NPfMyHFnNPCR9873cIYXIBMcIB
+Qs5MXW81P34v9ubupbTaFTlakJnR9BVpY5fxukETfrYnyuZvf0p2pN1IgX2M
+076wkMTMlXYcixWSaPfx0zTPjLKm9BBJQHBdMCKihjI1tNkGmQEGhZTQo11g
+lat+WRoanVTRp/xf1yNiQKJKX89djlcMIQjzc2GmEIRf8pk5hP2xldvOCxjX
+axcykECiRew8tYFkhbC02MwIe9msZtsdnyduuahLL0SFEr3MM2S2/Wpdgzx2
+4JnhZ66Wlheg5LQ9dsIIBDJaZJ7Zkqo5sz5Zl8mbLwfG8eRiIKtVQph5PM1g
+TXmEEJazuVfCwEkO00SYvLpkdeKWiSQihsCZYYyhWJa5naB49bF1zrlnQ6iN
+iD5ZfygrRubCJDMBuFcWnYQLJAuQRSleVz8SljhoZcOOi6Mr8E2WCjOCOKm3
+Hd8UFXkkABRluU95ylMOUhnJDVJ9ZXHYqBgItdQ0cvrSgtBz+y7y1vQXVLAr
++43XAptQW+zR/BxDssJ7DOHUKBJcGBlr7/0dOT36RYahn5ugkzWGSb9wA8QS
+RVlHRI4uEqIKJdPDlzKEHNmbh24yYxp0xyr3cwMfyUf+kQIEjaFcNZq4UhGt
+GtY+8r1iuGAg3VtGx6vGpDqqOS42VHItyiPFrDlO3fAP/ETJO24jzgq+9FnC
+o3tBUMnlQisjkCBhao31VHudUcitzrhrVQKOEhf2zTswt/O3RNImrNc71bhJ
+5y/kM85YbGwNeg5H4pGERiibd9UfDnYer76fGxkWCfAHmR/J/UAlqW1Q27kp
+uXWA2lhMkOMkc1UQnljEc2rQd24MCgWkFzH4LcurLsNt4JNTAEo3Qyz5m70r
+65jjYilCNlpfipufMulsMz2GHlvdn5fdrxLb8i5D9tdaQ5SJK8fMPcHnBtAg
+xNCDyMyujxU92z/zZw6s9+T+YflMySXhmMH3yvlJDEKSzeaUZJbDSsTrkizM
+VwiCSX34/nSCfDi12O32Wz9AOmWV9yCNwsouHM2RfoWrXJf1ozFk0QrNpZFT
+E6+cx+2sq/sTEvKpFNerFL5GnvCJJxA+SXnSKw2Li19HC1Vpp++9lyvn+ar1
+yhduL1MrGW12B+GM/5FZn6Q5+xUcc2Q4n9FC8expnVugt3ItG+OZkg/k6iEg
+QqYMRMWrgLCn1lK1RTy3YVYADFkIm82y6k+9+3XeBwk7mVpOpBOAcDluTjlq
+NqXmrASfPLJvniKbnAwXR85J9oHGB0n1JBA0wSuSMnNJOdSP6RosM2WHObwJ
+qpb8cnISCRt3fG2uzWL1tMHqB8HNOuERU6EhRXl2GkuTck1vvAS2k6IaCcSk
+66DvloWxKORThf3ClIwOLFA+vpWUHWuX0QEpzCJSqGt0MFAgX5iX0aEUb+Nf
+xa+aZH66FVbL+SXnUSrkw8L9JurNF+YC5OJYqnPcRhbQsrreudLKk0A1Z4Wl
+rkQzO8aYe51BfZdt5xGuCOfrFDfZr1Qu+6ARBAu0q8LJiJfrF0BLL8maOsmn
+0TEZLyeFbciQfW3vXTswIUfwwXjopy2kc71ZH5BCOfeiPEkxickcdgHB+Wa/
+LrFaVELRdMk2SUnTdNHo9ofLnR8jYU4yG79bD/Vm/xSyAr9B8SmCu7HHJ0bi
+WRgFWPQCmsr2DvrXYqSrh54aeF8qM0wf77OKEhO4WfolHyN4sZG6RVGXwVFB
+fVFBg2ExwA7ISQsQbx2PWdgMTteMUnO+z7I570qo4cEErf0tw/6666pUmwvD
+Tv9mwxl29xmeuVmMOSuzbSC46ZW8kn9SXiIVAWqqi9Am9xtE+TEWvwi8BhoH
+z70lH5zbkS8OrvkYK3J8jH9F07ydnnMWFTjd32B4cWg5N84EsxcHOKEoK3EN
+0KjAK7SIOIB4H0o4HoUE3lCbqTnzO/tNfVcNuoiIUwfTRklX6V7uX1tvrOGH
+QMZ+k9sWPVM1cFIwEzaAbIrjf1EszKWZyOdnyC5Rl5mNsAHZtEN3WTfEDBi8
+VVKsE3uFVoa0r1ldGL/niuPjePKc5+5fQxa+7jfMXDWAFhu46WyqJVU0qnSa
+yQ5rA+iWOXJFx9Ry24tkSPu78g4Hd3ptdP/u9EBN98Ph5rwqZFtnoqwpK5V2
+cXrVVEL1XECXpzcQDlhelutAe9V2TsX0MNUpddqcwnXzUM3c98dYzebo1NZ7
++JybpBgkhxFtJGV/wwzalzkBmi1AyM0XvU0y026UxzpgXF6UhI/OrRyECRv5
+ERDBk2biBaypx67nYRKsOKyT+0BGIjYTFusaXpVsUTC05ojrlSx2MTY9Ktpk
+yZ/E3mI3PDFdCzMEKnASNqYMZ9xUgcXOi/m2C4ehU7Y9ZIOuKCIlfgsOxU57
+Nt647nieOziMRkTiX4sQ+ByCJzZMQg5oFj5E64mBFQGjYvK6IYVbc5Fuz/Rl
+1QMmKIShukx6vTWK8/O/Gl/UFxBRXwKb6nvmJfbXlpHOM+goJcsgZz5ORANR
+7eKKFgnCuFguBAupSw1x49j5YadOcUvzSeySevZZ1RmtdLFT7HnOR8rC67HI
+mG7xqsj6XMOIzzinzHD6b9SL44SDGE4vKpCY+TX3A0EFAzWSkEFJ+xDnqZHZ
+W0+lDJaVlkPY+HjFAJ71incD5IXgOGAqHJi5gxD75ChRzy5MwUXdrJnrhapz
+lEbXt3wMi6dOElHLnYEeEOl1sce8IU70weIhAyYzAkt1jqnWmVF5VM8V4wE3
+SUAm1miC1kwD4BsjKQUPnHJK2eWW0I+SGZxFKeCKDRVROcoPSzkcOFJIl80S
+XJplGdywWZ/CgIPoFZixWMQMOpSK0HOKvmilWJ7Nx0yFDq3GjH7j282Ac9sV
+xw0SPmFzX3yBcIXxkpqVPFaJxVfoCv66Myl5gNGoW0NAixIqYpyk02dWhAlq
+XSAO2QAXYPS9Owlv/JkVp1F/P7OQaiUdbjFEXEM2pwNzYBKFYYkC1zXlR3Y7
+qOMasM3H8zacqPhFmFwUZh0eMM1NBcu12MAP3poWyllKoBxBvpNXwKee35jH
+c+JhirKZbqUsQgaWgQLT5BV5BeZgqsCHLdbH6wJdX6msrTFpP/OgL95CoJMF
+/fvbDw4HMGHVbkagR3OJptGQbl9MPk7kPjXmIrZN4+JIeFkal+7NyJj03E8J
+nh2VJ6mBhxFZgVA8zVFjegDY9JYE1p3MYgGOQlR4uYt+cvCoYB8lRsjhuHkl
+I0Q9fu7Pkd7WblMGuqjSlCoTtGo7LxqUr46G6ONPPZRNzM4xnlAklipUETGa
+8OSiC3ZPtzXwH+RF0olbUcByYCkDLzHf0sLzlaBFiDGXbG9S7zn2Yxehs3E7
+7qJTwqos/QfopvArKgkIS616enGe+pbTjKGQ4NpZyokZNKFGIqDLfjf45yyE
+xFFYZSGPgKjsOGEjs3QAqzECub6mIlnXGlXw8QCXuqJEAKooUQKIOlGv7JIA
+FhYeF7wHL2BvpvMyJZ9ZCH5MdMUTzHR88/0sGaTQabUaWqQCkKFpFoIJ8Eu5
+MzRWmRsMzdgb2rTQM8eG1rX/0ivn+G11YeOwyuaEHnGwZuk9bJ4elSbExbAS
+B3bHB4vWy0emqgr96AxYWy58pTfYulvifJbOq1KEIjsROuO3Sj75L+9Tah8W
+E5D4dn9DynZIliXoaiwIsPqv4DkFIS6ckdGcxEU5da2YFKDDIxpCkUpACdy4
+qfWkEnOa51p7sqI0Jqpzyat3NAdeluQDiFsr2tXfMQtT6pChCZBUA03kZmhC
+DwEVbyNtFYwVCzI0MjY0fNSZn8P+vvAjQxMwcqdi5KI5Q+MNMiyxqa2IGRov
+SWoRg1bl1XiMefLicoXXH1ceA6c8qfGpyBT85vxcDUoJhD0010/7WKZ5nzfm
+GI7P6/fJRFYNuqlpNNpVy9GsR/Cn8mUhYfW+nqKKfJboZwIqJidlj4GLbyCI
+7BLfgW3pT4ALx7KpYBVbY/gMxBiOvMCGJKeTaKp0PEeycy2KCBCWVIXcMVu4
+RjFQKc8tSqc2YC98BBIwha3OSYnNDqCur+UQ2Fs8WYnPAoAQj9O99XsSDzIF
+TgIqxNOaojDE4zog5oVpgkj6hBpw3gLkJOQ88GMf+9jU/5HeOzxGyIpuUR+m
+U3Qr0nPoFHzkYUWEcLKnNjOmVS3u2hok3kYcgCmoiPjFma1Uo5Us71GPCAfJ
+EvhQC/GiYztKJdKb13OBTY5hYSA+x0mECq9wT904K+G5dgYj7C13GYqApFyB
+PxZ58QFA3MLvUIQfMANFcg9+ugYWirAyE2HrsTM5dRJUopBLQVHf250JeXkg
+QdFPQCtWrtezoCo+2V9rYRvCwznsQvCsw2yLvWQyUmC4wm2XgUXfVnnduzUR
+gq5H0vP2hksvS9nCCdlXzibOcs55O8m2ahDAQngFvQ5p12vqcnBswXQCGqzv
+i7R6E8R21At6UjGggl6lQGW5q670WUgDeezhL5LXhJ2N5yQKfKqfhR6NCzi0
+UhFo6PEWvwQRWlZXt90p+xErDyzr3V96fnHUo5As3MU2MJaJCQ+nSjmxGjIo
+Kcaec+rV4s1n7vaS4jocNt9u9CCLe4lL8JmpInIqjQ4vjB3awi8BpwS0SMxF
+ICggF3B4ImjIfQp39mfrDq50LohmIllmAK+e/exnp3Md84eUQolLnaKcTDrP
+HSCkW8FVOs85GULUFsQW41wzL93yv5Th6Ad7y3oT9RbxBnPQjOMvKHDfiDWx
+lm16B4IYqxX1pfPnFxYc5//p4TDImh7MrRIb+JuvMjwckcm/1Vu9VUJow8v5
+D8KB3HZE2lmkRkM6K2YYq+s9Loft2Ecoh4j6PkTgmiA3x8bwQBWZhQhcwS0c
+wRnoBEdwJNJkStSQp1aKhauFcGf+b7losdFqPHQFrGoBaoFXKaeh80hcDg8l
+tPG57DzrDmLzJ/KfdatcbEQzXKu/7tWDyK1Fwgfq0KsdwyZeWDAvaDXfhgfL
+ofUn4xrML0WLzpC0KgQjFMR7u8a0usSI645mPCwgLgoCGNFLGHtb31RRc8o8
+8jlh0AmiltWyA2ZKFTPXwTdDELlWoVGI+V/Fte3zzNlk4a+/DWu/z+GKISK+
+mpiIF51qRYCEbUsCUy6BTUv6cambEI7SBnYOJcJccuCb6d/GqnPDolUSctO3
+5Au8GeDcJXY4ou3MXCQ8AyW8gFwNLySPhYir74tgcpEjoBayGRw/jnh6ygKK
+4+mNI0klM7t9DEKuoicHWyvjl0BeCuezZMF8mCHx+rTUhM/22lXzvm0RUq4f
+yx0xpEAzsFH8JtRZQvX2VFcMvogq7CoHxmE3cFMJ2B+EdjSku87NpZZrajYL
+FjlpoiAa1mR5bsoG6HA0AC7Izk96r+MMPxo+Jku5PATQR6sfrAsk9UcosNBq
+wKQwhIQnKppNZ+z14KWwPhP+fg57lPxYEIUGDkK+7fUrR6jC0nJ/NXvXHOdq
+G5Whyp6EVqVyuawJFZI8X5caxaQQmvs67+jP+tLE8Vc2j3LCHALctQcAjFfP
+iXaEveTsf3THBNoJR3Wc1Vsv2aiRXpiIxEgvwAYC1rvZtCT0ohFcaUFaysqX
+Yej1rWuYpcHUtDDLMAA6Oe1nM7bSQpZqIIQ+la3mFOpsHtnNWHq76urcuXER
++AQpv1OmJfI7mnB+Jve+V4yYhQdEiBp1RK+pNfa+rjk3spba5l04x0uNUWjQ
+l3sgbu/XaZC5LCFgKXN6FgJYYpob5lOaUBxdVz0uMei6f+Gy3N5O/8+CphAq
+FsdZ9b/U3pMj9q2DoydBn6zAenM8KKvPmazSEGXotfzKsKXPFgGkxE3Ymdk2
+CSOeZD1mNDMvgm/I9FnKJJRhPakubkJUsLgJAxccwDr6HhFQbphhFV5uDMwl
+4MoZMsXsR7Hs9sbWN95MoJQHfha/M10E9nL7XHmlLJRHBaGuzIBIKDCt3udY
+ZcU2pMDq3E7GnxXhiZfWNbkJsbCHGwx+86JlP1lBCeLo817Ip8dPrAXv+0Wz
+/QKHFCFyihhB5l6n8lnZVowJMlBfcT469d+r06AqVEMqIkVJrGHXqkqEqaAw
+H7Nz3WIqe5TYHo30mUujZHdrjq6wmpECCwIEEmG1MInj4oCa1VmgTDJsKhfW
+AAdkiKjmsWtnBk77mS3xEjLHLOdOSjGqbMgIykgic+iVu8XXWXzLgeVSpfg5
+Gj17K1YTFN7JfalMdiKLbWRF3IHxNOjFW9ALsYqvCxfSkkUNudrvxoVL7X+O
+nXghgBQ5pUdjcySBJhUTSKQ+i5GLLOQD63Ha9Fwc568TzBZg5eYQT8o3QGxe
+Gr+d6gs62BbwNZta0d9VyzApJWsvhAzErXlVMj7wnfOOw2ymkJuecpEIZF0L
+ws6jDz7Se7PS7tfKGA3ERhbCCUvJ+2S73GXadF64CcS06zt3c7g4O+0qMKuB
+mN87xrvDTMEe0xF2wkx5rdQaeWdBExVTWTbzmwJFfI22KtuIK145d7duhi81
+F547ZtYL5bMT1l/ZYM1jCC94A9kG/13CiaKIjUysrGe/opQ2m25MGEsHQa+c
+uhdNH6xp4vFuj4ZFKA3b12t5GbOlNqx/LctkSqyS2HTPG7BFcm1eZzMnFTFw
+ls4fOXc7AYdg2UhEOwrSrKLElUKd2ieNwX5+mkPQE4IuV+C8s98zWJG/VJ8D
+kTHx8fvzlbd7MBS5dYvXLoLIlhEAxRoZxwkxTxXKyr69Cp0eXl5uQ9YF42mO
+vJBjlSI0laj4e79za7s0W9wbTDS9mfepQ05ERDZ59lV485I6BmNmU0W8L4cd
+v8cK8vRdDanPa8tuyuzTAwzq6swb+vIlSdr6JLjRGg0RQpeYo6t4xEQyR0KB
+SkaXE88d4//PDY2g0knjswJWL8tEF7iEXDINUCrYqc8yk0ZAwmDhcHncq5YO
+j98afHoUA6iZI0pKvbLRg2jRkXWCVEziLy2tz0IHMxKGC4py3keBxc1L47ng
+o6D7UgskJ3N0oHhs143pWS1WJy2Q7K6A1kQb8aVGSfuKvMjER+s1jBY71dfJ
+z8iE4ZOJce9vYL+cQLYbnyVee54d5mKH/mtrlz3KUTlAcn7f933fg0yIi9zZ
+A4WbkyHH8571AKt8Fkzzei95PVbsyNa9kEB3LKLyP9BY/86b3E4UNwZnSsdy
+/dkatocUaBwrPiaKzS3lGqNQBIC4JRMwkYV4AzOUg1QmTKpVUp+jVUxlyfHF
+Q8KwjiUvN20XcchW2t4nUlIZWSek5MKpT7E53M/pEHSnUuLVGYXTd+nPxPRy
+obV11Vf+zXdKcmy82BTGptjH3OS2kruCiPXUsxP5UJgosM18YOrpDEaHbFuE
+aN79Lj2OE+Hf5abHwyXNZK4p44CebfyjKSWfsvJcLZ9zBdiGUJdM4Dh/fLnq
+YFjmN8cnBs/OzZIepHBdZa239SD9XPDBBNUkTMcnS70Mvx7d42e5nCSdzEr9
+zmuzpel+TQB9y/EmHtMLpa+3NwG+TqSk1mQlw+XGeM9uDhCSSB6V0JL1bf21
+V7g1CwAEcLSkuJ/S3WWG9CrNdCASBwpK2ZAsyULSjAXMmVbEUNmeHsqS/7/e
+7h9HriIIA/jiZZERRFzAIkBIRJgcGQkSBBKSnUBk1kdxuBEJXIGLrLTXon6v
+6+upGcxKSIgNDPPmTXdXd/35qrq6+lnPimAfWuy+1Zo9RoZnDAUPmFrjk5XN
+zV0G4idwIQ+WuW1488E/k/FN/5K5wZlxGQSYyoX6oqeb95xSoJjaeb9n/VMQ
+D9LBkWSbtRgR+0nGZ90c8TdJTDnYINknFUMuIMAjgf9UBwTaUsS9eP2jZmQk
+zVQV4SAagB6utf2pf52dkL6O8l27T7nBiiDEd611f2SvaA7NTkwn1ubEKAQm
+MGd/mZonuRgHDkjMhOLt5Nhdup6VrTF+37xneYkSxBV/uU+q9RURKyRuYVE+
+klKzM+jT2lnaFRHBxdxgHEXHVuW4yQq2r9I0FstiJqXFMziDuJ0u6lp3MnjH
+puW3PXq/jVLXBmtEcYq15YKLqGYU4C92lIlWqODz82GLWOeCi5wVNhzseYKi
+6y4hMIhDmegIVtE9MqHvF018rupl9LCQ89KQhMhJthv1gVmQd8qG/PBYCM98
+F3SEZM9oXO7Ni2ZV7wiQSNpN4QPMpp+ysLOUq5+fXOhlgL0GSWR76kiKXHmL
+0//65HzCrLFwPKfm057vucNjMnjgNJbQ1/NefcTA+aI0+xT0x4dzOf3iBHwS
+3TfXoBGUcH9/n2nCu6kfkfHTNoAEvA6LfNUjxlVArmfp1m/TpfL5qNJtarYa
+LQep04czbQ6v+CkGzEoehQ5cg3O9z039bdrePwJtNzc3h/zWdP3cj5MCwM/Y
+kr78MKk8JJ1dJgDfNTlgLd/Cs7wPIYNbwmCCMdz1ls/cp4U5Ut/zl35GmfJ0
+1pysZ7njAEPnxiiDTzL2TNruMGVkKl0xXEHJ6coEg2s+5V4ojhbr5dO6b+nq
+t54XapVR4YPVSF71YwTYKxSWqIH2daU/dHv0YKgP85PveD5fdyueSVECFIq/
+0ri15qia4JKPdzSu6xmI4hM1PGjLvk6hGP0klO4BE326aNY82Yli+NMsEw2d
+iNGkWXId2J9IAKMStOXP0tm0ce4md0AR8pwbz/ZETj76lD4tcWL0XYXmx+6G
+syTYQD7gLSIqCKOexKv+eep5zfAzQNzV2PfNOyCsIomnQ3rr4p++EuWya9Ua
+aVEaGtAnxhx3gYB0LWTrxqaZUy4Q3RfX7q4xtax/+YqzMknXQT7vemVtkcw5
+SYbRibxXL/sZ8OTgyrr3YOkB4olXULm6f3ooMhiM25OZNOkyZcvOXfQOhMs6
+F3OYRKlHbrAvu1V6CuoU6zY6EwSEUxxl+WIQZVZoDsd7xVxaQudkL3om13at
+T6eVVw0lsWkqJ9M+r2HKe4Q51yZm2oWagJX53qiKlipnf/ZXAhemc17NJF9K
+wGU2y0e16qd7EK8PdB9xvGiWZqYaZl0g6idSmWb5FKyUeH/eo4O6gniaPcTt
+P74Z6v/8/yVsy0Pm0mPGsm05u5bK1DBZAd3AUsaRkqSfypjO1E620sonkPtm
+9fP6+M9KosV7Uu0tvhWmUgRfs78EzWBjMsqRh5rKanzZX2MMoTTaiBzx7Iov
+U7yTWDHkWufgsjWlxG/Px5EdxVwKAy3bPirR6nEsf9jYUrQSSexqUb/LUhHm
+lPuLw0/TioSd0nKXbkrQIhUhTWyuZvBHY/et2HsuwIE2Isf0+r6Esqm57bf4
+a+JuMjJoO+K3PZkVMOck0st0rGkpixUaUgzfMbrQANeYZLkdocFRJs46q5qm
+uQfUjpxNXTCb9SyLwfkwGGFk9lDPhfl+ncy3/BA+LdnCgOy9hjjlWQweqzQV
++3H2oiyxwz8mOYTgO79ziC/RBIvIy/UshNCfFlKsPYthckUkcmibcoQJHcfJ
+GGRT8AjpD4vHYCTx/YIkX1P8uaSExEAahXJ3c0CXSckfNCJAPYMh1oG8lIIt
+ufPv9UG6tjhIM8JAZsob3mTySPpGqE0mPqf/szUGKRCicpz2uCBxtjWBX96N
+qbcReUbmSixiPmZ+Ax3fEfHdrdUDZILQaWGkEqWQShTbDa+2/LvKlXuGDCv2
+8PCw3yfYxMEx1yd92JUXwAlyCGpW+OWn3N3d7TESGHoDSsl7xFh6dKm//R6+
+jZ1/fU4680h7Ke6f1xncvvlnk05CMGBD7mOlmHq1EcK4Vt40wmvrd0+PcAMG
+ZNuUvIQNASYMWJoriwVXkaqExC2s4Av3LZRRUtRDmc49VGaUozAou+0mQTOj
+EZQhKia0E2Q3VfQ4MTA6o88eRwHcXUyS9ytspfBaosxmAe/aT3rSuXc2ZwCI
+Pm+QLpgB55JIOaeB9tKFa8NCPf6DcITcxbZBRGvIw2uq3rQq4imkYrNwAOpK
+0tJSMqdZFTBDXMQSzAK5uDfQOwSB7XpUICeCJzjiGfKiKHE804RjwROKv4YU
+RcmfpL0Jj9GxBTV/TcPvYwBmtKzS7kxYw9FtM/p2vf5Hf8Vw5H7OWb+F/uRm
+9OsH3/wLzHD13l+oeFg+\
+\>"],ExpressionUUID->"037fbb3c-8ef3-40a2-bf6f-febd812ea256"],
+
+Cell[BoxData[
+ GraphicsBox[{InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl2HlcjGsbB/BHG6JMReZENSlpc1qElGqoiLbRLi2jQiRGhYRMTjQSRvKW
+QYaOSuEkqUlxUlosaRzJSDItElFRjorq/d3vO3/U59vMc1/LfT/XM590Qnd6
+bpKhKEptEkWR35Qi+WHMpIYn8DJgUtIPPtxyIybVU3dY7Q0czWoz2wVPeT9R
+/gBWjDwdqAtzdu7wvAP/47Zib5Mhk+IerzhXAl/W052UDNPUR+7UwF7q9Vtt
+4WHHW0YdsEDv1eAIfmeanZUq4u8ax8SC+yRuiY6FHbxs27RfqbDkYsX4PviI
+7ojDZpglt6m6HBZdTWa4wOxdr0sp5BEmZpbZwHFz2vucYIuOxBtLYeG1FXE8
+eMDzHd0O9vd7dbgG3pqbeNEN5vU7HByFg4UyseFwD7ds0Xz04YS3KpdL1nNL
+/ugA1/CGIi6R+H8xo3xgtvbdYpKv2D1dfz1sOTTaRfpkYLlI0wPOMa0+M0Ti
+5+8dXgrnNoefUkDelaONP2bCTMfewRlwfYtj1wfEHzk1dQWxwcbqn0Xw7ewj
+kbJwXrrGqzj4bLfPx16Sz5IWl+XwnoddpfUwcynHhdS/SdE8UADTfGUe1OG6
+7mWPWjfCdEP+zrNwnPmHOww4L6v7eSTp7/3F9ZIF6O+4ZMwVnrg/2SEVFh1T
+SrWG8w+MpdjCzLI9RxbDCcfttPr1kf8alh/Zn4qSlL3ZMD/F+Jk3qUMr+msg
+LIxxpMfBY/0yBZowO1yuMQfeaWC088N85KPsOPkdbB/7/lI57FxyaosW8i8v
+Wap/HpYuj3QIhau2CrYchfO81t/NhRvnbl5xkFx/1/Z1L7xSboviIbh+ekaF
+Mfo571mKIAUWKsoWhcOzLd39s2AGl+eXDhfNcncRwezvNqUi2GaX3qJmmM8f
+DxLDkV3Jl7+T66M9trfAxrcT1Gcif6v07cJm+NPuYE1TWFzstr4Gbvdy3uoI
+5z3xTcuF3e+96l8Hm70cfJVA1ot8RvmS/ihcWewGFzgXrPcg/chZojULrpq2
+xtIW5l7Y4/Ea9cxsavHQhuOMnYsuwOLlbYMkn7iqfivSj6t+0s8P4IhL7ypM
+YLkM6z+SYOak3Lfj6Oe+Iovt9jBNxO1ogb3qDUuG9PD5Qx2XquAb+ysLc2CW
+HjO0lJyHT3L/+MEi9ZG2Mrirrf2cIszjaJs8htuU5ux+oIt+9+39+wNMT1hw
+OQFmc+7HqiC+0zxzVUe4ckm3gNxvu2u2BKrBcV3lkw+TuXH55uUv83C/u8ub
+P4Tveu5LegEz1/9cM5XMmSgOowbm5deFucM7Wi2mVsH1806c4sN/D63weAT7
+MzhUAxz9pC3lNcyoVjOZZIJ8rAM+D8B0b7UeI3iJgsY6JcSXUvP+cIZDtEIC
+TWCu4IbEHy4+dCPNheT/FyN4A/xSJnNPBExba2TIgreuvnKVC7OSqvqWwifU
+Pg2ehiPW/hhVg9Uz/Y4I4EI/qU438llYZNaZCYskEfmFsEBmllIqWV/YtWgP
+3Fh3MSmG9GdVdsYy2IOj4eVB+qnWUTeGfvB+6k9lwHzDCzfIPMo6yhB1o57C
+GzUK6WTOHq5+/ydsVrNvVSTsJTkcHwhz2lLj3GDvgvCCGXCma4MhmQcnYzZJ
+K3WYFPVT3tcKLmhIyYyGmbrpgSvh766fXBfAEf+Z+Ws9PPRhyKudgX4/DvBJ
+gPWPe9degeOsTn2/Ab/UyNgcBTvvnejuhhOSH6SuhMWS1jp91NM6X6SuC5sF
+tb/fRubbAvPgGeR9JUEQ6cejvKuWk+G8I702Q/BWBc77qTDruotwEfqpnDBu
+qw4Lj+q2RcJlh+6eN4IHpC/PC2BNGdkJRxL/p0zfPdguKmheGMymNUQ1keu/
+N6YfJvF5c9a8hWNqFzULYakLw1UCHy5eEltO4r0u7KyB+Ssq9MUwX+JHz4U9
+DX0+tZLP+/kfPgjLlQpmS2HRpYVLXWCmccgeCUzRg2+pwolZTS41sOR02W0y
+D/6YrRCWAzN2swwFcI8tc8YBuHBrhiwbDl/nZrAa5q5n0sl80s3+iyL11+v4
+UOPo52eljOtHtXH+6lVGW+C4ovADA1q43rL1WTWs+PIr3RuOKE2+XwYnscOi
+SzQRX+8l5x68Y4KXPBeuH3j15RkcvaPd+PhcnI/0zItf4ED3s40KMHVg2J2O
++L/HDbqcmYNzFZnsRObRSruakkVwYf41txSYtT/R7pMG6h/Xa34KV34co4lg
+6k6vEqm/3vCh20WY2f9Ezg/u4+TJnYN7niY3ZMLTt99iXoPZTY8vkf0J7n6u
+9QQWZkcPT16Ic3o1sn8UzospLjGDh7TUN1oiPj+ywdINFvqKiqJhNld7QyDM
+rSn8VAhbOb+9HgSzRcdpn2Bpyy23dbCyc8Hm31Afw0iXsoKLHjtetoYHkh/M
+VYPjjy6hr4UliSmHu8h8oMd+dYSdaZaJN+HPWZorDeGe6g33Y+CA2gd6/2J9
+7nuxOrn/vw3VVRfAnHtBB3+iHxcWHPNzgVmepyXVcGi2Cf0V6uFfUG9Pg/3z
+e3U9YQOJtkwkLJrWHVD5G/aP721L5ptGpZGFPsz04KnZwZ5W44d4dMwBf+cY
+G7I/NSUOn2djfaVpN1fBJw3KI31h7smE2BBYouV04Yk69oOr05JE9ks5ccQD
+Zmv+CrkDpz498KN7FvpMG5Pvh6Vv1CzOwJxQs1BTsn+78919Yaq/qoLU+yte
+/aMZzJx3wrQM1gs6kzoPFrWU1P2CtWRVywzhyul9uTboJ08nZ8gBdjbLNoyB
+JV+ceqLgiP5HP4VwQMeJo9mw1fYy22rYzrfWWgpz9w6lS+DAtVO1tJEv3eTt
+cim8WZ5htkGdPC8uzmiBs3yOnD4FS22lybVwvtXn8lLYeaVdeQ5MvS8vaST1
+69x0OwDTZXWcmuBMh/jgNbD6tKxp1bCQfWUnDf59zpYCATwsX+1MzmNKuss/
+AbDB9JfNGbCiR6ydHDxFxUYxGHY2enwnk/TnTU6xIez7YstXDVJfVGjEGPpp
+ESuXcHIm6j4WF/AGztKoSfuhhvxnzl5Dvg/ER3lKA+CBR95bKmD+2m0B91Tx
+vqmTxwPyfAjfNK4LC7f9Gn0Bjya5njujAms2PRyE54Zp8WkqZF737dAm+Qoa
+rmfRcL90XzT3IefTe/U3Jjz8jSZOg5tKZQa/zcD7jauKXsKt3muL0uCBbCPZ
+Oahf1N1pvhGeYrnreQjZv55noYFwZeU988uwlL7PlAuzMxLZrfCBGuOCWpgR
+oNSh/DvW+TPCeCbisWawLy2BlcUjNu6wpH3T+DrYX2XS36k08n3vxFAIfKAz
+W/QYjnBvVWXDvy46LZJFPeLN/6Z4whZ7lPeZw+yQNhMreGbdybXrYOdMXpAq
+bJ0iTwuBaWtuKnQiH/EbZVl/2F//Avc6fMX+lbs1bNAxtmcXXPIzaL48nDep
+45ElbBbZWC9CfOn2oO0jZD9np/B8YYPKdSurYJOD0rAHqG84uXP8NGxguq23
+WBnOnS9Pnj/U1TtHTimRebXJ1QMW/jnXImA67puogDVMWPR7V57WNJy7Yru3
+dnBFz/ZP3VNxXYfAhTwvzFbPfVIxBXlzFi/dRPZjkUPitcnk/nHLOQ6zJ0yt
+7yigf5xeJfI8a/3XqbxbHvu9oyHsB1lfZ6uaAzysT1tC5plrmDu7QQ77dpxf
+R847v8I//yjMKrptWkX6M3ZVEiVHvncvOCCP/iXJNN07BEe4qLxwgHtSe5aX
+wvT6+enxcP2NG0lKWD9vmebeXFiSJw6OhyWtpjn1cMQmk1NDcOYfIS9aYfHj
+L3bRyFe6VLC6E67cU7rjI8yfptD7Bh5uOreNhfoM3s9aVQc/PXvJOgseKA/Y
+nwPzY5oVn8DDH/yt98PCVK2jYpg3f7RgNVmvIFs7H+aOJ6wn5y3d4vpqH5g9
+X3XGP6T+jf7HniPegKxX+Vm49faPUwyYI8tyI8+Hp2XFaquQL2fd/jQD+PPA
+7purUW/c0vnqY+gnbVW3wEQW9fG+y7bCko6z7LFJmE9f7yrXwZbfJjjVFPLJ
+Lg78m+z/SGeMyoQ9xfOxiSffF7jG58Nv/rKnCneFe70m50n1/lPOqD1lFvbR
+chT2l6iobhu2pwZ2Ozfpk3mUm6l57V979LMymDyvmPwjN5d9t6e44v0nz8Nx
+Tl+e6w7ZU/5TvzxsI/tZvfFI5CDWW2dlqIf6DZRu82gw3cPmUQScJ9/LVoZZ
+cyvKr8FTOMGpgbA/Zbayi3hezPs+mHcorWeWKc7F+izTEqwv3PHm8nLYucmy
+Xoj4jIlH73xhbuKUmPPIj9E58GcYTNM/uSzthz2V52rBD4V5ShzPXaiHfUW/
+3QuurFWZrD+CeqTWu62It15OvQRPmZJ3TwWmZnXWNsLid6U328l5qO3qLfjf
++79dy4fNtplNWghLTdcE74RZvc9MWFifs8HnlgXMfrmjWR3xB64FnP1Bnv8p
+RhlHka+VnWtvJexskDuch/oYscfZp+E8jX0Kx79ife1mj0gyv0YvRu3rs6dE
+hwavskg/Z8eHCj9ivyyDnqyEOUlzhm91IV7ahzPE3JH/bL7+DtebLFhMPs+U
+mZYY0WxPGcyUdSTrVWbI3Kl6Yk8Ny/HL0sjzhmUzFlRmT9XL/Bp/SExeqbb/
+///IQuZ/Af+ePk8=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.82330080216169, 15.930190164263845}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1AtMW1UYB/BDwY1HxjoQChOEMhM6XE2XgDJfPc4h4yFUxmubKYUI81FG
+EwJ0Gy6dDALZBgVxRfagVg0D0UGN2i28JY4hSosZdAisbCyjMKCAIEJh/o/e
+pLn55dzvfI9ze/kZOQmZHEJIJH7sTuxPcLlRYmN3L0oKE5aKKLPAv7YKbnWq
+flvqSgnhJe99kZlfr0tzocQ405A/9zQlgpyxzRhnSlTXp/a1w52ZCd3Pb6VE
+dtkzph4O/eKdoa1b4Oi6rEb4rCIi1uqE+NnjwluwfNq2ZnakROtlEdjh/hMh
+z97jYL/hmyNvIZ/fAdEGB7YZUs1fwj7vH7sU7YA8x0fm3b0pCfd7mH+TUKJY
+GUoqgvuny1KSYG5k1d112PBut8gP7uz5xD+XR8mr3mE8d7Y+1GZ6ACtjf4sW
+wCLpwOxBH0qes+oTs2Dt4ZJHV2CfQOtL3bB6Z8bkOFzTckYfivzql0seOPti
+X27d+R9gVZd83BdumrcuvIJ6tf2L41xYEPmtqR2mYwMuc4gv7Sp6Iwz9ytaf
+uqKHLcWZ4xeZvz96X8by6VeCR+HA7bnedtTX6x42uMnmU3E+ohTuaXFzXYON
+5/ICXGFjzkRDH4tXnekpQb+2PyaP5sCKuhsXHGFy5+q1KZb/Bd1gMebH3bVn
+IZzVp9t+3QN2ungk6T3Ub5s5++t3mL/5859LFGxed5QhUjh1TuN1e1NMiOAb
++y7YmJ46qraLCU3MPM2BRR8Xj0StiUnnEf69NU/kCTbv3rIqJqJYbeg2rPc+
+/rNjeFlMmndvnAhn7ws3oXFgCfERv9SeZOvleUkbC7DwqzIjrPJ3nsy2If6g
+Jp29b5aVWpoyJyaSiXR1Pau/wNPn1GPsVyhxDkB/xq5SQdwM6vPYX6CBZZ08
+88C0mAQaalRumI/sQE3AKixpu/R3Hiyq49//iT2fN8AbZPNTNlT+g/0s0jHD
+M5g/Xb3hq0M+kX74VDw7Dw3fMQr1qFtn5j9k5+9Isg+hXu3gUpMc1r62sF+6
+iOd7b2UksvjkPmUK+pNIvx4NgpUf7O0W/iUmqsvnVu8iH/1oLs4EK/iPqgph
+4s0rCMV8aKX8mDuscOiJj4VVT3KnPkU/XNE6fwesrqxw94BL9R3tpxGvFcqD
+yjEPUW1zUzXyWWKiirbBxuo3hcmopzn8pPwzzNMgT/PtQ/2qH7NbQ2DJYqNw
+eRb5cq91mHBenUG9h6xWMeFOLjmUw1yNNa7ioRj/347gDFjh8bqfywT6Wzts
+ioct/D2hy2bE/76vLIU5P43DNWJ/r53tSlilzDLp2vE8R3C7Bf7v0rX9/33x
+pP8CT+Wxpw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.9692031021678298, 4.320378284825192}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.99999999999727, 16.999999999996362`}, {7., 
+          11.499999999996362`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.754949725219685, 15.745496856246135}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwt1gs0lHkfB/DHTLm/uWwiShhF2Iz0jsva3ifeiuhlXWokl2jQIhLOMCXV
+1nHLLVrRa2ULq2RWuWyFWbVWUTuxnR1yGbdcs6jWaNn2+3/PO+c85zmf81z+
+39/3PPOcxzA42pPHoCgqExvZU8sf8TOjKRnZm9KU848lIe7mNMVmxMbqbaWp
+dU+M35TBjcOqTBPYwCxcZRHmt1XlGsIL/Q3GzhY0NfdaeVEZNm7I6siDnbvV
+FEZxv75c0Vw3rHj7+ld3YM4lR3WlT2nKY3pMIQqu3fCXDxtOjd8jMYKDBJcb
+nWGRcdzDbhOaimk6r+gJSy6xHp2HVw2OLrjBXGa1gg089Ya/aA+HP30XP7+F
+ptTt73vqwzkNyrn18EKTfv8S1g+KbP9XGtyWEzskJnkv+5dFwHc+uzVTDgt/
+5rwNgJMH3l09Q/zD6vgQeI1kzj8ALnWfP86H2fpbvffA/ITNNtfgWKpYwx6u
+DDR17YSdS+eTP4PZqblxq5Gv2arwoSus060kc4KlfAfNCFiWMNZB5plTuTtV
+CHON7LpF8LYNSX2kL3pGSXcRNjUKbF6PeRQdTNRY6KfdUffnMNLf48DGXTDj
+gUb9fbh9k9aAByx2nWeobcP8r2rM3eGJf/trHIFT83WcHGB7h05eNezxRqdV
+B+a6nZXMwdxvfOxeY70dvz94ZGqJvqZ4WhWw822+mRfcrsAVBMCHetJfHodl
+IVW66rDInccTwDE3/RZbMH+KfNbBRFjHwsQyFhaGRH08Bpuu39dkBssOj8S6
+w+wtjvSbzTS173xLhAXxsd7HD+H0vFebVsEiv8yrxXCSxECzF/kq03+0yIDt
+P5gMfg+zbUcWiW3PBStmw6bKX/L/C8eVd4nitpG+vGyaYVXRzmYeuT40a2Aa
+nvXO1DhK5q0182Mhj/3Gi4on4MZBd+Uj8MxKm+4lWOfrE7OlMOPA0HADLJmq
+nRyAn/uZGJO+CiWsD+sw/5onoj5r5OXah8XthjPN5UNSSH8VoXZh8E5WfGYX
+XPlebjQRvqPCOP4JG3ldN84I4NxnX/c6wDJX1aZIOFI9oj0EnmNqNrvBdqNR
+hRfJ8bWJbhvhth7x+LewWFRUIUWehltuN+6T808u/XIVniwX6z2FSxs8/Nzg
+JDOhfBfsLK9PL2P+g4fuZxC3V5UVV8NFwdTOTpg6XxN/FE7dG7FWBHMLbl0w
+hu9Jr/nVkPM/3bE8Z0xTnZrTZcVwSv0J70742nDGzf/lq+iwbIQfn6OtYmHb
+HWt21sF94/MqQSTP4QDrR7Dm96KeL+CJg9mdUlj1NHO1C+zBKBpSwXqKgrzv
+9pA8p0wv7IJbn2d95QqnDoRbJsNXZvMmD5J5f7833wQPbJ9qioCFoXpCMt96
+sVYSydOoftafg/lHwtKsKkhff05ywuCMhG2lZF7pbxc/ZMChnpMO7+GgjCDt
+MlikpuGxyQrzDo53VcCrS3JVXWCJgVMw+b8X2jlXxcA5quPvz8Dlhjop+TBt
+/6LeC67m2224CweVZ9ath5c3Bfh2wOqfL3X8iny1LQnRfXChXu7JVFjma/Rx
+DBbWZ+XZkvxqhtoTVuT90uc4iX5OZiVZj8CKWhpXSuBABR5HAstkr30Pw4wF
+b7922ENQIN0MJyW+Na4jXmUvXmFhnl+Ye0thcaL28hhcwBBcyoCptGGXQZiq
+5bTyYTbr+o1JuEWuO+8YXKndv8LE/Ry36/MDYZGvjr8FrFGSU+oH6xhdXw6E
+77UyBwNIX5kGscWwHvNmCble1pYn7YWL437tE5D11J+zdTHfi6suWwtIX0L/
+/T6wkeep2/fgCa3dAaSPiap31j2wwVFaTgi/HXrmJLcdz+P4PsETOPpupIU5
+LNx+RdoFM0PNWT5waVYluwPmn8o7fBo27ZHn1ZLnV6NkSxmconn5RBpMM7Pl
+WmHx50UcT/jQ3r66V/DEe3+eGqw9yQidhRVVb3MfI//Th5bFS7CU99NIHOwZ
+reS2AgephuiSvp1abfrJ8coJVa0e9FecX6o3B6e6mdflw9wzNewh2ECLjvSD
+bSnv3Odk/ZcXlNjwN9E1Ez/A6vUvc9bCBrNVH2/AOdMWG5Xh1pTeslySryVF
+rA572ZinnoUbM5+9MIGn1vb/MwGm9E/77ocPRHJmYuDw/0R3JMMjWZzLsbAs
+0LS/EY7y9KoWkD5e//HTIpwUxPTIhJ05XyTYYB5u8Tkjsn7hRbr7JJz253Aw
+6YsbEbdQCbfYGcyPwZKwbK9ueFdVfuA/rJG/jfcJeT/Y9g8o2MCV++l1K7BP
+jDzrCCycatiyBM+IkkfS4JjdoQqj8IEb6dk1sJQdntAMGxYkF4lhWUGyUTr8
+h0P0g2nYwyoqzwWWIx8tO/7/vcKi/wZ+uCyP
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.306417572928748, 12.091885689614742}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt0QtUzHkUB/B/Yaep6SWO5PQWopgeK4/kl5BnpJFtt9lGr+khpTgbtVt6
+KCLTS8VKtoNaKyOnmmjHtKtkW0mkKU4Ny+koKW1rnWW138v+z5nzO59z7+/e
++7tjHRy7LUyb47gQ/Oj89C1in85pjHv66IJ4HawpS7hkD+cOLqosgJngfPoy
+WBntHNJPDh39RwiX9J05NE3IuA5m2iCA7a56WrjBcRP+Re0mjIvWOIr94fLm
+xtxEWOoh8tkDy7eLa/XhQsduxyxYM7yRlz+VcT13fttTDEs0b1bpwsVJ4o6z
+MOMPy5OMGfd2vq3XeaofsH9gyIhxh3S/5p2DZVq3jkjgX309T5XBqsAOU6Uh
+4441bFYU0P21rFdtwLhpa3Q2ZlK/zt08M/gLj6iIvRR3aj+Rrc+4FZ7pnsHU
+v8Um0R5WN/ZO30p2mxU4IWDcSI6D3Uq6/2VBkS7iabm2Z4V0X+fJ9PXwhGvt
+GTvyjO0ZdXBgXYOBJZwa9Cx2E/qty/apMqf4H00l2pjv7urkEWvYqu+sz11Y
+9FWKlQPNX6UY8cN79DTjbu7w6I3WbBVc9FDvlS/VExl3zsU+8gYV13bBW407
+pRmw4cLWRzmUX1AkuQffupolroa5zh2ZtE+JXaXdfVi4qvagA9xk0z3xlu4X
+v+N/DhdEpV+0cEJ+TsRfNrBblOPgKvLuqI1vUG/4QPmxUFil2eAlh3UN4jPT
+YKN878V+8GVfh6FTsGyBIuMp5vUzKBXIYblib2wwvHy8LkEJSyS72i/jvQe2
+fBhqofrnllXKsB+zYUXGbTg1su1yPPYnTdkmo7iVieGsndi/OLWq/OP9n7fk
+h+sxLqv/SGoN5VeE1x3VZdyy+RXzK2B2q7bmEZ9xFk82KfMoP6q9PwCW8Rrj
+U6jftlcH9GC9kpmHY6i+/Pi+MR3GhZY4eogpXu8aZIB4Subyxi303pBdUYHw
+0oM1+mspf1P30W74kst6Y0/KF9xQJKJ/iql+HFn1otrRDfO1yx8WedN8afse
+62B+ZWviT35wefjM3qdwTt+T0jBYk3XmcQPeW2m7RutbqnfTuDEN+9CaWOFd
+Svn92mPO2FfcG2VJA9myz7gJVvyZPP6Y+gX4npyK/TZJoxdrOyMecLrKAU6z
+bpk9DzYyq2km+3ebfLeZ4pMEcyg/y+kgbw8smREvvYZ6gxajJ/NgTaEP3xK+
+KDNzrSbv5hXswDxXvJ3fN8OqOa/F0Zh3SVWin5riz/2lIXjPhwcS9TPYyrD+
+xXq8vypiMHoITq3vHrDHfgJcJrm8pHz+y2ra74MFmsIBmPOP3D4J+zdRSBb3
+UX3+VvepPMaFCa+MddC8QbKS1Z9hzg+p91Tkwi7+D1MYNy/I/R3Np7KN9BLC
+cfEdF7+neLVR29hkxtWoZbNzqP/S9o5BOOl9/+kksruP9Qzkq++sWBpL8x4u
+c9kLd5kGjofTfLl5vu/hgZG20yEwM9TquYD+peHNbWG0r5W8ghjMV9EX3xVD
+92M2mHth/nNpgrsf6+dXSszxvuffjGYfp3rz/jZ8DYvYL3mVNK96of1V7MNm
+yf7lLZQv80gIwL5uF8+uoH2Uhw6M9cJvIwXX9VxQ//cIXyH2yx5e93eCJa3h
+QhHs4ha9ZAesMd8g9YIzLggtkyl/Z+Dcf3H/pkrUVQararSnpMPRxXM9lHD5
++UvP1eif8GN9cA/ZZvP9ybDIsyd5BGbT19bT//Pxc/3/1GH/AexNIgg=
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.77471462238284, 4.811607900361398}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwd1gs01GkfB/A/IS1ZSWNclnGJURRFDaZMXoVdMaZYlcvQxoQyyi0p7BES
+XpFWKLQqly5zrFRsmWpdqgndhIg0Gwpp69XkUu/3Wec4zuc8zzy/y3MxhsGR
+vF3yFEWV4Jf8pWTf8LOCQ1kQaHIo2dM45m24TdhpuR3ublaNyIRTTXxp92D6
+52cLAmDlqoAqtyUcijPzpWUdrFBxVKkbthp40rMMdp9RromkcSjh7uoXS+Ex
+9VvnVbSw/lz57RVwJTO86zzsGsjud4YjzrMZbDqHYuzjS0PgZOuhKy2wzPcY
+lQ8zVu5f6aTNoQofxklb4Cxa8nQ1LBKyh0n+XMvPrl9hcWi5scNKzHv52tNe
+B5+fcSiKgd3r030C4Latt7ZehE0Ez26FwQLui4w+2ObdWyoITm053idnhXVE
+4lP/IfN9LEa/h3P9e8eXwOKOiXIt+E8ez7AP8ShDjaN0eNaTNlwED94ziNKA
+ZdI8t59hPeMFSYqwJMs3kkbmZ45wpYinfCE6oB/1cbTP+dXCnPcut0Vw5WuK
+GQdL7+ZdOQFTzpdNbeHJbesPZ8HqhfF671Fvp5xuYRHcZlI3ewGWJgQHieHk
+c4dag+HJVg+zrzD9TnCIERzflK63BfG5tYszRy0x3zMv+CYsYNdmNsBlU48N
+SL8Yqavdf4NtYhjlzXD3Kh1mCvyJtePIDl3kmfPf/njYPWH+hylYLPdbxmE4
+Puloa54e8n11t+w4XDHEHzb/Aft7NvmbiMSLKwm5Bk/mnB7vhUWKtyRr9GHN
+9LULkV908k6XCjg+0tZlI6wa5/Z8Fr7+9nenZFgoPbF/vQHqEQksG2FZeLOh
+AGY5vlL5SM5f3xq5BDjD2ltpKfrlvK3GLQZOjozK9IApu0m2HywsOL57D9xm
+5qK6Cq6U7fsnCWbIJLXTiCfuNFI8AvtdK2xpgGWzbEYiTC9pcIoj4zkDIbvI
++dI66W4LC3QXlm6AE6Wun7+gvsGXuUwNuFNxZP59mJJ2jHWT8z2Pd7MKZpzb
+6FpI7kPP8jMlsEzn6gSP1N/v7XkOFmR7P1CBy4LuRDfDyp1RL5vRL7aS/pk5
+mNmgppMKW4Sv4GxGfMZqO0c3WOK2prEWds05cVML7gvR3Lsc9fHTLpz8YMGh
+NJPZz/6ArXTsN3XDq2rVeo0Z8HCvSAJf1EwzjoL5etu1O+BY6R/rmohp9T8M
+wPoHrxSoGKKuD6cbZ+C0gp8ubYE5Y1v9jBGPehHNKoBFEWHDW2Bf6w2sdthX
+IexFJhy8OEpjDo7n88NJPb2WHhUMI/TfsaeUQr3THgu4LFhQ+uiAHexzbnqe
+M8wKlaftIe+Tf6QDMfXydTvpn8WJGZkd7OrXs6OBvDfP8xtMYWVH2lgH/DV2
+OlQV5mZ+cyD9byjxZI8jPr9EreIxPGIqqXkAV0qOMJpglnffpmr4Oq/E6wzJ
+x3yi+BgZjzeIjoLz6n2098GFzwd49jCnQDQZCNMZJ61nUI9TqcKcD0w9XVtb
+D5e4jl/0hXN7/nc1EqZtq/+wC1Yf8XIwh/OWcWyS4EFmr/0b9JPeas6tgCd3
+LUutgvu4Bwueks8rdpTEwBoJNzvVUA+fyj3rDjOm9Ld5wSPvU1ZZwZVcOZMi
+0k/DeT6G8K0bSv1vYFl3aiyD7KfuETlbY9TXKvK1hP+6pvM1BWbNMzFwgXN3
+zt/8AM51K90aAfsclOarmWC/EmzmiuCJtf5NbjBTfP5SJxm/W6Z7EBZ0jV74
+DvUY2ewVlJuQ9004sxHm5LcPN8KDdQ8vJMEhgx0h92Fh3ffiOtivrtfxISzu
+ts0eIo5N92mGR2bNLyuhv9tzTBbWkfjtzasN4E0mu22K4cl3p66R/y8N4ZpT
+iTD9flgEk8xXi2ncAXf7l5vRYVGAwiJ7uPIQZ+c01lf13JmhQ/zZhdVJzqO9
+TtE31CuIaPUqht/sT8p4B6ur2/X4w/amuhsH4bJUFX8dWH/s9rYBmH8wrfYJ
+6qdR0V2j8GBaxNMsC/LudTlTWJ8/N9TkCjuF9JcbkXxt13l9B3ftG/Xnwm3P
+3IyeLkefTUJ2ZsDKrCvhlfBhKtv4HsxQFL/NgP9pbapUX4r7GTMriYXra89c
+8oNdX1mf3QcrP7p/rRoWuvR5J8KXZXRbGTzYpWWVDz9+1HfKyRT7Fab18ir8
+6503h9NhoeWfKUPwiN6Tm3/BlcUnW2nIL/qjX6YMHgzfLM+FhT9nphua4XxE
+mv14jNz3ruvP18OiGufSZviXvIemXDhj/0fVWbg9dNFlb5hyTJEsR7+yDLOs
+ybjYYXwXD05kf53iwFZ5M5I9cFjj63pzWFl7y4FEcl/KrTJUyXjF0fhD8MTx
+q63vkE939o8HhPD2JR6z92Ard80Ob7J/zQY3qmCKHrR3Bazs65qUDfP7Q1+R
+92lkc2BZHKz+6IutGN7+i6lxGKlvCe/vQzAnvLomBKYbfapfC4e1j4fuhTs7
+3pdOoj+DPZT8r2T9RNWyGtL/j8sLy+H4oJgz4TDtWEajBGb9lO6yGs6q1Y6R
+R/65KbxxBfjtJabXBlh9kXPE0DLc9zuBwnQ4uZq15CEsFvecfgzHl8ycboZ9
+mEa7GUzUe32ELoGlTh+d9sKT3Ys/DcAR5oHFN+B/v6/BGuT7mjnn/wREgU0=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.069228614102805, 9.329740963760747}, \
+{-1, 0}], LineBox[CompressedData["
+1:eJwt1Qs0VHkcB/Brle0lgyGdmpjN0ANZUx7V6GZqdlWkySZ7sOMxoZLphV7b
+VSqVMiWsZ8Oi51pjaaWsYeymUqP2OLamh9Eg9FAUStnvf886x5nzOd///c/v
+cS7csFix9AuKoqT4JZ8MRX549H8flCVNFd8YjhDATFjp6rWWNOO/KXJRIuzs
+4nPrFPKbnfpDN2HJRd3pKtgnjmfJtoO/yGz+E+f/Du4sCoHbthqpSa73HOgp
+gZmWePI8wx6YV91DcpEqXIy8R7/fYpY9TdHsF1M+WdBMuKJEFAw350VK0i1o
+qvz65DfJsLPRA8YauXtSjc1FmNL6rFewaeabkEZ/FVw2oXYuh01TE8UPk26T
+59NcN+eY01SH+AS3CWZczPbYmNOMly7NRA33dbzdojSjqdhdz/OUxDk6rdiM
+ZnRtW+KzSD2jxgXj4C5RsXwvLL/r+0eLKU2phE5mpD7WyAL+dfiEm/VSAckr
+uN3Ei7stN1jDkq6FF1pNaeZoimPFWFhlrJkxEd9X0d/s/Bb9y7b3dvjjfreM
+9LxOWHUnqxj1MHHlryP0MEuSP5+D+r3HnT/2ArbJt71xGn7eckUxSnJn6Uxj
+9F+eO6rikP5yDbWH4elqlxQR7Df8y+EPmMetqzrHXWQeljKDcMzz2aIsaQWZ
+l9qp4Bp8jJV/5j3p59GTaIrs57dKjWAWTSkyl3s4YT/xV90GjsDyraHdXvDW
+TKb2PkzlGEQJ4DNWDV3TZmM/quR6Dp7fe81pQSgsfx7I68D93ueXZitI3vju
+Ltmn9e7gFf/AfjbrBl3gcKukO0ZzUP9I+mUV6o9PTWDNhfs4m0qEqH9j+3HZ
+MtimOtCsDv2fik2vF8OSBO33nvDv5275r4Ppge5eFeZX4RHWu3oO2f+uQR/M
+O27Evoom943ftriH7CsixGcOXBaZcT8LPtS4L2UyyQN++vQD9jXh3clTr1Gf
+SiocvwSmLhnmamBWkLezO87njJ34voz0M6/h5Erkq3xl2nRYJjPgJiA3rpsS
+ysCS5KK71+DNo7yQbXBfYXGiOeqbUdkUEEPuZ3/97R7U12SULSM5Vdq//xUc
+OmIQdABufjc0Lgr93dReXJcHt3Ff7muHS4T3ZqrJ/CSBsesxnwJDnUk/Oc/3
+O9uA+cnldkNkfrLKDwu/wvtSM7gsYDPsV3XSJAb+uaHru3LS79SoqgJYXzr8
+5CPJW1Y01GAfNpwDV0RzYWZ+cy3sKXI6LYcVyRkZ53CeK0pwaSVuW/N2J7yy
+OGCPlQPqC1jb4oDzgR2bjothqsWNr0E9hbGFzQdhBe9ZmwT1ehnunHoJZh2O
+2diJfmqXGxbegP3YrroIvJ9GdfHTH5Dz2Z5FOsyrMSyo4ilM1/J5YbCvqHrS
+I3Le5MLlXsz/R9VUDw3MDFnZHISXtv+qrHYg7ymvyQHzd9u/SKggzz+WLnjB
+wvs3RvgxES4rvf1GzaKZJKMU0zBy3nZJSiVybpVa4wXLlcrtdcjPCMMT7BzI
+37eg953IR0TPHE1IfzOCvW1x/6RAX+1nMo+WDblx8LIdfOtBmGk86/4Q3u3y
+1GMYpjyiLqzAfiWv8kfHkvt3eL2sh8XKIg2H1Of412UB+lfM7kul4b6rwp2V
+cKs+ujQGbs5MG7DF/Aa+5NkXkfkdTeQfwXxD+AdT20l999Y0tcKRKSqevSO+
+r378NHPsZzBSoI+Fy/jRUlfs53GrMrMabqt9PLQEeaF7wOAYJ8zzvJ1gHnIv
+1881q2BZ9qPqMcj7kz7VpxKnpVvU4/4187tMm2DVqo7haHiU/Dj9//+DTf8L
+sFdb8w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.776116632202752, 3.615966322027525}, \
+{0, 1}], LineBox[{{3.499999999996362, 5.499999999998181}, {6.999999999996362, 
+         11.500000000001819`}}], 
+        PolygonBox[{{4.947677384685548, 7.98173265946094}, {5.897834175673825,
+          8.816718930329426}, {5.206811054955079, 9.219815750748694}}], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.515942703607427, 8.676200089562332}, \
+{1, -1}], LineBox[{{3.499999999997692, 5.5}, {10.49999999999251, 5.5}}], 
+        PolygonBox[{{7.6, 5.5}, {6.4, 5.1}, {6.4, 5.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7., 4.5548}, {0, 1}], 
+        LineBox[{{6.999999999996362, 11.500000000005457`}, {10.5, 
+         5.500000000003638}}], 
+        PolygonBox[{{8.447677384685548, 9.01826734053906}, {8.706811054955079,
+          7.780184249251306}, {9.397834175673825, 8.183281069670574}}], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.484057296392571, 8.676200089562332}, \
+{-1, -1}], 
+        {PointSize[0.04], PointBox[{13.5, 12.5}], PointBox[{3.5, 5.5}], 
+         PointBox[{7., 11.5}], PointBox[{15.5, 5.}], PointBox[{10.5, 5.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T10", " ", "P1", " ", "N19"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdfei/fiijghgjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdfei/fiijghgjhj.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:eJwl2HlcjGsbB/BHG6JMReZENSlpc1qElGqoiLbRLi2jQiRGhYRMTjQSRvKW
+QYaOSuEkqUlxUlosaRzJSDItElFRjorq/d3vO3/U59vMc1/LfT/XM590Qnd6
+bpKhKEptEkWR35Qi+WHMpIYn8DJgUtIPPtxyIybVU3dY7Q0czWoz2wVPeT9R
+/gBWjDwdqAtzdu7wvAP/47Zib5Mhk+IerzhXAl/W052UDNPUR+7UwF7q9Vtt
+4WHHW0YdsEDv1eAIfmeanZUq4u8ax8SC+yRuiY6FHbxs27RfqbDkYsX4PviI
+7ojDZpglt6m6HBZdTWa4wOxdr0sp5BEmZpbZwHFz2vucYIuOxBtLYeG1FXE8
+eMDzHd0O9vd7dbgG3pqbeNEN5vU7HByFg4UyseFwD7ds0Xz04YS3KpdL1nNL
+/ugA1/CGIi6R+H8xo3xgtvbdYpKv2D1dfz1sOTTaRfpkYLlI0wPOMa0+M0Ti
+5+8dXgrnNoefUkDelaONP2bCTMfewRlwfYtj1wfEHzk1dQWxwcbqn0Xw7ewj
+kbJwXrrGqzj4bLfPx16Sz5IWl+XwnoddpfUwcynHhdS/SdE8UADTfGUe1OG6
+7mWPWjfCdEP+zrNwnPmHOww4L6v7eSTp7/3F9ZIF6O+4ZMwVnrg/2SEVFh1T
+SrWG8w+MpdjCzLI9RxbDCcfttPr1kf8alh/Zn4qSlL3ZMD/F+Jk3qUMr+msg
+LIxxpMfBY/0yBZowO1yuMQfeaWC088N85KPsOPkdbB/7/lI57FxyaosW8i8v
+Wap/HpYuj3QIhau2CrYchfO81t/NhRvnbl5xkFx/1/Z1L7xSboviIbh+ekaF
+Mfo571mKIAUWKsoWhcOzLd39s2AGl+eXDhfNcncRwezvNqUi2GaX3qJmmM8f
+DxLDkV3Jl7+T66M9trfAxrcT1Gcif6v07cJm+NPuYE1TWFzstr4Gbvdy3uoI
+5z3xTcuF3e+96l8Hm70cfJVA1ot8RvmS/ihcWewGFzgXrPcg/chZojULrpq2
+xtIW5l7Y4/Ea9cxsavHQhuOMnYsuwOLlbYMkn7iqfivSj6t+0s8P4IhL7ypM
+YLkM6z+SYOak3Lfj6Oe+Iovt9jBNxO1ogb3qDUuG9PD5Qx2XquAb+ysLc2CW
+HjO0lJyHT3L/+MEi9ZG2Mrirrf2cIszjaJs8htuU5ux+oIt+9+39+wNMT1hw
+OQFmc+7HqiC+0zxzVUe4ckm3gNxvu2u2BKrBcV3lkw+TuXH55uUv83C/u8ub
+P4Tveu5LegEz1/9cM5XMmSgOowbm5deFucM7Wi2mVsH1806c4sN/D63weAT7
+MzhUAxz9pC3lNcyoVjOZZIJ8rAM+D8B0b7UeI3iJgsY6JcSXUvP+cIZDtEIC
+TWCu4IbEHy4+dCPNheT/FyN4A/xSJnNPBExba2TIgreuvnKVC7OSqvqWwifU
+Pg2ehiPW/hhVg9Uz/Y4I4EI/qU438llYZNaZCYskEfmFsEBmllIqWV/YtWgP
+3Fh3MSmG9GdVdsYy2IOj4eVB+qnWUTeGfvB+6k9lwHzDCzfIPMo6yhB1o57C
+GzUK6WTOHq5+/ydsVrNvVSTsJTkcHwhz2lLj3GDvgvCCGXCma4MhmQcnYzZJ
+K3WYFPVT3tcKLmhIyYyGmbrpgSvh766fXBfAEf+Z+Ws9PPRhyKudgX4/DvBJ
+gPWPe9degeOsTn2/Ab/UyNgcBTvvnejuhhOSH6SuhMWS1jp91NM6X6SuC5sF
+tb/fRubbAvPgGeR9JUEQ6cejvKuWk+G8I702Q/BWBc77qTDruotwEfqpnDBu
+qw4Lj+q2RcJlh+6eN4IHpC/PC2BNGdkJRxL/p0zfPdguKmheGMymNUQ1keu/
+N6YfJvF5c9a8hWNqFzULYakLw1UCHy5eEltO4r0u7KyB+Ssq9MUwX+JHz4U9
+DX0+tZLP+/kfPgjLlQpmS2HRpYVLXWCmccgeCUzRg2+pwolZTS41sOR02W0y
+D/6YrRCWAzN2swwFcI8tc8YBuHBrhiwbDl/nZrAa5q5n0sl80s3+iyL11+v4
+UOPo52eljOtHtXH+6lVGW+C4ovADA1q43rL1WTWs+PIr3RuOKE2+XwYnscOi
+SzQRX+8l5x68Y4KXPBeuH3j15RkcvaPd+PhcnI/0zItf4ED3s40KMHVg2J2O
++L/HDbqcmYNzFZnsRObRSruakkVwYf41txSYtT/R7pMG6h/Xa34KV34co4lg
+6k6vEqm/3vCh20WY2f9Ezg/u4+TJnYN7niY3ZMLTt99iXoPZTY8vkf0J7n6u
+9QQWZkcPT16Ic3o1sn8UzospLjGDh7TUN1oiPj+ywdINFvqKiqJhNld7QyDM
+rSn8VAhbOb+9HgSzRcdpn2Bpyy23dbCyc8Hm31Afw0iXsoKLHjtetoYHkh/M
+VYPjjy6hr4UliSmHu8h8oMd+dYSdaZaJN+HPWZorDeGe6g33Y+CA2gd6/2J9
+7nuxOrn/vw3VVRfAnHtBB3+iHxcWHPNzgVmepyXVcGi2Cf0V6uFfUG9Pg/3z
+e3U9YQOJtkwkLJrWHVD5G/aP721L5ptGpZGFPsz04KnZwZ5W44d4dMwBf+cY
+G7I/NSUOn2djfaVpN1fBJw3KI31h7smE2BBYouV04Yk69oOr05JE9ks5ccQD
+Zmv+CrkDpz498KN7FvpMG5Pvh6Vv1CzOwJxQs1BTsn+78919Yaq/qoLU+yte
+/aMZzJx3wrQM1gs6kzoPFrWU1P2CtWRVywzhyul9uTboJ08nZ8gBdjbLNoyB
+JV+ceqLgiP5HP4VwQMeJo9mw1fYy22rYzrfWWgpz9w6lS+DAtVO1tJEv3eTt
+cim8WZ5htkGdPC8uzmiBs3yOnD4FS22lybVwvtXn8lLYeaVdeQ5MvS8vaST1
+69x0OwDTZXWcmuBMh/jgNbD6tKxp1bCQfWUnDf59zpYCATwsX+1MzmNKuss/
+AbDB9JfNGbCiR6ydHDxFxUYxGHY2enwnk/TnTU6xIez7YstXDVJfVGjEGPpp
+ESuXcHIm6j4WF/AGztKoSfuhhvxnzl5Dvg/ER3lKA+CBR95bKmD+2m0B91Tx
+vqmTxwPyfAjfNK4LC7f9Gn0Bjya5njujAms2PRyE54Zp8WkqZF737dAm+Qoa
+rmfRcL90XzT3IefTe/U3Jjz8jSZOg5tKZQa/zcD7jauKXsKt3muL0uCBbCPZ
+Oahf1N1pvhGeYrnreQjZv55noYFwZeU988uwlL7PlAuzMxLZrfCBGuOCWpgR
+oNSh/DvW+TPCeCbisWawLy2BlcUjNu6wpH3T+DrYX2XS36k08n3vxFAIfKAz
+W/QYjnBvVWXDvy46LZJFPeLN/6Z4whZ7lPeZw+yQNhMreGbdybXrYOdMXpAq
+bJ0iTwuBaWtuKnQiH/EbZVl/2F//Avc6fMX+lbs1bNAxtmcXXPIzaL48nDep
+45ElbBbZWC9CfOn2oO0jZD9np/B8YYPKdSurYJOD0rAHqG84uXP8NGxguq23
+WBnOnS9Pnj/U1TtHTimRebXJ1QMW/jnXImA67puogDVMWPR7V57WNJy7Yru3
+dnBFz/ZP3VNxXYfAhTwvzFbPfVIxBXlzFi/dRPZjkUPitcnk/nHLOQ6zJ0yt
+7yigf5xeJfI8a/3XqbxbHvu9oyHsB1lfZ6uaAzysT1tC5plrmDu7QQ77dpxf
+R847v8I//yjMKrptWkX6M3ZVEiVHvncvOCCP/iXJNN07BEe4qLxwgHtSe5aX
+wvT6+enxcP2NG0lKWD9vmebeXFiSJw6OhyWtpjn1cMQmk1NDcOYfIS9aYfHj
+L3bRyFe6VLC6E67cU7rjI8yfptD7Bh5uOreNhfoM3s9aVQc/PXvJOgseKA/Y
+nwPzY5oVn8DDH/yt98PCVK2jYpg3f7RgNVmvIFs7H+aOJ6wn5y3d4vpqH5g9
+X3XGP6T+jf7HniPegKxX+Vm49faPUwyYI8tyI8+Hp2XFaquQL2fd/jQD+PPA
+7purUW/c0vnqY+gnbVW3wEQW9fG+y7bCko6z7LFJmE9f7yrXwZbfJjjVFPLJ
+Lg78m+z/SGeMyoQ9xfOxiSffF7jG58Nv/rKnCneFe70m50n1/lPOqD1lFvbR
+chT2l6iobhu2pwZ2Ozfpk3mUm6l57V979LMymDyvmPwjN5d9t6e44v0nz8Nx
+Tl+e6w7ZU/5TvzxsI/tZvfFI5CDWW2dlqIf6DZRu82gw3cPmUQScJ9/LVoZZ
+cyvKr8FTOMGpgbA/Zbayi3hezPs+mHcorWeWKc7F+izTEqwv3PHm8nLYucmy
+Xoj4jIlH73xhbuKUmPPIj9E58GcYTNM/uSzthz2V52rBD4V5ShzPXaiHfUW/
+3QuurFWZrD+CeqTWu62It15OvQRPmZJ3TwWmZnXWNsLid6U328l5qO3qLfjf
++79dy4fNtplNWghLTdcE74RZvc9MWFifs8HnlgXMfrmjWR3xB64FnP1Bnv8p
+RhlHka+VnWtvJexskDuch/oYscfZp+E8jX0Kx79ife1mj0gyv0YvRu3rs6dE
+hwavskg/Z8eHCj9ivyyDnqyEOUlzhm91IV7ahzPE3JH/bL7+DtebLFhMPs+U
+mZYY0WxPGcyUdSTrVWbI3Kl6Yk8Ny/HL0sjzhmUzFlRmT9XL/Bp/SExeqbb/
+///IQuZ/Af+ePk8=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.82330080216169, 15.930190164263845}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1AtMW1UYB/BDwY1HxjoQChOEMhM6XE2XgDJfPc4h4yFUxmubKYUI81FG
+EwJ0Gy6dDALZBgVxRfagVg0D0UGN2i28JY4hSosZdAisbCyjMKCAIEJh/o/e
+pLn55dzvfI9ze/kZOQmZHEJIJH7sTuxPcLlRYmN3L0oKE5aKKLPAv7YKbnWq
+flvqSgnhJe99kZlfr0tzocQ405A/9zQlgpyxzRhnSlTXp/a1w52ZCd3Pb6VE
+dtkzph4O/eKdoa1b4Oi6rEb4rCIi1uqE+NnjwluwfNq2ZnakROtlEdjh/hMh
+z97jYL/hmyNvIZ/fAdEGB7YZUs1fwj7vH7sU7YA8x0fm3b0pCfd7mH+TUKJY
+GUoqgvuny1KSYG5k1d112PBut8gP7uz5xD+XR8mr3mE8d7Y+1GZ6ACtjf4sW
+wCLpwOxBH0qes+oTs2Dt4ZJHV2CfQOtL3bB6Z8bkOFzTckYfivzql0seOPti
+X27d+R9gVZd83BdumrcuvIJ6tf2L41xYEPmtqR2mYwMuc4gv7Sp6Iwz9ytaf
+uqKHLcWZ4xeZvz96X8by6VeCR+HA7bnedtTX6x42uMnmU3E+ohTuaXFzXYON
+5/ICXGFjzkRDH4tXnekpQb+2PyaP5sCKuhsXHGFy5+q1KZb/Bd1gMebH3bVn
+IZzVp9t+3QN2ungk6T3Ub5s5++t3mL/5859LFGxed5QhUjh1TuN1e1NMiOAb
++y7YmJ46qraLCU3MPM2BRR8Xj0StiUnnEf69NU/kCTbv3rIqJqJYbeg2rPc+
+/rNjeFlMmndvnAhn7ws3oXFgCfERv9SeZOvleUkbC7DwqzIjrPJ3nsy2If6g
+Jp29b5aVWpoyJyaSiXR1Pau/wNPn1GPsVyhxDkB/xq5SQdwM6vPYX6CBZZ08
+88C0mAQaalRumI/sQE3AKixpu/R3Hiyq49//iT2fN8AbZPNTNlT+g/0s0jHD
+M5g/Xb3hq0M+kX74VDw7Dw3fMQr1qFtn5j9k5+9Isg+hXu3gUpMc1r62sF+6
+iOd7b2UksvjkPmUK+pNIvx4NgpUf7O0W/iUmqsvnVu8iH/1oLs4EK/iPqgph
+4s0rCMV8aKX8mDuscOiJj4VVT3KnPkU/XNE6fwesrqxw94BL9R3tpxGvFcqD
+yjEPUW1zUzXyWWKiirbBxuo3hcmopzn8pPwzzNMgT/PtQ/2qH7NbQ2DJYqNw
+eRb5cq91mHBenUG9h6xWMeFOLjmUw1yNNa7ioRj/347gDFjh8bqfywT6Wzts
+ioct/D2hy2bE/76vLIU5P43DNWJ/r53tSlilzDLp2vE8R3C7Bf7v0rX9/33x
+pP8CT+Wxpw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.9692031021678298, 4.320378284825192}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.99999999999727, 16.999999999996362`}, {7., 
+          11.499999999996362`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.754949725219685, 15.745496856246135}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwt1gs0lHkfB/DHTLm/uWwiShhF2Iz0jsva3ifeiuhlXWokl2jQIhLOMCXV
+1nHLLVrRa2ULq2RWuWyFWbVWUTuxnR1yGbdcs6jWaNn2+3/PO+c85zmf81z+
+39/3PPOcxzA42pPHoCgqExvZU8sf8TOjKRnZm9KU848lIe7mNMVmxMbqbaWp
+dU+M35TBjcOqTBPYwCxcZRHmt1XlGsIL/Q3GzhY0NfdaeVEZNm7I6siDnbvV
+FEZxv75c0Vw3rHj7+ld3YM4lR3WlT2nKY3pMIQqu3fCXDxtOjd8jMYKDBJcb
+nWGRcdzDbhOaimk6r+gJSy6xHp2HVw2OLrjBXGa1gg089Ya/aA+HP30XP7+F
+ptTt73vqwzkNyrn18EKTfv8S1g+KbP9XGtyWEzskJnkv+5dFwHc+uzVTDgt/
+5rwNgJMH3l09Q/zD6vgQeI1kzj8ALnWfP86H2fpbvffA/ITNNtfgWKpYwx6u
+DDR17YSdS+eTP4PZqblxq5Gv2arwoSus060kc4KlfAfNCFiWMNZB5plTuTtV
+CHON7LpF8LYNSX2kL3pGSXcRNjUKbF6PeRQdTNRY6KfdUffnMNLf48DGXTDj
+gUb9fbh9k9aAByx2nWeobcP8r2rM3eGJf/trHIFT83WcHGB7h05eNezxRqdV
+B+a6nZXMwdxvfOxeY70dvz94ZGqJvqZ4WhWw822+mRfcrsAVBMCHetJfHodl
+IVW66rDInccTwDE3/RZbMH+KfNbBRFjHwsQyFhaGRH08Bpuu39dkBssOj8S6
+w+wtjvSbzTS173xLhAXxsd7HD+H0vFebVsEiv8yrxXCSxECzF/kq03+0yIDt
+P5gMfg+zbUcWiW3PBStmw6bKX/L/C8eVd4nitpG+vGyaYVXRzmYeuT40a2Aa
+nvXO1DhK5q0182Mhj/3Gi4on4MZBd+Uj8MxKm+4lWOfrE7OlMOPA0HADLJmq
+nRyAn/uZGJO+CiWsD+sw/5onoj5r5OXah8XthjPN5UNSSH8VoXZh8E5WfGYX
+XPlebjQRvqPCOP4JG3ldN84I4NxnX/c6wDJX1aZIOFI9oj0EnmNqNrvBdqNR
+hRfJ8bWJbhvhth7x+LewWFRUIUWehltuN+6T808u/XIVniwX6z2FSxs8/Nzg
+JDOhfBfsLK9PL2P+g4fuZxC3V5UVV8NFwdTOTpg6XxN/FE7dG7FWBHMLbl0w
+hu9Jr/nVkPM/3bE8Z0xTnZrTZcVwSv0J70742nDGzf/lq+iwbIQfn6OtYmHb
+HWt21sF94/MqQSTP4QDrR7Dm96KeL+CJg9mdUlj1NHO1C+zBKBpSwXqKgrzv
+9pA8p0wv7IJbn2d95QqnDoRbJsNXZvMmD5J5f7833wQPbJ9qioCFoXpCMt96
+sVYSydOoftafg/lHwtKsKkhff05ywuCMhG2lZF7pbxc/ZMChnpMO7+GgjCDt
+MlikpuGxyQrzDo53VcCrS3JVXWCJgVMw+b8X2jlXxcA5quPvz8Dlhjop+TBt
+/6LeC67m2224CweVZ9ath5c3Bfh2wOqfL3X8iny1LQnRfXChXu7JVFjma/Rx
+DBbWZ+XZkvxqhtoTVuT90uc4iX5OZiVZj8CKWhpXSuBABR5HAstkr30Pw4wF
+b7922ENQIN0MJyW+Na4jXmUvXmFhnl+Ye0thcaL28hhcwBBcyoCptGGXQZiq
+5bTyYTbr+o1JuEWuO+8YXKndv8LE/Ry36/MDYZGvjr8FrFGSU+oH6xhdXw6E
+77UyBwNIX5kGscWwHvNmCble1pYn7YWL437tE5D11J+zdTHfi6suWwtIX0L/
+/T6wkeep2/fgCa3dAaSPiap31j2wwVFaTgi/HXrmJLcdz+P4PsETOPpupIU5
+LNx+RdoFM0PNWT5waVYluwPmn8o7fBo27ZHn1ZLnV6NkSxmconn5RBpMM7Pl
+WmHx50UcT/jQ3r66V/DEe3+eGqw9yQidhRVVb3MfI//Th5bFS7CU99NIHOwZ
+reS2AgephuiSvp1abfrJ8coJVa0e9FecX6o3B6e6mdflw9wzNewh2ECLjvSD
+bSnv3Odk/ZcXlNjwN9E1Ez/A6vUvc9bCBrNVH2/AOdMWG5Xh1pTeslySryVF
+rA572ZinnoUbM5+9MIGn1vb/MwGm9E/77ocPRHJmYuDw/0R3JMMjWZzLsbAs
+0LS/EY7y9KoWkD5e//HTIpwUxPTIhJ05XyTYYB5u8Tkjsn7hRbr7JJz253Aw
+6YsbEbdQCbfYGcyPwZKwbK9ueFdVfuA/rJG/jfcJeT/Y9g8o2MCV++l1K7BP
+jDzrCCycatiyBM+IkkfS4JjdoQqj8IEb6dk1sJQdntAMGxYkF4lhWUGyUTr8
+h0P0g2nYwyoqzwWWIx8tO/7/vcKi/wZ+uCyP
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.306417572928748, 12.091885689614742}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt0QtUzHkUB/B/Yaep6SWO5PQWopgeK4/kl5BnpJFtt9lGr+khpTgbtVt6
+KCLTS8VKtoNaKyOnmmjHtKtkW0mkKU4Ny+koKW1rnWW138v+z5nzO59z7+/e
++7tjHRy7LUyb47gQ/Oj89C1in85pjHv66IJ4HawpS7hkD+cOLqosgJngfPoy
+WBntHNJPDh39RwiX9J05NE3IuA5m2iCA7a56WrjBcRP+Re0mjIvWOIr94fLm
+xtxEWOoh8tkDy7eLa/XhQsduxyxYM7yRlz+VcT13fttTDEs0b1bpwsVJ4o6z
+MOMPy5OMGfd2vq3XeaofsH9gyIhxh3S/5p2DZVq3jkjgX309T5XBqsAOU6Uh
+4441bFYU0P21rFdtwLhpa3Q2ZlK/zt08M/gLj6iIvRR3aj+Rrc+4FZ7pnsHU
+v8Um0R5WN/ZO30p2mxU4IWDcSI6D3Uq6/2VBkS7iabm2Z4V0X+fJ9PXwhGvt
+GTvyjO0ZdXBgXYOBJZwa9Cx2E/qty/apMqf4H00l2pjv7urkEWvYqu+sz11Y
+9FWKlQPNX6UY8cN79DTjbu7w6I3WbBVc9FDvlS/VExl3zsU+8gYV13bBW407
+pRmw4cLWRzmUX1AkuQffupolroa5zh2ZtE+JXaXdfVi4qvagA9xk0z3xlu4X
+v+N/DhdEpV+0cEJ+TsRfNrBblOPgKvLuqI1vUG/4QPmxUFil2eAlh3UN4jPT
+YKN878V+8GVfh6FTsGyBIuMp5vUzKBXIYblib2wwvHy8LkEJSyS72i/jvQe2
+fBhqofrnllXKsB+zYUXGbTg1su1yPPYnTdkmo7iVieGsndi/OLWq/OP9n7fk
+h+sxLqv/SGoN5VeE1x3VZdyy+RXzK2B2q7bmEZ9xFk82KfMoP6q9PwCW8Rrj
+U6jftlcH9GC9kpmHY6i+/Pi+MR3GhZY4eogpXu8aZIB4Subyxi303pBdUYHw
+0oM1+mspf1P30W74kst6Y0/KF9xQJKJ/iql+HFn1otrRDfO1yx8WedN8afse
+62B+ZWviT35wefjM3qdwTt+T0jBYk3XmcQPeW2m7RutbqnfTuDEN+9CaWOFd
+Svn92mPO2FfcG2VJA9myz7gJVvyZPP6Y+gX4npyK/TZJoxdrOyMecLrKAU6z
+bpk9DzYyq2km+3ebfLeZ4pMEcyg/y+kgbw8smREvvYZ6gxajJ/NgTaEP3xK+
+KDNzrSbv5hXswDxXvJ3fN8OqOa/F0Zh3SVWin5riz/2lIXjPhwcS9TPYyrD+
+xXq8vypiMHoITq3vHrDHfgJcJrm8pHz+y2ra74MFmsIBmPOP3D4J+zdRSBb3
+UX3+VvepPMaFCa+MddC8QbKS1Z9hzg+p91Tkwi7+D1MYNy/I/R3Np7KN9BLC
+cfEdF7+neLVR29hkxtWoZbNzqP/S9o5BOOl9/+kksruP9Qzkq++sWBpL8x4u
+c9kLd5kGjofTfLl5vu/hgZG20yEwM9TquYD+peHNbWG0r5W8ghjMV9EX3xVD
+92M2mHth/nNpgrsf6+dXSszxvuffjGYfp3rz/jZ8DYvYL3mVNK96of1V7MNm
+yf7lLZQv80gIwL5uF8+uoH2Uhw6M9cJvIwXX9VxQ//cIXyH2yx5e93eCJa3h
+QhHs4ha9ZAesMd8g9YIzLggtkyl/Z+Dcf3H/pkrUVQararSnpMPRxXM9lHD5
++UvP1eif8GN9cA/ZZvP9ybDIsyd5BGbT19bT//Pxc/3/1GH/AexNIgg=
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.77471462238284, 4.811607900361398}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwd1gs01GkfB/A/IS1ZSWNclnGJURRFDaZMXoVdMaZYlcvQxoQyyi0p7BES
+XpFWKLQqly5zrFRsmWpdqgndhIg0Gwpp69XkUu/3Wec4zuc8zzy/y3MxhsGR
+vF3yFEWV4Jf8pWTf8LOCQ1kQaHIo2dM45m24TdhpuR3ublaNyIRTTXxp92D6
+52cLAmDlqoAqtyUcijPzpWUdrFBxVKkbthp40rMMdp9RromkcSjh7uoXS+Ex
+9VvnVbSw/lz57RVwJTO86zzsGsjud4YjzrMZbDqHYuzjS0PgZOuhKy2wzPcY
+lQ8zVu5f6aTNoQofxklb4Cxa8nQ1LBKyh0n+XMvPrl9hcWi5scNKzHv52tNe
+B5+fcSiKgd3r030C4Latt7ZehE0Ez26FwQLui4w+2ObdWyoITm053idnhXVE
+4lP/IfN9LEa/h3P9e8eXwOKOiXIt+E8ez7AP8ShDjaN0eNaTNlwED94ziNKA
+ZdI8t59hPeMFSYqwJMs3kkbmZ45wpYinfCE6oB/1cbTP+dXCnPcut0Vw5WuK
+GQdL7+ZdOQFTzpdNbeHJbesPZ8HqhfF671Fvp5xuYRHcZlI3ewGWJgQHieHk
+c4dag+HJVg+zrzD9TnCIERzflK63BfG5tYszRy0x3zMv+CYsYNdmNsBlU48N
+SL8Yqavdf4NtYhjlzXD3Kh1mCvyJtePIDl3kmfPf/njYPWH+hylYLPdbxmE4
+Puloa54e8n11t+w4XDHEHzb/Aft7NvmbiMSLKwm5Bk/mnB7vhUWKtyRr9GHN
+9LULkV908k6XCjg+0tZlI6wa5/Z8Fr7+9nenZFgoPbF/vQHqEQksG2FZeLOh
+AGY5vlL5SM5f3xq5BDjD2ltpKfrlvK3GLQZOjozK9IApu0m2HywsOL57D9xm
+5qK6Cq6U7fsnCWbIJLXTiCfuNFI8AvtdK2xpgGWzbEYiTC9pcIoj4zkDIbvI
++dI66W4LC3QXlm6AE6Wun7+gvsGXuUwNuFNxZP59mJJ2jHWT8z2Pd7MKZpzb
+6FpI7kPP8jMlsEzn6gSP1N/v7XkOFmR7P1CBy4LuRDfDyp1RL5vRL7aS/pk5
+mNmgppMKW4Sv4GxGfMZqO0c3WOK2prEWds05cVML7gvR3Lsc9fHTLpz8YMGh
+NJPZz/6ArXTsN3XDq2rVeo0Z8HCvSAJf1EwzjoL5etu1O+BY6R/rmohp9T8M
+wPoHrxSoGKKuD6cbZ+C0gp8ubYE5Y1v9jBGPehHNKoBFEWHDW2Bf6w2sdthX
+IexFJhy8OEpjDo7n88NJPb2WHhUMI/TfsaeUQr3THgu4LFhQ+uiAHexzbnqe
+M8wKlaftIe+Tf6QDMfXydTvpn8WJGZkd7OrXs6OBvDfP8xtMYWVH2lgH/DV2
+OlQV5mZ+cyD9byjxZI8jPr9EreIxPGIqqXkAV0qOMJpglnffpmr4Oq/E6wzJ
+x3yi+BgZjzeIjoLz6n2098GFzwd49jCnQDQZCNMZJ61nUI9TqcKcD0w9XVtb
+D5e4jl/0hXN7/nc1EqZtq/+wC1Yf8XIwh/OWcWyS4EFmr/0b9JPeas6tgCd3
+LUutgvu4Bwueks8rdpTEwBoJNzvVUA+fyj3rDjOm9Ld5wSPvU1ZZwZVcOZMi
+0k/DeT6G8K0bSv1vYFl3aiyD7KfuETlbY9TXKvK1hP+6pvM1BWbNMzFwgXN3
+zt/8AM51K90aAfsclOarmWC/EmzmiuCJtf5NbjBTfP5SJxm/W6Z7EBZ0jV74
+DvUY2ewVlJuQ9004sxHm5LcPN8KDdQ8vJMEhgx0h92Fh3ffiOtivrtfxISzu
+ts0eIo5N92mGR2bNLyuhv9tzTBbWkfjtzasN4E0mu22K4cl3p66R/y8N4ZpT
+iTD9flgEk8xXi2ncAXf7l5vRYVGAwiJ7uPIQZ+c01lf13JmhQ/zZhdVJzqO9
+TtE31CuIaPUqht/sT8p4B6ur2/X4w/amuhsH4bJUFX8dWH/s9rYBmH8wrfYJ
+6qdR0V2j8GBaxNMsC/LudTlTWJ8/N9TkCjuF9JcbkXxt13l9B3ftG/Xnwm3P
+3IyeLkefTUJ2ZsDKrCvhlfBhKtv4HsxQFL/NgP9pbapUX4r7GTMriYXra89c
+8oNdX1mf3QcrP7p/rRoWuvR5J8KXZXRbGTzYpWWVDz9+1HfKyRT7Fab18ir8
+6503h9NhoeWfKUPwiN6Tm3/BlcUnW2nIL/qjX6YMHgzfLM+FhT9nphua4XxE
+mv14jNz3ruvP18OiGufSZviXvIemXDhj/0fVWbg9dNFlb5hyTJEsR7+yDLOs
+ybjYYXwXD05kf53iwFZ5M5I9cFjj63pzWFl7y4FEcl/KrTJUyXjF0fhD8MTx
+q63vkE939o8HhPD2JR6z92Ard80Ob7J/zQY3qmCKHrR3Bazs65qUDfP7Q1+R
+92lkc2BZHKz+6IutGN7+i6lxGKlvCe/vQzAnvLomBKYbfapfC4e1j4fuhTs7
+3pdOoj+DPZT8r2T9RNWyGtL/j8sLy+H4oJgz4TDtWEajBGb9lO6yGs6q1Y6R
+R/65KbxxBfjtJabXBlh9kXPE0DLc9zuBwnQ4uZq15CEsFvecfgzHl8ycboZ9
+mEa7GUzUe32ELoGlTh+d9sKT3Ys/DcAR5oHFN+B/v6/BGuT7mjnn/wREgU0=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.069228614102805, 9.329740963760747}, \
+{-1, 0}], LineBox[CompressedData["
+1:eJwt1Qs0VHkcB/Brle0lgyGdmpjN0ANZUx7V6GZqdlWkySZ7sOMxoZLphV7b
+VSqVMiWsZ8Oi51pjaaWsYeymUqP2OLamh9Eg9FAUStnvf886x5nzOd///c/v
+cS7csFix9AuKoqT4JZ8MRX549H8flCVNFd8YjhDATFjp6rWWNOO/KXJRIuzs
+4nPrFPKbnfpDN2HJRd3pKtgnjmfJtoO/yGz+E+f/Du4sCoHbthqpSa73HOgp
+gZmWePI8wx6YV91DcpEqXIy8R7/fYpY9TdHsF1M+WdBMuKJEFAw350VK0i1o
+qvz65DfJsLPRA8YauXtSjc1FmNL6rFewaeabkEZ/FVw2oXYuh01TE8UPk26T
+59NcN+eY01SH+AS3CWZczPbYmNOMly7NRA33dbzdojSjqdhdz/OUxDk6rdiM
+ZnRtW+KzSD2jxgXj4C5RsXwvLL/r+0eLKU2phE5mpD7WyAL+dfiEm/VSAckr
+uN3Ei7stN1jDkq6FF1pNaeZoimPFWFhlrJkxEd9X0d/s/Bb9y7b3dvjjfreM
+9LxOWHUnqxj1MHHlryP0MEuSP5+D+r3HnT/2ArbJt71xGn7eckUxSnJn6Uxj
+9F+eO6rikP5yDbWH4elqlxQR7Df8y+EPmMetqzrHXWQeljKDcMzz2aIsaQWZ
+l9qp4Bp8jJV/5j3p59GTaIrs57dKjWAWTSkyl3s4YT/xV90GjsDyraHdXvDW
+TKb2PkzlGEQJ4DNWDV3TZmM/quR6Dp7fe81pQSgsfx7I68D93ueXZitI3vju
+Ltmn9e7gFf/AfjbrBl3gcKukO0ZzUP9I+mUV6o9PTWDNhfs4m0qEqH9j+3HZ
+MtimOtCsDv2fik2vF8OSBO33nvDv5275r4Ppge5eFeZX4RHWu3oO2f+uQR/M
+O27Evoom943ftriH7CsixGcOXBaZcT8LPtS4L2UyyQN++vQD9jXh3clTr1Gf
+SiocvwSmLhnmamBWkLezO87njJ34voz0M6/h5Erkq3xl2nRYJjPgJiA3rpsS
+ysCS5KK71+DNo7yQbXBfYXGiOeqbUdkUEEPuZ3/97R7U12SULSM5Vdq//xUc
+OmIQdABufjc0Lgr93dReXJcHt3Ff7muHS4T3ZqrJ/CSBsesxnwJDnUk/Oc/3
+O9uA+cnldkNkfrLKDwu/wvtSM7gsYDPsV3XSJAb+uaHru3LS79SoqgJYXzr8
+5CPJW1Y01GAfNpwDV0RzYWZ+cy3sKXI6LYcVyRkZ53CeK0pwaSVuW/N2J7yy
+OGCPlQPqC1jb4oDzgR2bjothqsWNr0E9hbGFzQdhBe9ZmwT1ehnunHoJZh2O
+2diJfmqXGxbegP3YrroIvJ9GdfHTH5Dz2Z5FOsyrMSyo4ilM1/J5YbCvqHrS
+I3Le5MLlXsz/R9VUDw3MDFnZHISXtv+qrHYg7ymvyQHzd9u/SKggzz+WLnjB
+wvs3RvgxES4rvf1GzaKZJKMU0zBy3nZJSiVybpVa4wXLlcrtdcjPCMMT7BzI
+37eg953IR0TPHE1IfzOCvW1x/6RAX+1nMo+WDblx8LIdfOtBmGk86/4Q3u3y
+1GMYpjyiLqzAfiWv8kfHkvt3eL2sh8XKIg2H1Of412UB+lfM7kul4b6rwp2V
+cKs+ujQGbs5MG7DF/Aa+5NkXkfkdTeQfwXxD+AdT20l999Y0tcKRKSqevSO+
+r378NHPsZzBSoI+Fy/jRUlfs53GrMrMabqt9PLQEeaF7wOAYJ8zzvJ1gHnIv
+1881q2BZ9qPqMcj7kz7VpxKnpVvU4/4187tMm2DVqo7haHiU/Dj9//+DTf8L
+sFdb8w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.776116632202752, 3.615966322027525}, \
+{0, 1}], LineBox[{{3.499999999996362, 5.499999999998181}, {6.999999999996362, 
+         11.500000000001819`}}], 
+        PolygonBox[{{5.552322615314452, 9.01826734053906}, {5.293188945044921,
+          7.780184249251306}, {4.602165824326175, 8.183281069670574}}], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.515942703607427, 8.676200089562332}, \
+{1, -1}], LineBox[{{3.499999999997692, 5.5}, {10.49999999999251, 5.5}}], 
+        PolygonBox[{{6.4, 5.5}, {7.6, 5.1}, {7.6, 5.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7., 4.5548}, {0, 1}], 
+        LineBox[{{6.999999999996362, 11.500000000005457`}, {10.5, 
+         5.500000000003638}}], 
+        PolygonBox[{{9.052322615314452, 7.98173265946094}, {8.102165824326175,
+          8.816718930329426}, {8.793188945044921, 9.219815750748694}}], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.484057296392571, 8.676200089562332}, \
+{-1, -1}], 
+        {PointSize[0.04], PointBox[{13.5, 12.5}], PointBox[{3.5, 5.5}], 
+         PointBox[{7., 11.5}], PointBox[{15.5, 5.}], PointBox[{10.5, 5.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T10", " ", "P2", " ", "N20"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdfei/fiijghgjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdfei/fiijghgjhj.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:eJwl1gs4lGkbB/DHKYfEVDZp7WdyihxLRKkZLR2wOWxpiiL0RSSKbSqHWacU
+orZCSbPSSZlmk5o+rGlTCWVWLEUMivbLYUixTn3/5/rmulxz/a73eZ77vv/z
+vjMWBx7w3iNPCLmKP/pOxr/iNZ9N1CkWs4lkt/8fB+DoogyHuTC3dij2/Tw2
+EettrbeARU2rHuyB+7u63bbCacvdTo7OZRMT34rWVNi+5njMOVhRds70ERxQ
+0+ngBlsHvM2V12cTqayuQhv2bGHYbYJDkn1GJxlsEvt+6Zsz8MakqfYxWPQv
+97Vv4eyXjUfUsF4rr3S+sQHOuz7QsQyOfqqqGwbbv8x3CYNFXdPsYljcf820
+FA4IWFPcBYv0PSOU0G+Td4dE0xDnp189sROWnIjMsoFzc13u3afXr6lbusMy
+DcG36pifu787dDss+TqttR1OUxs77AsvzPlmcx7Myf0i/yM83q0xWQNX91kZ
+OsH225bNvIOJryJnCWzypVzlI1wR6BKhTL3fovQ1nP/J4HAPnadPLUMIK/of
+Lamk/W46qRsJG/65xT8XvvFksFsHDvn+TnMMnXemcZ0Q/ZJvQhw5sOyFUrgd
+bH4wON2J7pfKOQgxf4VdS5QNnFsYMEsf9stPdraCGYMjydnIN7mwcsgW5noH
+phG4WuH6wAaY2VN9Y0AD67yXO+2BrY/Oax6ag3N8ZmIy4eyIijJNuEaXebUK
+lj42Wb5FHX24FsZPwJELg4R/zEafd322OWJeqZpz+y7YPDJkVRLMLKzhLYXb
+Qz9P18P8FctijOB+5b+2axthfbOg4AeYYXrlqz/smZo56zI8xZq+WwRLAocV
+tFAvbVJrdw9s/Tzi8FV4xbM4u0XG6GO16gI39Gd/LvjuBpiIE8WTcHhfwP19
+MK89qKcE823sdjiTCItlNW3bNOl9ajA7Cw4oaPCTwda9pruyqSMqQlbSvG7f
+WnMcth6NbdsD+/2kXBsNcxf0xPBg6SJxyg445KTqeDKc/SHPZRUsfJqjdhCW
+Kfl8twC2l3S4b4Cnqv/aJEP/aRWNHCV6XXRGpw7m20Yc8UV99bWbm27Awqif
+m1M06POy6Eo6zD7629pszDOlkHckhs5voxefiPlFs8LlQmDmeTffPTT/haK0
+YFjmf5e1Tg3Py8mg0TDqVw9f6avieWu6dT+eelo1j6HCJs59UbX5tP6JI6la
+yrivYw+UPqH1xktu2s1Cbpt+TBqHxWyvxjglNtFdd6rHhubttMN1SBHzCvYZ
+/ETzkfgWnILFia2bKmHmXiPuTlgYaLNUeQnmOMTK9IVHA5cc84J5jZO/psIr
+3B4P5sESown+GzhS8h/XDpgxueSpF+qZc14n6Jrg/NDDbe/g2ARBlTfMs6pP
+Tkd/yUHZWQmwxOFrjiP65zSYtf4KC/22xw3C1o9mZCLYc3Xm2RzMe/uh8/Vq
+mHirXrBEHgFW6uwnMLvtsMotWH2Xf0w5rde476AS8ssIKoi4QfdPJktWwoqL
+fO9l0vP1/iteA3/wtmPuhxn5vmVacPickOcbqX/R1ajAeTyPqkF9mKmbxLSF
+s0dI5zTms/YdNklCP2kfLknbqJufm9xCvzWJYp0qWPZ79W+lmE9Ud/vITZj9
+ooFfhPkdLQKL8mGy2qOO5hc9taWL5sc3My4MUsA7+TKnkO7ncF46y7OJu/L5
+s2Ww+P6OOhs5NlG5pRTSBEf+2ynJgSDPLD3FGXre+vqu8hkWyeWuPLQM/Ur9
+nuV4TLPwfNpy6HxszQdJ9lMsolg0NHWHOqMjIW6SReqtVgSP0fXPOJcWw625
+93c5mcKxLxQMYU7KvMJ0mK/GmUiA28UfpK+ozdbpWOA8aei3PdpL8Tnophbq
+0Xqlppe2wkTp0PRG9MMNK3NJpz7g55n7lUUYLR4hD+BsPsmLQ/9M95rRVphf
+IbC1wnxNF31dh2DGoy8BLXL092rz2oml9PdHpSsceYTvFX5HbS3gs/tgrqt5
+MV3P/kHZhIX8zD0WzGuHeT9ziiPgqfNTPWJaj7QnRcHSTpeZy7Cs9916F1gc
+f/zYMdr/av+Yv3Fe0/Pd+bR/xthMij/cX153xxoWqrxpKkY/XL1nExpw5FxN
+ngT9v+uO5Y/QPC60BgkwX79KZfpbmJjllWUij/YlDTv+hJki7XJP5HebGbK5
+gea7QyFY7R8WiSzhOrbC7Nml8i+/sMi9fv/j/TDP6zFPMMoi6pIOHXWaz8B0
+TuUIi5isGdtrR+edU6E9e5hFomtKovfRfFO7YjcOsUjT/qj2a7A4OszPeIBF
+JPnlPX/T9VlWipUf8flGbT6xzAzXzRhz58HhDZ4Xj8E8nwI3A7i+M/TlEzP6
+fXWwqheuSPnQPMcctpUzdMN5C33Gj3nBvHcXztijXuvq96JTsDRz9qMaGYuY
+f+LWPKbXb/fN6KBf54LTjkMwUTyVEvcJ/cyyVGdYoL6ch7YU8/HCvAqMYH7K
+DZ4l5o+Md5dYwSTTP9BnjEUcC03HLGFmZNvI+nHcT6ct2g1gnkAiGIb9XE7f
+06Re8c+wK/JU0a/XGqX9Jp6NolaXH+1spPXbrv/yEevze7psBHAAN/SyBez8
+6aN3GsysfV09H/XuGetlBMH856smiz4jn5gR/XV0vvwnDz6i/7M7D600hsUC
+fsJn5J8R33tnLp0327a0CHn0v39mOIv6oZKbCfKTPppuUKT1g7XEF3tZRJQ7
+mKBB999sKTPqRr62ClkGdH2C09OWNhYxHB7o/J4600zNoIlF2MUdHRF0/+Na
+YUst+peeP36F+vfis3lVyKP3u0gpNT/sTGMJ5gkoaqH5ECG7g5GNenoTojBq
+tlVV/v4q4v70VWcZNX3xKv///6Ml+3/dxt1U
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.87623281688787, 11.409748320682976}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl13s8VNv7B/AdDhIZUiRlCFFolCOKZgip3NPlUJpCHZdKyLU0SnKUTDoi
+lEEkurhGUUYSR9F0QblOkooIqVTo+1m/n3/W622tvdbzPGvvtfeo7Tno7CVC
+UZTJDIoiLfX2N/70WdQIaRegbazvbYTZZedcE+F+VY/F8TCnt2iuEVzNUtll
+AzO+j70ZVmZR7WxnzrQeixLmp8VWw2cD/K8VwXT12U3XYAuJIws9YX6Xz183
+4fjvZkuUYP91luVP4PeDcymBLtabLnYRxfy6cfHl8cS+55McYP2icpXN8AhP
+f+QGPO3ukq8Gc7QUFJRVWNQim/PBP5exKBYnbH4CXGu5ZEk37LhQsVxiIdY1
+0Rt4AvMkVx6JhDNnGgY9IuOH3aSH4dDn4aKN8Ei2pavTIhblEGX+dytMzV3d
+kw1vWyuQG4D9+54/eQOnxOaqimJ9x7hyI0lVFrX7wNxgVZgRX7FiLpzQt6fF
+FKZ1Ph+SgF+cCB3bDlMNa8qEuL5NXpZ7COZ6y33hwXJdFsnRsH/ji0Wb4NgN
+J/S5pF/TKasX8T2T6G1KJLbSL/WFXfp6HU6T/Gfl6gwi36aYOdOhpP/fCPO9
+sCBNmOIGF67w8ulFva5LO7uuJPMb/S3hBe/vTvhCwQLrUsMvqL/B5Y0n65Cf
+4PqphHMwPcT1/HGY0xAtagmX3VMZN4GFJjkZMrDyZeuqoaUYdyc7aGQ+iwrL
+ldLmEd+0ixyCqzzOHN8M8x+XpYhh/LFvt6Sl4JH996MMlUndXPvqdBDP84H+
+cPjv0pVDsTDbtSfyJaxDf1/pAhdeDtUzQ7xXHBujlxI3fmIUwrQ3V2bPgmkH
+JbZqI9/6Rbr537SxnpiFAQ82003QH4JZCtau8qiXkGHyi5h3dtPVMFLP4bLp
+78QX672ewa3Nfg9mYj4qbyp+LurvHVQUrgYLpkw/W8Bqx8OUzch6a985b4MH
+nHu8XWFGZ9G/5H7pEIQvCiGeNL9lAIsfPjnOhbkum6smMP+M5rL6HNKfdOND
+Htw3WpNfQvJps9hhBb/+FjNZAdOn4hSfI/7frKGwUtIvcqF+M/xkYd0mcv2I
+eXniU+TvYilKOw3z30z2bIQzw753eZHrB3oWPEb9rO7aWxmR9WgVR7bA9/0G
+108hX9rMqP+GsT+zhlvtq+CRDi/NNHh1SZ3yYZizx7l3J3xmxqtCHVgoF7nD
+BHYr87HsXIJ9u8YR6sPPPg8uSoBHLspcWgvf9bgXYwkzpsd4++Ddu4xzp7Uw
+n27Au6uwwKQ/sBrmmnA8J8l6fmPpsTCj/4fJbsRXN782wA2ma7k3P4MPT0Z1
+GhM/MZm5Afld3WpopwbzIpT/qYGTtzffV4BH3LO6/0R9kq6GFMvD1PuVDWT/
+e+9P/akM+4fk+k7BEdLGwzow/9+40+tR76kzg5osmCZeVhYBz9sbJ3Ql86+R
+906GbZtmjISQ+EQWG1yEUxWvSifBjuJfyzjw7Qyz4VtwIfWh2h4O0xL1ekTy
+WzVv+R9w+4zCQ61kvZT7/blYX7nTw62bjDdLvLEKrtp99kEnsay5WBXyyVsr
+ViiA2Y7S48bk/LuUmnEHZu082laCegj3vjyZTOb3y1BdAS9J3CPwIfXxMle6
+g3oGXz602xAW3H16ww6Oj/5+8qsm8n9tuWpcCefDdr/3t2D62yjrQniMHRfm
+BXPMF0RFw5RMt6cSGV+z/kQAvCZC7nOjBuqRZdAcDpsoTew+BgvGfR+kwxVV
+fmOrYNaK/3Jb4Ydn5uV9W4x6fVtfqYn1o94tWn8P9u+02hYD/1rRZBpP+suv
+y43Dd+K6EvbB7JvsUW/kk9Vi1mILC5gd2b3wzc7rOmbk+m1p5dtRjwf9HIYx
+zKv90PYIbhvPUiT93JeuEuT535KSyNtI5q/IaA2Bowxk9XfBjjuXJRXDpbGC
+llCYVVge1gIH2J45nET6O17zu+Gh7t2NxeT6OTv5TfB0fsE/zWR8wdnhLPho
+l2Z4Pxm/f1nXLnhF3dYzEzBfqKktAc9X1RsVQT2oYJG/0hHfZa1OPTHiWlH+
+Yjh1xwLdXySfeoFlFvJjBCtav4c5/HTGQlhx3jm7BuKDquMXyfNV0x5/GS6s
+aR9cCMe2ZzT4kPXOmGneRL0PZCXr6cPUfZ0lDvBv42N2A+owk8kXg+UDP0pm
+woVpMl3PFNG/LTPCBRbe+b6vAn7QHPVOHGYdWWp4B14lXXPurhqepxPx4y/g
+OM/qe4dgQZ4cUwLzzfE7wNEnbjVOd4R76t1LxuiIt0A36zqcyffvroZZy1Yr
+KyLemEviS5KJb89bfhqeVD20LgwWfBrNFCXvl8+qgXthR66MWAR81G0wwp1Y
+uGdsEE7v+fc6G+adeuTohPo1nt3T50vm65xxPBfuLIjKiCTzVYWlvoc9tuVJ
+kPVGjFedlsN+RFczJUtIf3fYOnXYJs/ESwBz93vUKxELL7z4RPotHq7+iusv
+1p6TF0d+DOXEngqY175dTJmYUpbcC2t6bKzTIvn3R0/9Rnxa74r4S0m/16OO
+OPL9oq7xQAOm20d5zoI/3b4rogALRZ81kvs/4PklgwkSf6RhuAg8LRUZ8ozE
+y5HpOIH6SRe0BfFIPQ3NFWnwx7Xya0h96JIxbwqwH4OX6lka5HpOk7kb3P3N
+K7sC3xX+SZS3Gpz3YeQrHS78Mh5PwepH13w8ifdQobpKy495LCrcbpv8J5xL
+9Jbv62TQb8yR/LENZlh08U1gsR6xfnLfs/WkVI/CRic+lDjBjq9jjF7CpdS7
+K/2oAzesWXwN4psU/FqbAPOda3rJ/vdF2jLsSH/FVLYG8qOZ5ZqqwY49vm/T
+YZtYrT9nwf6BCYY01Kdbk/VzJnmPp83ZHQZvDZ0Tu4DU/Ypo1gvyPbmAK03e
++1x705fKaAvD/cR9SavdmrMJrbVHhm8mme/BhbseaI2OlbV0oGUJX9XtRlt6
+RKV4LuKncZ+mWME2fs5BG2Fh6SkNGiyu8KL+MOw/O/FgLdbrrcyoPg9Ti+uP
+7YF30LbPyIR5o0omo4ifozprIJV8V/l1rwgiz6OsbsExmGW1/+QI8k+18nO3
+h/lSyxJ9YR9Xniw5FxwjIhoGSH3DLaryST77FHwCYX7fBZs1MMfJ2kkKjl74
+0aeSPBdJJZUl2K8dB+vi9WHOzuoFgbB72uH8FKzr+KNkbCM83LJj4TTWcfRn
+lZnCD+/IB3vA7IKIShtY/v4mqybM69+vYnYAVugvG2AST8u7FsC2T0c8q9Hy
+jVSWT6FtnSjUdEBLX37k6y6MU/r9eXB0Lup9MVD3KZz+viHnGsxXLG60wjqR
+oxvdQmCafPbh+3Bi69LFbjBXy6hqJeK072lSc4F51y4582BLbkUim1xvHWj7
+G170cKLjKCw89dDZFnmaXi3Lz4M5SrdfnIDzhgoUu4hlS3Sy4dS3fzyfh/go
+dnhFHhwacsfeCabVPp4+Dw/0eP48BftbjKV5wQ+Wn/K9DQuyP9uowikaw4mv
+YG7O+bparN870/rDAHG4/d2tsPB6L/f/nDiT20nu5+OKx1pIPRjVTFc49/Sj
+2Hwy39e3C1pQjyc5ekHeMCfoR5IzrKDo9VMeLpz9WISsc2BBYDXJh7H+3S4f
++OybjSw9YrNGldmwhc6R8mwF5KNpNvAI/w9yqP4hC7MbKs8lw+rL3m4KnoP8
+HN62RsHTyoMrO+TRn0vzjIEr8tnr18H+AXK1V+BQ6tdEsRzi7/tzTwecfrpu
+nz5MqzudswTrxbZ0G9yhwTtPisbA6ml8260w3/vZsjFY2bSuTwJmON4x2od8
+uLxLcZdlsd6KqfYecl6sXpr0F1y4sfvqVtSjiu5byYQFWu2sR/CRo7u+2ZHx
+gzEpOqhn9KT0qWOw/xEp7SNwusmlpc0wvfEx/S6s//HM8vlYT/DL9IIQvu01
+0O4ECye/XCK/H4qv/kw+A/u7FnmSfiORi4KHpP/FgVXke0eJyZT6BrPt5fGL
+D+NG9BRVkC9j38eyxeR6602WK0k9upItKsnzqFQTZQyzajN3WMIvzdOjdch4
+H93XtchP/uOvHjHYMWT021ryfsypVGgk9bHI16hEffTbBi+E0cj561tnBi91
+72hQgDnDx74+Rr1ZEs/a1siS83GTsw9cGhMpy5iNfOUz6lXgFB2dRBkZ7Per
+a5792OcJqZTizlnIP5e9+j9YwShmd64U8ljeZPkI/lR56HHgTMw7ZcbugnWr
+2r/YSZLfy80bZTBf1WcrZzMJxJ9jWLyZPGfPLQ5vEEe7ztzuBvzwR8Ct0D8w
+/8jY77mIVztb7flTMfJ9kyz5Dyyt7zXhBFNhYoYzkG/FaxkvCqazS+aFwS//
+aQ1qF8V6+UybQdglaX9OF8x/Un/ZGfXrlJUo+gPjHUvS9+XDprU292zFyPn2
+MnUYfqV5Jq2ArHfqHwkV7Efoz1JFZcQjnNMbzIBfZa5xTiDx7dz5cCm5X14m
+qIkgflqo+4AUeX98vhrsDXNueIs8J/fXXwf4VcTu8ibHyfdmcuOGcZh7a+Ht
+RXDsybVnZ0qQ+6MnjLwvqyaCo76Lk99DDgZ65P11496ju+R6u1KRa8jfdGig
+xUmc/B5T3qIB5wmZ0vcQz8gNiSTyPPHVD+ZNI36exuCEPsxOmSpSJvUKeLu+
+AfuR1ynZNA/1EAjW5wTBVfO3T/6YgXFtqzxWwZ6eu1yeUKiflEa3PExvFrfS
++82kBIrCPZJk/wNeKz2cZCI/N7oSbBy/eNvBn0yK3nFZ0xy2sUxwZk0wKbY2
+3S8KFghtqq2/MSnaU5HhFtixkyvOHcf1N23qVyM+yi6qROsLk/JffZpdQOJl
+bv0tN8akGGJ7M9XJOTVT//iWUVwv5a2dRs6Dz1dmjY5gPRfdGFny/ZD144oQ
+phZPhoaT95MBr0oF47kJZ7Xa4L8v7QlLhUe0Njipod7GKkcNbDE/ra8pZgus
+PTuVUsf6hbUCq0MwTYsVLIX4GH0X5geS+yHfZMsXWJA8eo2cp/7rH7g1fkX8
+S8SrtWHh1Q+zIpEfvbXCmJw33LizvtMk303zf3JgwdamErPviGdh8X9y8Pad
+qz8wYLqqovYF8h4oincQYDxHKWzRHJi3+WiDIsyy2ClxltTjltZ3cbKefttm
+aXj7PdqGTMTLs2p0OE/q/SP56RDyc6x58H4JOYe9qvqGPiPeu30BzTiHGefo
+P88PYj76uhNxc8hz+FR5qB/xqOffdyf9q7Y+XdALD52usYWF3gZ9se3Yj2UO
+MluIcdMqPmNS/MYakRCYcj2c6sxnUkL5oQ+FxOTvwr3/bxVY/wOFNAsU
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.181526323287266, 4.607704332175082}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.00000000000182, 17.000000000003638`}, {
+          14.000000000003183`, 16.500000000003638`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.892040876190137, 17.440709485718344}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwV1Qs4lFkYB/BPJmliWS1qd8o1t4hRK7n1RbVSi25yazGW1LhtbJEupEzr
+UYaIooxmSHSZaptUSHTdSkpKmUqiZhImhHLb/5nnmfme35wz5/zf9zvfMwac
+mDVhkyiKisKbXCkG+bCmKU1yZdFUpKrHcl1Y/3mIZSmcIXd1XQwrsjSCFs+i
+qcZiKm8bLC7MOVgPx3Jv912D6c3i0bmzaUp6njrGsMH3k6sr4uAMF9GjeXCj
+fYooD/4hLVPZH1Z4x1kQD55X/LwP5lck3iHzPf2bGRWwDR01jw3PqJ/oeAjX
+hndObcZ+jPEsaxncljWeFw4/XyK5OQJ7v6ly7EFefsr1fhU28gTSg/FwAyNN
+OBXW3GX4QpnUp3zOjgHzXRVc4S80tfSxRc4QyatetzAAZhX2aneSPKdiHNmw
+iVVQXANZ/3JzrjmsVdZdcpnsf8nAdTlclSK6X0jq0XEcToN9zXaP7Cd5S2m2
+HP5+4sLCODhY+NQrAvsP75niEA6LqTL5GFxaweYEk3qFr6xOop4I27fHOXCy
+OCNkFeoXSz75RZE8fsbcftjDmZ+UTLxoa+ghPZpqsdblFMC+h1uzmPo05brk
+uaKK5Dn9IpSGg8O+CN7DVGq9eji8fJ/kqDrqT8iLHkqEB+5Nb7CHZ/zUJEyC
+P1GrZ4XC7q1tlVzYN1Pp73Q4/+ycryvhUvaPfWfYpB9D0/Vgnz+l4/dIv01r
+3J4gD7M4PvI16S+rm+cH13Xv2i+H25qOdL1F/vgtiTO74eCaK6lRsMjr/h4Z
+LNBZ08eE7UQu2VJijRvSG+jHzhJe0X+wzcbav7JhM/0NPv/C+uvlKjyYauCX
+F5D7G723qQim1Uwke2Hx2PxHUngS43Ael8wfKi9zxPqBgVrevnBjjNX4FZjJ
+OSn0IPnXt2SuRF671pejbqS+JNOzPbBooafPMtiM9cBnFemXxYCFF8kzI8BZ
+ANsmxkeHkPqCsvg9pP+3ew8mwbIckfV8A5pKj5mTWAgnX8jM2QLrp3Iv1cGq
+2SvUsmFpZQT3M8nPfPHuFFyYq52va4v+lPISK+Btm36d6QoLVMr9j8N9J+mX
+m+HhuyzTPXCat7AnA5ZVu6ashdvtna+dhvMPfH83Cw5Od1a6AUe8tA9pR76O
+kWrqIawqvxpfQu6ne2diI0zvl5aR+x0+pfEyGZe90fZdBA93KqXcJOPWqWFa
+cJ1e2WwxrOnXMtaP/ghcEhYcgxWHjZ91wPynXHEKTD2T1X6Dt/BGTkfAjXb3
+kmbi9zaP6+nVsJlB8ILfYHFV6Q5nOPafvC+pcLQGz8gaFvMWVzyELzoXiU1J
+/q6ho6Sez6PO5maw99ytcVvh7I4AHTbMf//63B1YcUxzB+mX6jSnR9qGeP5/
+j30cQMZDdYsD4FUfm7R2kn5KzbNyYHHHlKfFJI/13SfVMCMsyO0B2W90e1Yz
+bNvmwBkk+X8Y026FPbocNAzm4/n27LrbALM+smxXwPaDJpYX4dhZc1oj4TLT
+0gc8uNZBiZMOBxuMM9fC6yR2yQK4UnPJgC6sUE4IO0fWe58x+Ar5RxsLb12C
+za57FQngDxPRLWLY+0T56ij4jQOOBpxwKoFaRvpRW5edCyvcfXot4EgLI/Vk
+2H19zm4Dct5sWiSbyLjhuslk3KkkReRJ9t9oVrUUlhTtGLQj638+dDUWDuT3
+SgxhTbWd1Bn41sS6q9PJegwNQT/c9nXZrmlwcsz2djfk/8As0CGu/KZ3IB8+
+omrPIvNbKmKmdcMuk4QnjGDfYrnMyYim1JJHTJxIf7otP6bCloc4NQEk38QG
+/xrYP3fjGMk/PF7whxwe9nQxLIdlXb4qysY4TwPmVs1kvbntCUx4fAIvWJX8
+fxnT/wPf+3c5
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.393275441506763, 7.232686837739852}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwd2Hk8VPv/B/BRXGsMWcuuLCUmylWUkSxJGpW0iOmGuiWmhTYydbWTpULS
+NAqlyNKmkhC5FE24KGubEL6TRGnxe71//jmPp/M5720+58zB4K/QFYETGAwG
+W4LBoCNjeBw/k9mMb3TUZzOEmwYEp1XZDFZHZrSGAZvhyxjgTFNjM5iM3E4j
+OOfRkZfFcHxwwJ/TYM11D0pWqrMZPS89WJpwo0it6j2s+fSVmOIVdco1b9NA
+vLR2vTaKv7/a6QPcEpLfngvzLlV9XqaJ/JvXFYXDItstYVfg4w8XXLCFK/K2
+mL+HOXNawj7p4fc9ssuVtLBu9ugPLtwWxf42DeZoXqxq0mUzSs8mTTOG2Rk3
+G71gc+6zq6qw2Kn5Y5MO4lkJtL4gHj96t+9W2Nwm7kEFzNRpHFGC7W/c9oqF
+Gf0ZxTXabIZbh7yUF53XmP9fGtxf0T1LFY73Hdh5DI5+4TCzFf3k98Q+PQm/
+92iwvg7HJ/r/yoQ1xzvNjsDCmMdLmuF4ef+doXT+w+SRqcinOsn/Jc2HOdfh
+EA9+P/+bRwTM79v+RAT/DJfTvAxzJB5q2aKf4OiMI+0wb+xNUjr1K06RsqD6
+6n7byGAe9hKBMxJpXj72qpth8TzzImn0z61zTb0PxzycWXwKZuYF3/0B59/J
+uzFlCvLds5RQw7xjzF1O5MPM5LEv+vDiU9cUl0xFPJ5pB3lO8ZVXnfAardtb
+VOGcWuNUHvoqHTKJHEU8bucZh1E4X9yvlgfHl4YbUV+isPD3XrDbcKdlCyw0
+65Z/h/p354jGzXHkVVdvCcKxpfqvb8E4drme2NKFdab7MtYmw9zn7157w7tD
+w11yqO+ggMfPkMc0fMoTcvzRN0xXeHjg0PVUur7IIuE56jw+rzZ1L60fnZ7M
+hVuiq18tgfMN1d78Acf4n7ZSofgSIdvL0bcwN6P2P+Rh/O29/hxsnrRW6jys
+v2d9Ix8uVpKx5cKlN10YR+C0ZttUS5ijvHNiOhxgvF9Onq73fyHdAPdvKOn5
+SvOYaMnRRL4tnZ+GhmBW8ETv7bBtvbKpJNZzR3b01sKL5Xm3ZlD8veab52Jd
+13KLriCYpebaKaD9N3exehHlS5D1lMKRHV/YpY362b8uvNgEtyXX/kykeSwP
+bLgDdzWN7tDA3BkWDI9RWGz4X34WXNpZ+2oa1t2e5eOrS/dh5+ZBO7i8oES4
+FY7feuDjfJhZv2v4DpyfPaxnAItmmrB+w6zBipFBxNM2llnmiPueL/pZkwnv
+jWPuj4TZ8zcNuNIcxqZYFsCcQf3jLah/UOmHfSvMCOFHrodnpA++GoNFTXoO
+/6F/yaz32UqGqDvb8ZI7/JvjVK4Fc/RNBKWY58hdqWwyd/bxufbwwZT5y5kw
+X8NrWjn2dXewrvQ45TOuKV4N13y1Df8I85zm3vuF++LnTmb0M5i5/ZHcA7pP
+1pq65MLipSvq6L7vuK/TdxrWv3TXcD89l1hVgp3UX9VV4yhYMcwtch1cWp76
+9QK8Sk5ulxv12z61oA62mh8xa6EB7deQs/TccUndJ7OA+vNMV94K8/4nwXCh
+/p07R2rgJst3mWth1kF+qhX6UXV4NHUv1VcpoZAGB/lfUk6n/CPdrhMwjxJt
+z+oGuMs2MJj2c3iqki7Ni6WS018AZ13LifeC2XsKS4fg1fWmPudhES8hTg/z
+zoqICX0Pi6fk1dP+Olj/4zbLCJ+vk5vYGm4T248cgIWXHD204KRzpQoVcHxl
+nGc34on07L78MQ31pQ75pcHX/+x6vQjO15zdtAAOqti4MBwuFfE+1KJ+xYC+
+z5fIm3J2c+DnG7ZZPiZnZn+vRv+sR8WCBnKl7hIH2Hjp/LXtcHz30KY7NN8L
+93raKL5f3qLZ8NuQJkdaz8xbkn4Pz8GxuT/ul8HCqK21HnBh1JLv2TAv127f
+ML6H8mvtemPhrvrkswVwSU2sMJTiX7eyOAp39yxd5kX5v/zasAv+o2JQZy4s
+Tsidtw+2its5Q4fyb29oSIIf9Kzzk4c5+9Kca2D7OycCJGBu0b/lTHouHyg+
+x6B4zxXuBcEZXzf3ydL5kmufquDixUfFFI8ZmX3LEv0MvyqvtIf5JyR1zlO/
+IY7qQbC+wclp43Cd5iT983R+XUyfL+3nB/IPG6k+JZXuXNg3zjBQYzrynj+g
+OghnJSms8IeZFzKM6LmuUGR/8DosGq86awn/9pGqGIE5XveazOGc6SZDjsb4
+HJ54rVaGfaVfvz0Bs5tjo9sRr1y8IfE5rD+t6WUibONpPEfGBP0w+wTW9D2y
+pszZDuYnvDF6gnrr99wWBMDCwnWezrDFaFbEP+TIOSkl6D9Va/2pZDh+yokW
+a1hGbNAjhPW9/2Nexzwb6zL1yZySTbbG8HNfzVlJcOljI5lcvHeUX5cIiqZ4
+XGb1Itg8b2p4MJy/z9LkE95b6sV1bhyK91hCPhvmRsmMzIa7Vn/bfxBWYC7I
+mUz1HmAdDYY7dPjnR6l/71XzdsF9/EuNnbCoXE2QAPtdt3atg/MT3Cor4ZsZ
+J89XkFlWrQrIr36QbUBmPJvnvAleeNeuodaY3jfKqirgsSfCeW8pfuf5QnP0
+M+RgHCJB8/vgqEL76XSQlNZMmGff/e4HXLMscbcfzHgs5b4W85mwZrV3Kq1f
+Gfs4G9ZUXWPTTr630rUXntKotGS6KdYPSiTRe0namY3HeTC/Mm+OGbzlS2Nt
+McxK/Dd1OvzUz7xH2gyfW5vJQln4bu/2wuUwO6UipRHxsm5tm5FoRvstz+gE
+vbe97DhSC4tnp7ia0XvMIxtnxgzU+/ugUxHdP/t9nMxgRnCK3Hz4aKOwzBVm
+z6ybcgv9p24oDV0Pcy+fXmZKn9/knyEBcKlEW4aA5unYwNkE638tUJ8K8z0k
+ldfCzAN9ay7jvXRdtI08xWNNrsyzhVOab/dbUP4bGmVvVDC/uBeXVeD4rPHt
+QrhmqcBlmPqRy7wdDqt+GPmjifqdtuxCIGyazFd+QP2xU6Zvh9vkGg9chlkb
+1q+KgRc6pcxKoH53aLDK4LcTDz8/BjPihO0yyC86LH2DXGqoXewPt3VFPqD1
+3Pypp8pgd0OrQ1mwSGFxshn6Gcz9oPqU4vnlfEqERb49WmK6PmLwyDf4csWr
+p0aonyOqPOmN+YjO9fX7U7/fJu/LhA2zXCWv0HxkrNe+h39HmNt/onkzM7oV
+Me/6suFYm5no/+GmQkN4bHVA/WGYpxNhrwsLYl1aamH9mqcTJeD918MPqJnj
++nPzTj1DvIyT/g99YNaCo6uiYJsqKVEizL3kLNKFBdKP7SvhrqFVi3NRr+Dq
+y84BWJS9M9sCVtyy5rf8LPQTFX3oKvoPsRlYqgeLvBdc04Y7ztYMmMCcCFX9
+M5jnjIFF+4xh/sWsdiVYyBIMTIXZE7PPJCuzGSqHBdmycFddwiEL+DlnyobP
+yMdh/XBpYeLo7zTaSO4+9ygZdpf0TrwLMwPnt4bAd6dGbUih+stXXPSDx/75
+eiQCjt8W9jsIdvmoqh8Il5ZdHDkKb70Uo7yK+lvBOFoMl1bs/OUO5+vI1kgi
+/wTuZOuldP3lq1N9YcMplkJvit9yfW4JzK2eV7WV1genbjSm/bZ6/P5JOs+3
+yY6D1X0/at4h6ybJfYX/iuxU76V4UmU5XpjPSPyTQ9PRr3hGmko6PD/vU90W
+mlezsnsnvJfvO7OAXHJETZaeX8P/O/2T5uX+ZpI2zLTJfelmgfNG9Q/VYfWr
+oeVn4Pgjs69+w/WFxYMLWmE+b2h9Oe1XwRxnHUt8/m/+CgiD/3VIVlkDd536
+aasKu6zwMT8Js31CjS+jXqaTwe5COP70yAwj+JtFrZUIFi8PfH4B/c/xfav3
+DuaZX+lhwtq+cQGf6HrPmMPHME/1xtHzvXCpi2esJHx4Yl95B+VvbuRpKeHz
+/3uh43OYyxuPcFPE+1C4V9UtmF9atuPiJDyPNFguyRTvWMIXHdg90urVXorX
+sau9VgHfv4Gteevo/HS+Zh4cMuf9yEJYP+fFsTLYvCaozITylebITsT1Y5dV
+v6hTvtvDsaHwBJG/uSIstCxnSyB/ypvA+2SGtrAqHx77sTxai9arPjkdhno7
+NO7JW8KigDhlI9pf/js2LKf5NNe7x8DxgeNq+8lBoh2f4b2hlwJuUrx3n/KW
+YT5v/dom03zizbRj0mCGu95SDRbyR/dovYatP3icsoMZtemGEzHvjduznDeS
+h6a7qsFxlxsDj8Hi/hpNun8KXnIacmCm3jZTMa4/7tETIYLj3w/L3YdXMb9s
++kwOWbZyG3wguypLcTZsV3VIFh7f+PuEyWx633jdm4R6eZ6GfDuY7zw7TgN+
+vCbK0h1m9Pwc0UP/Q26isJXkeWk6cpiPm0XW3z6w8Gt6yijm/eeh/WtXw129
+W5cOybMZt96F/cshh+w6PRHe/M+kv11hdpllrbUcnmeNeWqUjzsmmHVSls3Q
+vV9bZU7rm22dFeBEZ0GsDq1nuXc8kmEzlhfJRFH9XTwTkRB++920kEHnRU2f
+bsNnWR8tv6JfttGvX6PwoOqU3n5Y3+b7h0DEC56QldPDovvdruwbnBPA0OuF
+uXYqZtmo58ZJ3q1BmK8dyA9Bva35q65+p+tvzfB0QH/uw2njsjSf/o9CZewf
+p6Kk43o0D1eDPa3wcIVcyzya53CY6RnMR1k6xWsNzeeo6jNLzO/TWp1Z+8my
+/gnZcKXB/w4K6Hq8XY/BVxIPO1bApUst/RSZ9H8JM24f9dcWtFIaVnDYVq5k
+hfhRA4ovsL7B75SPNdz1TyzLH+6/cs9gFcx3SVtUjvytzDD2DpgtzfX+hfr2
+uDR9PwELMxfpaMCPpHXKL1I8SW6OBvoLdAx3zIHxhaIjg/7TV5z1uQOXzkmZ
+O4R5lVRL6NynfD87xzox35Knum/vUfxFL5e1SuPv1ycNMwsp/l0n/sAf2D/n
+tG9eo/OxT7/owr4mmYvTKF7QhbJwKeQ7V9kbS/n7zHhjkmzGAN8+5yCt3zZW
+lAsvDpucEUrnI1M2JsLhkoYfN1J9H0ZNr8EFZtciV1O/c/Vq+uEJ0Xt8PCn+
+zJ+TfRH/iLbOIneqt3Ozmhi2+7iz6/89HrM+HfWYhH2+wqF4ngbszai/elT6
+3/V0fsOCxbboz/zQjeXBVvS+prlbDv07zP1T6jDFX3P2RQMc+UoQQf1wG51v
+ncT+0W5o03hI9RTcX2CM+fHnbJ/UTvWXl+QI4OqeBJ6ENXyx9+YAbOQoa2cC
+M1RGMhUxf8Vukc8ya/p+8Wj+jfOOU6Nv7oT5nLzjj+AJze0WSdb093urtAd8
+N/tD6124S/g6LRf5xX1eTQ2w8MzhzR9RX9aXgsB+yjeabsaA6d9847SejtLs
+/wPOwiIH
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.674112975512006, 3.0634133525730736}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl1Qs0VHkcB/DLlNcqtSFFDCaPpjx6EuWaipIyGyNKIdbamEVovdolW06t
+avSiDU2xslI5JfTS3ZoSWTsSZpVM7WyNHsxSjYpmv//2njPnns/5v76/3733
+jPWWhHVfa1MUJcSP3P+/2DQ1qsHlSFM092maASxRBm6ogqUvQ3RYsLwka3kQ
+zIwtun7fiqYqZ139oAXLNedrs+BYi9tZ9Q5Y/zC0TRc2o9Rr0uBsXkd7uiVN
+xY/zWeILJ67vM+2ZQVOGkxPd7Mj8Ya9JrvA1k4VzTGHV4wFJngX88ucPxBF6
+lvRzc5rK0vy2zR5mm41QIXAru0+4AhbJZiQ/mY79vd6+EsL8q/y0PXCKH2tV
+CcysqDQIgl0iaoR/kvEqhzEe3BDkM50i9RRUPxbArTm7ZnJJPWv/pfbCTCrF
++MMiT0FZD3xX01sTCU/afmKpN86XnXTf8w3Mb5r2+hIs1VW1hBFb71Q6I391
+vJDyJv3jjZpUwKJUbYkx6W+Af6ER6lUs9qv7i+R5tSYkGnZoc48+SPpT0nWg
+BC7qSrXkkf7N+MCtg4OYVMkre5oSjwzanCHrmxt3H4XpzfvLMuGIZqPyZTD/
+cqCNI1zZdnrmiB3qbnLi1ZM8x+Wl9bDcJO0XLty6wPrNT7DqztVN+5B/XHP9
+7C1wRLDimYL0533mOj4s6hqc5wEvz1waGUDGjX4MPjYN6ywn+m6GpV86/60L
+h6WveZsB83lM7H4zPI/SvJxTcLZQpJ4LSyeqA9vJ/A4l834q+vhrdwQLeZlD
+nAcKeP4OVex8WBUiGxuGE734SyLgxM069zhY/+YeSzsXrrnOrdn2eT9x3DFS
+v8Hlr7rh2QUtw2JY2p7c74c85epMrSKy/4WkmxKYMc7U/gFmT357i9QjScpI
+CSTjmbu0T8OGJ316p8HyA+5rP8GKFTkXOpCXPSHo0mL0R9W2dS7pV7a/0XAw
+bMblujiTceNztwLg2qT2LtlMrLc9ZMaB2TrdMbtg1RYrx07sZ9znN+QGSx1X
+hcfAh/f2mas56O8NG+te5OMPKR/dhGmXugwaVgiUglLYxe3o2SLU55lQXL2X
+ONP+7AD6E1J38X0esUB2YDVsJlnuewRmEuZ8qjfF99PAEdfAlLqq0gNW6do5
+d8PisXl/PDLB92TmHz8eeajvdnacgMcVWwsWEQv6dfJgT/pcdSzssolJOgiP
++Bl5HYHFRjce3YCzV+7gXIZFpuuGDLD/yhMHNVKYbqzPFcKyB0Nze8j8jqMv
+++Dohx8NOmC+xeu8UOR9490vu0Lm2zcua4cb7jaMFcCJWwftl5J6o2wUoeT8
+jatfFMKMJeuFMdmv7vck8rzlWqcW30E9bIcKXzWsLLAvToLlTr0Dw3C+nnCe
+OSwdn2feCotbnno32eL9CTzflA2n7Kx+kg6L7OptTeDicCfJQljsvi1qP/KU
+Z7DVFJwYyokbRn5/YefFHhvkr8mP9IeZ6EaP27BLWc+cU+iH//ooCQOLqcr+
+MWPUp5mY0grTZfcDYmHFkqiEZ2S8gnbtn4I7f/TdF9ifMfUY2Q3HslYdcoel
+F615PrAD/+HqOJh9qfOII+y5ofFZMcl7OsHDlditj9tC8k24uWgjXFQqcBgk
+4zxVXBms1AkT6qF+VZZNNwvn5+sb+k6BJ4XR71JgivX98wmkf4+veQzAxbnx
+uWpSf8GnwhjUo/xoGy4l+WL+0e+E6d2a5mMwRQudXFF/fm2VfjCcfSb9TjJ5
+v8KfLNAj+fnJswphC0Mr3VrUy7jllBMb71h5fBPp3/jrZ8j88nCt+fqkf9/W
+jHLhiLjbQ1escX7x4X23cJ70JFW4HZYXGIV7wfn9PJ4XrOqMnF2BvCF6fj5T
+4c8XPEL+v9j0f1GRbYk=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.232686837739852, 11.393275441506766}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwl03dM00EUB/CDggFRmUorUttaIsqwhqkQPRUVUbQoYg2CFSHgQBC0SlCm
+CARHNdoUQ1JkRMCRigsHAsFiURPRpIZ/BDEgDZUhQqg4vxd/yeXyyV3ee/fu
+fsKEtO1JloSQEAw2//+8KbFi8yJKzNm25m3wi5K0qkERJYI6wxM1XJlTQ1pg
+4xWPvR/g1t0nqophblPnTWsfSrzrBT/WwSk8bYQYDtWWBk8JKal7OzAsgZ/d
+UoprYaX9mkQvtn9lkiEK7uIernCB5Ql3FBZw92OBagTx1TTHuklAyadLOWuf
+MWuWOGbBlJexMx82XzcVbITDhfZ2a2HvHe/SPOCSNXn9lvCeDt2UM+zZfFeu
+96JEJn/px9xVJXyggslEvL8ItpGElh2FXSLTHVazdcH+jlg4LDWLkwwb5wXE
+7ILPTe4rV7F81OiaBPcPeQx0snzdFfozMI39+fwXq+9Fru0DOG/EbYYXziPt
+yT7+HRZnCz9L4bFR0ctQ1Bc2PvT3IKzWKWadhwl/fYcC1gbuHeiFj11wyc1g
+/Xszpmf9m2jPzIiDU86ERGbDMkvX8SC46YYk9SkszqXRHFiv3KIfho0xV3ra
+WP2XnLvtfSk5Ve1WpYCly524Argk6G4E61dd0Rd3PvOx+53VCxG3xKCZCZOE
+TSEWsHG08MAg4oVb2Voc4uPeE4tWP2L3df/8EaM7JemWRfdOs3ynxZW5cJfv
+c9Mq5iyn+QFwysP1+/7iPFJPXr4dbE7yL2+Hg2XV6RxY7TD340W4q8H3qBuz
+H2cqGQ7/VmwvhbtVtya3wtyRA84VsHGR6ecGWLuC/97M1vMm+FHsPZZaq+NR
+n8QzcGcqi1dWINLB2j9fFdfYfl6LSIzzSKzSpOz9pvcGtmXCylFrnTvqpXsG
+eLdheb4fSYWbLqfUv4KlYdGNLT7sHmNq9HCrrC/aEf2pM8T71cKCaW5GHGx8
+rVDKYbOvxqSBaftmzm/kH5t+FGKAPfmLm3NgetXx9jQsbzyrMqH+k4kNRXOW
+IW5PYWMEPFa9VOQAV/bpZtcsoP//T9iGzQvoP3WPQ9g=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.47431403485444, 8.442668420912664}, \
+{-1, -1}], 
+        LineBox[{{14.000000000007276`, 16.500000000003638`}, {
+         8.000000000005457, 13.}}], 
+        PolygonBox[{{11.51826734053906, 15.052322615314452`}, {
+         10.280184249251306`, 14.793188945044921`}, {10.683281069670574`, 
+         14.102165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10.823799910437668, 15.484057296392571}, \
+{1, -1}], LineBox[{{14., 16.50000000000231}, {14., 9.499999999998607}}], 
+        PolygonBox[{{14., 12.4}, {13.6, 13.6}, {14.4, 13.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.9452, 13.}, {-1, 0}], 
+        LineBox[{{8., 13.000000000003638`}, {14.000000000003638`, 
+         9.500000000003638}}], 
+        PolygonBox[{{10.48173265946094, 11.552322615314452`}, {
+         11.316718930329426`, 10.602165824326175`}, {11.719815750748694`, 
+         11.293188945044921`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10.823799910437668, 10.515942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{5., 8.5}], PointBox[{15.5, 7.}], 
+         PointBox[{14., 16.5}], PointBox[{8., 13.}], PointBox[{14., 9.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T11", " ", "P1", " ", "N21"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdgef/figjhihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdgef/figjhihjij.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:eJwl1gs4lGkbB/DHKYfEVDZp7WdyihxLRKkZLR2wOWxpiiL0RSSKbSqHWacU
+orZCSbPSSZlmk5o+rGlTCWVWLEUMivbLYUixTn3/5/rmulxz/a73eZ77vv/z
+vjMWBx7w3iNPCLmKP/pOxr/iNZ9N1CkWs4lkt/8fB+DoogyHuTC3dij2/Tw2
+EettrbeARU2rHuyB+7u63bbCacvdTo7OZRMT34rWVNi+5njMOVhRds70ERxQ
+0+ngBlsHvM2V12cTqayuQhv2bGHYbYJDkn1GJxlsEvt+6Zsz8MakqfYxWPQv
+97Vv4eyXjUfUsF4rr3S+sQHOuz7QsQyOfqqqGwbbv8x3CYNFXdPsYljcf820
+FA4IWFPcBYv0PSOU0G+Td4dE0xDnp189sROWnIjMsoFzc13u3afXr6lbusMy
+DcG36pifu787dDss+TqttR1OUxs77AsvzPlmcx7Myf0i/yM83q0xWQNX91kZ
+OsH225bNvIOJryJnCWzypVzlI1wR6BKhTL3fovQ1nP/J4HAPnadPLUMIK/of
+Lamk/W46qRsJG/65xT8XvvFksFsHDvn+TnMMnXemcZ0Q/ZJvQhw5sOyFUrgd
+bH4wON2J7pfKOQgxf4VdS5QNnFsYMEsf9stPdraCGYMjydnIN7mwcsgW5noH
+phG4WuH6wAaY2VN9Y0AD67yXO+2BrY/Oax6ag3N8ZmIy4eyIijJNuEaXebUK
+lj42Wb5FHX24FsZPwJELg4R/zEafd322OWJeqZpz+y7YPDJkVRLMLKzhLYXb
+Qz9P18P8FctijOB+5b+2axthfbOg4AeYYXrlqz/smZo56zI8xZq+WwRLAocV
+tFAvbVJrdw9s/Tzi8FV4xbM4u0XG6GO16gI39Gd/LvjuBpiIE8WTcHhfwP19
+MK89qKcE823sdjiTCItlNW3bNOl9ajA7Cw4oaPCTwda9pruyqSMqQlbSvG7f
+WnMcth6NbdsD+/2kXBsNcxf0xPBg6SJxyg445KTqeDKc/SHPZRUsfJqjdhCW
+Kfl8twC2l3S4b4Cnqv/aJEP/aRWNHCV6XXRGpw7m20Yc8UV99bWbm27Awqif
+m1M06POy6Eo6zD7629pszDOlkHckhs5voxefiPlFs8LlQmDmeTffPTT/haK0
+YFjmf5e1Tg3Py8mg0TDqVw9f6avieWu6dT+eelo1j6HCJs59UbX5tP6JI6la
+yrivYw+UPqH1xktu2s1Cbpt+TBqHxWyvxjglNtFdd6rHhubttMN1SBHzCvYZ
+/ETzkfgWnILFia2bKmHmXiPuTlgYaLNUeQnmOMTK9IVHA5cc84J5jZO/psIr
+3B4P5sESown+GzhS8h/XDpgxueSpF+qZc14n6Jrg/NDDbe/g2ARBlTfMs6pP
+Tkd/yUHZWQmwxOFrjiP65zSYtf4KC/22xw3C1o9mZCLYc3Xm2RzMe/uh8/Vq
+mHirXrBEHgFW6uwnMLvtsMotWH2Xf0w5rde476AS8ssIKoi4QfdPJktWwoqL
+fO9l0vP1/iteA3/wtmPuhxn5vmVacPickOcbqX/R1ajAeTyPqkF9mKmbxLSF
+s0dI5zTms/YdNklCP2kfLknbqJufm9xCvzWJYp0qWPZ79W+lmE9Ud/vITZj9
+ooFfhPkdLQKL8mGy2qOO5hc9taWL5sc3My4MUsA7+TKnkO7ncF46y7OJu/L5
+s2Ww+P6OOhs5NlG5pRTSBEf+2ynJgSDPLD3FGXre+vqu8hkWyeWuPLQM/Ur9
+nuV4TLPwfNpy6HxszQdJ9lMsolg0NHWHOqMjIW6SReqtVgSP0fXPOJcWw625
+93c5mcKxLxQMYU7KvMJ0mK/GmUiA28UfpK+ozdbpWOA8aei3PdpL8Tnophbq
+0Xqlppe2wkTp0PRG9MMNK3NJpz7g55n7lUUYLR4hD+BsPsmLQ/9M95rRVphf
+IbC1wnxNF31dh2DGoy8BLXL092rz2oml9PdHpSsceYTvFX5HbS3gs/tgrqt5
+MV3P/kHZhIX8zD0WzGuHeT9ziiPgqfNTPWJaj7QnRcHSTpeZy7Cs9916F1gc
+f/zYMdr/av+Yv3Fe0/Pd+bR/xthMij/cX153xxoWqrxpKkY/XL1nExpw5FxN
+ngT9v+uO5Y/QPC60BgkwX79KZfpbmJjllWUij/YlDTv+hJki7XJP5HebGbK5
+gea7QyFY7R8WiSzhOrbC7Nml8i+/sMi9fv/j/TDP6zFPMMoi6pIOHXWaz8B0
+TuUIi5isGdtrR+edU6E9e5hFomtKovfRfFO7YjcOsUjT/qj2a7A4OszPeIBF
+JPnlPX/T9VlWipUf8flGbT6xzAzXzRhz58HhDZ4Xj8E8nwI3A7i+M/TlEzP6
+fXWwqheuSPnQPMcctpUzdMN5C33Gj3nBvHcXztijXuvq96JTsDRz9qMaGYuY
+f+LWPKbXb/fN6KBf54LTjkMwUTyVEvcJ/cyyVGdYoL6ch7YU8/HCvAqMYH7K
+DZ4l5o+Md5dYwSTTP9BnjEUcC03HLGFmZNvI+nHcT6ct2g1gnkAiGIb9XE7f
+06Re8c+wK/JU0a/XGqX9Jp6NolaXH+1spPXbrv/yEevze7psBHAAN/SyBez8
+6aN3GsysfV09H/XuGetlBMH856smiz4jn5gR/XV0vvwnDz6i/7M7D600hsUC
+fsJn5J8R33tnLp0327a0CHn0v39mOIv6oZKbCfKTPppuUKT1g7XEF3tZRJQ7
+mKBB999sKTPqRr62ClkGdH2C09OWNhYxHB7o/J4600zNoIlF2MUdHRF0/+Na
+YUst+peeP36F+vfis3lVyKP3u0gpNT/sTGMJ5gkoaqH5ECG7g5GNenoTojBq
+tlVV/v4q4v70VWcZNX3xKv///6Ml+3/dxt1U
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.87623281688787, 11.409748320682976}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl13s8VNv7B/AdDhIZUiRlCFFolCOKZgip3NPlUJpCHZdKyLU0SnKUTDoi
+lEEkurhGUUYSR9F0QblOkooIqVTo+1m/n3/W622tvdbzPGvvtfeo7Tno7CVC
+UZTJDIoiLfX2N/70WdQIaRegbazvbYTZZedcE+F+VY/F8TCnt2iuEVzNUtll
+AzO+j70ZVmZR7WxnzrQeixLmp8VWw2cD/K8VwXT12U3XYAuJIws9YX6Xz183
+4fjvZkuUYP91luVP4PeDcymBLtabLnYRxfy6cfHl8cS+55McYP2icpXN8AhP
+f+QGPO3ukq8Gc7QUFJRVWNQim/PBP5exKBYnbH4CXGu5ZEk37LhQsVxiIdY1
+0Rt4AvMkVx6JhDNnGgY9IuOH3aSH4dDn4aKN8Ei2pavTIhblEGX+dytMzV3d
+kw1vWyuQG4D9+54/eQOnxOaqimJ9x7hyI0lVFrX7wNxgVZgRX7FiLpzQt6fF
+FKZ1Ph+SgF+cCB3bDlMNa8qEuL5NXpZ7COZ6y33hwXJdFsnRsH/ji0Wb4NgN
+J/S5pF/TKasX8T2T6G1KJLbSL/WFXfp6HU6T/Gfl6gwi36aYOdOhpP/fCPO9
+sCBNmOIGF67w8ulFva5LO7uuJPMb/S3hBe/vTvhCwQLrUsMvqL/B5Y0n65Cf
+4PqphHMwPcT1/HGY0xAtagmX3VMZN4GFJjkZMrDyZeuqoaUYdyc7aGQ+iwrL
+ldLmEd+0ixyCqzzOHN8M8x+XpYhh/LFvt6Sl4JH996MMlUndXPvqdBDP84H+
+cPjv0pVDsTDbtSfyJaxDf1/pAhdeDtUzQ7xXHBujlxI3fmIUwrQ3V2bPgmkH
+JbZqI9/6Rbr537SxnpiFAQ82003QH4JZCtau8qiXkGHyi5h3dtPVMFLP4bLp
+78QX672ewa3Nfg9mYj4qbyp+LurvHVQUrgYLpkw/W8Bqx8OUzch6a985b4MH
+nHu8XWFGZ9G/5H7pEIQvCiGeNL9lAIsfPjnOhbkum6smMP+M5rL6HNKfdOND
+Htw3WpNfQvJps9hhBb/+FjNZAdOn4hSfI/7frKGwUtIvcqF+M/xkYd0mcv2I
+eXniU+TvYilKOw3z30z2bIQzw753eZHrB3oWPEb9rO7aWxmR9WgVR7bA9/0G
+108hX9rMqP+GsT+zhlvtq+CRDi/NNHh1SZ3yYZizx7l3J3xmxqtCHVgoF7nD
+BHYr87HsXIJ9u8YR6sPPPg8uSoBHLspcWgvf9bgXYwkzpsd4++Ddu4xzp7Uw
+n27Au6uwwKQ/sBrmmnA8J8l6fmPpsTCj/4fJbsRXN782wA2ma7k3P4MPT0Z1
+GhM/MZm5Afld3WpopwbzIpT/qYGTtzffV4BH3LO6/0R9kq6GFMvD1PuVDWT/
+e+9P/akM+4fk+k7BEdLGwzow/9+40+tR76kzg5osmCZeVhYBz9sbJ3Ql86+R
+906GbZtmjISQ+EQWG1yEUxWvSifBjuJfyzjw7Qyz4VtwIfWh2h4O0xL1ekTy
+WzVv+R9w+4zCQ61kvZT7/blYX7nTw62bjDdLvLEKrtp99kEnsay5WBXyyVsr
+ViiA2Y7S48bk/LuUmnEHZu082laCegj3vjyZTOb3y1BdAS9J3CPwIfXxMle6
+g3oGXz602xAW3H16ww6Oj/5+8qsm8n9tuWpcCefDdr/3t2D62yjrQniMHRfm
+BXPMF0RFw5RMt6cSGV+z/kQAvCZC7nOjBuqRZdAcDpsoTew+BgvGfR+kwxVV
+fmOrYNaK/3Jb4Ydn5uV9W4x6fVtfqYn1o94tWn8P9u+02hYD/1rRZBpP+suv
+y43Dd+K6EvbB7JvsUW/kk9Vi1mILC5gd2b3wzc7rOmbk+m1p5dtRjwf9HIYx
+zKv90PYIbhvPUiT93JeuEuT535KSyNtI5q/IaA2Bowxk9XfBjjuXJRXDpbGC
+llCYVVge1gIH2J45nET6O17zu+Gh7t2NxeT6OTv5TfB0fsE/zWR8wdnhLPho
+l2Z4Pxm/f1nXLnhF3dYzEzBfqKktAc9X1RsVQT2oYJG/0hHfZa1OPTHiWlH+
+Yjh1xwLdXySfeoFlFvJjBCtav4c5/HTGQlhx3jm7BuKDquMXyfNV0x5/GS6s
+aR9cCMe2ZzT4kPXOmGneRL0PZCXr6cPUfZ0lDvBv42N2A+owk8kXg+UDP0pm
+woVpMl3PFNG/LTPCBRbe+b6vAn7QHPVOHGYdWWp4B14lXXPurhqepxPx4y/g
+OM/qe4dgQZ4cUwLzzfE7wNEnbjVOd4R76t1LxuiIt0A36zqcyffvroZZy1Yr
+KyLemEviS5KJb89bfhqeVD20LgwWfBrNFCXvl8+qgXthR66MWAR81G0wwp1Y
+uGdsEE7v+fc6G+adeuTohPo1nt3T50vm65xxPBfuLIjKiCTzVYWlvoc9tuVJ
+kPVGjFedlsN+RFczJUtIf3fYOnXYJs/ESwBz93vUKxELL7z4RPotHq7+iusv
+1p6TF0d+DOXEngqY175dTJmYUpbcC2t6bKzTIvn3R0/9Rnxa74r4S0m/16OO
+OPL9oq7xQAOm20d5zoI/3b4rogALRZ81kvs/4PklgwkSf6RhuAg8LRUZ8ozE
+y5HpOIH6SRe0BfFIPQ3NFWnwx7Xya0h96JIxbwqwH4OX6lka5HpOk7kb3P3N
+K7sC3xX+SZS3Gpz3YeQrHS78Mh5PwepH13w8ifdQobpKy495LCrcbpv8J5xL
+9Jbv62TQb8yR/LENZlh08U1gsR6xfnLfs/WkVI/CRic+lDjBjq9jjF7CpdS7
+K/2oAzesWXwN4psU/FqbAPOda3rJ/vdF2jLsSH/FVLYG8qOZ5ZqqwY49vm/T
+YZtYrT9nwf6BCYY01Kdbk/VzJnmPp83ZHQZvDZ0Tu4DU/Ypo1gvyPbmAK03e
++1x705fKaAvD/cR9SavdmrMJrbVHhm8mme/BhbseaI2OlbV0oGUJX9XtRlt6
+RKV4LuKncZ+mWME2fs5BG2Fh6SkNGiyu8KL+MOw/O/FgLdbrrcyoPg9Ti+uP
+7YF30LbPyIR5o0omo4ifozprIJV8V/l1rwgiz6OsbsExmGW1/+QI8k+18nO3
+h/lSyxJ9YR9Xniw5FxwjIhoGSH3DLaryST77FHwCYX7fBZs1MMfJ2kkKjl74
+0aeSPBdJJZUl2K8dB+vi9WHOzuoFgbB72uH8FKzr+KNkbCM83LJj4TTWcfRn
+lZnCD+/IB3vA7IKIShtY/v4mqybM69+vYnYAVugvG2AST8u7FsC2T0c8q9Hy
+jVSWT6FtnSjUdEBLX37k6y6MU/r9eXB0Lup9MVD3KZz+viHnGsxXLG60wjqR
+oxvdQmCafPbh+3Bi69LFbjBXy6hqJeK072lSc4F51y4582BLbkUim1xvHWj7
+G170cKLjKCw89dDZFnmaXi3Lz4M5SrdfnIDzhgoUu4hlS3Sy4dS3fzyfh/go
+dnhFHhwacsfeCabVPp4+Dw/0eP48BftbjKV5wQ+Wn/K9DQuyP9uowikaw4mv
+YG7O+bparN870/rDAHG4/d2tsPB6L/f/nDiT20nu5+OKx1pIPRjVTFc49/Sj
+2Hwy39e3C1pQjyc5ekHeMCfoR5IzrKDo9VMeLpz9WISsc2BBYDXJh7H+3S4f
++OybjSw9YrNGldmwhc6R8mwF5KNpNvAI/w9yqP4hC7MbKs8lw+rL3m4KnoP8
+HN62RsHTyoMrO+TRn0vzjIEr8tnr18H+AXK1V+BQ6tdEsRzi7/tzTwecfrpu
+nz5MqzudswTrxbZ0G9yhwTtPisbA6ml8260w3/vZsjFY2bSuTwJmON4x2od8
+uLxLcZdlsd6KqfYecl6sXpr0F1y4sfvqVtSjiu5byYQFWu2sR/CRo7u+2ZHx
+gzEpOqhn9KT0qWOw/xEp7SNwusmlpc0wvfEx/S6s//HM8vlYT/DL9IIQvu01
+0O4ECye/XCK/H4qv/kw+A/u7FnmSfiORi4KHpP/FgVXke0eJyZT6BrPt5fGL
+D+NG9BRVkC9j38eyxeR6602WK0k9upItKsnzqFQTZQyzajN3WMIvzdOjdch4
+H93XtchP/uOvHjHYMWT021ryfsypVGgk9bHI16hEffTbBi+E0cj561tnBi91
+72hQgDnDx74+Rr1ZEs/a1siS83GTsw9cGhMpy5iNfOUz6lXgFB2dRBkZ7Per
+a5792OcJqZTizlnIP5e9+j9YwShmd64U8ljeZPkI/lR56HHgTMw7ZcbugnWr
+2r/YSZLfy80bZTBf1WcrZzMJxJ9jWLyZPGfPLQ5vEEe7ztzuBvzwR8Ct0D8w
+/8jY77mIVztb7flTMfJ9kyz5Dyyt7zXhBFNhYoYzkG/FaxkvCqazS+aFwS//
+aQ1qF8V6+UybQdglaX9OF8x/Un/ZGfXrlJUo+gPjHUvS9+XDprU292zFyPn2
+MnUYfqV5Jq2ArHfqHwkV7Efoz1JFZcQjnNMbzIBfZa5xTiDx7dz5cCm5X14m
+qIkgflqo+4AUeX98vhrsDXNueIs8J/fXXwf4VcTu8ibHyfdmcuOGcZh7a+Ht
+RXDsybVnZ0qQ+6MnjLwvqyaCo76Lk99DDgZ65P11496ju+R6u1KRa8jfdGig
+xUmc/B5T3qIB5wmZ0vcQz8gNiSTyPPHVD+ZNI36exuCEPsxOmSpSJvUKeLu+
+AfuR1ynZNA/1EAjW5wTBVfO3T/6YgXFtqzxWwZ6eu1yeUKiflEa3PExvFrfS
++82kBIrCPZJk/wNeKz2cZCI/N7oSbBy/eNvBn0yK3nFZ0xy2sUxwZk0wKbY2
+3S8KFghtqq2/MSnaU5HhFtixkyvOHcf1N23qVyM+yi6qROsLk/JffZpdQOJl
+bv0tN8akGGJ7M9XJOTVT//iWUVwv5a2dRs6Dz1dmjY5gPRfdGFny/ZD144oQ
+phZPhoaT95MBr0oF47kJZ7Xa4L8v7QlLhUe0Njipod7GKkcNbDE/ra8pZgus
+PTuVUsf6hbUCq0MwTYsVLIX4GH0X5geS+yHfZMsXWJA8eo2cp/7rH7g1fkX8
+S8SrtWHh1Q+zIpEfvbXCmJw33LizvtMk303zf3JgwdamErPviGdh8X9y8Pad
+qz8wYLqqovYF8h4oincQYDxHKWzRHJi3+WiDIsyy2ClxltTjltZ3cbKefttm
+aXj7PdqGTMTLs2p0OE/q/SP56RDyc6x58H4JOYe9qvqGPiPeu30BzTiHGefo
+P88PYj76uhNxc8hz+FR5qB/xqOffdyf9q7Y+XdALD52usYWF3gZ9se3Yj2UO
+MluIcdMqPmNS/MYakRCYcj2c6sxnUkL5oQ+FxOTvwr3/bxVY/wOFNAsU
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.181526323287266, 4.607704332175082}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.00000000000182, 17.000000000003638`}, {
+          14.000000000003183`, 16.500000000003638`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.892040876190137, 17.440709485718344}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwV1Qs4lFkYB/BPJmliWS1qd8o1t4hRK7n1RbVSi25yazGW1LhtbJEupEzr
+UYaIooxmSHSZaptUSHTdSkpKmUqiZhImhHLb/5nnmfme35wz5/zf9zvfMwac
+mDVhkyiKisKbXCkG+bCmKU1yZdFUpKrHcl1Y/3mIZSmcIXd1XQwrsjSCFs+i
+qcZiKm8bLC7MOVgPx3Jv912D6c3i0bmzaUp6njrGsMH3k6sr4uAMF9GjeXCj
+fYooD/4hLVPZH1Z4x1kQD55X/LwP5lck3iHzPf2bGRWwDR01jw3PqJ/oeAjX
+hndObcZ+jPEsaxncljWeFw4/XyK5OQJ7v6ly7EFefsr1fhU28gTSg/FwAyNN
+OBXW3GX4QpnUp3zOjgHzXRVc4S80tfSxRc4QyatetzAAZhX2aneSPKdiHNmw
+iVVQXANZ/3JzrjmsVdZdcpnsf8nAdTlclSK6X0jq0XEcToN9zXaP7Cd5S2m2
+HP5+4sLCODhY+NQrAvsP75niEA6LqTL5GFxaweYEk3qFr6xOop4I27fHOXCy
+OCNkFeoXSz75RZE8fsbcftjDmZ+UTLxoa+ghPZpqsdblFMC+h1uzmPo05brk
+uaKK5Dn9IpSGg8O+CN7DVGq9eji8fJ/kqDrqT8iLHkqEB+5Nb7CHZ/zUJEyC
+P1GrZ4XC7q1tlVzYN1Pp73Q4/+ycryvhUvaPfWfYpB9D0/Vgnz+l4/dIv01r
+3J4gD7M4PvI16S+rm+cH13Xv2i+H25qOdL1F/vgtiTO74eCaK6lRsMjr/h4Z
+LNBZ08eE7UQu2VJijRvSG+jHzhJe0X+wzcbav7JhM/0NPv/C+uvlKjyYauCX
+F5D7G723qQim1Uwke2Hx2PxHUngS43Ael8wfKi9zxPqBgVrevnBjjNX4FZjJ
+OSn0IPnXt2SuRF671pejbqS+JNOzPbBooafPMtiM9cBnFemXxYCFF8kzI8BZ
+ANsmxkeHkPqCsvg9pP+3ew8mwbIckfV8A5pKj5mTWAgnX8jM2QLrp3Iv1cGq
+2SvUsmFpZQT3M8nPfPHuFFyYq52va4v+lPISK+Btm36d6QoLVMr9j8N9J+mX
+m+HhuyzTPXCat7AnA5ZVu6ashdvtna+dhvMPfH83Cw5Od1a6AUe8tA9pR76O
+kWrqIawqvxpfQu6ne2diI0zvl5aR+x0+pfEyGZe90fZdBA93KqXcJOPWqWFa
+cJ1e2WwxrOnXMtaP/ghcEhYcgxWHjZ91wPynXHEKTD2T1X6Dt/BGTkfAjXb3
+kmbi9zaP6+nVsJlB8ILfYHFV6Q5nOPafvC+pcLQGz8gaFvMWVzyELzoXiU1J
+/q6ho6Sez6PO5maw99ytcVvh7I4AHTbMf//63B1YcUxzB+mX6jSnR9qGeP5/
+j30cQMZDdYsD4FUfm7R2kn5KzbNyYHHHlKfFJI/13SfVMCMsyO0B2W90e1Yz
+bNvmwBkk+X8Y026FPbocNAzm4/n27LrbALM+smxXwPaDJpYX4dhZc1oj4TLT
+0gc8uNZBiZMOBxuMM9fC6yR2yQK4UnPJgC6sUE4IO0fWe58x+Ar5RxsLb12C
+za57FQngDxPRLWLY+0T56ij4jQOOBpxwKoFaRvpRW5edCyvcfXot4EgLI/Vk
+2H19zm4Dct5sWiSbyLjhuslk3KkkReRJ9t9oVrUUlhTtGLQj638+dDUWDuT3
+SgxhTbWd1Bn41sS6q9PJegwNQT/c9nXZrmlwcsz2djfk/8As0CGu/KZ3IB8+
+omrPIvNbKmKmdcMuk4QnjGDfYrnMyYim1JJHTJxIf7otP6bCloc4NQEk38QG
+/xrYP3fjGMk/PF7whxwe9nQxLIdlXb4qysY4TwPmVs1kvbntCUx4fAIvWJX8
+fxnT/wPf+3c5
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.393275441506763, 7.232686837739852}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwd2Hk8VPv/B/BRXGsMWcuuLCUmylWUkSxJGpW0iOmGuiWmhTYydbWTpULS
+NAqlyNKmkhC5FE24KGubEL6TRGnxe71//jmPp/M5720+58zB4K/QFYETGAwG
+W4LBoCNjeBw/k9mMb3TUZzOEmwYEp1XZDFZHZrSGAZvhyxjgTFNjM5iM3E4j
+OOfRkZfFcHxwwJ/TYM11D0pWqrMZPS89WJpwo0it6j2s+fSVmOIVdco1b9NA
+vLR2vTaKv7/a6QPcEpLfngvzLlV9XqaJ/JvXFYXDItstYVfg4w8XXLCFK/K2
+mL+HOXNawj7p4fc9ssuVtLBu9ugPLtwWxf42DeZoXqxq0mUzSs8mTTOG2Rk3
+G71gc+6zq6qw2Kn5Y5MO4lkJtL4gHj96t+9W2Nwm7kEFzNRpHFGC7W/c9oqF
+Gf0ZxTXabIZbh7yUF53XmP9fGtxf0T1LFY73Hdh5DI5+4TCzFf3k98Q+PQm/
+92iwvg7HJ/r/yoQ1xzvNjsDCmMdLmuF4ef+doXT+w+SRqcinOsn/Jc2HOdfh
+EA9+P/+bRwTM79v+RAT/DJfTvAxzJB5q2aKf4OiMI+0wb+xNUjr1K06RsqD6
+6n7byGAe9hKBMxJpXj72qpth8TzzImn0z61zTb0PxzycWXwKZuYF3/0B59/J
+uzFlCvLds5RQw7xjzF1O5MPM5LEv+vDiU9cUl0xFPJ5pB3lO8ZVXnfAardtb
+VOGcWuNUHvoqHTKJHEU8bucZh1E4X9yvlgfHl4YbUV+isPD3XrDbcKdlCyw0
+65Z/h/p354jGzXHkVVdvCcKxpfqvb8E4drme2NKFdab7MtYmw9zn7157w7tD
+w11yqO+ggMfPkMc0fMoTcvzRN0xXeHjg0PVUur7IIuE56jw+rzZ1L60fnZ7M
+hVuiq18tgfMN1d78Acf4n7ZSofgSIdvL0bcwN6P2P+Rh/O29/hxsnrRW6jys
+v2d9Ix8uVpKx5cKlN10YR+C0ZttUS5ijvHNiOhxgvF9Onq73fyHdAPdvKOn5
+SvOYaMnRRL4tnZ+GhmBW8ETv7bBtvbKpJNZzR3b01sKL5Xm3ZlD8veab52Jd
+13KLriCYpebaKaD9N3exehHlS5D1lMKRHV/YpY362b8uvNgEtyXX/kykeSwP
+bLgDdzWN7tDA3BkWDI9RWGz4X34WXNpZ+2oa1t2e5eOrS/dh5+ZBO7i8oES4
+FY7feuDjfJhZv2v4DpyfPaxnAItmmrB+w6zBipFBxNM2llnmiPueL/pZkwnv
+jWPuj4TZ8zcNuNIcxqZYFsCcQf3jLah/UOmHfSvMCOFHrodnpA++GoNFTXoO
+/6F/yaz32UqGqDvb8ZI7/JvjVK4Fc/RNBKWY58hdqWwyd/bxufbwwZT5y5kw
+X8NrWjn2dXewrvQ45TOuKV4N13y1Df8I85zm3vuF++LnTmb0M5i5/ZHcA7pP
+1pq65MLipSvq6L7vuK/TdxrWv3TXcD89l1hVgp3UX9VV4yhYMcwtch1cWp76
+9QK8Sk5ulxv12z61oA62mh8xa6EB7deQs/TccUndJ7OA+vNMV94K8/4nwXCh
+/p07R2rgJst3mWth1kF+qhX6UXV4NHUv1VcpoZAGB/lfUk6n/CPdrhMwjxJt
+z+oGuMs2MJj2c3iqki7Ni6WS018AZ13LifeC2XsKS4fg1fWmPudhES8hTg/z
+zoqICX0Pi6fk1dP+Olj/4zbLCJ+vk5vYGm4T248cgIWXHD204KRzpQoVcHxl
+nGc34on07L78MQ31pQ75pcHX/+x6vQjO15zdtAAOqti4MBwuFfE+1KJ+xYC+
+z5fIm3J2c+DnG7ZZPiZnZn+vRv+sR8WCBnKl7hIH2Hjp/LXtcHz30KY7NN8L
+93raKL5f3qLZ8NuQJkdaz8xbkn4Pz8GxuT/ul8HCqK21HnBh1JLv2TAv127f
+ML6H8mvtemPhrvrkswVwSU2sMJTiX7eyOAp39yxd5kX5v/zasAv+o2JQZy4s
+Tsidtw+2its5Q4fyb29oSIIf9Kzzk4c5+9Kca2D7OycCJGBu0b/lTHouHyg+
+x6B4zxXuBcEZXzf3ydL5kmufquDixUfFFI8ZmX3LEv0MvyqvtIf5JyR1zlO/
+IY7qQbC+wclp43Cd5iT983R+XUyfL+3nB/IPG6k+JZXuXNg3zjBQYzrynj+g
+OghnJSms8IeZFzKM6LmuUGR/8DosGq86awn/9pGqGIE5XveazOGc6SZDjsb4
+HJ54rVaGfaVfvz0Bs5tjo9sRr1y8IfE5rD+t6WUibONpPEfGBP0w+wTW9D2y
+pszZDuYnvDF6gnrr99wWBMDCwnWezrDFaFbEP+TIOSkl6D9Va/2pZDh+yokW
+a1hGbNAjhPW9/2Nexzwb6zL1yZySTbbG8HNfzVlJcOljI5lcvHeUX5cIiqZ4
+XGb1Itg8b2p4MJy/z9LkE95b6sV1bhyK91hCPhvmRsmMzIa7Vn/bfxBWYC7I
+mUz1HmAdDYY7dPjnR6l/71XzdsF9/EuNnbCoXE2QAPtdt3atg/MT3Cor4ZsZ
+J89XkFlWrQrIr36QbUBmPJvnvAleeNeuodaY3jfKqirgsSfCeW8pfuf5QnP0
+M+RgHCJB8/vgqEL76XSQlNZMmGff/e4HXLMscbcfzHgs5b4W85mwZrV3Kq1f
+Gfs4G9ZUXWPTTr630rUXntKotGS6KdYPSiTRe0namY3HeTC/Mm+OGbzlS2Nt
+McxK/Dd1OvzUz7xH2gyfW5vJQln4bu/2wuUwO6UipRHxsm5tm5FoRvstz+gE
+vbe97DhSC4tnp7ia0XvMIxtnxgzU+/ugUxHdP/t9nMxgRnCK3Hz4aKOwzBVm
+z6ybcgv9p24oDV0Pcy+fXmZKn9/knyEBcKlEW4aA5unYwNkE638tUJ8K8z0k
+ldfCzAN9ay7jvXRdtI08xWNNrsyzhVOab/dbUP4bGmVvVDC/uBeXVeD4rPHt
+QrhmqcBlmPqRy7wdDqt+GPmjifqdtuxCIGyazFd+QP2xU6Zvh9vkGg9chlkb
+1q+KgRc6pcxKoH53aLDK4LcTDz8/BjPihO0yyC86LH2DXGqoXewPt3VFPqD1
+3Pypp8pgd0OrQ1mwSGFxshn6Gcz9oPqU4vnlfEqERb49WmK6PmLwyDf4csWr
+p0aonyOqPOmN+YjO9fX7U7/fJu/LhA2zXCWv0HxkrNe+h39HmNt/onkzM7oV
+Me/6suFYm5no/+GmQkN4bHVA/WGYpxNhrwsLYl1aamH9mqcTJeD918MPqJnj
++nPzTj1DvIyT/g99YNaCo6uiYJsqKVEizL3kLNKFBdKP7SvhrqFVi3NRr+Dq
+y84BWJS9M9sCVtyy5rf8LPQTFX3oKvoPsRlYqgeLvBdc04Y7ztYMmMCcCFX9
+M5jnjIFF+4xh/sWsdiVYyBIMTIXZE7PPJCuzGSqHBdmycFddwiEL+DlnyobP
+yMdh/XBpYeLo7zTaSO4+9ygZdpf0TrwLMwPnt4bAd6dGbUih+stXXPSDx/75
+eiQCjt8W9jsIdvmoqh8Il5ZdHDkKb70Uo7yK+lvBOFoMl1bs/OUO5+vI1kgi
+/wTuZOuldP3lq1N9YcMplkJvit9yfW4JzK2eV7WV1genbjSm/bZ6/P5JOs+3
+yY6D1X0/at4h6ybJfYX/iuxU76V4UmU5XpjPSPyTQ9PRr3hGmko6PD/vU90W
+mlezsnsnvJfvO7OAXHJETZaeX8P/O/2T5uX+ZpI2zLTJfelmgfNG9Q/VYfWr
+oeVn4Pgjs69+w/WFxYMLWmE+b2h9Oe1XwRxnHUt8/m/+CgiD/3VIVlkDd536
+aasKu6zwMT8Js31CjS+jXqaTwe5COP70yAwj+JtFrZUIFi8PfH4B/c/xfav3
+DuaZX+lhwtq+cQGf6HrPmMPHME/1xtHzvXCpi2esJHx4Yl95B+VvbuRpKeHz
+/3uh43OYyxuPcFPE+1C4V9UtmF9atuPiJDyPNFguyRTvWMIXHdg90urVXorX
+sau9VgHfv4Gteevo/HS+Zh4cMuf9yEJYP+fFsTLYvCaozITylebITsT1Y5dV
+v6hTvtvDsaHwBJG/uSIstCxnSyB/ypvA+2SGtrAqHx77sTxai9arPjkdhno7
+NO7JW8KigDhlI9pf/js2LKf5NNe7x8DxgeNq+8lBoh2f4b2hlwJuUrx3n/KW
+YT5v/dom03zizbRj0mCGu95SDRbyR/dovYatP3icsoMZtemGEzHvjduznDeS
+h6a7qsFxlxsDj8Hi/hpNun8KXnIacmCm3jZTMa4/7tETIYLj3w/L3YdXMb9s
++kwOWbZyG3wguypLcTZsV3VIFh7f+PuEyWx633jdm4R6eZ6GfDuY7zw7TgN+
+vCbK0h1m9Pwc0UP/Q26isJXkeWk6cpiPm0XW3z6w8Gt6yijm/eeh/WtXw129
+W5cOybMZt96F/cshh+w6PRHe/M+kv11hdpllrbUcnmeNeWqUjzsmmHVSls3Q
+vV9bZU7rm22dFeBEZ0GsDq1nuXc8kmEzlhfJRFH9XTwTkRB++920kEHnRU2f
+bsNnWR8tv6JfttGvX6PwoOqU3n5Y3+b7h0DEC56QldPDovvdruwbnBPA0OuF
+uXYqZtmo58ZJ3q1BmK8dyA9Bva35q65+p+tvzfB0QH/uw2njsjSf/o9CZewf
+p6Kk43o0D1eDPa3wcIVcyzya53CY6RnMR1k6xWsNzeeo6jNLzO/TWp1Z+8my
+/gnZcKXB/w4K6Hq8XY/BVxIPO1bApUst/RSZ9H8JM24f9dcWtFIaVnDYVq5k
+hfhRA4ovsL7B75SPNdz1TyzLH+6/cs9gFcx3SVtUjvytzDD2DpgtzfX+hfr2
+uDR9PwELMxfpaMCPpHXKL1I8SW6OBvoLdAx3zIHxhaIjg/7TV5z1uQOXzkmZ
+O4R5lVRL6NynfD87xzox35Knum/vUfxFL5e1SuPv1ycNMwsp/l0n/sAf2D/n
+tG9eo/OxT7/owr4mmYvTKF7QhbJwKeQ7V9kbS/n7zHhjkmzGAN8+5yCt3zZW
+lAsvDpucEUrnI1M2JsLhkoYfN1J9H0ZNr8EFZtciV1O/c/Vq+uEJ0Xt8PCn+
+zJ+TfRH/iLbOIneqt3Ozmhi2+7iz6/89HrM+HfWYhH2+wqF4ngbszai/elT6
+3/V0fsOCxbboz/zQjeXBVvS+prlbDv07zP1T6jDFX3P2RQMc+UoQQf1wG51v
+ncT+0W5o03hI9RTcX2CM+fHnbJ/UTvWXl+QI4OqeBJ6ENXyx9+YAbOQoa2cC
+M1RGMhUxf8Vukc8ya/p+8Wj+jfOOU6Nv7oT5nLzjj+AJze0WSdb093urtAd8
+N/tD6124S/g6LRf5xX1eTQ2w8MzhzR9RX9aXgsB+yjeabsaA6d9847SejtLs
+/wPOwiIH
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.674112975512006, 3.0634133525730736}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl1Qs0VHkcB/DLlNcqtSFFDCaPpjx6EuWaipIyGyNKIdbamEVovdolW06t
+avSiDU2xslI5JfTS3ZoSWTsSZpVM7WyNHsxSjYpmv//2njPnns/5v76/3733
+jPWWhHVfa1MUJcSP3P+/2DQ1qsHlSFM092maASxRBm6ogqUvQ3RYsLwka3kQ
+zIwtun7fiqYqZ139oAXLNedrs+BYi9tZ9Q5Y/zC0TRc2o9Rr0uBsXkd7uiVN
+xY/zWeILJ67vM+2ZQVOGkxPd7Mj8Ya9JrvA1k4VzTGHV4wFJngX88ucPxBF6
+lvRzc5rK0vy2zR5mm41QIXAru0+4AhbJZiQ/mY79vd6+EsL8q/y0PXCKH2tV
+CcysqDQIgl0iaoR/kvEqhzEe3BDkM50i9RRUPxbArTm7ZnJJPWv/pfbCTCrF
++MMiT0FZD3xX01sTCU/afmKpN86XnXTf8w3Mb5r2+hIs1VW1hBFb71Q6I391
+vJDyJv3jjZpUwKJUbYkx6W+Af6ER6lUs9qv7i+R5tSYkGnZoc48+SPpT0nWg
+BC7qSrXkkf7N+MCtg4OYVMkre5oSjwzanCHrmxt3H4XpzfvLMuGIZqPyZTD/
+cqCNI1zZdnrmiB3qbnLi1ZM8x+Wl9bDcJO0XLty6wPrNT7DqztVN+5B/XHP9
+7C1wRLDimYL0533mOj4s6hqc5wEvz1waGUDGjX4MPjYN6ywn+m6GpV86/60L
+h6WveZsB83lM7H4zPI/SvJxTcLZQpJ4LSyeqA9vJ/A4l834q+vhrdwQLeZlD
+nAcKeP4OVex8WBUiGxuGE734SyLgxM069zhY/+YeSzsXrrnOrdn2eT9x3DFS
+v8Hlr7rh2QUtw2JY2p7c74c85epMrSKy/4WkmxKYMc7U/gFmT357i9QjScpI
+CSTjmbu0T8OGJ316p8HyA+5rP8GKFTkXOpCXPSHo0mL0R9W2dS7pV7a/0XAw
+bMblujiTceNztwLg2qT2LtlMrLc9ZMaB2TrdMbtg1RYrx07sZ9znN+QGSx1X
+hcfAh/f2mas56O8NG+te5OMPKR/dhGmXugwaVgiUglLYxe3o2SLU55lQXL2X
+ONP+7AD6E1J38X0esUB2YDVsJlnuewRmEuZ8qjfF99PAEdfAlLqq0gNW6do5
+d8PisXl/PDLB92TmHz8eeajvdnacgMcVWwsWEQv6dfJgT/pcdSzssolJOgiP
++Bl5HYHFRjce3YCzV+7gXIZFpuuGDLD/yhMHNVKYbqzPFcKyB0Nze8j8jqMv
+++Dohx8NOmC+xeu8UOR9490vu0Lm2zcua4cb7jaMFcCJWwftl5J6o2wUoeT8
+jatfFMKMJeuFMdmv7vck8rzlWqcW30E9bIcKXzWsLLAvToLlTr0Dw3C+nnCe
+OSwdn2feCotbnno32eL9CTzflA2n7Kx+kg6L7OptTeDicCfJQljsvi1qP/KU
+Z7DVFJwYyokbRn5/YefFHhvkr8mP9IeZ6EaP27BLWc+cU+iH//ooCQOLqcr+
+MWPUp5mY0grTZfcDYmHFkqiEZ2S8gnbtn4I7f/TdF9ifMfUY2Q3HslYdcoel
+F615PrAD/+HqOJh9qfOII+y5ofFZMcl7OsHDlditj9tC8k24uWgjXFQqcBgk
+4zxVXBms1AkT6qF+VZZNNwvn5+sb+k6BJ4XR71JgivX98wmkf4+veQzAxbnx
+uWpSf8GnwhjUo/xoGy4l+WL+0e+E6d2a5mMwRQudXFF/fm2VfjCcfSb9TjJ5
+v8KfLNAj+fnJswphC0Mr3VrUy7jllBMb71h5fBPp3/jrZ8j88nCt+fqkf9/W
+jHLhiLjbQ1escX7x4X23cJ70JFW4HZYXGIV7wfn9PJ4XrOqMnF2BvCF6fj5T
+4c8XPEL+v9j0f1GRbYk=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.232686837739852, 11.393275441506766}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwl03dM00EUB/CDggFRmUorUttaIsqwhqkQPRUVUbQoYg2CFSHgQBC0SlCm
+CARHNdoUQ1JkRMCRigsHAsFiURPRpIZ/BDEgDZUhQqg4vxd/yeXyyV3ee/fu
+fsKEtO1JloSQEAw2//+8KbFi8yJKzNm25m3wi5K0qkERJYI6wxM1XJlTQ1pg
+4xWPvR/g1t0nqophblPnTWsfSrzrBT/WwSk8bYQYDtWWBk8JKal7OzAsgZ/d
+UoprYaX9mkQvtn9lkiEK7uIernCB5Ql3FBZw92OBagTx1TTHuklAyadLOWuf
+MWuWOGbBlJexMx82XzcVbITDhfZ2a2HvHe/SPOCSNXn9lvCeDt2UM+zZfFeu
+96JEJn/px9xVJXyggslEvL8ItpGElh2FXSLTHVazdcH+jlg4LDWLkwwb5wXE
+7ILPTe4rV7F81OiaBPcPeQx0snzdFfozMI39+fwXq+9Fru0DOG/EbYYXziPt
+yT7+HRZnCz9L4bFR0ctQ1Bc2PvT3IKzWKWadhwl/fYcC1gbuHeiFj11wyc1g
+/Xszpmf9m2jPzIiDU86ERGbDMkvX8SC46YYk9SkszqXRHFiv3KIfho0xV3ra
+WP2XnLvtfSk5Ve1WpYCly524Argk6G4E61dd0Rd3PvOx+53VCxG3xKCZCZOE
+TSEWsHG08MAg4oVb2Voc4uPeE4tWP2L3df/8EaM7JemWRfdOs3ynxZW5cJfv
+c9Mq5iyn+QFwysP1+/7iPFJPXr4dbE7yL2+Hg2XV6RxY7TD340W4q8H3qBuz
+H2cqGQ7/VmwvhbtVtya3wtyRA84VsHGR6ecGWLuC/97M1vMm+FHsPZZaq+NR
+n8QzcGcqi1dWINLB2j9fFdfYfl6LSIzzSKzSpOz9pvcGtmXCylFrnTvqpXsG
+eLdheb4fSYWbLqfUv4KlYdGNLT7sHmNq9HCrrC/aEf2pM8T71cKCaW5GHGx8
+rVDKYbOvxqSBaftmzm/kH5t+FGKAPfmLm3NgetXx9jQsbzyrMqH+k4kNRXOW
+IW5PYWMEPFa9VOQAV/bpZtcsoP//T9iGzQvoP3WPQ9g=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.47431403485444, 8.442668420912664}, \
+{-1, -1}], 
+        LineBox[{{14.000000000007276`, 16.500000000003638`}, {
+         8.000000000005457, 13.}}], 
+        PolygonBox[{{10.48173265946094, 14.447677384685548`}, {
+         11.316718930329426`, 15.397834175673825`}, {11.719815750748694`, 
+         14.706811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10.823799910437668, 15.484057296392571}, \
+{1, -1}], LineBox[{{14., 16.50000000000231}, {14., 9.499999999998607}}], 
+        PolygonBox[{{14., 13.6}, {13.6, 12.4}, {14.4, 12.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.9452, 13.}, {-1, 0}], 
+        LineBox[{{8., 13.000000000003638`}, {14.000000000003638`, 
+         9.500000000003638}}], 
+        PolygonBox[{{11.51826734053906, 10.947677384685548`}, {
+         10.280184249251306`, 11.206811054955079`}, {10.683281069670574`, 
+         11.897834175673825`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10.823799910437668, 10.515942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{5., 8.5}], PointBox[{15.5, 7.}], 
+         PointBox[{14., 16.5}], PointBox[{8., 13.}], PointBox[{14., 9.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T11", " ", "P2", " ", "N22"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdgef/figjhihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdgef/figjhihjij.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:eJwl1AlQE2cUB/APCHcCEQ+CF0FaRQckUEhpPXaFiigKVqmg9SAKFB2O4IgX
+kaYanKBSDqHGTgQUqyjaIIOAghiptkQQqSgGSjEIIjKEQwRBMtL/2p3J7Pzm
+7fe+9963G6ed8RsijQkhkfgxd9I8iWsqTT5d7jRJim5wVsD5mzkmdYtpcsZy
+IsURpoXeI7mwd4wh6awdTdQlmReOwLMTfu+3hLVFMaJo+KJql3viFJpw+Zkm
+4XDr48O1L7g0cYkKfBQBS3k/BQbBY3OT9u5n4vXs5SdsaRJg/9whm4k7Zisz
+bGhycAkVVQV7nb58q4xDE55XWYoeFlxSU8awhfP2lZ+j3tH7WcsPsGkS9ka5
+UARb3Er6aA9XPNiemgt/ppG87rJG3s7AolZY3PhI0ga3cbQJlgKahER8FTsB
+K9Z0h82Dp81OK1+K9dKKQr0QbuWkdZyFIyajff3hMJ0NZY39laenFgTDageB
+vxxuFA4qN8DJdmy9OeoPmZZmwsS1Bj37J7hYfuntNzAr9e6fvTBXNVrvBY8a
+/dC1FP3r7o1/6QgreW88xbBr1bNpprDsRMLfyXA4P0rfgPpDTF4kRMCFJTq3
+dNhnBkc+F9aORKSvg105TyOvIf/YUs1DNny8OtXXFhbE/pz+GPPzyVG5rUG9
+0ukRUQq4LHu7XoT+LEI25eyGa+w7NFsxj2Lb52YrYTbvVoCvFVxZ6uUKb9pn
+0TrTEvvdfWXPh6Mru5MGzDGXnNY5TvAMu7xQjRnep+E6Z3dY0j512w1TPF/g
+c3A1/HDFrzoVC+f929GXcbCCI6PqTTCP7tDic7C/zcp0NqwN3ljbBF+NK9qS
+aIx4vOU9G/TTM2gutoR5KccmAmHWrOgajRH2W2imlsOlTZ47bsL5ia+/r2Ge
+N5w5yMSli92oUTiMtUNmhPU9/25iT8F8dT73YkPhroK7751geoar9g/Y613Q
+bDe4pMhGvBz1GAr1wx4CJv8S/2o4Y75qmQC+7/Te42v0w+o9S1zguMxD3ldg
+btSWkw5w81Cezhj9y450ipnzHO2WX6dgntCP1YJ6InIXbdwM60ytT+TBvOrv
+rALhRr+sJ+Fwcqp7zRR4cF7Tfkf41LKXK64hv0XCQ9d2zEcr4gpnwWqjm1fy
+4PU9iQtFzPwGQmRR8Id8s91HmX5npfC84Vr97acyzKPCemMsh/n+RNy8eIJ4
+XuXcITeaZN9mGXI+UkTqORnYAa+tv3OeMlDEZ1XwyXa4T3H9SP84RQRe2zp7
+4OJjgxdL31NkLJNbNwm7tGtcC0Yows+Ndp+H/NxHnHjNMEUU71b9GASH2P8i
+8npLkTCTK1VH4fwug3n/IEUqPJKzmO+duyPW+sMARUj0urhx5v9AJr1a20+R
+weJYpRD9hy+YCPKHxx4XRybARLS5ZTfMd/jC7TKs9rHlOGM97W+V9gxm74o5
+74b8vEMK8Qe4L6BcMAG7+N+YbsWcX+W4Re8QRdqyyh9wYfacvZk9qM8g9Rxm
+rBAuSulC/VvXxmQwz8tMD1TWvUP95JBqgsmn8Rs4hX6Jp21WM7OfVZ6EN0oR
+i7TjAUw94jN72CJY3b2/Jp55XzOezN8K88q6VnvCiiHfS8Zw4WH+niH0y3fq
+M/0W+aR2LU0q5jy7EuWrsF+P5DQlZr4nY2/vXtTH86gPZs5z7YLJIhr160Ys
+9xkx86QnLxRhHhltjg3NOI/wPj9VXC/mMf3+zHJ4/T+RQb2vUN9fktwCWL4r
+dOeKDoo0Jpfan4MFT5VVghZ4UXoZExfv0ccsaMT+US2f1tO1nZKSavTT4BLG
+5P90Xbzz/30x/R8h+kp5
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.2761166322027524, 16.884033677972475}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1Qs01FkcB/DbZJnFMgyKoxojPeWV7anmrweKCoW2nWrSU1o7JVJLHq3X
+JKaIHtLUqdSUkkUhNdFmNctO6JSIOdrooZo0FZrY7z075zj/83Hv/97v73fn
+/x+70F8DN7MIIXvxR6+kYxifUQzR0KslQy4V9r7KhMk/Hg1Z8IH9BgpDWGrm
+sP5H+Bbb5+MeK4a4jEsf9cmCIZdv6q634f/SNyP1m2Ar/p/n5sKykFBFA3z2
+uPD8KVyZHLvlL3EtWPlqlwGuxRYmk3iYF+l5but+LkNEI9h+u2B2QP50A1i1
+7O3Gp3DJTEvZeXPMr77+LRD7nrU6sk4I81obHz6Cp5XrdTvCKp9YCyFy+hZ1
+rR8Fy24cbeiAu59xL9jAaqdqt5DRDGm63BzgDhMnx+HbsNvG2qciev9Q7T2O
+NUN0M07eOwlr/Ba7+cCL6qa0dsLSnfa+oXDB3qrwicjH0+NnroWb+RFnd9C8
+d+rZc2BHkfruJeq1FcEDWF981WdPK+zi1ZZRQPdT+475AnOqM8yc4IKt5v1D
+MIms2FiEvGuycza/g/1vPGjmw4dPXBmuhRkVcTuKejXP3a/G0/ms4Ggj2F7r
+dZFP1z+8bksG+uUqSd90jfbH/495Y+FfmkP2Tqb9kK9cex99Vz0TRhw1w9XD
+XD8drnL6mtjPYYgiSGoXBq9URm9eDUvjpLbbYJMPp7ujTDH/VmpLMqzu5NT5
+miD/UuFxBcw+umLkvB+wv+nchZbYz4+zTxVojP22hf0cDwdHFUpyjJD3Hit4
+ALbqrw4ygF0ay1tjkb/dmdVWZIg+1feYjUS9c4wrJqTB6iyWQTIsEucWZsPF
+0cf7v8LmVt9WKKmrS0s3oH+KA+sfT8R6jPR9TzEcsyBytIzu9z4o9AWsVkam
+TkYesj19mQ4ur4+tvAn7D4kDtPBNvs03T+RXm5w43wDrBk/2VMCiL2EmErhm
+UkafJepNSFx03xFumdsy5AeLEhtXViJPTHypMgQmn7eumAUPHcpd5QqLRzTZ
+FKE+2486s8dYj9NZmDkOJiZeNktov6ofnclFPxhNHk+CPGLPFFNreFIaCTyN
+/OIzXFKE/h7TSsylqNc/NrQihD43bvJTm7/H+X66smYMzJ/RkDmFjfUqXQoJ
+rPvosPq1PsbH7OpiwfkTcq4Wf4e8HV137OHXMa59aXoYD1Zs2QA7pUw6GTcS
+6/d9Tr8J79bzKcljYbzp0ZHxyGN+f4qwYwTOvy6s/TSsfdIWGwy7ZMXr7FFP
+prUshkXHd+ZbyeHAUgvLLoJzaatyn4p+ROxwju2DZQNBZ2SwxPGLyAnzxdb2
+8/XQT8P2UYsyYenn2c3+8L7VrS1s7K9xkgQmwZVJ2WHZsP+tpca5sPC4JJ2P
+vJqe8of0fGy5gkQ5rFav1qPfh/LQsoFxqE8abnvYBp5xl3swBuasCXtMz8tG
+47zwMvXvqXFecFqXp/V12OV+vHst8qeYPPdJhsV6ByJmwheDFFkOMInJNJKj
+/nMHO5YewX6Kt0mED5fGaHc2Il/xMcdv59E/nxfcnZ2oh1jWWXrAL9dldf2N
++kUbhLtf4Tk1zvP7iRkWEIVzv2UJvEP1zPQvnYC46HPyjsH59d6vvAcFRDpU
+ZVYAewyX+D7+IiCabVGmNfS9Y7OgJeMT5r/gZtHzXTUtxS3uo4DwIqvGCuHx
+qje2lR8ERPYknP2APu91heEBGgFJyNNkeiHvxbJw5bF3AsI8sJ2lhGN6/z28
+7q2AqP2O8ALo93OwZEJfL+73frLqISxLDuR5Y1x0m5m6GP1SGUb5e+N+zSHz
+ExeoM7Rdze8FhFN/KlkDu5ctjH6O/Xj2S1jj0H8yJU0+iDy8GwtSnWGLoU1J
+o5GX2C82tYNFeaPzHbRwVr2DFvdrU5ZHGNH6puk65XCGSVJ4GSzzaLzrA+9u
+rzEy/4z+HUqUNiFfr0J8jQszL/stlsOxT/auuI75qoOvVXdRX3uAa1831i+W
+V8ndYYutzR1l2F96dVEOfb7ae60Oje9D/TziOp2eFzs/YD7yM8+nJSjpe3dq
+a64D+sFEeWb9Rt/Lht3Tt/cg32DKLG86fme2MqoL/VX6fXChDpWPfftUQPyv
+WMlnw4rsjXEzHiKPb3SNCE7QGdsuVKCfuyeYnaPvcfpJqP7/95fL/Ac/lbt5
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.128720493773297, 4.310154074720437}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.00000000000273, 17.000000000003638`}, {
+          17.00000000000182, 16.500000000003638`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.286281316503036, 17.427512100981787}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt2Hk81FsfB/CR1CiVaLHFyF6WocgWo5QlISkiTIVLISqlcpElQnJdSWWL
+7EtTIVLT2CJ1rcl6PVNJlKKypzyf87ye+cfr7Wzf7/d35syZkT560sZtEYVC
+UeChUMhfyvwCXusZlP+91jEoEjyqB+1EGBRasnBoBGwq+0K9HvYdLV2YgytW
+KQftFmVQGGmfwhwxTrDoiFYXbL33u0QWmSeoM+mUGIPClOVd0QInR+rYC4vj
+/4/VR/+FZVsaxx/CjO9tlaR9zSC721KCQYl/HNyfDZfSy5oHYEGZZsFjsLFv
+sojLBgYlZNFpk+Vwooww+yXceuevM1mIx1rzdqW0JOb7EWSjDgso129wgTNY
+E2JVaxkU16uCKmEw7b2krgkseJx6LA5mKukt9K1hUET2m/qEwr59aZbBcN5x
+lvhRuPX2R3stuHvuxRZ1mNXW48AHJ9KpFhMkHkk+zzFhBkVbRT6OBXOsysym
+4LozTgEn4IwcPhcx9J+Yjby5CR5fKZfpANOCTlv8QH4Zd/hYpWQ91XL/JpjW
+2Dski/ioXZompbBvz2xCDpy3fK8AcfzKH4pbkV9A0SqeVzDXeW10A6y/OFfr
+Fxm/ZJW1A+oTqC5x2QTrxfsslhiCWcqaCfmkXpoWH1zxHC2MLbtpyCdegde4
+DR60YrbkwxTFgYfyeI7DWqXCDCnUk7Pw8gjcaqSQOgCHFEp6hsCHD7F+G9Iw
+/tOPhkuwGPPivmsw0yI/zh0O4tl4rRem53TU0eHH/RYaUtKY57Pj4/dYjzNi
+stSROOzqQBhsbaptEguzDhpfWQcnV60quQ8zirkVdxD/2S+q0U3w+H31xs3w
+p7rJujcwM/2TVBXyN47ofk88fsX74wGY0TLK84qML2FX8MC3Ig1qHpH24T2O
+tajnspzreilwxpH/RKXBdTU5AxdJ/6KkZ9fJ/lj0xe4QHFK9TqYA1g+447MN
+pk0G+PTByU/+eCcCU26lTStg/mEPOzMKbK1SUxsLfx3jGx9D/ty1pkV8iHfr
+PfGnIzDlGDXhKjyQ0CFK2jP0k1Mkka/BuiguGc84GRH6AE58LmdD6sV8s7Rr
+B+oXzVgibE78zOPQC/gon6NaCPG8+Q4G3mdxo9/kOWS8nUhMJhw7XL2wdCPW
+15VWHoW16h2cD8CtBj6WYnjfqcbyZ2XDLMs+n83w/CfTZVMwZWWTrxRcLjPa
+vFMGz3d1ePo0xps+dbKIhVur9NLKYfsD5lL/wL7JfiZMmF0gs3OxLNaP3vfn
+LOJT1Fi1mQ77rjjwJRLe5CTQaQVbq61tWg2HOru/OQpniLKCUpHvJ6Vupic8
+vsvfRR1eck+G4QoLcoscO8j58qduqy1p/84ojSLnS57fqD7M9Wh/fACODo7v
+liTtxY4p22GxY52yvxBfyMcfOjvIeGHzuF4S76Ybq11hjsvX/krY2lBIO5P0
+73CoTiXtY4dd52D7lLCHUTAr881yT8RTYqH1OhDm5lLjRmDqqZftF2HB7jbv
+s8hH12Nf92XSP0nnOj/qMW+scT6N1C/obkYKXPR8SUkNTC9+oaKE+gaFjHV8
+h2nUm5vy4Yo/fEtVED/LeidtPd7HQp+9E/1gplfdWR9Y1TnB7Ampb3FRcSHs
+vl74wHI5rP/oeCQ5B44uXFl0GB4//Vu2FU5rcLtSCPseZAs+gsunbdSmYVp8
+/rYwmC084akvj/lbbrZtg53bTX4HwL6/Luj0IJ4kIx2JQpgh4f/IC17szOff
+BlvTMw1nkE/BvSN7PsPconOKoXD465TAGZhi5dcvCCc8Mg2dhWm19dEF5Pxw
+cvAagzlrZ3ttYR8d6us+uHXnr5w1cLInfyMHzqAynn1BfXcPKj3MIPHpRFe9
+g1c6exsEkXiuTfVOwNqX1emHyfq2MRMyGC+p/8FsO5l/keZ5H7ho6qecLMnH
+jD+yjZw/HdXrheGQe4MCZoiv/UXqSoH/9S+cb4EV98oFCcJ0MfYVJvKdcVOy
+kIYFg3N9J2DJqNv1BmT95mDjCNRL5GfHLQ8yf5gdWwDnKtvZ430qma/r5bII
++J3eMaV/SX5lVKER2H6zzUVZBax/8mn5VpyzFg57wv3gjNuzVDdy7hpU51XD
+46OBxwPgwYpn8kKK6F9RkelDzukyXm0mTP875q0p3G9vsjUftpa5zuIn7WFi
+Dz7BrLSujlKsNxF8/+5GJdR/0WZxK9g1TMffCrZ+Uy1PPleHdC+s84XpW9Ol
+PeDd29pXh5P+84f8fyDfW7u+xsbA8R19Fy7DOUmTJpHEV8c2K8BFj4wSA2DO
+YY+eXtRv1Hyt8RFimVMj2XBrg1jiTnhcQ+tODLxMoXoViac1//T8VVjozku/
+BRK/1e/EYtg4NDl0QJE8T5vbI/DX/c8mq+GMxGSuIdaL7ioxLSL5J6R/K4K5
+ch+z0mGaRqCRMuLXNbTgpMLMttojFWQ/T/W25ZJ6uOfv2oP8Y180BLAVSVyc
+2AE4cA2n8i2pb8irthOoXwC3+JcgqU944+woHH6PR3QPzG1lBh/G517NOUWH
+OJi5Tu1RGawqdzGtGw6JPs0/CeuX3vVS2IT9csFwlQDOdRuGtnAAHKX3+tdK
++Hfg/IsGmH60NJIXfhVv/Vp4M/ZP62LlToxn11GyDsHxP/n9YuBNt4d/JMGC
+yg9kVeGSHX1fXsD0gBXBNYjPNfP8tm8wdyzI0xJOpvUvFVBGvm4Fmt3IT7Fs
+B10M5nIcrNxJviK2khIwxUH+y2/Uh9LU+kYI5mjk1ObCnOc/hxcwH7Nhgu0G
+3yqydfwAZxzvq9eHGU5/JdTDNNvUK2qwpbDA1izSfuOhqyFswRXiu0RcsMbc
+i9zb+Isaj8CMts56cm/x6PTfYErakyVXrUM8v7VMnLRg1v34TbHwgLZ0iCrp
+73RRXAj5aHt282oQv70gnQlrHcrqMSL14o1Z0EQ9hlJOOTgTF0iaNcASQ5k7
+Ikl9RGu6FVBfj28GZVWwRwm3yBVmu+bvnoMbdRJib8BxfJtXGiH/+AfhzmxY
+0jD26VU4StQlrQt2X5L09F+Y5hZ68h2Zz0XUUlUF40Xv5w7AOVLfcgNhwQei
+ba/gRPFDUs9h5tUCmRLSf/SbMVUVdf3EczYcXibYw2sEJ+8olbeBi84fqfKB
+AyQXLYiS+L6p7o+HmX+00NjIJ0PziWk28V7mBjPYXT+7rBhurayx7kM9lL09
+LAvgEI0O9gW48WbJoRTYOmukQRlOfBqREUHGd3kOTaK+dK999h6w736fcz2w
+mNOlpSYkvl7tv4iHPzi7y5L+5Z4jU7CX96ntvDCdR/8VHfP9viW1cwj5sdZv
+kYsgz6eTNtcCc3/+kzwOU6khCTVwiC1viQ/i9ZWObX4Gc1oj+ObgiTzRL41w
+vK6w5W5S33TxWwMw7Xz8snhyb4zaP0TBejRx58Wk/uWDwbvVYMWeSiVyz4p6
+KHyLxE/98zPLGqbulNUpJPFyH+sGwXkGb6mTsPZc9VgarPXm5vWdajinbek3
+yD3SfNkK9UTY2nwou4zcmyavCg/CGUoquwrhkUm6oQgd5/6vCuu/4SO3u3z0
+4Pj7AhYnyT3QUfmMA2kvr7UygsMtJJ3PkPaKvLHl8KO/n1yIgkXaesTaET+H
+8colCebuC59Ognc8+ziWSif3o5kqJ1itc9gxHW7kTF1WguUnYmi36eT7AeMU
+qddl/eOUBJjDbs4sh/8sS5wLJ+t1nUkh58PB58YG/qRd46lSIPxzVEfCFaZ3
+uHGuwAL7zk/ZwNaBB0+WkvOrYZvaTpj1bvhfMr83vXq9FokvfZeqCtb/aEzn
+KsO0senQP+BaHk6UIpz89cZ0PjmvZLw6lWBTN5MH3+DZpvPG6nC33cwNPeRv
++KcT1ZC0SzWfCoelt5nz7SfzezaJvoC9ZyLbvUh8fX03luCeufrcpWcxZPzl
+E9a68N0U8/4SmGKXLXUUnvLS4usk46VHzwTCF3m/jM+T+LZquEfB5+z3M+TU
+kd/k7qoI+Nhk8DULmFZ3dfwM3FT/6bIfHHB8nm4HS7vxjibAIX6FJqqw5ism
+6x7MGCm4Mk/2T0nz7+ewPVelso48f7sbu7rhChm/91dgd6GY7e/hjOlFelbk
+e0C0z5ePsKKSwfh6OG4yO38IHp/j8n9Effg8pAW5sPZkjuEzsp8bnlA6iQse
+dmfCgYV+CWS9GT3va3/D5+K5fOUwVXtjYAIsdqur7K46qXfo0gx45M31JYkk
+nuC/PlTBHWk3bSNIflo2oh/gR1bN78+T/uLzFDHEo6A40nKK+KnccXt4w8Xy
+375w1ORIUSpcmk5Z60/mU6t8NQRvmbrpE0zaXYxS6ahPb+6oaDwx++7IOXjO
+yKQrh9T3H7GUSlhNeEy8Fk5uXz34Ha652C4yCHMuzNpL4177+EJUHVUD56MT
+VYR8j+hulx5Wg023xPYdhB01VFTtYe7Bu8sOw/OXt24Jgcc/ZHFs4Eavj0k5
+ME2Z81IPTt0nuaKJ9E8SzxKB9bjvvUfIfC55tp+xfpAvu5Z3C/n9ovZEOVw/
+E2UnsoXc49ltZP9YG5pVysPxdsP5RnD2/qR6VTjgNnsTFR7otsilw6wmvbMd
+5HnvC+xUhhUVpE7nwIW6uStkSX8rofwweJFEqvl6mGrgLu0NX49zqVgKN3JH
+9rrCqx/mZk8hPsqs4LQn2S9N7NMfYMWbJhrkvCq29IvoJPlmjTAz4Ev8YyqN
+cAjf520tcFX8iQw27LG+vYXEl+5v9rYSbv1g8MQcHjkdWfmY1KetXykBdt+8
+vLganqm24OmHlW8aTTTDHJb9CjkZct90Pf+O9I9L3ngcri6P6PlJ2vPSdufB
+spUHPcUQv7Zzw+t++LuP1/btcNT0YBofvneYi6RpHiP1zNtClYbf544ti4Fb
+zU1FVeGfzoddHsJ0Pd5YZXj3WnZzLzxz5kezBPyL/L605f+/L8ky/gt6ApWe
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10.791777955940793, 5.1492961558718795}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwt1ws0lVkbB/B3IpfI3ThyGYQicXRMufcOckvlkss0ZUjquOQ6RKmOiEMS
+M0juoRw5M6iJQo1KxSRDLp1vUDQ1kT5RCpG+//5mrGW967f23s9+nmfv913r
+aO4Ndw9cRlHUffyT5z9/6+h/njp4DolGOcKtmqd4b7Vpaui/ur9kwtwfTfT/
+hDm/fHWyG9591aujAWY+S5+RMKAptomfWRo8kv+txWY4uZKf6w63Z7VMsGEx
+C1MvBbhOoWk+Fc5ZXk53r6Yplx3Ddwth7V5FLy7MeZG9uhJuzx24aQ2rjr7a
+dR5eNDP/9b0WTVV23NbJIevvzAbVwose7ryjsN3u2tmDsGR4WuD3MD8325YF
+M+6eN7KAOec+T1JwnAdXUR6mH4xvEWjSVOe7wW3jqEfBM8+4CWa4e2u0wi5u
+XkZVMFeQ0XUOHtPjbi2FX78bTYiD26aUNcvh1rhfVX1Jf4qyhn+BOYtcHxf4
+mlyIUxscqieZZEfWJ5/qG4HFrHPSHODF6rUXl5F8TfmvPGE7/8raNXCRsHh9
+ODx3J/XWNjiZoRqdA8e1dJ2PgtsfOXjfIe4s1cqBR4bSVRdgV3uuaR1MWTuv
+MUd9nbK7pO+S/jxuzD5G+vWhX7UHdjUw3HwP5rYHMHuJ5VqmpdYj34FNx3+H
+n1cJ+3vBCZFB/AZYWCvdrQAO7azqPEvy+T2mRkDG7Q8EhsHcgpkz0oY05RN+
+5oAFbLlte6gVnKE2okP6nTDxTtwf9msMd7iJ+jXujBbEw2X1nQ2HSH9sB26l
+wDOlYZmGxH+I53FhRqW10AsNmpI59U35cdg1Tm57MdxWYf80FF5c+pzzLexS
+87HaDW5vjuhXgV1Dw64awezm6tIHX2G+X9q8GExfTZuIhIsW3pY8Rf7tsWca
+DODk1yvGr8JjZjzvT+q4NzY96pnw2huz9s/hH5QuRQfDvA/SyqOwT8f4lAvs
+yjdLegu3NEv5b4KZ68vZXyJeXWCC1TqY0fvyjRPcORpZqgd3X9MrS4MzzPpN
+WLBMalRyD8w8t8XMkcRrXHFJCvnzRJqj2XDye+YOEzh54IHpTzDbd+6IN+zX
+xom8T/KXfCIfC4/oRl0UQn38Iyp6mTBb/IaUPez4h6dMCTzVtqk8A467URVZ
+CWtzDQz7yXwhH68ymI65F6JmhHOzqduQTfqd76IUAMeVnpkg8ZNrrEQrYT89
+zmM3uKjbz+YJLNlt26wFL83MiIsxaUqwcy6pH/Vcno6UUoVldhx+5gX/fVSp
+Xh9u/VKc9RD9uihhU8OCx/4MSrWEnwVITG2EmcPlptVqNJW5uYtvAvskFzUp
+wfqm3g7rSbw19WEZqjSlntX/rSbZ77uFWAnYzuMqXxae6tHPyFfB/XGy3bOE
+/Oi20483wn03vhjoh8dEHj0aW4V6gs4u1cD539wzrIN/8PD5Kglmx6jePg3j
+9YvdAzs6D3MS4RYFGy0rWEP+r4R02C7JWVwb5hz1fnMRDk2x6pAn1ux17oMd
+1ZwurITr6P2e0tjfsiImXg5uDUt02gkLHx6t1yL5dIUtlsBxWlH21vC1zl6x
+CTj5Z93mfbDr57QFFuq7Ziemk0vq+Xt5YgwckZjC6oLnvBOya0j96lPqokyy
+r3DBI1hfTeySHux3X/r8Szil0LF6G8xb/2DfGDw0rrQYCdMOulG98P7Jk8dy
+4bIH51k8mK36RqGRmGU/ux+W/OTc2A9TS6kTMnD64OUjU+T8BkzlecjXUPFq
+qYgx6uugjI1glweKWUqwgGVcU41+rLr186QWnO8vG6QCd7HX5a2Fu78XreEq
+I9+2M4XEUwusp+8ZeD/+9t62GqblrH44ANfxv2Mqwz5X5PmjSuhLTeLHFbBY
+VVIEG3aPP3ZqnuTLdlj3+UuaMoga/+sFuU+8TRU8WCCxTKWHjGvMP90Pt5hk
+erTAI7ZOihbwpV22dTyYwWnJ04FVfZmOZ0l9PcF9xOrnS1TS4IjdfD9z+HD+
+oPhxOD+2ZsmPxP/o3h4PZ1Vvup4HO1ruHCRuXTlNCeCCpc4sMn+sJL9bA/ka
+rjf8lE76Hyc/EAqbsgs/FsJ1b46VNMLt0gf1L5P8tHPuLMImee/nOpnk/mUw
+TNGPxSsBFRMkPqOpLxCWyzy5eSX6cU1Gv+kErNWgdpcJM4saN2bAwS+CGZ6w
+Y6rLMQ6sLn9IMR42FTUv9oWH0psKC+E6velEXfiJXdG5ZnJeHxo+CbB/GWOX
+kgCOmHBpOQS3Bo/TU+R8Zp9tWA5zo0LChDbgfJhfpCaj3reNT/RlYV5hUNi8
+Ik1t2N9hqgxnGZuLs+Gye/wcFeKFnsY+BZrK+8/aGAZs6rlm0hZequxylCHx
+fLxFmuRpypnTWE/iz1lYK1jA6RFSx99h/7Ha4ebf5XAPyh9WjpB6Is0kQ+G8
+vcIbOmFOtbafJmzzTsy+8f/5Wtm/lsX7ekJ4eQVZXy8V+RBuM96ekQWXCb2p
+bYN3zki85MAMldmpbjjT6rRQDFmfOr51CtaW6Kw+CI9EVClqIL5ALiY6hNzP
+aPbCbtjXof1uGLn/N8u0K2AfpayHh2A/Jctdk3Bcos/RFHJ/h4qNzVFPstHc
+6QLY9Xqt2Qk4ds3+xCuwRhpr7W04bONvVd0wTzR9+QdYe9pBdxqWyTXyXIV+
+ffxrNaWA/jBL3cwM4Dn1IA1TmP21bJYenBmgF7gbdrzlIC4LtwdSNcfh9h1v
+WM8QT86yXlAGj1ldOFEM8yN3v7oJM8SUHexgny1DCwISvz23UoD8Q7cMu03C
+gudGh/eQ+vd4+S/BcS9jtgygP3xRhX4xFubP/LFkTzyjlr0Szn8+P3VFBt+T
+xL4rkjDn7denNeGb3KYcEdj1xOSRtdI01SAy17qAeGXyF6M1pGhqmcH196/h
+kWCx+g0rcb9jKxiDZJwX/jhQkqZ+HPjZ8D4Zt91n/psEvocR190uk3ED5yob
+uE/H80IxcWCB9dsVeL+r1bemE/exfLvgFaWbvOPhusHS4n44+Ce7uyFwd3TE
+kDDWX54KDNsLtxro7PWG97KyKV8y/tlN6j7snFw+S1znoXbWBfnY7DqYHwjT
+Ifm9T+GUkKX/RsJUyaJUHPIPG9XvSII1hhL8JVHf6+2RtwtgmRFNiRy4z1nZ
+uoHYRu6hCPrRUnsgqh/2C2i02gMvbeOFz5J6jfYpZMMJa5r1VEi/FeKDimGT
+x3dObGaR73nM2DF4lVGmVwCsYTQ/zYJ1+1gpJ+GsLR78Fuw3+emU0AXY79Xn
+L1RgfsHUYCvc6qSc6Y58vYZffSMg8QbSDrFRz5N9+3JfwXRTjGUA6tfeKh48
+C0covw93Rv9Knp07tUTiu7eF6or/+7vC5N+nGP0/GR1iig==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.93763702332162, 4.533080933367719}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl1wk4VekfB/DDRCjcsoy1e4vsImIU5Wgk0oIaJAol2cYyYynRjUTKuNeS
+FqNbphDDVamEQsUoyy1l61/dQQtJN0ZZ0sz37e95PO/z6X3P7/yWc46nxf7h
+bgHiFEW14Jes//9RoSkWWZWxfn4pOP49TV366HHwF9jlSdykMVz38qLsDCxS
+WL/kHdbcpEOMLPw7e29qZhPsG+C80BxxGOdPvGuAVS64q/XAgj4vi+fw7NjY
+1AFVmuLsvXZHGdelawadU1KjKUri1PoQuPlmQOAFmOMvzuqCJcfP7NNQp6mI
+tKIIV8SJ+4FXdYjY2+tIF6y4IJ/bAvvOSmjtRNzwjE85k7Do5uExIWynqF8/
+X4OmhCVGvR6Ia9DDj58L10fr+NTCm5V0Ut7hPMddb0YK64nRmAe1WF2WRkWs
+xGpfa27BxspLHxnfgHV7UcU+a3K+LGmHDVY1v30x/yBOxJvbhnKwREnJiUpS
+z75eTiPWCe/ywjisdG2unQ/WWNVc4y1Y2fejNw0gv+g+z7aV5Hz48x4vuPMQ
+T8UGFly+9uAB6ssPLQr0hE3busNXwZpz71dlkuvtTFQr0Z8fI1fl/A2zjmVW
+W8C86UmTjciDfTklrR393mWvFNyqTuodK2fDHT/wxHaifkFJp5gLzJCoap0h
+/fnwrH0N7Hnr9uw5TZyvO163CV6RtDXSfhHiigc3xcMHZjKpAZhKeUyTeZfm
+8TqjmTTFL+RJ6uP+109r8z/DnCvdpQVwjFkR04yFfPp9mlnIv1FVRtsbpk9O
+ORbD5mlm7+Nggb18jzHqf9KYuSINjujRs7ysSrN3Zd3Ylw6bjmvwlFGn/KO8
+IjY5T9/RC4M3bNlfEUrO/7NdqkSNZs8c+73ZBeYtbv5fE/bNPvHPm8DCwfau
+e9h/8WupxXyST1jwY/Kc1fZIrOhEvi4vLnn6w4ed06/lwlSz3HFJuPz50fwA
+mMUsn8pGfoOjr96sh339BgIYcGmxWD4NC+8sj05CPWFFV7lu5PrRRZ4fUX/r
+ataWQyR+WHPQHjirZ814E4n3o2VbP/rndEtVTZH0w75UFu8Ze9MeRyuSv+D7
+J01qsEr05qFcUk8dd/sLJZpSkhU29MMuxjaV9Uo02/pL1SfzxXje4+I07sLV
+lEzSUTjCssL6FXzPTXtjN8wrlZNcinj/9vRu01pCnueng4kw96+2Z4GwaDB2
+4D3yaTf0SrkAM1RUxvA+srVnTA48ggVHui3HkH/aRUn2OMzqrQnaj3rfOjNk
+pLTwvHzwsJyGhQXutDzsu0qtIAzze7yzYFYa5jurubfBs0dH707herohXl0R
+8yjO/KlYSOK5zkythu97f7FsgKmAf9iOcKrrrEsBybdGZdAM8/jTqUUiHuZc
+1ZL8ini6vzODvWDh26nQMsyjo+72z7Yk321PmGvJ+9T86aYRbLrBJvIe8ut3
+W3ZIG643K7uxEjYwtAjRI/H+4E4Wo74czfHklTBfSztdFb52uoDpSfKd/y8/
+C/1Jr1/xMpncz+bSGnX0b8I/4moNyV9lgWU1+v103tfhWRL/rWR8JNwuZ+Lk
+iPoZrUc562EH1xmtU7AwrTRoNeZpYngndRjm1CZv2QrbJj/daaON69NXP0+F
+v26cPpMOs9f2LuyB3c447XwMC/4NTLBFPop11xYvWIr7L7wVdRPWWT3UZQ/7
+Knv72GB+o53934XCwonXivfglv7rXSkw/6HYGkcVmu0cyjHNgk0rZf9sgKMn
+nIq4sEDCpUkf/dM8yUkg50XF3C7y3X7gMs0NhynpzF182Gp4bJ0bcazVtmbM
+I+9ch48pibfxrN1t7JufqXo2H6Yrt/jnYl9J1757mOR/Z+/ZzdjvG1+0rQ02
+1RPf/R7z2HUhWfUGce8QNwYe0pPKuAyzSjOWiJD/Cc/orBJyvWaf0BduLA+N
+qoIZjQvlBaif12bc0g7zN8TNWYf51DjsTpyARfzOB03onygyoEkP+TCm5ep3
+wJasAaNA0i+ldloa83Fv9isuJ/W2HPbtVKSpnleZVV9If6VvXamFx5gzcZt1
+8H6dzdVrUqTZB7kBr3gwx5Q55wMcz70xKILrk+36VyBeOLXvsLUu+jPb2pdN
+nof5JnKJsOiz8Jok8uP8Oup0HaaXTRmlwqyw9wn9MH/huKMcnr+8h49zxPQQ
+r6CwKgf1ypbp6yvA1IySvgLmxTpWnv49LDTadA/fH3Z30KJb8rCgIyj8Ofr3
+Wr5hxyzi+e7wNVyEfncZ7D7/Lf75yW12mIfBkrdGjbBpbs5Te+z/LPV1pIDk
+W2tqqwd/LmmdiIeFi3UfjyAe7Vnu4U3OFwaG5sK33dQ/rYUFEZK7dWBX1VFf
+s2/1aTleRP5DlXOvGMGsWiueCkxxWZHm5HxIeTrqpYI96UPr4Yjn2/2nvr0f
+IpkgXfL3scsrGvMZOd+ckUfuLy9iimO/ZCCq8xE5n6t98CLmcTK2V1qZ1N88
+KbMH/W+LTuv1g3kdujM09g8L1FOuwKLqjwOrsR/DpOQk9PH9FN6t8ML+6fRz
+3u6wSNnr91zs33Z4EVRInOzk8Q771jHVgUPkvEY1y4N8f8XevF5qAO//oNgJ
+e+1N+OwO09/5xXiiHvHk92vjYQFbVVqIecr9MKaZBbPf3/3FH/Mr+5DCPQuL
+Rldd6EE/rIr2ep2COdOx2jbon+8pk5fHyL7F2yOpsLP4b5pRsLDqPPc65vtk
+V0bmVri+vzCnCT5p6ieznNzPeHkc9qk5IUGnZMm+1I6nR+GGwJ9dRpA/y272
+HfneuTpbGglg05U5Rzpx/9PlBcIaWGCWVOcJD2u4VleS80khTR2ox39kcv9V
+cj7fLgPfG3bM/jyHRtIP8Z/8KjCP44Urcl6Q/a/OXB3YPK16iRTub9rDki5D
+PzXKHKk1MIO1YWId/Fvwm9xE0o+C4fApBZpy8OmobSY297V5ACvN2/BM2RDz
+XfVXzi0Fmu1TkT03COazmPMfwn73Rctq4PqNJ45O4zwjdmiNjBHyabVzdMC8
+oowPb94KR+joqV2GR+/Q97OJFwQnsTAvxrK5iS0wJTckW4h8rZraBsa+7Tdc
+MkC9cQovJOWNMU8Pt/EK1Ouc41OiCXNcum4aoj9mRalrmTAj6CebPMxTpBcy
+qQjz9gzlj5C/H/5sDkXOW2Ut0cV88n597TGI+IyrBxN+hA2lU+fcJR4JHrOF
+Q7/Ucc6R/KPeRWpgPtEjIQoJMMdQ73Qf4mcnpJ/cCQuZa/MTYINFYaMOsMjM
+W10G99PRE2RbwfX7cwZTkD/VeyXJAuaHG176jHqti28ybcn5xJGcvahX0zl2
+qTu5/8e0eX2Yh3Vl2ZkDxMsndLfDCtTfj0pJPvbjIcPo97OVB6LekniMhwHZ
+6Pe80L/Sl6E+QcbdAE/sR1eqXI6HTRXW2dvA8VsjxdrgiMQ/rWk4r8z2GHMZ
+9i91de/G9SFds/oRMH+L0Zc/YGpN+asamEH+34F5zSWrCf0fLfyUIA==
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.562492355174517, 10.345769235517452}, \
+{1, 0}], LineBox[CompressedData["
+1:eJwV1AlQE2cUB/AtxKMdhOIRznCUw9QjJCgKHrBIRJpBDXI5IzoUMNAWk6Dx
+YBgBL4gilSookgBB1ECNgkgLo4gWVDICagBrEBqUZhALgiBqihT7/zKT3fnN
+2/3ee9++Xdc4yZadZhRFifAnZ2oWObjT5Ehlcmkq+lm5SudGUxbfZkXEw68N
+xSuK4PrSXIUADmwL4G2DqYPrtCvgzunGMCY81epwng0nZggL279B3LX7lAuc
+El/COQJXN80ZdoK/vJ4u9IPXcGQVbrCyaWDZuCtNGbWeaRw4LtxprApmb7+l
+94clF7yTZSQ+5DwZTtbPVdKBsObXf43J8D+aiSobcr35kn1y2DVdkm9ywfU8
+pvgS3NNZE22Ej9aYpzfBLQbRyHO44YF/lAEW8Gr0PbBesbT2I5zKVSwcgGXs
+fskcHk3teTw/m6yn6johd4I3hglCrZEvwc7faxHM8snL5sDuk5rHXrAywc9u
+E7ymYweTeGaVVLsLVkmXTSyEtZMu23Lg2NYZpfbwTb+hqxfh0ANJp2bB9UfZ
+rXUkHpSfNop6Gt5SVDM8EXdncyds5V07cg8+qfZyr4VzOJuLG2ClZDfvDNnv
+Ka/MSpLP1q85BX7WPpBB8smDExeFwb5eyyfj4HyL19e84Xm/2DVy4WTR60M2
+cIm3p/kH9MtI/q+agoNGtsfUwoU6pY/BC+s9C1bvgk261NYHsMCv66MbnMlr
+HrsFM4osGTecaUpaKR69DZ+s3MVwhWNDVh1qg5uSJr8764T5SMzsHYAPdKv6
+mLAs39AzA/mKgjKjLrNoqqtvucYR/sqQXboBDmG2dZB503J0Q1OONPVCHuRM
+5kEfb1HQAqt8WAIpbNb9ybICVrYcNsuFOdFF/cXw8inxlBrOO+d8Qw3rpy9M
+34HHkzWhzfDgEd0o2d9H4VTDG7jtfUp/P7zPyk/shvyDGQ1Ow7CnITg6Fp59
+Ln4ReT6FTftZKvjkSF37ELzEuD7EAFec/byA3L9lOEVK+tM4vorogA1bEiR8
+mFs1l3UbfrtYn5MAs70nVpfDHWajZXvg2BPs68fgawnTfAl8b7q+fCdsYX2l
+OxL2DaiN5MN/BvqqPeGtqReZ5H2SLRb2vUT+rR4yH3PYxB5TyOGkqzXGVuw3
+J7yg0xGuD2jsL4SFufP4ZejXNLE6RgLHuLIi7eDC3k39QrioouCd3IGmaN3S
+U/5wBEuYOGGP5+a/ftIX9s4yucfCwh49j4ZFE/YlT+wQ//TDzXA460motQCO
+HRs8sxu2eJsW88QW81KQylfA3NObO0Ww9l3UIKnPaeM2h69hZdoCty9Q/xrb
+S1aPbFDXwYx3LGJptaYMNv7+ve1quPqhcUYOLN3DDoyG6d/u8o/D3ILnC8n8
+VxS8vF4E5z1oL8mGL+5Ib2mA9X9HFJ+HH5r9HDoM13JeCC7DWRl793uQ/GU2
+s6/C3HQtMwE2HczdS/xBJmosh+Vz/9hP5ul0ktXHPpihDPZVkO9Zr1Q8H/26
+P53lfhymxJc91sJ3zaoHSD2zGauUUSReJ4uPgm+Odb3fDucb5VdWknkPtrAL
+I/v1XjXOhA//OHWfAwv/mskYwv7Yc+6Wf0C+enlcZCU8ruDxK2FV6V7xTzCV
+08oKgfPu37i1DPZd+SbtKfqjPNpFDPjRS7YogvQfIQro4+B95KoztEzEN5xX
+34d7U6f7fGDTWutj9bDpjdsr1QLU7xO3kpghCbO0hNk68/x7sMvtnrpD81Gf
+i8NgLzzyGb95uI+cOfT/y9lRKw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.058738695939086, 17.601506520304568}, \
+{0, -1}], 
+        LineBox[{{17.000000000007276`, 16.500000000005457`}, {
+         13.500000000003638`, 10.500000000001819`}}], 
+        PolygonBox[{{15.552322615314452`, 14.01826734053906}, {
+         14.602165824326175`, 13.183281069670574`}, {15.293188945044921`, 
+         12.780184249251306`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.984057296392571, 13.323799910437668}, \
+{-1, 1}], LineBox[{{17.00000000000185, 16.5}, {10.000000000002592`, 16.5}}], 
+        PolygonBox[{{12.9, 16.5}, {14.1, 16.9}, {14.1, 16.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.5, 17.4452}, {0, -1}], 
+        LineBox[{{13.5, 10.5}, {10., 16.50000000000182}}], 
+        PolygonBox[{{12.052322615314452`, 12.98173265946094}, {
+         11.793188945044921`, 14.219815750748694`}, {11.102165824326175`, 
+         13.816718930329426`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.015942703607429, 13.323799910437668}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{5., 15.5}], PointBox[{6., 5.5}], 
+         PointBox[{17., 16.5}], PointBox[{13.5, 10.5}], 
+         PointBox[{10., 16.5}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T12", " ", "P1", " ", "N23"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdgei/fgfjhihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdgei/fgfjhihjij.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:eJwl1AlQE2cUB/APCHcCEQ+CF0FaRQckUEhpPXaFiigKVqmg9SAKFB2O4IgX
+kaYanKBSDqHGTgQUqyjaIIOAghiptkQQqSgGSjEIIjKEQwRBMtL/2p3J7Pzm
+7fe+9963G6ed8RsijQkhkfgxd9I8iWsqTT5d7jRJim5wVsD5mzkmdYtpcsZy
+IsURpoXeI7mwd4wh6awdTdQlmReOwLMTfu+3hLVFMaJo+KJql3viFJpw+Zkm
+4XDr48O1L7g0cYkKfBQBS3k/BQbBY3OT9u5n4vXs5SdsaRJg/9whm4k7Zisz
+bGhycAkVVQV7nb58q4xDE55XWYoeFlxSU8awhfP2lZ+j3tH7WcsPsGkS9ka5
+UARb3Er6aA9XPNiemgt/ppG87rJG3s7AolZY3PhI0ga3cbQJlgKahER8FTsB
+K9Z0h82Dp81OK1+K9dKKQr0QbuWkdZyFIyajff3hMJ0NZY39laenFgTDageB
+vxxuFA4qN8DJdmy9OeoPmZZmwsS1Bj37J7hYfuntNzAr9e6fvTBXNVrvBY8a
+/dC1FP3r7o1/6QgreW88xbBr1bNpprDsRMLfyXA4P0rfgPpDTF4kRMCFJTq3
+dNhnBkc+F9aORKSvg105TyOvIf/YUs1DNny8OtXXFhbE/pz+GPPzyVG5rUG9
+0ukRUQq4LHu7XoT+LEI25eyGa+w7NFsxj2Lb52YrYTbvVoCvFVxZ6uUKb9pn
+0TrTEvvdfWXPh6Mru5MGzDGXnNY5TvAMu7xQjRnep+E6Z3dY0j512w1TPF/g
+c3A1/HDFrzoVC+f929GXcbCCI6PqTTCP7tDic7C/zcp0NqwN3ljbBF+NK9qS
+aIx4vOU9G/TTM2gutoR5KccmAmHWrOgajRH2W2imlsOlTZ47bsL5ia+/r2Ge
+N5w5yMSli92oUTiMtUNmhPU9/25iT8F8dT73YkPhroK7751geoar9g/Y613Q
+bDe4pMhGvBz1GAr1wx4CJv8S/2o4Y75qmQC+7/Te42v0w+o9S1zguMxD3ldg
+btSWkw5w81Cezhj9y450ipnzHO2WX6dgntCP1YJ6InIXbdwM60ytT+TBvOrv
+rALhRr+sJ+Fwcqp7zRR4cF7Tfkf41LKXK64hv0XCQ9d2zEcr4gpnwWqjm1fy
+4PU9iQtFzPwGQmRR8Id8s91HmX5npfC84Vr97acyzKPCemMsh/n+RNy8eIJ4
+XuXcITeaZN9mGXI+UkTqORnYAa+tv3OeMlDEZ1XwyXa4T3H9SP84RQRe2zp7
+4OJjgxdL31NkLJNbNwm7tGtcC0Yows+Ndp+H/NxHnHjNMEUU71b9GASH2P8i
+8npLkTCTK1VH4fwug3n/IEUqPJKzmO+duyPW+sMARUj0urhx5v9AJr1a20+R
+weJYpRD9hy+YCPKHxx4XRybARLS5ZTfMd/jC7TKs9rHlOGM97W+V9gxm74o5
+74b8vEMK8Qe4L6BcMAG7+N+YbsWcX+W4Re8QRdqyyh9wYfacvZk9qM8g9Rxm
+rBAuSulC/VvXxmQwz8tMD1TWvUP95JBqgsmn8Rs4hX6Jp21WM7OfVZ6EN0oR
+i7TjAUw94jN72CJY3b2/Jp55XzOezN8K88q6VnvCiiHfS8Zw4WH+niH0y3fq
+M/0W+aR2LU0q5jy7EuWrsF+P5DQlZr4nY2/vXtTH86gPZs5z7YLJIhr160Ys
+9xkx86QnLxRhHhltjg3NOI/wPj9VXC/mMf3+zHJ4/T+RQb2vUN9fktwCWL4r
+dOeKDoo0Jpfan4MFT5VVghZ4UXoZExfv0ccsaMT+US2f1tO1nZKSavTT4BLG
+5P90Xbzz/30x/R8h+kp5
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.2761166322027524, 16.884033677972475}, 
+         {0, -1}], LineBox[CompressedData["
+1:eJwl1Qs01FkcB/DbZJnFMgyKoxojPeWV7anmrweKCoW2nWrSU1o7JVJLHq3X
+JKaIHtLUqdSUkkUhNdFmNctO6JSIOdrooZo0FZrY7z075zj/83Hv/97v73fn
+/x+70F8DN7MIIXvxR6+kYxifUQzR0KslQy4V9r7KhMk/Hg1Z8IH9BgpDWGrm
+sP5H+Bbb5+MeK4a4jEsf9cmCIZdv6q634f/SNyP1m2Ar/p/n5sKykFBFA3z2
+uPD8KVyZHLvlL3EtWPlqlwGuxRYmk3iYF+l5but+LkNEI9h+u2B2QP50A1i1
+7O3Gp3DJTEvZeXPMr77+LRD7nrU6sk4I81obHz6Cp5XrdTvCKp9YCyFy+hZ1
+rR8Fy24cbeiAu59xL9jAaqdqt5DRDGm63BzgDhMnx+HbsNvG2qciev9Q7T2O
+NUN0M07eOwlr/Ba7+cCL6qa0dsLSnfa+oXDB3qrwicjH0+NnroWb+RFnd9C8
+d+rZc2BHkfruJeq1FcEDWF981WdPK+zi1ZZRQPdT+475AnOqM8yc4IKt5v1D
+MIms2FiEvGuycza/g/1vPGjmw4dPXBmuhRkVcTuKejXP3a/G0/ms4Ggj2F7r
+dZFP1z+8bksG+uUqSd90jfbH/495Y+FfmkP2Tqb9kK9cex99Vz0TRhw1w9XD
+XD8drnL6mtjPYYgiSGoXBq9URm9eDUvjpLbbYJMPp7ujTDH/VmpLMqzu5NT5
+miD/UuFxBcw+umLkvB+wv+nchZbYz4+zTxVojP22hf0cDwdHFUpyjJD3Hit4
+ALbqrw4ygF0ay1tjkb/dmdVWZIg+1feYjUS9c4wrJqTB6iyWQTIsEucWZsPF
+0cf7v8LmVt9WKKmrS0s3oH+KA+sfT8R6jPR9TzEcsyBytIzu9z4o9AWsVkam
+TkYesj19mQ4ur4+tvAn7D4kDtPBNvs03T+RXm5w43wDrBk/2VMCiL2EmErhm
+UkafJepNSFx03xFumdsy5AeLEhtXViJPTHypMgQmn7eumAUPHcpd5QqLRzTZ
+FKE+2486s8dYj9NZmDkOJiZeNktov6ofnclFPxhNHk+CPGLPFFNreFIaCTyN
+/OIzXFKE/h7TSsylqNc/NrQihD43bvJTm7/H+X66smYMzJ/RkDmFjfUqXQoJ
+rPvosPq1PsbH7OpiwfkTcq4Wf4e8HV137OHXMa59aXoYD1Zs2QA7pUw6GTcS
+6/d9Tr8J79bzKcljYbzp0ZHxyGN+f4qwYwTOvy6s/TSsfdIWGwy7ZMXr7FFP
+prUshkXHd+ZbyeHAUgvLLoJzaatyn4p+ROxwju2DZQNBZ2SwxPGLyAnzxdb2
+8/XQT8P2UYsyYenn2c3+8L7VrS1s7K9xkgQmwZVJ2WHZsP+tpca5sPC4JJ2P
+vJqe8of0fGy5gkQ5rFav1qPfh/LQsoFxqE8abnvYBp5xl3swBuasCXtMz8tG
+47zwMvXvqXFecFqXp/V12OV+vHst8qeYPPdJhsV6ByJmwheDFFkOMInJNJKj
+/nMHO5YewX6Kt0mED5fGaHc2Il/xMcdv59E/nxfcnZ2oh1jWWXrAL9dldf2N
++kUbhLtf4Tk1zvP7iRkWEIVzv2UJvEP1zPQvnYC46HPyjsH59d6vvAcFRDpU
+ZVYAewyX+D7+IiCabVGmNfS9Y7OgJeMT5r/gZtHzXTUtxS3uo4DwIqvGCuHx
+qje2lR8ERPYknP2APu91heEBGgFJyNNkeiHvxbJw5bF3AsI8sJ2lhGN6/z28
+7q2AqP2O8ALo93OwZEJfL+73frLqISxLDuR5Y1x0m5m6GP1SGUb5e+N+zSHz
+ExeoM7Rdze8FhFN/KlkDu5ctjH6O/Xj2S1jj0H8yJU0+iDy8GwtSnWGLoU1J
+o5GX2C82tYNFeaPzHbRwVr2DFvdrU5ZHGNH6puk65XCGSVJ4GSzzaLzrA+9u
+rzEy/4z+HUqUNiFfr0J8jQszL/stlsOxT/auuI75qoOvVXdRX3uAa1831i+W
+V8ndYYutzR1l2F96dVEOfb7ae60Oje9D/TziOp2eFzs/YD7yM8+nJSjpe3dq
+a64D+sFEeWb9Rt/Lht3Tt/cg32DKLG86fme2MqoL/VX6fXChDpWPfftUQPyv
+WMlnw4rsjXEzHiKPb3SNCE7QGdsuVKCfuyeYnaPvcfpJqP7/95fL/Ac/lbt5
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.128720493773297, 4.310154074720437}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.00000000000273, 17.000000000003638`}, {
+          17.00000000000182, 16.500000000003638`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.286281316503036, 17.427512100981787}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt2Hk81FsfB/CR1CiVaLHFyF6WocgWo5QlISkiTIVLISqlcpElQnJdSWWL
+7EtTIVLT2CJ1rcl6PVNJlKKypzyf87ye+cfr7Wzf7/d35syZkT560sZtEYVC
+UeChUMhfyvwCXusZlP+91jEoEjyqB+1EGBRasnBoBGwq+0K9HvYdLV2YgytW
+KQftFmVQGGmfwhwxTrDoiFYXbL33u0QWmSeoM+mUGIPClOVd0QInR+rYC4vj
+/4/VR/+FZVsaxx/CjO9tlaR9zSC721KCQYl/HNyfDZfSy5oHYEGZZsFjsLFv
+sojLBgYlZNFpk+Vwooww+yXceuevM1mIx1rzdqW0JOb7EWSjDgso129wgTNY
+E2JVaxkU16uCKmEw7b2krgkseJx6LA5mKukt9K1hUET2m/qEwr59aZbBcN5x
+lvhRuPX2R3stuHvuxRZ1mNXW48AHJ9KpFhMkHkk+zzFhBkVbRT6OBXOsysym
+4LozTgEn4IwcPhcx9J+Yjby5CR5fKZfpANOCTlv8QH4Zd/hYpWQ91XL/JpjW
+2Dski/ioXZompbBvz2xCDpy3fK8AcfzKH4pbkV9A0SqeVzDXeW10A6y/OFfr
+Fxm/ZJW1A+oTqC5x2QTrxfsslhiCWcqaCfmkXpoWH1zxHC2MLbtpyCdegde4
+DR60YrbkwxTFgYfyeI7DWqXCDCnUk7Pw8gjcaqSQOgCHFEp6hsCHD7F+G9Iw
+/tOPhkuwGPPivmsw0yI/zh0O4tl4rRem53TU0eHH/RYaUtKY57Pj4/dYjzNi
+stSROOzqQBhsbaptEguzDhpfWQcnV60quQ8zirkVdxD/2S+q0U3w+H31xs3w
+p7rJujcwM/2TVBXyN47ofk88fsX74wGY0TLK84qML2FX8MC3Ig1qHpH24T2O
+tajnspzreilwxpH/RKXBdTU5AxdJ/6KkZ9fJ/lj0xe4QHFK9TqYA1g+447MN
+pk0G+PTByU/+eCcCU26lTStg/mEPOzMKbK1SUxsLfx3jGx9D/ty1pkV8iHfr
+PfGnIzDlGDXhKjyQ0CFK2jP0k1Mkka/BuiguGc84GRH6AE58LmdD6sV8s7Rr
+B+oXzVgibE78zOPQC/gon6NaCPG8+Q4G3mdxo9/kOWS8nUhMJhw7XL2wdCPW
+15VWHoW16h2cD8CtBj6WYnjfqcbyZ2XDLMs+n83w/CfTZVMwZWWTrxRcLjPa
+vFMGz3d1ePo0xps+dbKIhVur9NLKYfsD5lL/wL7JfiZMmF0gs3OxLNaP3vfn
+LOJT1Fi1mQ77rjjwJRLe5CTQaQVbq61tWg2HOru/OQpniLKCUpHvJ6Vupic8
+vsvfRR1eck+G4QoLcoscO8j58qduqy1p/84ojSLnS57fqD7M9Wh/fACODo7v
+liTtxY4p22GxY52yvxBfyMcfOjvIeGHzuF4S76Ybq11hjsvX/krY2lBIO5P0
+73CoTiXtY4dd52D7lLCHUTAr881yT8RTYqH1OhDm5lLjRmDqqZftF2HB7jbv
+s8hH12Nf92XSP0nnOj/qMW+scT6N1C/obkYKXPR8SUkNTC9+oaKE+gaFjHV8
+h2nUm5vy4Yo/fEtVED/LeidtPd7HQp+9E/1gplfdWR9Y1TnB7Ampb3FRcSHs
+vl74wHI5rP/oeCQ5B44uXFl0GB4//Vu2FU5rcLtSCPseZAs+gsunbdSmYVp8
+/rYwmC084akvj/lbbrZtg53bTX4HwL6/Luj0IJ4kIx2JQpgh4f/IC17szOff
+BlvTMw1nkE/BvSN7PsPconOKoXD465TAGZhi5dcvCCc8Mg2dhWm19dEF5Pxw
+cvAagzlrZ3ttYR8d6us+uHXnr5w1cLInfyMHzqAynn1BfXcPKj3MIPHpRFe9
+g1c6exsEkXiuTfVOwNqX1emHyfq2MRMyGC+p/8FsO5l/keZ5H7ho6qecLMnH
+jD+yjZw/HdXrheGQe4MCZoiv/UXqSoH/9S+cb4EV98oFCcJ0MfYVJvKdcVOy
+kIYFg3N9J2DJqNv1BmT95mDjCNRL5GfHLQ8yf5gdWwDnKtvZ430qma/r5bII
++J3eMaV/SX5lVKER2H6zzUVZBax/8mn5VpyzFg57wv3gjNuzVDdy7hpU51XD
+46OBxwPgwYpn8kKK6F9RkelDzukyXm0mTP875q0p3G9vsjUftpa5zuIn7WFi
+Dz7BrLSujlKsNxF8/+5GJdR/0WZxK9g1TMffCrZ+Uy1PPleHdC+s84XpW9Ol
+PeDd29pXh5P+84f8fyDfW7u+xsbA8R19Fy7DOUmTJpHEV8c2K8BFj4wSA2DO
+YY+eXtRv1Hyt8RFimVMj2XBrg1jiTnhcQ+tODLxMoXoViac1//T8VVjozku/
+BRK/1e/EYtg4NDl0QJE8T5vbI/DX/c8mq+GMxGSuIdaL7ioxLSL5J6R/K4K5
+ch+z0mGaRqCRMuLXNbTgpMLMttojFWQ/T/W25ZJ6uOfv2oP8Y180BLAVSVyc
+2AE4cA2n8i2pb8irthOoXwC3+JcgqU944+woHH6PR3QPzG1lBh/G517NOUWH
+OJi5Tu1RGawqdzGtGw6JPs0/CeuX3vVS2IT9csFwlQDOdRuGtnAAHKX3+tdK
++Hfg/IsGmH60NJIXfhVv/Vp4M/ZP62LlToxn11GyDsHxP/n9YuBNt4d/JMGC
+yg9kVeGSHX1fXsD0gBXBNYjPNfP8tm8wdyzI0xJOpvUvFVBGvm4Fmt3IT7Fs
+B10M5nIcrNxJviK2khIwxUH+y2/Uh9LU+kYI5mjk1ObCnOc/hxcwH7Nhgu0G
+3yqydfwAZxzvq9eHGU5/JdTDNNvUK2qwpbDA1izSfuOhqyFswRXiu0RcsMbc
+i9zb+Isaj8CMts56cm/x6PTfYErakyVXrUM8v7VMnLRg1v34TbHwgLZ0iCrp
+73RRXAj5aHt282oQv70gnQlrHcrqMSL14o1Z0EQ9hlJOOTgTF0iaNcASQ5k7
+Ikl9RGu6FVBfj28GZVWwRwm3yBVmu+bvnoMbdRJib8BxfJtXGiH/+AfhzmxY
+0jD26VU4StQlrQt2X5L09F+Y5hZ68h2Zz0XUUlUF40Xv5w7AOVLfcgNhwQei
+ba/gRPFDUs9h5tUCmRLSf/SbMVUVdf3EczYcXibYw2sEJ+8olbeBi84fqfKB
+AyQXLYiS+L6p7o+HmX+00NjIJ0PziWk28V7mBjPYXT+7rBhurayx7kM9lL09
+LAvgEI0O9gW48WbJoRTYOmukQRlOfBqREUHGd3kOTaK+dK999h6w736fcz2w
+mNOlpSYkvl7tv4iHPzi7y5L+5Z4jU7CX96ntvDCdR/8VHfP9viW1cwj5sdZv
+kYsgz6eTNtcCc3/+kzwOU6khCTVwiC1viQ/i9ZWObX4Gc1oj+ObgiTzRL41w
+vK6w5W5S33TxWwMw7Xz8snhyb4zaP0TBejRx58Wk/uWDwbvVYMWeSiVyz4p6
+KHyLxE/98zPLGqbulNUpJPFyH+sGwXkGb6mTsPZc9VgarPXm5vWdajinbek3
+yD3SfNkK9UTY2nwou4zcmyavCg/CGUoquwrhkUm6oQgd5/6vCuu/4SO3u3z0
+4Pj7AhYnyT3QUfmMA2kvr7UygsMtJJ3PkPaKvLHl8KO/n1yIgkXaesTaET+H
+8colCebuC59Ognc8+ziWSif3o5kqJ1itc9gxHW7kTF1WguUnYmi36eT7AeMU
+qddl/eOUBJjDbs4sh/8sS5wLJ+t1nUkh58PB58YG/qRd46lSIPxzVEfCFaZ3
+uHGuwAL7zk/ZwNaBB0+WkvOrYZvaTpj1bvhfMr83vXq9FokvfZeqCtb/aEzn
+KsO0senQP+BaHk6UIpz89cZ0PjmvZLw6lWBTN5MH3+DZpvPG6nC33cwNPeRv
++KcT1ZC0SzWfCoelt5nz7SfzezaJvoC9ZyLbvUh8fX03luCeufrcpWcxZPzl
+E9a68N0U8/4SmGKXLXUUnvLS4usk46VHzwTCF3m/jM+T+LZquEfB5+z3M+TU
+kd/k7qoI+Nhk8DULmFZ3dfwM3FT/6bIfHHB8nm4HS7vxjibAIX6FJqqw5ism
+6x7MGCm4Mk/2T0nz7+ewPVelso48f7sbu7rhChm/91dgd6GY7e/hjOlFelbk
+e0C0z5ePsKKSwfh6OG4yO38IHp/j8n9Effg8pAW5sPZkjuEzsp8bnlA6iQse
+dmfCgYV+CWS9GT3va3/D5+K5fOUwVXtjYAIsdqur7K46qXfo0gx45M31JYkk
+nuC/PlTBHWk3bSNIflo2oh/gR1bN78+T/uLzFDHEo6A40nKK+KnccXt4w8Xy
+375w1ORIUSpcmk5Z60/mU6t8NQRvmbrpE0zaXYxS6ahPb+6oaDwx++7IOXjO
+yKQrh9T3H7GUSlhNeEy8Fk5uXz34Ha652C4yCHMuzNpL4177+EJUHVUD56MT
+VYR8j+hulx5Wg023xPYdhB01VFTtYe7Bu8sOw/OXt24Jgcc/ZHFs4Eavj0k5
+ME2Z81IPTt0nuaKJ9E8SzxKB9bjvvUfIfC55tp+xfpAvu5Z3C/n9ovZEOVw/
+E2UnsoXc49ltZP9YG5pVysPxdsP5RnD2/qR6VTjgNnsTFR7otsilw6wmvbMd
+5HnvC+xUhhUVpE7nwIW6uStkSX8rofwweJFEqvl6mGrgLu0NX49zqVgKN3JH
+9rrCqx/mZk8hPsqs4LQn2S9N7NMfYMWbJhrkvCq29IvoJPlmjTAz4Ev8YyqN
+cAjf520tcFX8iQw27LG+vYXEl+5v9rYSbv1g8MQcHjkdWfmY1KetXykBdt+8
+vLganqm24OmHlW8aTTTDHJb9CjkZct90Pf+O9I9L3ngcri6P6PlJ2vPSdufB
+spUHPcUQv7Zzw+t++LuP1/btcNT0YBofvneYi6RpHiP1zNtClYbf544ti4Fb
+zU1FVeGfzoddHsJ0Pd5YZXj3WnZzLzxz5kezBPyL/L605f+/L8ky/gt6ApWe
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10.791777955940793, 5.1492961558718795}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwt1ws0lVkbB/B3IpfI3ThyGYQicXRMufcOckvlkss0ZUjquOQ6RKmOiEMS
+M0juoRw5M6iJQo1KxSRDLp1vUDQ1kT5RCpG+//5mrGW967f23s9+nmfv913r
+aO4Ndw9cRlHUffyT5z9/6+h/njp4DolGOcKtmqd4b7Vpaui/ur9kwtwfTfT/
+hDm/fHWyG9591aujAWY+S5+RMKAptomfWRo8kv+txWY4uZKf6w63Z7VMsGEx
+C1MvBbhOoWk+Fc5ZXk53r6Yplx3Ddwth7V5FLy7MeZG9uhJuzx24aQ2rjr7a
+dR5eNDP/9b0WTVV23NbJIevvzAbVwose7ryjsN3u2tmDsGR4WuD3MD8325YF
+M+6eN7KAOec+T1JwnAdXUR6mH4xvEWjSVOe7wW3jqEfBM8+4CWa4e2u0wi5u
+XkZVMFeQ0XUOHtPjbi2FX78bTYiD26aUNcvh1rhfVX1Jf4qyhn+BOYtcHxf4
+mlyIUxscqieZZEfWJ5/qG4HFrHPSHODF6rUXl5F8TfmvPGE7/8raNXCRsHh9
+ODx3J/XWNjiZoRqdA8e1dJ2PgtsfOXjfIe4s1cqBR4bSVRdgV3uuaR1MWTuv
+MUd9nbK7pO+S/jxuzD5G+vWhX7UHdjUw3HwP5rYHMHuJ5VqmpdYj34FNx3+H
+n1cJ+3vBCZFB/AZYWCvdrQAO7azqPEvy+T2mRkDG7Q8EhsHcgpkz0oY05RN+
+5oAFbLlte6gVnKE2okP6nTDxTtwf9msMd7iJ+jXujBbEw2X1nQ2HSH9sB26l
+wDOlYZmGxH+I53FhRqW10AsNmpI59U35cdg1Tm57MdxWYf80FF5c+pzzLexS
+87HaDW5vjuhXgV1Dw64awezm6tIHX2G+X9q8GExfTZuIhIsW3pY8Rf7tsWca
+DODk1yvGr8JjZjzvT+q4NzY96pnw2huz9s/hH5QuRQfDvA/SyqOwT8f4lAvs
+yjdLegu3NEv5b4KZ68vZXyJeXWCC1TqY0fvyjRPcORpZqgd3X9MrS4MzzPpN
+WLBMalRyD8w8t8XMkcRrXHFJCvnzRJqj2XDye+YOEzh54IHpTzDbd+6IN+zX
+xom8T/KXfCIfC4/oRl0UQn38Iyp6mTBb/IaUPez4h6dMCTzVtqk8A467URVZ
+CWtzDQz7yXwhH68ymI65F6JmhHOzqduQTfqd76IUAMeVnpkg8ZNrrEQrYT89
+zmM3uKjbz+YJLNlt26wFL83MiIsxaUqwcy6pH/Vcno6UUoVldhx+5gX/fVSp
+Xh9u/VKc9RD9uihhU8OCx/4MSrWEnwVITG2EmcPlptVqNJW5uYtvAvskFzUp
+wfqm3g7rSbw19WEZqjSlntX/rSbZ77uFWAnYzuMqXxae6tHPyFfB/XGy3bOE
+/Oi20483wn03vhjoh8dEHj0aW4V6gs4u1cD539wzrIN/8PD5Kglmx6jePg3j
+9YvdAzs6D3MS4RYFGy0rWEP+r4R02C7JWVwb5hz1fnMRDk2x6pAn1ux17oMd
+1ZwurITr6P2e0tjfsiImXg5uDUt02gkLHx6t1yL5dIUtlsBxWlH21vC1zl6x
+CTj5Z93mfbDr57QFFuq7Ziemk0vq+Xt5YgwckZjC6oLnvBOya0j96lPqokyy
+r3DBI1hfTeySHux3X/r8Szil0LF6G8xb/2DfGDw0rrQYCdMOulG98P7Jk8dy
+4bIH51k8mK36RqGRmGU/ux+W/OTc2A9TS6kTMnD64OUjU+T8BkzlecjXUPFq
+qYgx6uugjI1glweKWUqwgGVcU41+rLr186QWnO8vG6QCd7HX5a2Fu78XreEq
+I9+2M4XEUwusp+8ZeD/+9t62GqblrH44ANfxv2Mqwz5X5PmjSuhLTeLHFbBY
+VVIEG3aPP3ZqnuTLdlj3+UuaMoga/+sFuU+8TRU8WCCxTKWHjGvMP90Pt5hk
+erTAI7ZOihbwpV22dTyYwWnJ04FVfZmOZ0l9PcF9xOrnS1TS4IjdfD9z+HD+
+oPhxOD+2ZsmPxP/o3h4PZ1Vvup4HO1ruHCRuXTlNCeCCpc4sMn+sJL9bA/ka
+rjf8lE76Hyc/EAqbsgs/FsJ1b46VNMLt0gf1L5P8tHPuLMImee/nOpnk/mUw
+TNGPxSsBFRMkPqOpLxCWyzy5eSX6cU1Gv+kErNWgdpcJM4saN2bAwS+CGZ6w
+Y6rLMQ6sLn9IMR42FTUv9oWH0psKC+E6velEXfiJXdG5ZnJeHxo+CbB/GWOX
+kgCOmHBpOQS3Bo/TU+R8Zp9tWA5zo0LChDbgfJhfpCaj3reNT/RlYV5hUNi8
+Ik1t2N9hqgxnGZuLs+Gye/wcFeKFnsY+BZrK+8/aGAZs6rlm0hZequxylCHx
+fLxFmuRpypnTWE/iz1lYK1jA6RFSx99h/7Ha4ebf5XAPyh9WjpB6Is0kQ+G8
+vcIbOmFOtbafJmzzTsy+8f/5Wtm/lsX7ekJ4eQVZXy8V+RBuM96ekQWXCb2p
+bYN3zki85MAMldmpbjjT6rRQDFmfOr51CtaW6Kw+CI9EVClqIL5ALiY6hNzP
+aPbCbtjXof1uGLn/N8u0K2AfpayHh2A/Jctdk3Bcos/RFHJ/h4qNzVFPstHc
+6QLY9Xqt2Qk4ds3+xCuwRhpr7W04bONvVd0wTzR9+QdYe9pBdxqWyTXyXIV+
+ffxrNaWA/jBL3cwM4Dn1IA1TmP21bJYenBmgF7gbdrzlIC4LtwdSNcfh9h1v
+WM8QT86yXlAGj1ldOFEM8yN3v7oJM8SUHexgny1DCwISvz23UoD8Q7cMu03C
+gudGh/eQ+vd4+S/BcS9jtgygP3xRhX4xFubP/LFkTzyjlr0Szn8+P3VFBt+T
+xL4rkjDn7denNeGb3KYcEdj1xOSRtdI01SAy17qAeGXyF6M1pGhqmcH196/h
+kWCx+g0rcb9jKxiDZJwX/jhQkqZ+HPjZ8D4Zt91n/psEvocR190uk3ED5yob
+uE/H80IxcWCB9dsVeL+r1bemE/exfLvgFaWbvOPhusHS4n44+Ce7uyFwd3TE
+kDDWX54KDNsLtxro7PWG97KyKV8y/tlN6j7snFw+S1znoXbWBfnY7DqYHwjT
+Ifm9T+GUkKX/RsJUyaJUHPIPG9XvSII1hhL8JVHf6+2RtwtgmRFNiRy4z1nZ
+uoHYRu6hCPrRUnsgqh/2C2i02gMvbeOFz5J6jfYpZMMJa5r1VEi/FeKDimGT
+x3dObGaR73nM2DF4lVGmVwCsYTQ/zYJ1+1gpJ+GsLR78Fuw3+emU0AXY79Xn
+L1RgfsHUYCvc6qSc6Y58vYZffSMg8QbSDrFRz5N9+3JfwXRTjGUA6tfeKh48
+C0covw93Rv9Knp07tUTiu7eF6or/+7vC5N+nGP0/GR1iig==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.93763702332162, 4.533080933367719}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl1wk4VekfB/DDRCjcsoy1e4vsImIU5Wgk0oIaJAol2cYyYynRjUTKuNeS
+FqNbphDDVamEQsUoyy1l61/dQQtJN0ZZ0sz37e95PO/z6X3P7/yWc46nxf7h
+bgHiFEW14Jes//9RoSkWWZWxfn4pOP49TV366HHwF9jlSdykMVz38qLsDCxS
+WL/kHdbcpEOMLPw7e29qZhPsG+C80BxxGOdPvGuAVS64q/XAgj4vi+fw7NjY
+1AFVmuLsvXZHGdelawadU1KjKUri1PoQuPlmQOAFmOMvzuqCJcfP7NNQp6mI
+tKIIV8SJ+4FXdYjY2+tIF6y4IJ/bAvvOSmjtRNzwjE85k7Do5uExIWynqF8/
+X4OmhCVGvR6Ia9DDj58L10fr+NTCm5V0Ut7hPMddb0YK64nRmAe1WF2WRkWs
+xGpfa27BxspLHxnfgHV7UcU+a3K+LGmHDVY1v30x/yBOxJvbhnKwREnJiUpS
+z75eTiPWCe/ywjisdG2unQ/WWNVc4y1Y2fejNw0gv+g+z7aV5Hz48x4vuPMQ
+T8UGFly+9uAB6ssPLQr0hE3busNXwZpz71dlkuvtTFQr0Z8fI1fl/A2zjmVW
+W8C86UmTjciDfTklrR393mWvFNyqTuodK2fDHT/wxHaifkFJp5gLzJCoap0h
+/fnwrH0N7Hnr9uw5TZyvO163CV6RtDXSfhHiigc3xcMHZjKpAZhKeUyTeZfm
+8TqjmTTFL+RJ6uP+109r8z/DnCvdpQVwjFkR04yFfPp9mlnIv1FVRtsbpk9O
+ORbD5mlm7+Nggb18jzHqf9KYuSINjujRs7ysSrN3Zd3Ylw6bjmvwlFGn/KO8
+IjY5T9/RC4M3bNlfEUrO/7NdqkSNZs8c+73ZBeYtbv5fE/bNPvHPm8DCwfau
+e9h/8WupxXyST1jwY/Kc1fZIrOhEvi4vLnn6w4ed06/lwlSz3HFJuPz50fwA
+mMUsn8pGfoOjr96sh339BgIYcGmxWD4NC+8sj05CPWFFV7lu5PrRRZ4fUX/r
+ataWQyR+WHPQHjirZ814E4n3o2VbP/rndEtVTZH0w75UFu8Ze9MeRyuSv+D7
+J01qsEr05qFcUk8dd/sLJZpSkhU29MMuxjaV9Uo02/pL1SfzxXje4+I07sLV
+lEzSUTjCssL6FXzPTXtjN8wrlZNcinj/9vRu01pCnueng4kw96+2Z4GwaDB2
+4D3yaTf0SrkAM1RUxvA+srVnTA48ggVHui3HkH/aRUn2OMzqrQnaj3rfOjNk
+pLTwvHzwsJyGhQXutDzsu0qtIAzze7yzYFYa5jurubfBs0dH707herohXl0R
+8yjO/KlYSOK5zkythu97f7FsgKmAf9iOcKrrrEsBybdGZdAM8/jTqUUiHuZc
+1ZL8ini6vzODvWDh26nQMsyjo+72z7Yk321PmGvJ+9T86aYRbLrBJvIe8ut3
+W3ZIG643K7uxEjYwtAjRI/H+4E4Wo74czfHklTBfSztdFb52uoDpSfKd/y8/
+C/1Jr1/xMpncz+bSGnX0b8I/4moNyV9lgWU1+v103tfhWRL/rWR8JNwuZ+Lk
+iPoZrUc562EH1xmtU7AwrTRoNeZpYngndRjm1CZv2QrbJj/daaON69NXP0+F
+v26cPpMOs9f2LuyB3c447XwMC/4NTLBFPop11xYvWIr7L7wVdRPWWT3UZQ/7
+Knv72GB+o53934XCwonXivfglv7rXSkw/6HYGkcVmu0cyjHNgk0rZf9sgKMn
+nIq4sEDCpUkf/dM8yUkg50XF3C7y3X7gMs0NhynpzF182Gp4bJ0bcazVtmbM
+I+9ch48pibfxrN1t7JufqXo2H6Yrt/jnYl9J1757mOR/Z+/ZzdjvG1+0rQ02
+1RPf/R7z2HUhWfUGce8QNwYe0pPKuAyzSjOWiJD/Cc/orBJyvWaf0BduLA+N
+qoIZjQvlBaif12bc0g7zN8TNWYf51DjsTpyARfzOB03onygyoEkP+TCm5ep3
+wJasAaNA0i+ldloa83Fv9isuJ/W2HPbtVKSpnleZVV9If6VvXamFx5gzcZt1
+8H6dzdVrUqTZB7kBr3gwx5Q55wMcz70xKILrk+36VyBeOLXvsLUu+jPb2pdN
+nof5JnKJsOiz8Jok8uP8Oup0HaaXTRmlwqyw9wn9MH/huKMcnr+8h49zxPQQ
+r6CwKgf1ypbp6yvA1IySvgLmxTpWnv49LDTadA/fH3Z30KJb8rCgIyj8Ofr3
+Wr5hxyzi+e7wNVyEfncZ7D7/Lf75yW12mIfBkrdGjbBpbs5Te+z/LPV1pIDk
+W2tqqwd/LmmdiIeFi3UfjyAe7Vnu4U3OFwaG5sK33dQ/rYUFEZK7dWBX1VFf
+s2/1aTleRP5DlXOvGMGsWiueCkxxWZHm5HxIeTrqpYI96UPr4Yjn2/2nvr0f
+IpkgXfL3scsrGvMZOd+ckUfuLy9iimO/ZCCq8xE5n6t98CLmcTK2V1qZ1N88
+KbMH/W+LTuv1g3kdujM09g8L1FOuwKLqjwOrsR/DpOQk9PH9FN6t8ML+6fRz
+3u6wSNnr91zs33Z4EVRInOzk8Q771jHVgUPkvEY1y4N8f8XevF5qAO//oNgJ
+e+1N+OwO09/5xXiiHvHk92vjYQFbVVqIecr9MKaZBbPf3/3FH/Mr+5DCPQuL
+Rldd6EE/rIr2ep2COdOx2jbon+8pk5fHyL7F2yOpsLP4b5pRsLDqPPc65vtk
+V0bmVri+vzCnCT5p6ieznNzPeHkc9qk5IUGnZMm+1I6nR+GGwJ9dRpA/y272
+HfneuTpbGglg05U5Rzpx/9PlBcIaWGCWVOcJD2u4VleS80khTR2ox39kcv9V
+cj7fLgPfG3bM/jyHRtIP8Z/8KjCP44Urcl6Q/a/OXB3YPK16iRTub9rDki5D
+PzXKHKk1MIO1YWId/Fvwm9xE0o+C4fApBZpy8OmobSY297V5ACvN2/BM2RDz
+XfVXzi0Fmu1TkT03COazmPMfwn73Rctq4PqNJ45O4zwjdmiNjBHyabVzdMC8
+oowPb94KR+joqV2GR+/Q97OJFwQnsTAvxrK5iS0wJTckW4h8rZraBsa+7Tdc
+MkC9cQovJOWNMU8Pt/EK1Ouc41OiCXNcum4aoj9mRalrmTAj6CebPMxTpBcy
+qQjz9gzlj5C/H/5sDkXOW2Ut0cV88n597TGI+IyrBxN+hA2lU+fcJR4JHrOF
+Q7/Ucc6R/KPeRWpgPtEjIQoJMMdQ73Qf4mcnpJ/cCQuZa/MTYINFYaMOsMjM
+W10G99PRE2RbwfX7cwZTkD/VeyXJAuaHG176jHqti28ybcn5xJGcvahX0zl2
+qTu5/8e0eX2Yh3Vl2ZkDxMsndLfDCtTfj0pJPvbjIcPo97OVB6LekniMhwHZ
+6Pe80L/Sl6E+QcbdAE/sR1eqXI6HTRXW2dvA8VsjxdrgiMQ/rWk4r8z2GHMZ
+9i91de/G9SFds/oRMH+L0Zc/YGpN+asamEH+34F5zSWrCf0fLfyUIA==
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.562492355174517, 10.345769235517452}, \
+{1, 0}], LineBox[CompressedData["
+1:eJwV1AlQE2cUB/AtxKMdhOIRznCUw9QjJCgKHrBIRJpBDXI5IzoUMNAWk6Dx
+YBgBL4gilSookgBB1ECNgkgLo4gWVDICagBrEBqUZhALgiBqihT7/zKT3fnN
+2/3ee9++Xdc4yZadZhRFifAnZ2oWObjT5Ehlcmkq+lm5SudGUxbfZkXEw68N
+xSuK4PrSXIUADmwL4G2DqYPrtCvgzunGMCY81epwng0nZggL279B3LX7lAuc
+El/COQJXN80ZdoK/vJ4u9IPXcGQVbrCyaWDZuCtNGbWeaRw4LtxprApmb7+l
+94clF7yTZSQ+5DwZTtbPVdKBsObXf43J8D+aiSobcr35kn1y2DVdkm9ywfU8
+pvgS3NNZE22Ej9aYpzfBLQbRyHO44YF/lAEW8Gr0PbBesbT2I5zKVSwcgGXs
+fskcHk3teTw/m6yn6johd4I3hglCrZEvwc7faxHM8snL5sDuk5rHXrAywc9u
+E7ymYweTeGaVVLsLVkmXTSyEtZMu23Lg2NYZpfbwTb+hqxfh0ANJp2bB9UfZ
+rXUkHpSfNop6Gt5SVDM8EXdncyds5V07cg8+qfZyr4VzOJuLG2ClZDfvDNnv
+Ka/MSpLP1q85BX7WPpBB8smDExeFwb5eyyfj4HyL19e84Xm/2DVy4WTR60M2
+cIm3p/kH9MtI/q+agoNGtsfUwoU6pY/BC+s9C1bvgk261NYHsMCv66MbnMlr
+HrsFM4osGTecaUpaKR69DZ+s3MVwhWNDVh1qg5uSJr8764T5SMzsHYAPdKv6
+mLAs39AzA/mKgjKjLrNoqqtvucYR/sqQXboBDmG2dZB503J0Q1OONPVCHuRM
+5kEfb1HQAqt8WAIpbNb9ybICVrYcNsuFOdFF/cXw8inxlBrOO+d8Qw3rpy9M
+34HHkzWhzfDgEd0o2d9H4VTDG7jtfUp/P7zPyk/shvyDGQ1Ow7CnITg6Fp59
+Ln4ReT6FTftZKvjkSF37ELzEuD7EAFec/byA3L9lOEVK+tM4vorogA1bEiR8
+mFs1l3UbfrtYn5MAs70nVpfDHWajZXvg2BPs68fgawnTfAl8b7q+fCdsYX2l
+OxL2DaiN5MN/BvqqPeGtqReZ5H2SLRb2vUT+rR4yH3PYxB5TyOGkqzXGVuw3
+J7yg0xGuD2jsL4SFufP4ZejXNLE6RgLHuLIi7eDC3k39QrioouCd3IGmaN3S
+U/5wBEuYOGGP5+a/ftIX9s4yucfCwh49j4ZFE/YlT+wQ//TDzXA460motQCO
+HRs8sxu2eJsW88QW81KQylfA3NObO0Ww9l3UIKnPaeM2h69hZdoCty9Q/xrb
+S1aPbFDXwYx3LGJptaYMNv7+ve1quPqhcUYOLN3DDoyG6d/u8o/D3ILnC8n8
+VxS8vF4E5z1oL8mGL+5Ib2mA9X9HFJ+HH5r9HDoM13JeCC7DWRl793uQ/GU2
+s6/C3HQtMwE2HczdS/xBJmosh+Vz/9hP5ul0ktXHPpihDPZVkO9Zr1Q8H/26
+P53lfhymxJc91sJ3zaoHSD2zGauUUSReJ4uPgm+Odb3fDucb5VdWknkPtrAL
+I/v1XjXOhA//OHWfAwv/mskYwv7Yc+6Wf0C+enlcZCU8ruDxK2FV6V7xTzCV
+08oKgfPu37i1DPZd+SbtKfqjPNpFDPjRS7YogvQfIQro4+B95KoztEzEN5xX
+34d7U6f7fGDTWutj9bDpjdsr1QLU7xO3kpghCbO0hNk68/x7sMvtnrpD81Gf
+i8NgLzzyGb95uI+cOfT/y9lRKw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.058738695939086, 17.601506520304568}, \
+{0, -1}], 
+        LineBox[{{17.000000000007276`, 16.500000000005457`}, {
+         13.500000000003638`, 10.500000000001819`}}], 
+        PolygonBox[{{14.947677384685548`, 12.98173265946094}, {
+         15.206811054955079`, 14.219815750748694`}, {15.897834175673825`, 
+         13.816718930329426`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.984057296392571, 13.323799910437668}, \
+{-1, 1}], LineBox[{{17.00000000000185, 16.5}, {10.000000000002592`, 16.5}}], 
+        PolygonBox[{{14.1, 16.5}, {12.9, 16.9}, {12.9, 16.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.5, 17.4452}, {0, -1}], 
+        LineBox[{{13.5, 10.5}, {10., 16.50000000000182}}], 
+        PolygonBox[{{11.447677384685548`, 14.01826734053906}, {
+         12.397834175673825`, 13.183281069670574`}, {11.706811054955079`, 
+         12.780184249251306`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.015942703607429, 13.323799910437668}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{5., 15.5}], PointBox[{6., 5.5}], 
+         PointBox[{17., 16.5}], PointBox[{13.5, 10.5}], 
+         PointBox[{10., 16.5}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T12", " ", "P2", " ", "N24"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdgei/fgfjhihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdgei/fgfjhihjij.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:eJwt1gtQU1caB/AjtjwEIshDtlAQzAKuRUOX54rJpUKxksGAvCqMIiOIGiVF
+aYMiG4Uqsm4LiDa6FHkEDUIhIkKwyvAqRJYuEW1BsBApICLViFgDIuz/dDcz
+mczv5jz+35d77sQxPjksQY8QkoU3/STqRbz+xJA/XhyGjPyrNboQLu755pBq
+PUOazpZyXOBV9iuCLsDpaYrCMhuGmI2djjgMbw8uDbGCxS3EOAa2bKkVSlYy
+xMfqt/AQuIj11e4n1livwFlK/TDQ6/twWNpVVEXHd6RPDnZYMSTa1nKYrld7
+0XliE2x4t0onhVPO/pDTY8mQzdku/A446aqbWghry8xVc3C7p/e79rDqaZH+
+e8ivb+FZNGrBEGXUpnZvOH2fm0sLPH8hPigCtkv4beN1uPvFmN9nMCfV+3wj
+LCs5F58DW68aMuiFp+62FVyCB+Tul2dhxXeVAzUwd65l+AO6n2hBdBMeXWZX
+vgfWPF7b2wRLkoYKyuGCEya3bsE7/vPx2hHYJKvmwzo4x9rzpQ3q8xtbJymn
+eWe/rg+EZaoc9zy4UL5QuRtmX6w2E8MaG4PiFNqP2xrbGJh/rHflAZhzY/bI
+Bjjfz14YBgvu96XQ+rd87DHoCGt81tdMoz9TBi55g9hf/At/vha+qP69XAL7
+REljxLDcqc7cAm6W57ED4bkAh2/OoV7pgu8OW7j+TVW5MazOZVXMr0OOpV4e
+aSsY4toZ6zYJ9/ePnxsxx/2gqPlqFO41Dgjmw4rDw6NPYTud/92bZrh/uKzv
+F+H0rkzRh7Dg628tHbC+X8OV9w8uZ4jOffyLzTTvxiIjKQv7eXEX0mDxC/uX
+j02Rb6Qo6Roc+0vTP3bBYvYynylYZLqzWR9WcLeNWqD+OBlf1meC60LPBg5s
+Kf1C1AvLDpl/EgyrvDvPv4TnD6oS4+HmhMYJT8y/df62Xiqce1Lekw9rqgOZ
+E/CUJrxAD3lUU3rHTsMzaypq0+H2js4oer+0p7l56WAP3Y26LNjPiWsrRD18
+/QNN9Pdjm00oemB26obRRPiZvPSoKepvDk78aStdn7gdXQ1rHG6mecCiyEfv
+uMAmofWPrWCB9SLLGpYEHLk2iXpNGpQPh7CeujPPW077Me7ZkQA3PxOy9sCu
+se1ercgTPZRxfw2sjl6Ieo164pZkvp1G/038P18wok4bbGiHmRWbUgn6IRVq
+7hfDfJfLviPLcF4vOt7IhsXziooGI9wvXSLfY7BrxM6K04aYdzWqMQPWueh9
+tMuAIRMDcYtnYJsyKyZIH+OzYoOv0PkV393b9C7q6ju1vZuObz/lveMd9PMB
+N3UO5gxnxxcuxfWSsuPrkTdr65sOPVixVfTeXjj3QbBTgR7ytryRy+D+a4Kd
+obDP9sjjw/R5pIk54wt337z8d2P0K2Bf5tgnsMbrn6Fsen6Cq6ePwcrhj6x9
+YSHLQdkDF/ZXPtgMk0zha2/s90Gh/lAYnR/oklENy/6qK4uEmc6fM/6CvLGP
+pp9vg5PasrWlMP/Kre4tdH7NuJaF+nQBczn0PBZnVbATYYms7bYzrD4RsaIE
+5txL9DClz4eQhEONsKvwb7/S/HLDQ+KrsKKN7V8MC1qPvBXBZlF7zHbAhg1v
+K41hw09lc/Q8svn5Rkexv/hkjPwh+qfm+ae0IK/GykRWCscNPl0YQX1aq0Ku
+CBZtVEePLUG+Rc7nQXBSKCu9h2D8nRzNGjpfnN8XtsgjysruCzawoGFD/et5
+HlnVcNDHElYI/L+9NMcjuSGDHXaw9ssfD8fqeEQ+8bbVna7Xd9Kf9zuPKKY7
+V4fBqtr6/VEzPCL6OXl3Orzq15mVtdM8YvbkeUE1rIz+TPrpCx6JmzVPHocl
+4ifz4VqM73JKdkR9zVXLz2x9ziMaS//nsbDGoD+j7BmPiOMdAs5TlzxeWgRn
+7yUDXbBkIdyPg/Hq1dcFOtqvn1gHnLBedkLNFhb9/dtaMjVwVkzmPH0+KoI8
+f2jF/u2apBJH+vzPrTZWIp/4wJUhakY1FV/9kkcMD1pcsoWzS8z/fRb1qJbP
+WCyHlVqj+chXPMLZ358wi/3IvXWOE/DmU3O7aB7lubVf+qIfTOf1V/mw2d4h
+ZwYW2CkjIqgvj3BmMF6ZZz1nQfPPKkJCYfGf92Xepf3Krx+MxH7Ni6FFubSf
+jrsmDZBH2ZU4vo2ev21qp/3ILzk9ced9en7MXV9Zon5BTnSy1g3rSUzzxiZ5
+RMq1L/oR1rrXpSSO84i2xaOyHubcOR7R+Aj9Yl3fV+VG+z2gXjqA71d3O9dQ
+L6krUKmxnlZe2AQzxvf0Wc3oZyB38YHb//8nFN/+3+c65r9ilhyv
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.907871335428632, 17.11903631971389}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1gk8lPkfB/DHUe4rFIomWrRSE4VVmqeibJGhRLusiagkTSK5JyS5EjZX
+y0QUHTurclQ0VK5Ks6JW5yhHroxat/h/nv3P69Xreb37Hd9reCzzPOrkLU4Q
+RBP+UU+iaw4fPZL477OAJCTiUvbUwKKmYcc8FZKMysw+FAjz2pSqnFVI/kt9
+h3fLYdrnSN0fVUgizNXuUqsuSQjybca0VUgOXdKyiUPZUXF8DSz8FutlAguv
+jZh747zPz27M/mW4/6vQ8A7Wf6tZsvgaTF8rVaWN+EYvV/1zAqa925WcDdM0
+dGUcYDLfyVZXleS3hYTFr4V5vkkfeKok2RdgE2kAc/8Zn7RSI/kOyVPulFlK
+cU51aiTpdql7yAQW7CjQNFcniepFGS62sPBSPPOCOs5LRZDe1P1e1zTfqJMc
+pnVaXxzMjByZFFtIEj+Lqe0upfI94iUls5DkxMZXHXpK3W/RLi5SJ/mXZ9X0
+qXq4met+rYTHOqQeEKiXP+Ss5Q27GP/YrABzY1fen1IjOUuLVrsrwUzpW18j
+ke/AVKaBJLWufmbvBOobNXeKHcB9/HN22v6qJId46h39GOY8DMrtXUCSrkUr
+u9KoeOfD5g6jPwv7DNSdqXyiyj6KLSA55yfHFipS9TXXf7uJ+bjkHvXh09Cv
+dTGlwej/lk7Ga39YENQp5wGT6R3hS2B2Y/wpH8xD6rRdQ9ZS5Ofxuj4Z1m9w
+kJOACaWEwVbcZ/WTl0GEDvIbTgswQfz8D39clYNZYUbBVxD/eV2YbJk2zr/d
+PGGE/DcZG8UHwOwAjeVVqiRx5sXlWXuYkL99exv6IT2k07kF5uQcdxTAd5sD
+SSdY2HJ+ZAfmEaii0x0E0+3DLW9jfqflXUNLYV6mdLsE5vH1N6vGfpgMVrlj
+hnmN1PMn6chHMK/aYTvWW98J+09QJjKqrbB+VO17aDnMTb1UrwIfWPL9fR+V
+v8zkq0bcb79v9osc6uXOW/XJB/GPiwUf1oDp9wNWjCC/VeWrzeQpWy0bPaJG
+EguyNMK7cV5ZnGXThXodFBqeFcLCq3bsX+HV23b9YAvzZi/wX6M/Am2bjjaq
+vv5bqofgdtONEf/1Y0VjhDz8NFiyrHwJ4tvoTDSh/0bZR3vVYbamv04R+l8p
+Hqp6bDHytQqazYf7rG09W7So76PvzF2YVen6yRTmWdx/9i/8/YKpxRVNzKPV
+O2E75pWT8sHWGGYb97+oQLzXS1TEmzUQf+OIkjnyNSDiaRyYZLJv1cIDMW7y
+jrBgk38OE/WmqhnWb4C5j5oOvIVtoiR7N1HrHTO97uiXgj/rljvM6eIda4H1
+ta8xkmC+vRrDEPNIDOy/3EidV7a+54P+a9eGbFZAPtxz9x7EwZHJUTK7qfyY
+6TWUs90MWi7AwhjXV9jPKd3ikfOcsqJPO+4jNuk8/j5Bmd6+SIB4A40ZexRR
+v2iF7f59cKxpvZI8zLw2WPwR85s+pvX3MPbzeEqFvyD/17LpeZVwqvvhLAG+
+n2sCr3f7wIJXXzp3wArfrwbPIF9W26L0F+jfsI75sXCYKSWj6Q+PR1cqDyzC
+/uY9XTT0M8XXNcKe8g1Fmgj9X5o9eKoEeTLXPwt5j3n6rScZ82DRKcH3QVhG
+520HvmcEvaBPejHu27/9okEb8uKryjr64L7N0977nGDRk0mJJ3DwCs133chL
+MJE9tQXzaVrs++I8zLGUnG2GO2T+XOsKpxb2aO3Fuc60rpSfYPZA9WwP6vcN
+sp6/DuYqyf1yBP35ckDAsoUJDY/N3cjjZPva5WyYvkLrnC3yNPU89ugKtf+Q
++Mo09F/zSZuwj7ov38O9BuvrdbWS6IgjKJP92oz16m5hbhDMM29lVcCZVi7T
+ZTBXp/R5LOy1+uEM5kCQG7dK4ueVY1ZUXEQgLnN6aONzPAPI6BEpPIVGYWJ7
+kF84rVJqDPtZyzmP8fuBkGu/t6+Juu9pQNFWPB8kpHw4hSen5eD3GtTPDzje
+RKP6tclTehNcJvuo5irVj792RmF+nJXqTWnasDK7c2M4+t1Z4a8ZiydHa3iC
+gXVLo5ieTswt9dzx0WX4f6eaLnErWJif3KMH24Yl5uYqI59dD/62wX6Tghs3
+JWCB7mWlOKzbp/x5YlQR+2dpnp3U+TbWsCxM29y1dBfi/vvlrJ6DAvqdNxTQ
+TuVxmjVTL49+3n5ZvA95SymybgbCvOe10SLq+6nyKNcFFqpalIaiL1v/fu3m
+B6fe+zQ3AQ/dqR66DgvspyS9MQ+DPKk5ZdzP9HehV8HRGXbeKQrU+6LSYgTu
+CQu7pIl8+DlmO2XxPU0xmBdWDPN0phkS8N7IikJDJeRLWCS9xf6t1VVuGTDb
+N3FvFkzTlFb7ANPLDX+xhJP113ydg7lFtjkNyIe428cUwcSykA1b4ZcGm9Su
+w6wrLgbVqKc2pbFzDcyzm1diCpesbTCJofqjY6z+F/oxPR1LXlag/t6o8dwA
+a5vynuSiPtFsTMsb9PNLyIvaADnkMxF4JgMePZ312FQW+w/TD/nCb1O0uf3S
+iJ9j2egB79b5p6BQCv1SvecUBFfqMsUPz8d9EW5SpfBk928mdvPQv+7GzdNw
+0+Kzdo6SuC9R4dN+xC9mxMRHS2BdVS6qE8bfF8+6xTGPrzJ/+iL/g30HvSNh
+gUSR5yRcJ6Px1A7m+J1lxKH+M2fyb+yE2WVqkrLo14CyiUQUTGwv/hwBn5BV
+dXkJ8/5InHpDvY+SSwx3IB4n4+HhpZhHyKmRw60w76DfC2t4uv4PbRbyozuG
+/7od3mX5Y1cvzNrG6lgNv35z9I476kmdMxOM4b59O1VOlsO0lQluBfD9VPus
+zzD7zu+y5nBdj3/8IEyf2pF9F/mu9VqiXw2LWLY3TOEfMjfOuVD3yVYFl6A+
+zYcdAdVUfLF+Zz24m6Z7XUTl6xTlT/2cZe6WOTmOesh3CY4MeDsnbLxDDPmd
+i+UOob+t89xNCgj0y6auDu8fYixxZlnFLIMQTO8v5VLzsf0hbvkMg+Ctarte
+As+e97QommQQdFEHu5War0PPW+Y4g+A+d/imgfsvGlW82jDKIDhPtQtCYCed
+u8Zh37D/My1pGH7/kkjX/Ao7nygMRL6lx6Vu0UYYBDviL0Vx1Cf6nXM/XcQg
+SNV7salw7LdaMzbMTYu/qYH+lE3M17sJCwOSz6bDgbqPD5A4n9pR/XgKfpR3
+hKOO+5lOZlo/o/9ZMV4HNRCff1czKRRW/Pby9pp/GYRy4nBhEvxeUNdii3xF
+thUpkbDTwbwNNmMMgtY3augIjzVE9yuhPr7Yim/z4aSKLI8MWJBkKSpEvHi9
+PEEtrFxdftQYLq3QE0ui+lGTUV+C/BPky3sHcB/nk93UUtj1g7O8kIqXctMz
+E/W/f7jtoh/yIY/v37YIVj5pZJJL5T/sEFmMfqWMbnYORb10lw4l6v1nLbI5
+8tMgg2DtluiRofrdNOtH70W+u6MSeqh5XfSLkPmIeTWYj3+EpUtHpAY7cL/1
+s7A5+OSl6Vo7Ac4f8K2yxHnhuGDd+hrEC9W/Q723/vtkV///qUb+D6LOr4I=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.922596693736967, 3.8067338747393404}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000002274`, 17.}, {13.500000000002274`, 16.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.552325660469876, 17.180083206945802}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1ws0lOkfB/A3USpqcp0Q41YaYhKbrNa4i1wrUZRKKalmc881bOWSJImi
+HZJLWaTkkrYhogs7CSG1UymWpYmKJP7fZ89/znGcz3luv9/3eWfOeVX3HHXd
+J0JR1Hv8kf/U5Cw+6mzqv48Um5KJzjmppMGmhOpWM6dhz5bjVyxg/phKj7g0
+m/KOlU0KhAUfa7eEw+wr25ilsPP8Pff74NTBTdRHMj+1VJ4pw6aKksKsDTXZ
+FE0yQ3s3zO3Wn4mC+XsVymJg6oyJ2GPYe7x842m4fGuntswKzG/ozAqFqxMd
+7XfAfP413c3w7XNWnjmwoKYhRAHuN85K6oY5G1aUPMP5jFxzh0UrUY/KUFEE
+zPvm6G8Al7/e8UiF1PfbVvnNMCXzreY++uvX/mdwPxl/qGm7G059Wjp8FPZu
+OMtaANPtR7OOwOwo09G7S9HP57zuvXDMrFNyJKzl+MuoM/El7QgXWKkkImgd
+TCuZ/tUYZoQ/37QMFtjW2xJ7r9CIm0S97GnVj2S+aN1x8xdwufkzrxNwI/dW
+TRXpR+LFxWY4W+SjWDbsbdh0Ww31mLyqVToJO18/9PksHEHvrAqBGR/ZLxeh
+v8bPbhbHSD79Hm5p5L7URP4KJvOvRL5XRl6ZOTZzyXr+YN6jEpgzFqbAJU6c
+MFwni/GAX183knq6gk/UwM4TtdfHST2blmzTk2NT7iXGAdroh1+77206zAqf
+afODU/V8Jz7APov588rJ+FnaWnV5NpX8+OOKbySPXrqMLcy2M5O21MK64aiF
+W2HhH/ScFJjR5xFpBwdaNmd1EbeWPVwFd+ybmVy2Cn2oR2l+wf4dmqq9bjCr
+Mq6gDA7MLfo9CeZ8rRP1IvVUtM/eIeNS3bFzYI33o0u7YeFpvfu56EfmHG/b
+KOy8VyreHC73udDwDU5l2mQMIg//ZX23puCYLy1xmXDLfsNvn2Da3ruBbrDO
+0MpGAcx3CqdWwO6VT3NayHj8KfGFMK1y3O0GOU+Ld0mU5Juw90siGZ/D6pMj
++Zt9vXKQ9GNh/INNnu9wv7iNxFThulhYtLe1SYfMN8jr6ibPt/DgflkyPrPd
+ltRbUiKvK0b6XXvG6K4s+V60Xf6BvJwD31WYol+uAatzFo6ZbLN/At++ef2S
+BKk3VM/RA3kqxVaaasDlPePD/bDM75xCa5KH772jB+k4X7/NKgBmv4o//BY+
+YLxes5jked5OaL+MTaVLRQs/kPGz3/Ly4Gq3C5Q2E+c96Bp7B3vW/XE4AOZ7
+0pmLFXBf2gNqf8Ic6bQTDLj6IH9cXBvnFd/XUoT7nr+qcIFpu3otZrE+/ss/
+NhmwQEdS0Aa3eHU3dcCMB2avk+FkvfCoRTqYn7m70wSmvo1Ir4d5Rb+MkHr7
+qipOesKc4Ku34mDWiVnTIDJf23pEHS7ntsvHkfm6v/m0oH9BQYrbSZgyGqoK
+gjkTkhXRMFsigMmC3TU3WXPIfuXJId+Rp9KwMMEDZkWeKumFtWb0TTfA3E9L
+F/DhzBulu5eT+XGzA33kPi4PL51G/bx59jfnYD/+rE/0S1g43d+5gXwfBF+f
+3YP54mGdZ2HbhCzpa8RTow5fYEraRfE8ccx8mUOovyWXeTwBZsfJbRmhk3oW
+HSJ2DkuoCUEeEsemm8h8bl3uZTHka6ngP1FEzlO8sDqN5B3y7HsLnFqmXk5X
+xO/Z9tZd4//Nz8tLhwUu7ZYrSV6jJz7NUcJ9qDD89pJ+lvgxvGC61Z31BbBz
+t9mRq3AMr6p7BPZ2yv/UTsb9M4yNVqO+XXklQ7BRpelPcTBtw9yLxN25R7Of
+wsKkrCvP4UBHC0cpXdxLc3FOITkvWXWzKxzDbrI5CPdZyY8kwsKyvyWVyHyv
+zuu1cKoKb+oB6q32zAgWkPXdJgn74NtWrrnfYb7eWJAYTMm1/rNID+MXXVOK
+0H+m+7ropXqk/wXRm+HsF1azEjD1vOLqQpKXVcfRWaynXnX2PEOegpwtBkMw
+o2fKvQTmuYTOtpH6qjjnsmEZZmF9GSwQLJfOhzXaJtNTYG7kzsgHcERcdOFh
+Un9fRugUXLeyUcMJppnX1djgPEbbDhVDmJ1XtqQYFgZGhavCrJOCMEXUny8W
+8VKW7B/raHMZ7sjrSZEm9XkUm2ggD//+pnhFmLN+Hu8mrGPEMdcl+8/sFzdd
+zqY+Hyt8ZU/yOKPl1AzfPjjxPYDU1+cxx1oZfbxx7LpG+uH9GL0DG20QNyN5
+0n5yCpZTwe/NuznVqiSvVtvi3bCz9cYjB2CW7vChDFgYfMe7AhakLEi8BRc9
+rvL7Qcbzax9Uw5uMfi5VZyF/m5G/Csh4VJW4DcxVm7c1Gu5aZffAF2bVtL+w
+hNtlkyfi4RiD2Nwp1FNgfeJdDixk3MzJh3V0/D/dhCmrgTU28NvyF/d4MM2H
+SRtAf9c7shQfw+z48HkJMHXqmmwbOU/UoHUNnC+VNfqUzHez6HqPvA40SCo3
+w4x/LVWK4bSkRvt7MOe4rXg0/PbsG9tyMn/iC8uPPI92EfNzYT4jyMsf3h/4
+MjWVrFdg+ZyE0z3qp6LJfIvVmtWwu/w6Tw7pJ84jicL5JrvtGvbAzpWVF73g
+jqX6mu4knxfjQU/h9JKNO13I+bvKsjaiv2B3exUnOFVZ+h0f/rBYffi/8eRj
+j7yQV+yGa7TtZP9y5cRhOPHyrkKS54G0RyXGDHwfja+lHIer86PtwmGF+38f
+SSN5jMmGVcIxv9DvlcJGywe2DsCXdM7zSF6huqZblqiyKTs/q0ufSN6TOx10
+4DTrTge5Nfjdm78neQM87fz4yc9wkWJypzlsnh077Q2zzlUcMIEvKUU8iYeF
+D4tmmHDDr5H6BbDRqsf1ZH+5FqZlI8xf8NHsX5zfEpdl+Bo+3W3r0wCXdkXv
+H4e7C546pcOJT274ztXH+qCvbj5wgUr0rCTM037ytwHsftdMRxqm6y+1F4cH
+h/U1iJ23RVfVIx+DevfNi2GOhqXpCZi5XmObGCx8bn7bFbZeLz85ifOoZUr9
+RvCRt3+oDsG8H/YPDWH9m6+7e2DvXb2+duT59ju/5hHMvh8jCIYzAk5Z1MDc
+HZUutXBU2IzyDTimoj1kAerZP9hc/zvJo0ewwBQevUlJZpLxTUt0IuBQox93
+02F3pvWrP2GtLTWeGTBt7uxbUeQ1Vqpkl0PW924U2MPJnY5FxfCg1E9HzpF8
+Jcz23oVbFK4aPIczGJF67XB5eqjIEjU2pfaedWYE5uTZ95vDrhNurRLoP9Tu
+lNFhWMa3ma4HcxNseMnwL4YDoZthrftGJVxYpDX7TSjJ0+FrfhHMjFAzuULW
+d55ry4ftflgfa4Anzyg3XyD73y0M6yfj95y4EbDWA87OuWtxP57+HdthXbe1
+DspwqNrCdfpw7anDlw3gFuHqt6Jw5hu/NiuYX5XO6EQ/GurruC4we7eY2zXY
+WZUj4g6zQrkfQmDvph5lDzimSEfZCWbZlW7dCmuZ7qKvhm1ZdesdYEGa7A1p
+kqfI8UQzMl/TezPJl7nEQWctqUddfQUFZ9e6qqjDjHdDjfNhiYRFQVKweK7v
+NkWSt6+rlQicWv48wZh8H5ZLXR1Hv6dzt6T6wPRjq88NwLRIA71M2PK8xORr
+8vyZXmkm96Nb93N2L3n+Vmw/IIt+g+dHyL2Eu1VfvSH5uCdltgpgyqmvL5fc
+zwXTsWHYNiJ8bABOWbgocprkPaTUxMR7nO2ep7qkPmfJdvoB+PPaZed14MEK
+zlAOzJSeEbUn+dJ2xj+GJxmFlf6k3+tGqf/C6SE1t1NhXsB1jbl4j/u6eP5U
+JcnbsKNNEk6uM+K8JPnVCzMk4Bny/rj2/++PGuz/AQ7UGzs=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.684798798577102, 9.013741219420858}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwt1wk4lGsbB/C3UpbEILs0R3Yyk7R8LbxJxalsJUQaQguFEiqmkS2iMyFR
+YqIUCaeELDVKyqGTCi1UI3I6okYnS0W+//Odb67L5fq5n+d+7vue551r/OIT
+5Ow3laKoLvyQ3/++dOl/f2vTFHuZzLAd3GrvWaoPf40bupMBC9qdpRfBwfMd
+Rnvg4CduaUawwOC7KUsPznj1zzS4xX6ldBgscNIfaZiDPJcV/SpgR3ZC9D5Y
+69ZKn08w5+rXmGmw273FPC19mmL02jxJ0KIpKc54sRXxTaexSU2aKpeTd3KF
+6Yti+RC4+Chjyw6Y6fEtSqRBUzYZtQa+cHD5i+pN8JWoBaVbYdHbzbNb1bFu
+tMbWlqz/wdq/FdYNP1tuBnP8V80dVUNd497TGMQTAVmF8AZPEZfUx4tO2hMK
+i//m8ltIP/MlZd1hLSObgmIS1/LscIVtUvJUT8Gi7xYTQXCtu83MSBJ33paZ
+C9ue/eYVBAtzVG/1wFJr21MDSVzwKWkp6lkqs6MqlOz/eYqbBcdG/u5/nMS7
+30ROQT+GiRU3LsPivJdzA+B0ttvCpzBbU/NzK7whT3d8BupvXTDr/HzMh/Gf
+uN9tYLGBnXUkHJryPTUR5t/nplfBrUGVvz2DeSFRKm/h2vQ725gGmN/MNVaD
+cKRtQtpemGreldENt60fvlsFi6XiG2pg4dbM9EmYF6ZyhuRnR77ttjLEfL/t
+H9WDbZazHoXDgpGA9mrUJ9t2v+MSTEvsnGEFtxrGDj6EeUf3a1Si34hdbw+L
+YOE0tpEhnHnx4O4BmDH2JPMM5hXa9ENvEC4rKOqWgb8+Ony2B2YnDzkmqGKe
+txV0n5B87MBHCrBEQWlMJcyPTxWUqNCU6fXgPzJhcWz6Wm9YKv2wNamPn+q+
+zhS+4uzh4gKLPs/XUIBpP+mQRTDn0VZlBqymf2NAndQfw9ljCHddS/kkQawz
+YeYGsz8+2DSGeQiiz+7PhrVaS84Nw8wVFtuH4M0NHzsm4LL7a3ydUZ9NdeY5
+BbKfJ9pdDYfal/5kk/PdSqR10Z9aslaaBxwstaM5kfT7d8w+Pll/ZNS7D9ZN
+ilz4J6m/c8pfFmRe3A6mkhHmWnZKIQQeO7JSbxtxhpH/Gbg4eNtIIUzL1227
+BDsy4o1HYU78RDS5b77rSzZZG+PvfreiDpD7qFOokQgH3z7NJPnHxra6N5H4
+mzGX1zifLmkyn2KC/edPyO+Hk299M2DBIl9r3RH0Q4WWGDrDTLftevvg8nan
+3N0k7uJg8hbzcNvCDT9InJ+TbQ/7vurWDoNbNWKH6pVpynMyiBdI4kWXwyzh
+yB717+6wOPKJQtNsmrJ4x91Iw+xd6jP94fTJVcm/wJT4R5cabLhbRFHENYGz
+epWw/qCs8hvUL2zLUmiCVxgWL74NMyPOrXwIt3AKa/NgcXOjUARLXb/XkgLT
+t1pKGMi3K+f46miyf9BS2QWmn3FzuTA/KkmrCC6z2SuOJ/YfNZ+Jeg0NDzWf
+JfNTbbE6AAvv59pUw+xPbl1d8NfV7YO9sMhvL98a/TPin3aqk3nZpcrnwuXX
+PMtcSb8HPEIHyX07mVaYDTt2LQ03wjx71bJv9sECESfHAc589kfiQlPcf5ka
+321wm+X6Wh5MLVLd4gRbdOu+bSZ+HzrXBBZ5B51TnI/69lxM/Yj8A12xzc6w
+yED9fDo5/5lsWhLMGNxkbgSPLX16oAoWuj43vob6N8gc8eqExWlq6nqwSMf/
+9hcSF9urZGAeEn7GvJ8ws3x74nQ4Nnuf4iTM8fXrj8B86Q8M72GYdyI8blgR
+zz/d9sc7mDLhWPHg3hlSik2kPocOrzmwWNhuW0R8JM+zVQH3uUqh+jjcymqo
+PQfzzFIf+8O09PovPHhgo+noWlLPKm0H4kjVuAQT4i87qSxY1rLvkgo536xF
+tQmmEpebycCOXyUuzMJ5pr+syZGEBSFDd33gZPe/JBjk/I8F/ffgcr7zyDyY
+X3rhpwn6eXEzIW41mVfgyzOn4UDNY6v3kflYLrP8AZcvZtjkk/VFry+5kvvj
+rWfYTeYxfUv/JVh8aMF8fTPcI5/Q+93wB+oZHQwLgufdkST3KVxSrQ4W6ltt
+VobHUjpsZVjIJ1WhKA1LPXTzc4HL6qsK35H739Gvkg0La6wH80j+Ps+lXcRz
+2lrWw9WLx0ek2ahj4f2V5L6XnTB4zYSFZvoavrDZq9B15rBjQs5wJ/plyskN
+rIQpY1b/Bti8tbZ+NdnPVd5ei/nlDDlSNjC/w76FBV8sNdO2ggVR3lHFDHwe
+ujKbF8HMOLUtS2BB+KUPhjCPSltSKE9T/n8r89TJ+Q8ZJ+ThFyzJSimYs0FY
+VCCHzyOPgdjPqJ95MCYiRI58nidefwxTuY1pwbCj7tqN5TDH+LhzHtxgNHwo
+F6YXjD6binxjR0VKabBow0uTZDj9xJRMPszW2+2siXpetLrPziLrvTafiISX
+3tbVukbm6eRd0Atz3vvXt5D9nawV9ujvYbtO+uj/zm9quwGreeVsUkG9ZSUv
+dRmYj/WCgI2kX+rikK0XXDXxvN2VzNPLZjwL1hkN7okk89kV8vAOHJuU6JhP
+nGJn+ghu61T60ETymb+qFMKhr3UPfIYZi+K0zsJd51MaFRfgPv4TzN4KzwgY
+emwOCySN30+Fy7QbL9iTeN3bBWfI8yBbFeUHi5ezvmjAgXMmusJgTsJQdSp5
+fx78J+wYLHIVF0yDNw/cpI/DdClveR/mSdXXhRJzEqPNHs3C83reODEGFl5o
+rm2Upakvx1hmh8n5V4evds3E+1OTv2Yv2c/ti1GFG6R0Xm4jfuzB4srQ1Mk5
+AXIbyfqC6BJlWCcwRWMFiZuMvxFJ4/NWzcfClORPbvcgvsseideGeRcqwhSx
+nqcfoTsbZs6p+PUAzChe/n0WyWc88Nc4PPWLe6Ms2W/Xc/oyzndb4SOvAFOp
+k0Z7UG9SXbi2JonLquxbhn6Op2iPG5P9KVWps9Cv2bnOIJrEdZZceQFv/nh1
+qgepr0lW/RTuT0TlEgnSr6OvGV8F8wrbmZCaTfL3X9F0hi9u7M2vh/n9v1aH
+w9wbYYofyPx3vRqIhfuXzS2UM0e+9zFrImC36h9sC1gY8SrcCc40oI66wmXO
+LE8FOMliZnQ4zPFY3HIA52dM7bVLg0XX183JJvf92FnNIpIv771fPvqxXNgR
+VEP8ZN7TVPSbqVMx0WhOvm/qZYViHv37qLoWcp5JfdImzMuiIKqPmJYIz1iG
+efcaRg49gAWF0k4WUqiPf+bkbbL+Tznur5I0VVHzM/d3Es+9nBc3A8+P6W+s
+PJiK1S8YmI73I91ixylS3/OW2FjYsl4umEf2n6TUHOGup4PJwWR/xu4RBzi9
+rabXh8TjPPYeg+/eCUh0g5n27Wk98OJ/Jnc6k3z51mF7cZ7sz/mWTiT+Q9ld
+DfWk/qaU6kIc4CzfCT+1dS/eTuq5ttL7Kup/JTf9dBCZX2Adl4v+jHlzleLI
++as5EXbon5nPLs0l/Vc+uDUF81HRiagi/YrK1Xjn4bHnBRu6SX20zbrZmKeW
+9z3vGQvJ902O0XbYR6n5iSksaOgxOQQbr0rZuQlmXvQPJ3GdF+yBCJiTEhKu
+AJ/sa7HIJvHF4yI+8seWHmHVwqJSh9xu1ONzz+Xzc1hYOO+KNNz6+M+KT8S8
+d1UM6f//n2aB9ZN4SdL/BXHE1jc=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.51595498616782, 2.888880495006221}, \
+{1, 1}], LineBox[CompressedData["
+1:eJxTTMoPSmViYGCwBWIQDQEqDiEyIFrOgaGg63OSmYrDzO9z9v9uk3VgWLF5
+kku8ioPSsWuhi37JODBoaO52r1BxuLaBb/3LBCD/w0aDX/UqDvqbjmztPSDt
+wLBjCturUhWHfy805q1RAPI3eJmtiVJxUBZ+2RDbIeXAkPCA8Yq+ikNNZHC8
++z9JB4aK1Qtvf1d26H97fYldB5DPcX3a/63KDn84o2++0wLyG8QO8eUpO4jX
+1jVNfSnhwCAgx2KkouywPWWl0aWjQP6LFavW3VFyWLTIuKtvP5DfscJy+Wwl
+h/kz33T/vwLkB3ha3EtRcojcYaJ/gAlo3oH87jprJYcJ68uXMLsA+Qy/p7xR
+VHIQen0p6c4kIF/D6uwiSSWHdau+P5r8Asg30Hwkrazk8EG39iuvHdD9B/7P
+P22r5LDt2qvvhj1AfsAHbvUMJYfOV85Xg8+A/GdvuXu+kkPCzvcHp/0A8ndw
+tAc+VHKoWCL935kHGB4CG/TkNZUdXvAILhJgAfILGpP/Fik7+D+OC/O7B1Sv
+oXp02S5lBwab++4ss4H8iCnTv/1WdpDY/v7gO2uQ/Wck1IxVHCpY/NtTjwDd
+98IwgyVWxaF0ZnuMliWQ73HwsGq5ioOa/NH5SguA/r+QH8/eoOIw1QIUvxJw
++SfM1gl348Xh+qd0Viy+ekwMbv4kuY0Vs6zF4PYL7hKwEzwiCncf13OFHb9T
+ROHu32W/cOVGRVG4/xTF3se+/y0C9/+GM08Y9nwWgYfPykwBu0x2UXj4NVjs
+0VpjLAoP32AfUY5zxaLw8Ldwbub6dFAUHj/RFRyyOeJi8Pj7bq47VzlXDB6/
+lcUd0X92i8Hj/8KO0xfs/4rB00dWp3AJg7Y4PP1kNJwpLXQQh6ev4H1hZ3Wt
+xOHpT+hLY22WmDg8ffJJLlUTvCoGT79VphrRB8vF4Om79+SaBTsYxeDpny1O
+vH5RuSg8f/BYXU8Mvi8Czz+3Cqy9iuxF4Pkr+MDHALH5wvD8x7Fac1UsqzA8
+fxZoJzuwVAo5wPLvVjYQLeQAAACtaGA=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.354800000000001, 6.}, {1, 0}], 
+        LineBox[CompressedData["
+1:eJxTTMoPSmViYGAwBmIQDQEqDis4ITTDhdu3dtmrONz7tfe8025lBwYOlz9u
+2SoOf3P6puVlAvkvylXY6lUcDp5abPiQH8hf8TIwpFLF4c7e6gtztig5MDBU
+rVgVpeJwWHOR3IlYID8hIGGqqorD9Ss5KdqCQP6F+ZNq7yk7HEt+3Lj1sqID
+ww/VNO9uZQc9U+P/QiuBfI6qjBdGyg6rtsx6HT8ZyM9QbVtzR8nB9nYt++9J
+QP6EvTcP9is5bJyc/qF2GZD/wNKnJ0jJgf3JuY+3ToHUb1inqKXkoDhZ4e/c
+30B+xaxpdyWVHBY/iEr0Ngba/0L6u6SykoOR9oXkK9lAvsGGFCFXJYdPWkE8
+EvNB/NupX2qUHG50nC5JPQ7kW+iVSR9TcqiS8z3z5T7I/SEHiqWUHXbuCGPy
+fQrkT7gR87tI2WFrwoYVvVeB/AiFqPATyg4/OgWeT9sA5Guc1SkQVnE4oXFW
+m6cCFD4mnRx+Kg5ut1fEGOqD9O+QcSpWcZgx42PG0ltA9wbskGNtUHHwkgFG
+R4MiXP5tBd/0KFVFuH47s/DF5y4owM3f+8Loyud2Bbj9ve3vJTL9FeDuu7DB
+P7xISwHu/jMRK/9uklKA+4/78yZjbgUFuP/XdJh0z7JQgIfP5GdrPz9PUICH
+X/Az/TnaUxTg4fvIYOm8LWcU4OGfUnefKYkFET+1uoZ8qqaI+LtSO4O/KRIR
+v+5mTT9YchHxfzsmVWRBDiJ9hN85w/A2TBGefvavlanz0lGEp6+1NpNnX3mn
+AE9/B5/HPjRfpABPnyuCW/STvRXg6bejd8cc2wfy8PQt4Pn4kpKuPDz9++q2
+JFR1yjnA8scOfhAt5wAAXRMymg==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.354800000000001, 8.75}, {1, 0}], 
+        LineBox[{{6.4999999999976925`, 16.}, {13.49999999999251, 16.}}], 
+        PolygonBox[{{9.4, 16.}, {10.6, 15.6}, {10.6, 16.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 16.9452}, {0, -1}], 
+        LineBox[{{6.499999999996362, 16.000000000005457`}, {10., 
+         10.000000000003638`}}], 
+        PolygonBox[{{8.552322615314452, 12.48173265946094}, {
+         7.602165824326175, 13.316718930329426`}, {8.293188945044921, 
+         13.719815750748694`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 12.823799910437668}, \
+{1, 1}], LineBox[{{13.500000000007276`, 16.000000000005457`}, {
+         10.000000000003638`, 10.000000000001819`}}], 
+        PolygonBox[{{12.052322615314452`, 13.51826734053906}, {
+         11.102165824326175`, 12.683281069670574`}, {11.793188945044921`, 
+         12.280184249251306`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.484057296392571, 12.823799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 16.}], PointBox[{10., 4.5}], 
+         PointBox[{13.5, 16.}], PointBox[{10., 7.5}], PointBox[{10., 10.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T13", " ", "P1", " ", "N25"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdgei/giijfhfjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdgei/giijfhfjhj.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:eJwt1gtQU1caB/AjtjwEIshDtlAQzAKuRUOX54rJpUKxksGAvCqMIiOIGiVF
+aYMiG4Uqsm4LiDa6FHkEDUIhIkKwyvAqRJYuEW1BsBApICLViFgDIuz/dDcz
+mczv5jz+35d77sQxPjksQY8QkoU3/STqRbz+xJA/XhyGjPyrNboQLu755pBq
+PUOazpZyXOBV9iuCLsDpaYrCMhuGmI2djjgMbw8uDbGCxS3EOAa2bKkVSlYy
+xMfqt/AQuIj11e4n1livwFlK/TDQ6/twWNpVVEXHd6RPDnZYMSTa1nKYrld7
+0XliE2x4t0onhVPO/pDTY8mQzdku/A446aqbWghry8xVc3C7p/e79rDqaZH+
+e8ivb+FZNGrBEGXUpnZvOH2fm0sLPH8hPigCtkv4beN1uPvFmN9nMCfV+3wj
+LCs5F58DW68aMuiFp+62FVyCB+Tul2dhxXeVAzUwd65l+AO6n2hBdBMeXWZX
+vgfWPF7b2wRLkoYKyuGCEya3bsE7/vPx2hHYJKvmwzo4x9rzpQ3q8xtbJymn
+eWe/rg+EZaoc9zy4UL5QuRtmX6w2E8MaG4PiFNqP2xrbGJh/rHflAZhzY/bI
+Bjjfz14YBgvu96XQ+rd87DHoCGt81tdMoz9TBi55g9hf/At/vha+qP69XAL7
+REljxLDcqc7cAm6W57ED4bkAh2/OoV7pgu8OW7j+TVW5MazOZVXMr0OOpV4e
+aSsY4toZ6zYJ9/ePnxsxx/2gqPlqFO41Dgjmw4rDw6NPYTud/92bZrh/uKzv
+F+H0rkzRh7Dg628tHbC+X8OV9w8uZ4jOffyLzTTvxiIjKQv7eXEX0mDxC/uX
+j02Rb6Qo6Roc+0vTP3bBYvYynylYZLqzWR9WcLeNWqD+OBlf1meC60LPBg5s
+Kf1C1AvLDpl/EgyrvDvPv4TnD6oS4+HmhMYJT8y/df62Xiqce1Lekw9rqgOZ
+E/CUJrxAD3lUU3rHTsMzaypq0+H2js4oer+0p7l56WAP3Y26LNjPiWsrRD18
+/QNN9Pdjm00oemB26obRRPiZvPSoKepvDk78aStdn7gdXQ1rHG6mecCiyEfv
+uMAmofWPrWCB9SLLGpYEHLk2iXpNGpQPh7CeujPPW077Me7ZkQA3PxOy9sCu
+se1ercgTPZRxfw2sjl6Ieo164pZkvp1G/038P18wok4bbGiHmRWbUgn6IRVq
+7hfDfJfLviPLcF4vOt7IhsXziooGI9wvXSLfY7BrxM6K04aYdzWqMQPWueh9
+tMuAIRMDcYtnYJsyKyZIH+OzYoOv0PkV393b9C7q6ju1vZuObz/lveMd9PMB
+N3UO5gxnxxcuxfWSsuPrkTdr65sOPVixVfTeXjj3QbBTgR7ytryRy+D+a4Kd
+obDP9sjjw/R5pIk54wt337z8d2P0K2Bf5tgnsMbrn6Fsen6Cq6ePwcrhj6x9
+YSHLQdkDF/ZXPtgMk0zha2/s90Gh/lAYnR/oklENy/6qK4uEmc6fM/6CvLGP
+pp9vg5PasrWlMP/Kre4tdH7NuJaF+nQBczn0PBZnVbATYYms7bYzrD4RsaIE
+5txL9DClz4eQhEONsKvwb7/S/HLDQ+KrsKKN7V8MC1qPvBXBZlF7zHbAhg1v
+K41hw09lc/Q8svn5Rkexv/hkjPwh+qfm+ae0IK/GykRWCscNPl0YQX1aq0Ku
+CBZtVEePLUG+Rc7nQXBSKCu9h2D8nRzNGjpfnN8XtsgjysruCzawoGFD/et5
+HlnVcNDHElYI/L+9NMcjuSGDHXaw9ssfD8fqeEQ+8bbVna7Xd9Kf9zuPKKY7
+V4fBqtr6/VEzPCL6OXl3Orzq15mVtdM8YvbkeUE1rIz+TPrpCx6JmzVPHocl
+4ifz4VqM73JKdkR9zVXLz2x9ziMaS//nsbDGoD+j7BmPiOMdAs5TlzxeWgRn
+7yUDXbBkIdyPg/Hq1dcFOtqvn1gHnLBedkLNFhb9/dtaMjVwVkzmPH0+KoI8
+f2jF/u2apBJH+vzPrTZWIp/4wJUhakY1FV/9kkcMD1pcsoWzS8z/fRb1qJbP
+WCyHlVqj+chXPMLZ358wi/3IvXWOE/DmU3O7aB7lubVf+qIfTOf1V/mw2d4h
+ZwYW2CkjIqgvj3BmMF6ZZz1nQfPPKkJCYfGf92Xepf3Krx+MxH7Ni6FFubSf
+jrsmDZBH2ZU4vo2ev21qp/3ILzk9ced9en7MXV9Zon5BTnSy1g3rSUzzxiZ5
+RMq1L/oR1rrXpSSO84i2xaOyHubcOR7R+Aj9Yl3fV+VG+z2gXjqA71d3O9dQ
+L6krUKmxnlZe2AQzxvf0Wc3oZyB38YHb//8nFN/+3+c65r9ilhyv
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.907871335428632, 17.11903631971389}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1gk8lPkfB/DHUe4rFIomWrRSE4VVmqeibJGhRLusiagkTSK5JyS5EjZX
+y0QUHTurclQ0VK5Ks6JW5yhHroxat/h/nv3P69Xreb37Hd9reCzzPOrkLU4Q
+RBP+UU+iaw4fPZL477OAJCTiUvbUwKKmYcc8FZKMysw+FAjz2pSqnFVI/kt9
+h3fLYdrnSN0fVUgizNXuUqsuSQjybca0VUgOXdKyiUPZUXF8DSz8FutlAguv
+jZh747zPz27M/mW4/6vQ8A7Wf6tZsvgaTF8rVaWN+EYvV/1zAqa925WcDdM0
+dGUcYDLfyVZXleS3hYTFr4V5vkkfeKok2RdgE2kAc/8Zn7RSI/kOyVPulFlK
+cU51aiTpdql7yAQW7CjQNFcniepFGS62sPBSPPOCOs5LRZDe1P1e1zTfqJMc
+pnVaXxzMjByZFFtIEj+Lqe0upfI94iUls5DkxMZXHXpK3W/RLi5SJ/mXZ9X0
+qXq4met+rYTHOqQeEKiXP+Ss5Q27GP/YrABzY1fen1IjOUuLVrsrwUzpW18j
+ke/AVKaBJLWufmbvBOobNXeKHcB9/HN22v6qJId46h39GOY8DMrtXUCSrkUr
+u9KoeOfD5g6jPwv7DNSdqXyiyj6KLSA55yfHFipS9TXXf7uJ+bjkHvXh09Cv
+dTGlwej/lk7Ga39YENQp5wGT6R3hS2B2Y/wpH8xD6rRdQ9ZS5Ofxuj4Z1m9w
+kJOACaWEwVbcZ/WTl0GEDvIbTgswQfz8D39clYNZYUbBVxD/eV2YbJk2zr/d
+PGGE/DcZG8UHwOwAjeVVqiRx5sXlWXuYkL99exv6IT2k07kF5uQcdxTAd5sD
+SSdY2HJ+ZAfmEaii0x0E0+3DLW9jfqflXUNLYV6mdLsE5vH1N6vGfpgMVrlj
+hnmN1PMn6chHMK/aYTvWW98J+09QJjKqrbB+VO17aDnMTb1UrwIfWPL9fR+V
+v8zkq0bcb79v9osc6uXOW/XJB/GPiwUf1oDp9wNWjCC/VeWrzeQpWy0bPaJG
+EguyNMK7cV5ZnGXThXodFBqeFcLCq3bsX+HV23b9YAvzZi/wX6M/Am2bjjaq
+vv5bqofgdtONEf/1Y0VjhDz8NFiyrHwJ4tvoTDSh/0bZR3vVYbamv04R+l8p
+Hqp6bDHytQqazYf7rG09W7So76PvzF2YVen6yRTmWdx/9i/8/YKpxRVNzKPV
+O2E75pWT8sHWGGYb97+oQLzXS1TEmzUQf+OIkjnyNSDiaRyYZLJv1cIDMW7y
+jrBgk38OE/WmqhnWb4C5j5oOvIVtoiR7N1HrHTO97uiXgj/rljvM6eIda4H1
+ta8xkmC+vRrDEPNIDOy/3EidV7a+54P+a9eGbFZAPtxz9x7EwZHJUTK7qfyY
+6TWUs90MWi7AwhjXV9jPKd3ikfOcsqJPO+4jNuk8/j5Bmd6+SIB4A40ZexRR
+v2iF7f59cKxpvZI8zLw2WPwR85s+pvX3MPbzeEqFvyD/17LpeZVwqvvhLAG+
+n2sCr3f7wIJXXzp3wArfrwbPIF9W26L0F+jfsI75sXCYKSWj6Q+PR1cqDyzC
+/uY9XTT0M8XXNcKe8g1Fmgj9X5o9eKoEeTLXPwt5j3n6rScZ82DRKcH3QVhG
+520HvmcEvaBPejHu27/9okEb8uKryjr64L7N0977nGDRk0mJJ3DwCs133chL
+MJE9tQXzaVrs++I8zLGUnG2GO2T+XOsKpxb2aO3Fuc60rpSfYPZA9WwP6vcN
+sp6/DuYqyf1yBP35ckDAsoUJDY/N3cjjZPva5WyYvkLrnC3yNPU89ugKtf+Q
++Mo09F/zSZuwj7ov38O9BuvrdbWS6IgjKJP92oz16m5hbhDMM29lVcCZVi7T
+ZTBXp/R5LOy1+uEM5kCQG7dK4ueVY1ZUXEQgLnN6aONzPAPI6BEpPIVGYWJ7
+kF84rVJqDPtZyzmP8fuBkGu/t6+Juu9pQNFWPB8kpHw4hSen5eD3GtTPDzje
+RKP6tclTehNcJvuo5irVj792RmF+nJXqTWnasDK7c2M4+t1Z4a8ZiydHa3iC
+gXVLo5ieTswt9dzx0WX4f6eaLnErWJif3KMH24Yl5uYqI59dD/62wX6Tghs3
+JWCB7mWlOKzbp/x5YlQR+2dpnp3U+TbWsCxM29y1dBfi/vvlrJ6DAvqdNxTQ
+TuVxmjVTL49+3n5ZvA95SymybgbCvOe10SLq+6nyKNcFFqpalIaiL1v/fu3m
+B6fe+zQ3AQ/dqR66DgvspyS9MQ+DPKk5ZdzP9HehV8HRGXbeKQrU+6LSYgTu
+CQu7pIl8+DlmO2XxPU0xmBdWDPN0phkS8N7IikJDJeRLWCS9xf6t1VVuGTDb
+N3FvFkzTlFb7ANPLDX+xhJP113ydg7lFtjkNyIe428cUwcSykA1b4ZcGm9Su
+w6wrLgbVqKc2pbFzDcyzm1diCpesbTCJofqjY6z+F/oxPR1LXlag/t6o8dwA
+a5vynuSiPtFsTMsb9PNLyIvaADnkMxF4JgMePZ312FQW+w/TD/nCb1O0uf3S
+iJ9j2egB79b5p6BQCv1SvecUBFfqMsUPz8d9EW5SpfBk928mdvPQv+7GzdNw
+0+Kzdo6SuC9R4dN+xC9mxMRHS2BdVS6qE8bfF8+6xTGPrzJ/+iL/g30HvSNh
+gUSR5yRcJ6Px1A7m+J1lxKH+M2fyb+yE2WVqkrLo14CyiUQUTGwv/hwBn5BV
+dXkJ8/5InHpDvY+SSwx3IB4n4+HhpZhHyKmRw60w76DfC2t4uv4PbRbyozuG
+/7od3mX5Y1cvzNrG6lgNv35z9I476kmdMxOM4b59O1VOlsO0lQluBfD9VPus
+zzD7zu+y5nBdj3/8IEyf2pF9F/mu9VqiXw2LWLY3TOEfMjfOuVD3yVYFl6A+
+zYcdAdVUfLF+Zz24m6Z7XUTl6xTlT/2cZe6WOTmOesh3CY4MeDsnbLxDDPmd
+i+UOob+t89xNCgj0y6auDu8fYixxZlnFLIMQTO8v5VLzsf0hbvkMg+Ctarte
+As+e97QommQQdFEHu5War0PPW+Y4g+A+d/imgfsvGlW82jDKIDhPtQtCYCed
+u8Zh37D/My1pGH7/kkjX/Ao7nygMRL6lx6Vu0UYYBDviL0Vx1Cf6nXM/XcQg
+SNV7salw7LdaMzbMTYu/qYH+lE3M17sJCwOSz6bDgbqPD5A4n9pR/XgKfpR3
+hKOO+5lOZlo/o/9ZMV4HNRCff1czKRRW/Pby9pp/GYRy4nBhEvxeUNdii3xF
+thUpkbDTwbwNNmMMgtY3augIjzVE9yuhPr7Yim/z4aSKLI8MWJBkKSpEvHi9
+PEEtrFxdftQYLq3QE0ui+lGTUV+C/BPky3sHcB/nk93UUtj1g7O8kIqXctMz
+E/W/f7jtoh/yIY/v37YIVj5pZJJL5T/sEFmMfqWMbnYORb10lw4l6v1nLbI5
+8tMgg2DtluiRofrdNOtH70W+u6MSeqh5XfSLkPmIeTWYj3+EpUtHpAY7cL/1
+s7A5+OSl6Vo7Ac4f8K2yxHnhuGDd+hrEC9W/Q723/vtkV///qUb+D6LOr4I=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.922596693736967, 3.8067338747393404}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000002274`, 17.}, {13.500000000002274`, 16.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.552325660469876, 17.180083206945802}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1ws0lOkfB/A3USpqcp0Q41YaYhKbrNa4i1wrUZRKKalmc881bOWSJImi
+HZJLWaTkkrYhogs7CSG1UymWpYmKJP7fZ89/znGcz3luv9/3eWfOeVX3HHXd
+J0JR1Hv8kf/U5Cw+6mzqv48Um5KJzjmppMGmhOpWM6dhz5bjVyxg/phKj7g0
+m/KOlU0KhAUfa7eEw+wr25ilsPP8Pff74NTBTdRHMj+1VJ4pw6aKksKsDTXZ
+FE0yQ3s3zO3Wn4mC+XsVymJg6oyJ2GPYe7x842m4fGuntswKzG/ozAqFqxMd
+7XfAfP413c3w7XNWnjmwoKYhRAHuN85K6oY5G1aUPMP5jFxzh0UrUY/KUFEE
+zPvm6G8Al7/e8UiF1PfbVvnNMCXzreY++uvX/mdwPxl/qGm7G059Wjp8FPZu
+OMtaANPtR7OOwOwo09G7S9HP57zuvXDMrFNyJKzl+MuoM/El7QgXWKkkImgd
+TCuZ/tUYZoQ/37QMFtjW2xJ7r9CIm0S97GnVj2S+aN1x8xdwufkzrxNwI/dW
+TRXpR+LFxWY4W+SjWDbsbdh0Ww31mLyqVToJO18/9PksHEHvrAqBGR/ZLxeh
+v8bPbhbHSD79Hm5p5L7URP4KJvOvRL5XRl6ZOTZzyXr+YN6jEpgzFqbAJU6c
+MFwni/GAX183knq6gk/UwM4TtdfHST2blmzTk2NT7iXGAdroh1+77206zAqf
+afODU/V8Jz7APov588rJ+FnaWnV5NpX8+OOKbySPXrqMLcy2M5O21MK64aiF
+W2HhH/ScFJjR5xFpBwdaNmd1EbeWPVwFd+ybmVy2Cn2oR2l+wf4dmqq9bjCr
+Mq6gDA7MLfo9CeZ8rRP1IvVUtM/eIeNS3bFzYI33o0u7YeFpvfu56EfmHG/b
+KOy8VyreHC73udDwDU5l2mQMIg//ZX23puCYLy1xmXDLfsNvn2Da3ruBbrDO
+0MpGAcx3CqdWwO6VT3NayHj8KfGFMK1y3O0GOU+Ld0mU5Juw90siGZ/D6pMj
++Zt9vXKQ9GNh/INNnu9wv7iNxFThulhYtLe1SYfMN8jr6ibPt/DgflkyPrPd
+ltRbUiKvK0b6XXvG6K4s+V60Xf6BvJwD31WYol+uAatzFo6ZbLN/At++ef2S
+BKk3VM/RA3kqxVaaasDlPePD/bDM75xCa5KH772jB+k4X7/NKgBmv4o//BY+
+YLxes5jked5OaL+MTaVLRQs/kPGz3/Ly4Gq3C5Q2E+c96Bp7B3vW/XE4AOZ7
+0pmLFXBf2gNqf8Ic6bQTDLj6IH9cXBvnFd/XUoT7nr+qcIFpu3otZrE+/ss/
+NhmwQEdS0Aa3eHU3dcCMB2avk+FkvfCoRTqYn7m70wSmvo1Ir4d5Rb+MkHr7
+qipOesKc4Ku34mDWiVnTIDJf23pEHS7ntsvHkfm6v/m0oH9BQYrbSZgyGqoK
+gjkTkhXRMFsigMmC3TU3WXPIfuXJId+Rp9KwMMEDZkWeKumFtWb0TTfA3E9L
+F/DhzBulu5eT+XGzA33kPi4PL51G/bx59jfnYD/+rE/0S1g43d+5gXwfBF+f
+3YP54mGdZ2HbhCzpa8RTow5fYEraRfE8ccx8mUOovyWXeTwBZsfJbRmhk3oW
+HSJ2DkuoCUEeEsemm8h8bl3uZTHka6ngP1FEzlO8sDqN5B3y7HsLnFqmXk5X
+xO/Z9tZd4//Nz8tLhwUu7ZYrSV6jJz7NUcJ9qDD89pJ+lvgxvGC61Z31BbBz
+t9mRq3AMr6p7BPZ2yv/UTsb9M4yNVqO+XXklQ7BRpelPcTBtw9yLxN25R7Of
+wsKkrCvP4UBHC0cpXdxLc3FOITkvWXWzKxzDbrI5CPdZyY8kwsKyvyWVyHyv
+zuu1cKoKb+oB6q32zAgWkPXdJgn74NtWrrnfYb7eWJAYTMm1/rNID+MXXVOK
+0H+m+7ropXqk/wXRm+HsF1azEjD1vOLqQpKXVcfRWaynXnX2PEOegpwtBkMw
+o2fKvQTmuYTOtpH6qjjnsmEZZmF9GSwQLJfOhzXaJtNTYG7kzsgHcERcdOFh
+Un9fRugUXLeyUcMJppnX1djgPEbbDhVDmJ1XtqQYFgZGhavCrJOCMEXUny8W
+8VKW7B/raHMZ7sjrSZEm9XkUm2ggD//+pnhFmLN+Hu8mrGPEMdcl+8/sFzdd
+zqY+Hyt8ZU/yOKPl1AzfPjjxPYDU1+cxx1oZfbxx7LpG+uH9GL0DG20QNyN5
+0n5yCpZTwe/NuznVqiSvVtvi3bCz9cYjB2CW7vChDFgYfMe7AhakLEi8BRc9
+rvL7Qcbzax9Uw5uMfi5VZyF/m5G/Csh4VJW4DcxVm7c1Gu5aZffAF2bVtL+w
+hNtlkyfi4RiD2Nwp1FNgfeJdDixk3MzJh3V0/D/dhCmrgTU28NvyF/d4MM2H
+SRtAf9c7shQfw+z48HkJMHXqmmwbOU/UoHUNnC+VNfqUzHez6HqPvA40SCo3
+w4x/LVWK4bSkRvt7MOe4rXg0/PbsG9tyMn/iC8uPPI92EfNzYT4jyMsf3h/4
+MjWVrFdg+ZyE0z3qp6LJfIvVmtWwu/w6Tw7pJ84jicL5JrvtGvbAzpWVF73g
+jqX6mu4knxfjQU/h9JKNO13I+bvKsjaiv2B3exUnOFVZ+h0f/rBYffi/8eRj
+j7yQV+yGa7TtZP9y5cRhOPHyrkKS54G0RyXGDHwfja+lHIer86PtwmGF+38f
+SSN5jMmGVcIxv9DvlcJGywe2DsCXdM7zSF6huqZblqiyKTs/q0ufSN6TOx10
+4DTrTge5Nfjdm78neQM87fz4yc9wkWJypzlsnh077Q2zzlUcMIEvKUU8iYeF
+D4tmmHDDr5H6BbDRqsf1ZH+5FqZlI8xf8NHsX5zfEpdl+Bo+3W3r0wCXdkXv
+H4e7C546pcOJT274ztXH+qCvbj5wgUr0rCTM037ytwHsftdMRxqm6y+1F4cH
+h/U1iJ23RVfVIx+DevfNi2GOhqXpCZi5XmObGCx8bn7bFbZeLz85ifOoZUr9
+RvCRt3+oDsG8H/YPDWH9m6+7e2DvXb2+duT59ju/5hHMvh8jCIYzAk5Z1MDc
+HZUutXBU2IzyDTimoj1kAerZP9hc/zvJo0ewwBQevUlJZpLxTUt0IuBQox93
+02F3pvWrP2GtLTWeGTBt7uxbUeQ1Vqpkl0PW924U2MPJnY5FxfCg1E9HzpF8
+Jcz23oVbFK4aPIczGJF67XB5eqjIEjU2pfaedWYE5uTZ95vDrhNurRLoP9Tu
+lNFhWMa3ma4HcxNseMnwL4YDoZthrftGJVxYpDX7TSjJ0+FrfhHMjFAzuULW
+d55ry4ftflgfa4Anzyg3XyD73y0M6yfj95y4EbDWA87OuWtxP57+HdthXbe1
+DspwqNrCdfpw7anDlw3gFuHqt6Jw5hu/NiuYX5XO6EQ/GurruC4we7eY2zXY
+WZUj4g6zQrkfQmDvph5lDzimSEfZCWbZlW7dCmuZ7qKvhm1ZdesdYEGa7A1p
+kqfI8UQzMl/TezPJl7nEQWctqUddfQUFZ9e6qqjDjHdDjfNhiYRFQVKweK7v
+NkWSt6+rlQicWv48wZh8H5ZLXR1Hv6dzt6T6wPRjq88NwLRIA71M2PK8xORr
+8vyZXmkm96Nb93N2L3n+Vmw/IIt+g+dHyL2Eu1VfvSH5uCdltgpgyqmvL5fc
+zwXTsWHYNiJ8bABOWbgocprkPaTUxMR7nO2ep7qkPmfJdvoB+PPaZed14MEK
+zlAOzJSeEbUn+dJ2xj+GJxmFlf6k3+tGqf/C6SE1t1NhXsB1jbl4j/u6eP5U
+JcnbsKNNEk6uM+K8JPnVCzMk4Bny/rj2/++PGuz/AQ7UGzs=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.684798798577102, 9.013741219420858}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwt1wk4lGsbB/C3UpbEILs0R3Yyk7R8LbxJxalsJUQaQguFEiqmkS2iMyFR
+YqIUCaeELDVKyqGTCi1UI3I6okYnS0W+//Odb67L5fq5n+d+7vue551r/OIT
+5Ow3laKoLvyQ3/++dOl/f2vTFHuZzLAd3GrvWaoPf40bupMBC9qdpRfBwfMd
+Rnvg4CduaUawwOC7KUsPznj1zzS4xX6ldBgscNIfaZiDPJcV/SpgR3ZC9D5Y
+69ZKn08w5+rXmGmw273FPC19mmL02jxJ0KIpKc54sRXxTaexSU2aKpeTd3KF
+6Yti+RC4+Chjyw6Y6fEtSqRBUzYZtQa+cHD5i+pN8JWoBaVbYdHbzbNb1bFu
+tMbWlqz/wdq/FdYNP1tuBnP8V80dVUNd497TGMQTAVmF8AZPEZfUx4tO2hMK
+i//m8ltIP/MlZd1hLSObgmIS1/LscIVtUvJUT8Gi7xYTQXCtu83MSBJ33paZ
+C9ue/eYVBAtzVG/1wFJr21MDSVzwKWkp6lkqs6MqlOz/eYqbBcdG/u5/nMS7
+30ROQT+GiRU3LsPivJdzA+B0ttvCpzBbU/NzK7whT3d8BupvXTDr/HzMh/Gf
+uN9tYLGBnXUkHJryPTUR5t/nplfBrUGVvz2DeSFRKm/h2vQ725gGmN/MNVaD
+cKRtQtpemGreldENt60fvlsFi6XiG2pg4dbM9EmYF6ZyhuRnR77ttjLEfL/t
+H9WDbZazHoXDgpGA9mrUJ9t2v+MSTEvsnGEFtxrGDj6EeUf3a1Si34hdbw+L
+YOE0tpEhnHnx4O4BmDH2JPMM5hXa9ENvEC4rKOqWgb8+Ony2B2YnDzkmqGKe
+txV0n5B87MBHCrBEQWlMJcyPTxWUqNCU6fXgPzJhcWz6Wm9YKv2wNamPn+q+
+zhS+4uzh4gKLPs/XUIBpP+mQRTDn0VZlBqymf2NAndQfw9ljCHddS/kkQawz
+YeYGsz8+2DSGeQiiz+7PhrVaS84Nw8wVFtuH4M0NHzsm4LL7a3ydUZ9NdeY5
+BbKfJ9pdDYfal/5kk/PdSqR10Z9aslaaBxwstaM5kfT7d8w+Pll/ZNS7D9ZN
+ilz4J6m/c8pfFmRe3A6mkhHmWnZKIQQeO7JSbxtxhpH/Gbg4eNtIIUzL1227
+BDsy4o1HYU78RDS5b77rSzZZG+PvfreiDpD7qFOokQgH3z7NJPnHxra6N5H4
+mzGX1zifLmkyn2KC/edPyO+Hk299M2DBIl9r3RH0Q4WWGDrDTLftevvg8nan
+3N0k7uJg8hbzcNvCDT9InJ+TbQ/7vurWDoNbNWKH6pVpynMyiBdI4kWXwyzh
+yB717+6wOPKJQtNsmrJ4x91Iw+xd6jP94fTJVcm/wJT4R5cabLhbRFHENYGz
+epWw/qCs8hvUL2zLUmiCVxgWL74NMyPOrXwIt3AKa/NgcXOjUARLXb/XkgLT
+t1pKGMi3K+f46miyf9BS2QWmn3FzuTA/KkmrCC6z2SuOJ/YfNZ+Jeg0NDzWf
+JfNTbbE6AAvv59pUw+xPbl1d8NfV7YO9sMhvL98a/TPin3aqk3nZpcrnwuXX
+PMtcSb8HPEIHyX07mVaYDTt2LQ03wjx71bJv9sECESfHAc589kfiQlPcf5ka
+321wm+X6Wh5MLVLd4gRbdOu+bSZ+HzrXBBZ5B51TnI/69lxM/Yj8A12xzc6w
+yED9fDo5/5lsWhLMGNxkbgSPLX16oAoWuj43vob6N8gc8eqExWlq6nqwSMf/
+9hcSF9urZGAeEn7GvJ8ws3x74nQ4Nnuf4iTM8fXrj8B86Q8M72GYdyI8blgR
+zz/d9sc7mDLhWPHg3hlSik2kPocOrzmwWNhuW0R8JM+zVQH3uUqh+jjcymqo
+PQfzzFIf+8O09PovPHhgo+noWlLPKm0H4kjVuAQT4i87qSxY1rLvkgo536xF
+tQmmEpebycCOXyUuzMJ5pr+syZGEBSFDd33gZPe/JBjk/I8F/ffgcr7zyDyY
+X3rhpwn6eXEzIW41mVfgyzOn4UDNY6v3kflYLrP8AZcvZtjkk/VFry+5kvvj
+rWfYTeYxfUv/JVh8aMF8fTPcI5/Q+93wB+oZHQwLgufdkST3KVxSrQ4W6ltt
+VobHUjpsZVjIJ1WhKA1LPXTzc4HL6qsK35H739Gvkg0La6wH80j+Ps+lXcRz
+2lrWw9WLx0ek2ahj4f2V5L6XnTB4zYSFZvoavrDZq9B15rBjQs5wJ/plyskN
+rIQpY1b/Bti8tbZ+NdnPVd5ei/nlDDlSNjC/w76FBV8sNdO2ggVR3lHFDHwe
+ujKbF8HMOLUtS2BB+KUPhjCPSltSKE9T/n8r89TJ+Q8ZJ+ThFyzJSimYs0FY
+VCCHzyOPgdjPqJ95MCYiRI58nidefwxTuY1pwbCj7tqN5TDH+LhzHtxgNHwo
+F6YXjD6binxjR0VKabBow0uTZDj9xJRMPszW2+2siXpetLrPziLrvTafiISX
+3tbVukbm6eRd0Atz3vvXt5D9nawV9ujvYbtO+uj/zm9quwGreeVsUkG9ZSUv
+dRmYj/WCgI2kX+rikK0XXDXxvN2VzNPLZjwL1hkN7okk89kV8vAOHJuU6JhP
+nGJn+ghu61T60ETymb+qFMKhr3UPfIYZi+K0zsJd51MaFRfgPv4TzN4KzwgY
+emwOCySN30+Fy7QbL9iTeN3bBWfI8yBbFeUHi5ezvmjAgXMmusJgTsJQdSp5
+fx78J+wYLHIVF0yDNw/cpI/DdClveR/mSdXXhRJzEqPNHs3C83reODEGFl5o
+rm2Upakvx1hmh8n5V4evds3E+1OTv2Yv2c/ti1GFG6R0Xm4jfuzB4srQ1Mk5
+AXIbyfqC6BJlWCcwRWMFiZuMvxFJ4/NWzcfClORPbvcgvsseideGeRcqwhSx
+nqcfoTsbZs6p+PUAzChe/n0WyWc88Nc4PPWLe6Ms2W/Xc/oyzndb4SOvAFOp
+k0Z7UG9SXbi2JonLquxbhn6Op2iPG5P9KVWps9Cv2bnOIJrEdZZceQFv/nh1
+qgepr0lW/RTuT0TlEgnSr6OvGV8F8wrbmZCaTfL3X9F0hi9u7M2vh/n9v1aH
+w9wbYYofyPx3vRqIhfuXzS2UM0e+9zFrImC36h9sC1gY8SrcCc40oI66wmXO
+LE8FOMliZnQ4zPFY3HIA52dM7bVLg0XX183JJvf92FnNIpIv771fPvqxXNgR
+VEP8ZN7TVPSbqVMx0WhOvm/qZYViHv37qLoWcp5JfdImzMuiIKqPmJYIz1iG
+efcaRg49gAWF0k4WUqiPf+bkbbL+Tznur5I0VVHzM/d3Es+9nBc3A8+P6W+s
+PJiK1S8YmI73I91ixylS3/OW2FjYsl4umEf2n6TUHOGup4PJwWR/xu4RBzi9
+rabXh8TjPPYeg+/eCUh0g5n27Wk98OJ/Jnc6k3z51mF7cZ7sz/mWTiT+Q9ld
+DfWk/qaU6kIc4CzfCT+1dS/eTuq5ttL7Kup/JTf9dBCZX2Adl4v+jHlzleLI
++as5EXbon5nPLs0l/Vc+uDUF81HRiagi/YrK1Xjn4bHnBRu6SX20zbrZmKeW
+9z3vGQvJ902O0XbYR6n5iSksaOgxOQQbr0rZuQlmXvQPJ3GdF+yBCJiTEhKu
+AJ/sa7HIJvHF4yI+8seWHmHVwqJSh9xu1ONzz+Xzc1hYOO+KNNz6+M+KT8S8
+d1UM6f//n2aB9ZN4SdL/BXHE1jc=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.51595498616782, 2.888880495006221}, \
+{1, 1}], LineBox[CompressedData["
+1:eJxTTMoPSmViYGCwBWIQDQEqDiEyIFrOgaGg63OSmYrDzO9z9v9uk3VgWLF5
+kku8ioPSsWuhi37JODBoaO52r1BxuLaBb/3LBCD/w0aDX/UqDvqbjmztPSDt
+wLBjCturUhWHfy805q1RAPI3eJmtiVJxUBZ+2RDbIeXAkPCA8Yq+ikNNZHC8
++z9JB4aK1Qtvf1d26H97fYldB5DPcX3a/63KDn84o2++0wLyG8QO8eUpO4jX
+1jVNfSnhwCAgx2KkouywPWWl0aWjQP6LFavW3VFyWLTIuKtvP5DfscJy+Wwl
+h/kz33T/vwLkB3ha3EtRcojcYaJ/gAlo3oH87jprJYcJ68uXMLsA+Qy/p7xR
+VHIQen0p6c4kIF/D6uwiSSWHdau+P5r8Asg30Hwkrazk8EG39iuvHdD9B/7P
+P22r5LDt2qvvhj1AfsAHbvUMJYfOV85Xg8+A/GdvuXu+kkPCzvcHp/0A8ndw
+tAc+VHKoWCL935kHGB4CG/TkNZUdXvAILhJgAfILGpP/Fik7+D+OC/O7B1Sv
+oXp02S5lBwab++4ss4H8iCnTv/1WdpDY/v7gO2uQ/Wck1IxVHCpY/NtTjwDd
+98IwgyVWxaF0ZnuMliWQ73HwsGq5ioOa/NH5SguA/r+QH8/eoOIw1QIUvxJw
++SfM1gl348Xh+qd0Viy+ekwMbv4kuY0Vs6zF4PYL7hKwEzwiCncf13OFHb9T
+ROHu32W/cOVGRVG4/xTF3se+/y0C9/+GM08Y9nwWgYfPykwBu0x2UXj4NVjs
+0VpjLAoP32AfUY5zxaLw8Ldwbub6dFAUHj/RFRyyOeJi8Pj7bq47VzlXDB6/
+lcUd0X92i8Hj/8KO0xfs/4rB00dWp3AJg7Y4PP1kNJwpLXQQh6ev4H1hZ3Wt
+xOHpT+hLY22WmDg8ffJJLlUTvCoGT79VphrRB8vF4Om79+SaBTsYxeDpny1O
+vH5RuSg8f/BYXU8Mvi8Czz+3Cqy9iuxF4Pkr+MDHALH5wvD8x7Fac1UsqzA8
+fxZoJzuwVAo5wPLvVjYQLeQAAACtaGA=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.354800000000001, 6.}, {1, 0}], 
+        LineBox[CompressedData["
+1:eJxTTMoPSmViYGAwBmIQDQEqDis4ITTDhdu3dtmrONz7tfe8025lBwYOlz9u
+2SoOf3P6puVlAvkvylXY6lUcDp5abPiQH8hf8TIwpFLF4c7e6gtztig5MDBU
+rVgVpeJwWHOR3IlYID8hIGGqqorD9Ss5KdqCQP6F+ZNq7yk7HEt+3Lj1sqID
+ww/VNO9uZQc9U+P/QiuBfI6qjBdGyg6rtsx6HT8ZyM9QbVtzR8nB9nYt++9J
+QP6EvTcP9is5bJyc/qF2GZD/wNKnJ0jJgf3JuY+3ToHUb1inqKXkoDhZ4e/c
+30B+xaxpdyWVHBY/iEr0Ngba/0L6u6SykoOR9oXkK9lAvsGGFCFXJYdPWkE8
+EvNB/NupX2qUHG50nC5JPQ7kW+iVSR9TcqiS8z3z5T7I/SEHiqWUHXbuCGPy
+fQrkT7gR87tI2WFrwoYVvVeB/AiFqPATyg4/OgWeT9sA5Guc1SkQVnE4oXFW
+m6cCFD4mnRx+Kg5ut1fEGOqD9O+QcSpWcZgx42PG0ltA9wbskGNtUHHwkgFG
+R4MiXP5tBd/0KFVFuH47s/DF5y4owM3f+8Loyud2Bbj9ve3vJTL9FeDuu7DB
+P7xISwHu/jMRK/9uklKA+4/78yZjbgUFuP/XdJh0z7JQgIfP5GdrPz9PUICH
+X/Az/TnaUxTg4fvIYOm8LWcU4OGfUnefKYkFET+1uoZ8qqaI+LtSO4O/KRIR
+v+5mTT9YchHxfzsmVWRBDiJ9hN85w/A2TBGefvavlanz0lGEp6+1NpNnX3mn
+AE9/B5/HPjRfpABPnyuCW/STvRXg6bejd8cc2wfy8PQt4Pn4kpKuPDz9++q2
+JFR1yjnA8scOfhAt5wAAXRMymg==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.354800000000001, 8.75}, {1, 0}], 
+        LineBox[{{6.4999999999976925`, 16.}, {13.49999999999251, 16.}}], 
+        PolygonBox[{{10.6, 16.}, {9.4, 15.6}, {9.4, 16.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 16.9452}, {0, -1}], 
+        LineBox[{{6.499999999996362, 16.000000000005457`}, {10., 
+         10.000000000003638`}}], 
+        PolygonBox[{{7.947677384685548, 13.51826734053906}, {
+         8.206811054955079, 12.280184249251306`}, {8.897834175673825, 
+         12.683281069670574`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 12.823799910437668}, \
+{1, 1}], LineBox[{{13.500000000007276`, 16.000000000005457`}, {
+         10.000000000003638`, 10.000000000001819`}}], 
+        PolygonBox[{{11.447677384685548`, 12.48173265946094}, {
+         11.706811054955079`, 13.719815750748694`}, {12.397834175673825`, 
+         13.316718930329426`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.484057296392571, 12.823799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 16.}], PointBox[{10., 4.5}], 
+         PointBox[{13.5, 16.}], PointBox[{10., 7.5}], PointBox[{10., 10.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T13", " ", "P2", " ", "N26"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdgei/giijfhfjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdgei/giijfhfjhj.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:eJwd1gs0VGsbB/BNqiFFSVFoCA0mDVHqqBlS6WoqNJxC5dZ9KjoKoYhKRe66
+jVBKZahVyGU4XYg0J5RqymCKk2QizhTx/d/PWq1Zv9n7fd7n+e93k+H2/Rv9
+lCmKGsI/8kkpRvGjz6FoBFM5VM2O32p74GLbig4TuOUyv+GjHofiaXRm7YA1
+Fc8stsKRTu22xbCdIPtE90xcF4ZdNtTmUOJ3C2LOwnbPFvZegnUW/Tl2Bay4
+f+2o6TQOxX+u1zqN3H/Y7XsJXKOq30rB1KKnqRunY7+qwtIxcIvlp6BuWJBr
+pGUA07UWJEXooN7Jtuh1pJ7hGEs1XfT5Qav6HBwY6NR9EvaJXfHwA1k/Q67W
+B9ck3Cu2Rb/yVxcTnGdwqPRPRg8SYYZylm8cHMIzOfQVDrR32y2Ei30XVXEw
+v8LELVEES4c3lZyCI8d61pfArAfr+6phKZWoeQUWrG4t7IJ9Ar8s5sM6tj+1
+FbBz3obv82HN/Q02vTBnk+XRHvRD36tu/YLU39gbn0X6l+x0vgALz97Vd4MZ
+rJnP2LD8nZXpRF3Sx+oxLejPLiF/XwPmF2+3WuoFFyuu8i7DLRZDka8xb2T0
+krvh5PqX/v3LSR5uTiEHYcFhpelkrhazDRJy3VmeWTgTFmUoj82CRSYF/LPY
+p4uprC0h9TJGOCRXxt9RJpb4lEfvTE4l33sv5abAwlOJrAUwbWHG40moE9jY
+r/IVz4n7l+RzKpwXsE6tlDy3WdwQM/TR5XifmQXnzdv2tIo8xxc8B2KfnoaP
+npiDm7KNVgLbLct82gvTLtYv/kzqPXMtDCXnsPpRtgmZS2vngl8wpaXldIjM
+IVE/HmCA7wslx57D6ZnlESI4wTxmrSn6TE/hDyvPQv5XHxyMgrmrhirmEm/z
+r3hN5qvLTeHAfMeEJYbkuY5yefaw8wODw1tgmoZuqxGct/tKWjQsZkl6Bsl+
+Qym5ZE6pJE67DOaNv52eANs1x8YfhjVNmcEHSL6DilFzWPhL7raIrN9T6/0R
+/Wv6LN79L3muxh03Usi5iQ/rOUHOQXVznhuZ16dURZ08jx3er4xggVFYbgzm
+446aKiuRc2ja6TuAfAKb63j95Fwc+LDcB053mTN9GE5/5RFVh/eKW7EsRg/3
+c2kH19rD4qsGMldS/+XxKw/xXtboNO/KIefYivbLAaa7e7qoot/AdycXt+K9
+5jE2v4uEWcx7Oy+Q9/6HW8x45CENKLq8FdYJ7zbMgFn0njYHuOnM1GgdOvYp
+CbJgw5xuMxM/uIUK93CFmV/EAwUw7YTMIYKsz2s4MwjLHTm1ZXDQ3I78BYbI
+Y5P3WFXye6Th/PZ9cGDS00BvWN1cpHsJVpg6DJTC6WF+typgfsWmQ9Mwn/Ns
+h53NMDfX/PYeOOcs11IKF7MjsovJ/JFx7q1wnE1fwwD8+FJ9ZSMs/u+QM52c
+x0GXSlJPwY//aQMzT9VOuQbThFnlVnBOEv1FBLmeUnVEG46fG8D2hAW3PzOk
+qDfV36h1PiylsyQXYF+r3+Ya5P7dagXz4D1a2ue/YV5WZ11BCfqPVpm6ugkW
+JtWU28D8lY6u1TDPwc0rF3nkWeauKiX5tKWe1oRdVQ145bCga3VIqBbOhxbX
+uh6Wxvd4d0/Bfvat4zuJ2SJHP1iq53ViIvanL7a51zOZQ9VvVm5YSuYvNLoW
+B+stHUw/YkjqjJ+/CA60lFqUwaJ2wwwlmE8f+UvFCH00jx9t10ReMmoeF46b
+fOfIB1jYnye5BLNiwsbL4T1TacpdMD0q5qIO1v8YsLOaNxu5Wi6zcYVb/uEx
++DAVR/2+AsuS077kwdIzfiE/YKcdzq/fwF2prkUuZJ6Hvx8MwbzKnsP5sL1b
+1ystY3jINV4Z89t9lfXNguP4JV9d4GLHVl86HJmvO3IOZqbzFdowp8njySNY
+2PJxQAnu0gye0gjrnZRqfEZ9QUdr9itYxfZv7mNigyR2CVyW9WTMVdJ/+U3R
+SS3yd0VwMQTm3/ilYw8zhLy0TTA9+dKK9+hPJI71tybrnWqWBMBiscv66TCH
+M6mmA/NR7cZcFZiWv8bTDQ4LPak1hLyKT7E6RMhvy/srjcOwwCss2QLW2Zey
+QQ33i15kbbTVwFyuzPrZMCt7Ac90EurvGvfbGZbPsw6fPxHzOt+feQTWrK+v
+91XH++Dv/7kI5l7OFokmoP+GjoIfsPBZnWINvFbV/KA98pAbHqCpwny7Tlks
+rPnsDw+FGqnflNoEJ2SVmurgep77axrdBPc1jr3gC28ZflAbAEsTK+rfwHFW
+Tok3yXWzcx67sP9jea5HByz86e6thf6SbRuDtUzRT+zRCbWwYiUzxw4WH5CP
+RGIedds9ehthAedgFUuDnB/3dG84UlZm2wA7WTx230ac8k2FQfJqkenw4HQf
+V43NsHFou+5yUv9tv5wPC47YKJmTesbZaw7Ba4OXiWlwnPmhp1tgTSPTetKf
+IixHby4cFLXPtxymNi53eI798qhZOulkvge1fhPh+BP9HodhlszK0wz9tiis
+gj1hzZej0SaYh+/OClpB1r+7f0cN8/uOyVe1J3lEe15sR557UjvDiaXf+m88
+VMX5KggWOJN68vh1yTT8PySEWekDC161Fx4fjzz0aq9Fw5zyItv4cfh+eFPi
+PXK9PlG9ZCzO8Qxr96+waGNTmwacPvGUy1zMx5eFnEtR4VDDuT6RQSRf2fqO
+tXBgdvH1SpjuVXBqAfxDdslVfQ7OxcjsYS7MWGM4gQeL29alpcNOvrruApiu
+z60ej/qRA5s722HOsWFmGvy1dqVQnwFP0zBciv64N6sU62Eq6Ht7H5xHNzoY
+DAsmv9LPxzzy8LrlCbBI2dt9C+Z1/uOQwVWYft7Me5j4baPFNVh6+HptFPKJ
+35xJz4Q1s2XrZbCN33XzOFi+nW+hjzxDVvV/2gv7/Buwaw45r0Wlq9fB4oBI
+PQruOpGWxiD93coIuY71xlMv2imT+0cOy2bCNQ47b0swjzzL/tMO7H87Pyaw
+FBZkblWcQL/R4WMrLsORk/PdT2Ae2UhTZRzM6mDk7ML8ZffuWoSTvM7SE5Yh
+L7HmY/cwOOFG5k6dMcj37TeDWHLdvOt2vxLOa5dGG6lHrbI+30oh79RxwSJY
+WvjHjLpRNsV6uXfeN1h09L2y3gib4iZO+NeE5OOyL6FymE0ZswUT/Mk8/l6f
+KofYFOPP2OzbJE+9av3Z8HCuX/B/JP+F4RO6f7Ep9bP905zM0P9bVSNtXKe5
+iFUTYGlP7YVMeGrR/DctsM/n3HQ+6lMXV1vomaP+3YLeuN9squzWpN7NsMg7
+7dAr9OOqctT7NLESrVcP/X/9R9uwCBZq89c3wzn5ai4NML3X7H0s5r3fOyHm
+IyxfoOVhrow8rYUd7f9f77f0HhwoGqchIZ6aoT8DecnHHJ1TZ05+3/xU5sE2
+devKC2Gf5BdVAbCeiVNlIhyZVDt3BRy02sxvL9m/zHlpH+oFHbWZvpLsn/RU
+dy8slq7fZEj2b5yhWop+mL8DE0cwL+eGyqaP6DcwfTKjDRakWo+pRv7cy8es
+62A6i81IwfzDjowjFTA1FOywCnkpYn5tLYNFvYrGPgWbqmH+rH9C1pv3vL0+
+iHyWKFm/J/d7nX575AebkvfqBg2TfI8wlSL68Dy8Tw0ySH/H12x8JmdTa9Wz
+rnqTeeqsaqu+san4h4OyKySPO90Xbn9FPzlREhnxHIO5W7rZVI7Sxw3zLFCf
+tn9R8xc2JVR6/jEUjjT0uqSF6zbb6sfWEEd03lLDeuc5knWTmVi/cunD3B42
+Fe3xeqsbzGk/PljTy6a25CdMuwD7dJR5mn1nU3GPAm49gaWcvQHn0K/o+LLC
+bzCdE2o22o88fs63U5+LemrmN/wH2NQeuaJOH6ZPql4nxPzcA9Sx2bBP1Uhz
+zX/IKyqng1wXvZw+4yry4v0t1JhEnGjQZPyTTQna/jo5QPafzLd3gWt+DzNf
+k/1XeUVNJ67tnl9E/KRtSijWx511Hj1D7rdXrwxF/celnyb4k/mqqCuzsL9m
+xJNGR3K/r0sDH/lLXmcUGcPUpGsq4ZjHlZ9cNxEW/Ezrd0X+jzk3v48iL5Fl
+g/F05FV8ZU3SMMnPMS15VyebCmLE3lIheY3Uz2lox/u2w6RIh9QrDln0WoL3
+8RNPYAdHuvF3ipuQT5hZ5w5yPbRwmqAOz7/60tEM4kcdnfoivG8F7pI3xGWz
+ftTcwfPsYzFJPhRX4zTvLPZL1VwSQCwYtV8YVEnlWU+5c4+Y/CSUUyrk05Lz
+P4Clt9A=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.703763748652328, 13.714402573074395}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJw11nk81PkfB/BvIkdiqgmFbZyxkpFopjBTUiJHl2NTDZUjRKWaQsYqx65q
+ioqu36DVqN0MHWSpKdqMFULOkmxb5IhEztrX54/fPB58H0+f7/d9fb/f8dHz
+D9+0R46iqJf4IUeKRn79wKWUyNGUS6X7hY5/0uVSoZEV2gUmXKrDtT3xKbwm
+kD0vABa8VqbHEcvSJD/AXbp2qwxhQW/VsfZFXIrX1dqQr8OlrkhVb92Ak8Y5
+F8zh685cpWg4aOk1vSvaXIr1vKXeFxa+7JbIweLkF8XOcIVPyOuABVzKNib1
+uSNZH3rjWz0f8TNWxrrCzVPrSu3h35NMf+fBlOysfqkWl5JnX70RA2tVspTd
+4AbnB+5ZsODOPdqwJuIrThpXwfxA+9q7MM/92/5RmJnYUngapo3SvQ3Rj5K5
+zfefYbrMTcEVZrLp2ULY0JRdFQ4Xfdi2/x58Ylez4y+wcNcWg344QsVz3yWY
+VyA9YYP8th7qpddgfiItJxlOCn9ncwHW2u6m2Qkzn/YfFZD1ipmmK9BPb+/s
+J9thlrMjMwXevc3y/RLYQ29uZR28LNvMbRj1sgq/aSuT+Tye01lA5js1McsM
+FhwKHgqGRZUbo6zhUM1Derqwh6+JtzFczuhn1xhjXsWTsknEGzA8qRkPj3o0
+WD6AvSf+jl0J8y7eX7Qdvrt1gdyEEfoTZwX2oN4Bv7HmMtgj+Z0kEJYonqi5
+CIseeWQ0on+lBeNmfJh7McbTDu69myDaA1Mzk2MzNbhU9OtPq3kww3BzpZIG
+me+5XwPh9ALnZ/x5+HtL0bZjMH/axLUROu7foTEVEl/wz8GGBLgrUynqT2KL
+EHVzeNRLwfJfkt/90kDPXC5Voj3/4GzUL7bmfS6Hk/JmBNvBThm6XkWweFTf
+PoD0d0nX+CnctV3fIRlOirFY3g2rGi5Suw5XKAVu0EN8Vc65i3eJ/WtZwbCg
+xX7TA5j1fv2cElh0StE+H67dahlKR/2+B4qGLsPN4SbpoXCo4E3uUTjiW0/3
+Q7ihddVSF+L4uRMK6J+3hD5A6uWGCXts4YY/9j6rIfO2+Xh5J8zUyJmRCNOC
+Ytv3wlqDH51XwFqxx6/6wjpne3i9hqjjaO2QFUy5HDUQwRGNlcsHkU9LL9TH
+G5Z0m3w9D5eY8NM04fS46HeGsNNU9JwOAxyrhu5nop81+g+z7sDNHcNTNLgk
+YY0wFTaRiT8ewXwiC0POCeAI/97Zr+bgOYjZXH4MDuLnmTrAQTZXsuNg6cM/
+ywtmI+5QtEYaLNyyiMaEGfs/8iXk+pMJ5x/RuNS7FEtJA8wPfiS/B2beXrDm
+G0wTKygZwEGpwdE/ot7aRA2nEXU8jz3ecZ6kvyVlLm1w1c1TMbFwR2G5/RBs
+eL33URbstMvlsw6uX5bysK0Upu1OCt4CmzRkPa2Gk9bGvLkML5452lMPezsl
+hffDkTcurK+CmcfDJGtRb3Pbt/2FMOvp5y/X4A6boAvnYbFe7plBuEF0OD4Q
+NvEp1mCj/6qxvItLSHyVs9cj4IbvBnd6yTzKPOekwUWuynrXDcj3YYqpCJYP
++ynai8y7OrzyHKwjeSBUhkWhXgohsK+ROrtUH/07dhmZwlJ2uN0hYsOUvGrk
+1/F7a7kMHv1hh8sO+ERFqtekHvk+8xO3oR8pqzeuBuYpC9xdSL/sIioPpgKK
+W3djXkznOOFlWLBJzdRcDednSjeeJ35RPTyuivc1Y9szss58rRvSMhNzaDr2
+6g+4o1+rt04F7zv78KAMFma8SB9QxnVvV3zqg2mnfnrLhjd4OfA09cnzMLn4
+rhLiGX095QCLfinM8IfXvJ+TGQ5Lbqk2OcL8M+fL0mGhVb2uL/yl/urqErIu
+OuCYqUTe9+zbTTBPkjSshviGVr+OdsGMJ7mDV2Ctl7a/9MOCwLtRq1AfX/ec
+zweSb69BxSAcUSv9UgdT2Z+PZ6Gfct/cxHxy/jG6gxP6Lcn4uyUejtBZtKIZ
+Di0fW+MCc7Ppp51m4f4lsX5TJr50tlMIi11SVj8m8zo6VXQTFoSU3Isk824a
+Lz0LnwjYKDOGI7QXTjnAWyY43q0MnKfrPvoY8ZNsa8zOwbR2SaYa8YBHqwcs
+iTrGskB9oj62WIucP99BxYz0U6zZ2rgQ54eUac9Ev+mp4vE0WMSZX9qiiPtk
+KbQOgyM2XFDLmoF6FQ427iTrstaocAWSL7cvBK6lIqxc5THn4X3bzsAdWtxM
+x+k45jh2/wUzY4w++8nh/oWbsRSRX2i4Myd3Gt7HqwknmbBIKM/Sh3u5shu+
+sNT/t5ZqCvenbWVFEtxRv9BDAr/yXUUrgCPyIrvL4cnnK/9+Sa6vUTirhOuj
+3VoTBsn54a7UIXhxnRtzOnk+t8qU5ZA/aJm6uTJ5/jZeGf8NVt0xHiZHnr8C
+HzVP1EtfPBXVj+t5685/moF+PFxEMc9Jvio25w94Q6mttYjM19ZTxx79N2/t
+/RoIU1aqOXmwmJF11Zhcb3xm/xhxokdjCfr3mFnQT8f8mq/O7TeApfob709h
+nbHca14S9kmMf/se5sOshSpyZJ8kOKJ4yBIesFJdvwPmzVS9H4v8ouPx2m3Y
+99C2L7ydiXq9NZqU9sLSKPdL19CP2NS6Qg0WNiw4EIv+RQkWqlXYB4n+3Bjt
+hnkNCOL8s7VJfLHY/BuHotIFeueJ3Wsqn01wKIls3m4RzDt3szxujEMppYbT
+y2DGqR2xEV85lCi6V34c5v44GJYzzKGap9E1VpH8U9Pzl37hUBHCpsBUHfL/
+x9afMcShmDerU3tgRmqZ+uHPHKpi/v0+B/RDWSvvs4b5Vy2eXYClivsctsFO
+X9PvtBO/+ev0G7L+c22FBubTMbvv/T3E69rT2bICplZ2qVUjX21Ap3gdWY+v
+LKSPcKigyv/NWknWDZYHRpJ6JXvU6TBv1csjjaMcSlqbNlBH8g8WLzIc51BJ
+OilmR8m8Ny0Tr0P/td/k/ZRhBoutbz7JocSu91iJqF9QGJxdBg+0/W79lcyH
+Htc1BdOGDwt2kPn6VE7UwUrBP+c+wb6IYlqI7OEgbl6AKSx98iZ+FeJLD2u7
+p5N95+Ay1lvMt8hrezod5m02/7QI9XUErW/Owj5IYCSaZoh+tPLMqtfCopZG
+hw/o33vtdJvpMDVxmpkwyKFGs5tutGBfJEi+3WXej/lb3z5RCXPFQTJeN4cS
+ysl/biDr/fXtL96hvvXT3o3A1HNH3VsduN/tvdbmJF5aA9ugFfnvFdccJPkD
+npSua8A8ln9pfErW77udeFuDfFn5Xbqol2K8W3ugEvH5n3wOE4+ZlXhUYD6u
+nCgZcVjM3t0yxL9y69VsMg+9D8n7nqN+reunnYnftPJn1GF+z3p8w4nfGnvu
+bORQ3HoZFUP8nTcV2Yb8fGOn/TBXRbuDj3pF6Y8tXMi+NJEjtPsHz9MG508q
+ZH1ziHzbv8hv/WwkH/m5EYsTjLrQ7/J9r1eTeR8JtBvGPILkilY/Rj/cvWtV
+TXpQnyoj2xKWLq4wzoY9ctL0MzAfaeCHTVvgoh813KewDxIs2fVk6UfU89yv
+fRfM9ZyI4iC+UEEaXId9j3TEyv0k8os0jczcYO4Ky81anRyK1/nkYRv2PVRz
+QJ/pKw4l0B/pOU6sVe9tV8+hGAV6/BXEfZ2zjpYh37VUBbJP+v9n4Ds+c7n/
+AZXP1VY=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.2230354724127457, 6.228068696807429}, \
+{-1, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.999999999998018`, 17.}, {16.99999999999754, 17.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.5, 17.6952}, {0, -1}], 
+        LineBox[CompressedData["
+1:eJxTTMoPSmViYGCwBWIQ7fP3PxAYODCAgYrD9j0SAo5yhg4MBV2fk8xUHBLS
+urLCHYH8FZsnucSrOPDG2kw5mg7ka2judq8Aqr/TN+lOP5D/YaPBr3oVB/uj
+pTeubAfyd0xhe1Wq4lB15Oj8F3eB/A1eZmuiVBxW2Ghr5DEYOTAkPGC8oq/i
+cFDoVNgHWSC/YvXC29+VHeQsVnq6mAL5HNen/d+q7HA/L2H+LFcgv0HsEF+e
+soPohtDibj8gX0COxUhF2aFGtThWJgDIf7Fi1bo7Sg4/77LIHvAC8jtWWC6f
+reSge9voi789kB/gaXEvRcnBUemR2H89IP9AfnedtZLDLhfv5x7SQD7D7ylv
+FJUcpss5sd9mBfI1rM4uklRyWHloQVPNB6D7DTQfSSsrOUTGsjZ9vgPkH/g/
+/7StksN+zvVcr88A+QEfuNUzlBzUBVv8bx0E8hPsLXfPV3JgV7VkeL8HFB4c
+7YEPlRzOnq++/nsfkC+wQU9eU9khPyAjK+cEKLwbk/8WKTvM1eZ4Z3cTFL6q
+R5ftUnaYLdbiz/IRyI+YMv3bb2UHVQ+dec/4QO4/I6FmrOLAIncvY6shyP+G
+GSyxKg5bt/NFfA8H8j0OHlYtV3GQ+w2M3nog/0J+PHuDikOb3cflHCsQ8hY3
+FKd7nUPo/7npcqLkR4T5zU+qN/zmM4bb33D+u+BBNWO4+9atmj51srkx3P2B
+2i0aLI7GcP+JXzv2X8DZGO7/7y+rN6jaGcPDJ/5jwFcRY2N4+B2Z+6uWR9kY
+Hr6lFvG1zfzG8PBvu7P3h8ovRPwkb9sisf0JIv7u3pB9yXAREb8f5c9ybziA
+iH8V2d+P7Lci0sfCqz2LHq9HpB8O71U9JRsR6cuuZ35C6i5E+vt/KGzb7lOI
+9BnzwnQl/yNE+i3bd+X6xP+I9L3YzCpBXMkYnv7vmXapa3sYw/NHmlxhrnKB
+MTz/CMw7nG01wxiev/ZOKZ26Yp8xPP+l2z1/v++hMTx/XgLnX2N4/gUAffB9
+2A==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.5, 8.354800000000001}, {0, 1}], 
+        LineBox[CompressedData["
+1:eJwd1wk0lWsXB/A3c0kp0k1XppQxKQ0y9HI1oAFJhohriAwRN6XSQYpQSolS
+HSRz6SrciIMGoiIUF92jgQaVipNIvv/+WqvV+q3nefez9/857yHlP3fbegkx
+DPMLf+lf5tcE/iiwzP//yLKMq4vq9eh5LMNNOHbHEi4fSH81U5FlrDPFlnPg
+hKf3E/Ngfvr11ouw94pjV5WV8Ly5h3AmXK1R9iQAZj/fXZMARwxpTC6D+WWX
+9V1g98FAgzE4acmfB+XgBY9KDq1UZpnFe7433JZhmfxwA5MAOMmztmgjfNLg
+/OpUmL9PENo6k2We+KgVl8NKk7+MWsNbTXiLH8NsYWJo4wyWKbP70NEBM43F
+K9bDFRU1yzrh4nr/yCZplrF68POPZlhaZpmxC3zihbFXNe0vk7o8Pp1lJKtm
+2uRSfdPkJl94w3N7oURaN3ieIQKb1FZk7IbduG11LdNY5kyQe6At9cdRKX0K
+r715IHsF7e+OeyiG/ZzuqbuUqb8BL3U/+MaqyqIZVP9VxIdRuM+9bu4UOGh/
+bOE29POv6zOxqTR/mpssD44bfuj0G+Uj0P+sh3ne/HX+tC6tp+z7LRc2z9cs
+saHzjvQbKSAPu+tyVhE0n8Ea2QRYxjM87CbtN7ly/jOs3pzw8SudX9mw9g/k
+++t6hsRKFdQfdzWMhhUPj3ZFkvW6ggphQV/2usdw0jnXZ5VwhFb89LmqcJy8
+Twn8OCrnmxfM19+yKgn209tbXwgrnYveZwd3+4Sf+AhLyxU5CMHTbD8cWzAf
+9xG2Xfgi+nEaSbGyh5tjfILV4bJ5um0HYI7iCzYP83VMdYpPgbkLP0bNh/8O
+nW59FR5MGD5yGfn0XvsZVkD1AiXOKcLL43sbad3tRtqVLcj3U5TU4TSYbxtc
+F4P7SfjgqBIDs1nvLvVIoc7lRcl+dN5Tlb/d4SwPi/5N9Pz2+lQ52MpE1V6P
+zlf+vefXVJbZU/NWaRbMdPh3y2P9ROTk8J+Yj9VVqfOBMwN2BryDmbg47ms4
+pG/hwx7yvwmnYnG+5FO56V2Uj0gMsxH9vZ4f5PSSrHD7gCz6N02vdhmivMpT
+2Dg43tDJfgb1M5x9fAI2d62bYgAHWeiL7kEeOp/mPNoFS3t3HemC7RtCorIp
+n+hTq1cgz9D3z6/1w0kH05hI2Kt8a4yuGt5nYyX7W3C4RvxYOMzNSi1tgTUl
+7v/3AE5yYNPb4H6T5kGZBchHNOvsHXi0y1OwHV58zccyEV7yh3knF+ZJGYau
+gRtmv/ynB06Sn970Fv3kXSoVmbkQ99N6cSAcniS1LdoIdmvdoMXAMywu+G6H
+k3oW+R7CfAVpZq7BMJOlX/kZ+RSU/xNxgDy0gPeO8svrdCHzm/i235DvGfOi
+cdrPcdrC0n3leUXedYPZRYdMnXFfrSdLAyxof27HxQZJlln1ZkSgA3PXBnd7
+w8Nz849Lkz8Iji2HFfx3+nxD/+wuB4lVsN2jvKYOmt88JjkIVo+I7aiF3Z6N
+LXsOL7G9El5C3vDgqw/Om16+zKmQ9r88/WMe+lm+ReneNVrPjB0chHvcH2dU
+wAzbtakd8+RtDPBqhZUEandrMG+a//A0ASw9pNS2FXmU/b50oSrlZbdrxV36
+PCxquecIWwd0Tl2I/ExtF11IhQe1Lj/dT99/y5N/9dD8mrK3ymF2ry6jro77
+8TUo58NVjvIRoXCzi1zHZzgjI8SwBrYWPjvvDRxhnzciqYH7qP9UxIOfKXbF
+28LsfIPqaPiOje3IadgtS/nsYtiva/qRRpgb7OvxEP1tmHX04Si8+ICmNvWv
+uqykUVET886vUi/AfO7pIwIDmB8j7pGB+TOTDPQsYKVTH66cQz7VphPtG2FW
+rT4+FXmyM1NK1sOcOUdNryFvv8xNQoaa9D56T3s5hWXG7ptuW0D1E1yGDOFI
+7YXJU8lH1zjUTmaZFd0jjz6jH05WXOV+eKMnyz6F+SXmSZ5weaqwVin1n9gj
+Gw1/KtlafZHmLTV1boVLAs6KxdP6WJeDDeo/sXRsOkzrAg+Z73CX0Y/jhyiP
+NwW9leivySfWOYbqP7lWlYb+lRsG3p2j5785FURjPr//zgbcovX8IfkgzC9+
+QzmnB+a9CveyQz457ye/mo7+rXefV5BBfuWRRpOsYOkpZlMC4Y+NGyMTKZ/r
+l5pKYWtZ3ul2Wp9zZvwdnG5VrK6shfdttE9RFPczfmimdCDMrjaqEIMlmxLE
+b8PcF1P8P2F/sODjcyFtfH5MWvsr4cDeZf5rYZ534HAIbDFH620UzETVO8qR
+lWMrS2H+s+shm9HvtLg3ZXxa363T54B52tbmyTA6qG+9rcMW85Yo7T4oCys5
+xFavQx47NE/Omkduq15nRu+Tb3qYAswvfvffBuR52GogTwZ286taH4z8M/YF
+zBaiekqiWuUSLFOzft3h93R++41/1OGIlre9j2E3m06PenGW0Riy87tB1q9P
+Ow9X5aY4n4HZ0xU5XFjt/PZP+2HOwOOcTvjs6rtmntr0+0R5vBnquSY7mW+l
++df2Gz+Do3ZbpWyiepeyOxLRT4toRqQN1WO7Bt3Qr3jzln5Xmv+c3Zc1mIer
+WLs8jNav5kYtwby27QKf8zD3jNPYXOSRWP2Vqafzava2foeDe4alJ+j5qnty
+lchv8ORJcxOaN7WqeQfyHX8r8Tma8vgrO6AL3jKRoPAYbnbffpR+XrB/WRbK
+L8L7lj+yQwWeN57rshOWvmPtTPc182fK1xswL3u+TS+eN9jTbzYCu/Ebfvei
+79czZXYrdennlVo5nV8l+SI4iPxcwP2E/uKUD6y6DLt9530Ugi0C+CV15BYZ
+gRDmk962aEsPeanRxxHkcXy/vvAAzD90NeQz8ur12ao2SOuJWapfkGfvCc/E
+97QeHDxPAg6yLNjXTXb2vmSM+6gWDeM8gJUsX59OE8NclrWxRTB728ZSBU74
+drMgCeacrtDpFmWZWTWdKiEwlxE91QAfWcnobqPn7QrS3sM1s5onTGgeI11j
+YzzPvSeXrk39XNffdgfOP/qkUZnOf+P7zBPnf5RvE1Gi80Y3/dJCfy2G4s7q
+dF7irIrJmGforyuhhnRemqTIEHzBVD/akZ6/772eT98/Y0GmUXT+97beOnwe
+Il8tFdyk9fbvx84gr6G7lgcpD0a2v3q9FMsxaA/KmbMY91M7YdaBfDtVx5uM
+yaHZDkbTWE76NsUcD5hruFAR3xccscWFc4/D/PAbPPr+0MgamFwMM6NSp42x
+ziR32rfR/oOv56Aep+/1nB/DMGukw5ijfm8tKyKrh/5+xvYdRT9x31r+1oHZ
+JTpauZIspy3xcqAZzNcYSy3GPLVrFjy3gblmahL5k1nODPese860v9v/2yUJ
+luOhWL7JDeZ9ixDD+8bZOhJbs4PMX52fLcZy9v/55xUnev72QHIj7qPxpvh1
+qscTdDrLwjsm3tWugd2kzJWOibCcXNcLvStgzpDqSg0R/P7o2KesQf2mWf0Y
+F2Y50rETWfLU31HjM2LY3+luEyNF6wfWiZthf9Uu7zYhmLnqp1GE9Z6ToTFj
+lEdYZpMZzhN/KOozQvl+mCQYE2U510QXzRuFlYR3aTSj3+akolmTqJ/DUfdu
+4fNwKNoymurzfsz3z8TnQT4n2U2R6qc82BOPPErXqvkvp/lOqdl7Iy+uZoC2
+LT0fu1pbA/evOvhkKJieH30xvRH56v02MnCG+m2cFmk+leVkZU/MuU31JoJL
+T8LFP6R9+bRfWaw7F/czkSVZIbYE+/VzjU5g/Ur9tUEtmH8izY6Fv0jcE2yC
+mQeGTTWof/zeo5ZA2O2hkfNseOnc7NzjMEfb/+w69Df7femjDKon5JXlhP59
+ZBzvl9B62Mz3jrjPVXrjm3lUf9mTK5sx/95jkzwe0P7GoL1r8b703xVa2gCz
+0V+H1yNPFYsC7fu03zHT0B15x/fM/lIF814WhqTivhJ/CW++ST6ZHy4Qwu9r
+neKrcuj5uZ6xkfAlkXW8VJib7TtgDNc0TPyKo/7f2P+nI8Ry2n/ulTtIvl21
+ywa20a1TCCJL1vlcxf4FwWNyO8k7XS6oC6POWYvX7lTfZPu/LbCKg70JmX9U
+xf48+rNQDSv0onny7Af2of8A868Ru8nTPhz3wP2/qTvXGEH9MJsvYn5OcV+r
+fzLVX6l+eAnuv+3UGuEiWlf/5/MkvP9yxx78eEjzJUtH3oQdXvLiB2i/04Zf
+pshbk7PvkfRS5Ktw/m4WPGn2jNLlMO+TrmQ7XFFZo+lCnrF4dits/VvLlGgy
+19zxIvxKr8UwB+Y23QhZBitJnbtVT+td6eqXcX8Zc/0T+6i+83o9PvqbRP+P
+18c++leC/R8W37Y1
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.994885276715344, 4.925732979470893}, \
+{0, -1}], LineBox[CompressedData["
+1:eJxFlglUU9cWhgMij4AoS6bk5t4DqSKlokSDrDIIWwFBHoUUQStjRBDahwxP
+K4iCgNWWwcoghVgGtXVoFYkiiAhCUygoolTFIaAGEQGLNCo+UFTeues9T+5a
+WVnfusM+Z5+9/38LIxMCorU5HE4J/rH//7sQpExM4+tj4EjyxfOiEfw5l6s3
+rcCcMWBcW4Pg9YlCiSwNsyqw4d4QAvOjUT/xlmK2bN6nNY0g+C0UGw9YAydx
+KJk7iWB7s+ukbxFmyd6lq28icO2dLyzwxJzxfOL7QgSbOrVqC98uAE7+z116
+jgjKFy1p6GjA3J28l+5kgHNdp9Q/C7O6a4vIj4G0w+Lca4GYD/2aFtNBw6JB
+dV+kGLPcYHIN0PBbzo3+AoQ5w45ztFEAHfUOiSvNMFvqJ91wF4B/5xWLS3zM
+0pP7O3spMLB9sqLBGrNKvflUNgW6p2OEsa4s+1WlfU4B1zO2KTeEfV7doeVA
+QdtNpapkJ2ZOQFThpxTcOcZ1uFbBrk8cMGc9BVub3is2NLPr59moiilomrjM
+HOxl46d8rjdKwSrp/opXasyicwW+6wRQ4vOy3/sdyzTE3hDAhmI9I+V7dn+y
+dP91NPyxbDB/2zjLNW47HtJAyy4zWffZ+PHrnaMYSFmrk/T+Ars+xwr9hwxQ
+3uvFuTmYjTKVqtUIQj3BOlzCxv+lOr0SgZWd6qXYkP2eV2F1L4Im4U9+Tr9b
+4Xz5VKVPIbg02F08vhVzd7ZR6DsE7Veu29NWmA/1rBX1IxCYPIhIvz0fx1t2
+NewEAlCdvH03F7OlamZ1EIL03oIvz3thlmu1i58x0Hso7eWaWZhbmFHDrQy4
+pR4LSe2dh+PdeyhS0+AwZD+dVIdZtKLNLJaGkBWXKp6VY7Yc00l4JADPpmCZ
+diH7fNLyK9ECGAs0GLBm+ZBevdckBcWP+xUu7PPSoATvSgqilh+YUXIGMxxM
+WBhBQe/RygHzLszqzx6ZOVMQqJ/XtOoZZtWe5G57Ck60LeEnzsHr45Sg474U
+vB85U9kuwqy6bJWQSUEYt9Er1w+z6Pbz/G4KeMlJnAWbMEs8Dtg4CEAdcMBa
+8jW7X//jzlUC0DN2FtumsvmI447Z0bDSsmdB+BbMYBHVc56GvbN2nKKlbD5M
+H3m4MlCxWDzlBJjVSuZIIwOSwSWGC03Y9wds6m0RuHsc4072sfs5Vz4zG4HH
+3d+sHcswJ0bd0OpCsG9qc/W7Nez9DUNBr/B5bR+eW6OLuUVHocuxgOl67Rjd
+8x/hfG2Z2DeKoDVC3KCIwSwXx6guIoiRO7+oEmCWhIsjExHYnvz9aXSPEMe/
+V9VhiKAwzzzPrQRzvlHtX6UMZP4ckGKzUcjWa+d35gw0pw03FzlhNqoefLOf
+BheHmdfDEOaMN1lP9Wg4LK7f1jmbfb5e/fo7AVC+Pj9mGrDfX/woyUwAbb6P
+5TnGmKUjm1/UUTCrKKMr0gqzShJom0DB5ZDR8/pumCVP/nFsJQUWF8dnCMPZ
+eDah+8UUOL3CcrVLc3+tncHbB4c175/63tj7VYvm+7Hrdi0tV2riy8sF/l+P
+atYXUlEblT6uWf+tOq9s++ea/TmeeyM60q/Zf12cOcS1afIz7ln17e0yTf4G
+woa3tMQKSX5Xu7mYHvxESPI/26nVMOCxJTkfec5Vz+WlluT8ti15V/ra25Kc
+b2j/YqXshQU5/+778w7rfGFB6kM6f6d8Xzsi9bPRt2Z0zipE6stHv2zwlzsM
+qb/TyTJuzi6G1GffRe7xP9wYUr/RB4LOuvMZUt/K09my4wYMqX99uzvyCFOG
+9EfDE3q6RsyQ/rFTfJs4EsmQ/hrjlLUkVjCk/2Sry7os+hnSnytbhr75txUi
+/bssu+XTbuxDH/pbGHxn8s8yRPq/xcAldW8bIvowe+GIo7wXEf2QBvt0vWH5
+//piH7BbMb8VEf1J1/1Biy5CRJ/iVGe9DbBuftAv+yId/hdDDNG3UabPtiCR
+IfoXa3IiwG+YJvp49pQ7zFhDE/0MdZP+0F4rIPoazw2/ZYbr7oP+xhdciMzd
+ThF9rtzmxisd5BP9FvnsOuMewSf6XufxmWzkKY/o/5T1BDMjj0f84cyRuNYp
+Dx7xj/Avlz2Ya84j/vLxr2MP/6nNI/7T6MZ3iZ/JI/4UZtKvMEE84l+Jg/9q
+7fTmEX/TDtZOdcnkEf8L6Rkt2qjgEX+ULvJx7dblE/+862O3Z9ibT/z1QYqo
+yW43n/jvrZ3inblyPvHnr/K+atl9lU/8e/3GQosdN/nE3zc1B7v0KfjE//P1
+0SonGZ/MB+qC0pHItXwyP+jv+c916RSPzBfy7eW58Tk8Mn8wrm+Llbo8Mp/E
+o7qm+1vNyfwyGZQ1Z9M9MzLfrPskveeuoxmZfxpzHC5c+9GUzEcTWcrwLh1T
+Mj95Vz/7WyvVBD7MV5OD7HxlDP8FAmqi9g==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.4452, 8.75}, {-1, 0}], 
+        LineBox[CompressedData["
+1:eJwt1A1MU1cYBuCb6lxjO6tSsKKgUBjUggWalI6wcVEUbTKsyBiKUiIKjSgW
+A6HiLG0E7cAfhuAqq1BAYZMfgaqFQRCmzFIrOMewDFa0Okb8WyfbQFHZe81u
+cnPyJPd85zvvzTleO/fH7qYRBLERLzUSzlk8viQxTY2rSIJjSC+ywfdl1S03
+4LjAkKE6WKGQ8Yvh7p65rP2wM8x38y5YKW8wCWCOWt+4Br5vKih74kMSzfM3
+7gyAnaFRledhMu/RMm9YUtY+sR0ubkhn+MBBizJPuMHOV76PguGTppnyn7mY
+v6nDLoHFs9aZMnhaL+7ZB3vqNCkymNA0P9HBVzWJHwfDQb/+I7fA82vqzjHh
+O5PXaQSfJLxZNaIX3iSxoTY/IRSunRO72QEnDPdN7YMlzBLLKOxMUmVXwQS/
+gP0AJm9bjg7AywOiw5/D5qVNnH9hR2TrJA31tdzPd7sEkIRuU3+FB6zMT5n3
+IWxoTN4VDstnoucEws3uL8gd1PdrY0b8YNv6Y8tUsPSbnkI3+PyUaEQPm63s
+opeo33Xn2hcmar6Q6P8Jlpoj/Kxw26s+owG2e4ojhmH10eVv0uAML/ec32Dn
+pddtPGp/wtbRe7BNdlYwgTy+Hxx33KTyy++3XICr36amNcILXT59Q/2/Cc4H
+l7Vwd3sazx8mpv44tI3qp/OY9i8ecgqmD3Kp+lXr2ddhuy3Rfxx56Io4Bypg
+20eMwBpYfiXBkQ/HqZ9Zt8OKjlRhDhy2yOLqCgdlbW3PhhVeIdx+L4zP9BI1
+HFNipRfCbRkVkWfgrp7JTglslmQfuQrnVmrmLoaVD9cWjcFJruXJD1aiL8PI
+QRb6vSgQzLbDxGUaLwruXGNv0sN0blnkIfjxD9VDX8LdHue2tMIlL42ZGlis
+3fPnOJw7bGIdgZXxdV1uyO94/YbhE7D2dKo+AmYPVugMlJWiehl8Rvnej9R6
+WlWsPBseGjr79T2q3t+Cjjw4KsnoMg1/y+8lVHCWJNR3KfonopcsVsAHBua1
+iOHkdbfWxcOlefX1cdT+RRf3BsN7mCmr0+GVGeF9NLjpYUthLlz8/l2aFf3G
+C42JGpjuoWKfgkWMrFIVLG0zimPghYbewkxqflj8XQZ1XhYsebsV1gp5cRbk
+N9HLcn+3vlLvdxwuPTmQxYQNv0yd3gIzn/5Ot6F/9YLxWm949dgn/Hd5XpKu
+mPHHebiy9/A2WJeTmmiHb/iMjrJh6VcFktuwvDGisnwF6jWVp5hhcVXIGAN2
+fpZgGIDZqxq+03jinriQc9gBv6buHY//7x9/8j9sjKv1
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.6318774622309, 14.558628882191854}, \
+{0, -1}], LineBox[{{17., 17.00000000000231}, {17., 9.999999999998607}}], 
+        PolygonBox[{{17., 14.1}, {16.6, 12.9}, {17.4, 12.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.9452, 13.5}, {-1, 0}], 
+        LineBox[{{17.000000000007276`, 17.000000000003638`}, {
+         11.000000000005457`, 13.5}}], 
+        PolygonBox[{{13.48173265946094, 14.947677384685548`}, {
+         14.316718930329426`, 15.897834175673825`}, {14.719815750748694`, 
+         15.206811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.823799910437668, 15.984057296392571}, \
+{1, -1}], 
+        LineBox[{{17., 9.999999999996362}, {11.000000000001819`, 
+         13.499999999996362`}}], 
+        PolygonBox[{{14.51826734053906, 11.447677384685548`}, {
+         13.683281069670574`, 12.397834175673825`}, {13.280184249251306`, 
+         11.706811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.823799910437668, 11.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{7.5, 5.}], PointBox[{7.5, 12.5}], 
+         PointBox[{17., 17.}], PointBox[{17., 10.}], PointBox[{11., 13.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T14", " ", "P1", " ", "N27"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdief/fggjhihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdief/fggjhihjij.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.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489721633608*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ImageCache->GraphicsData["CompressedBitmap", "\<\
+eJyU3QW4rVtVN/Dt6T733KQv9166kTBRUERRwUBREQMbbLEAAxQVu1Cxu7s7
+EAMLbATBLhS7c33jN9/xn2vuc488fu/z3Hv2Xnu9c4454j9i1mOe9OHv994f
++KQPf/J7PunOb/phT/qQ93vyez71zo/64A+rj46+xsHBa9zZf3c+8PPu4CD/
+e7NdPQcndi972ct2H/ZhH7b713/9193//M//7N74jd949+3f/u1v03/+27/9
+2917v/d77/7xH//RJ7u3eZu32T3vec97xvjzwaPHP8dHI495zGN2b//2b797
+2MMetnvP93zPg7ftv/3Jn/zJ+Pxt3/Ztd2/4hm+4e6d3eqeDfv3G8c/R0Yn+
+/Xa6P9Phf/3Xf43fbtN/+Zd/+Zddnnd913fdvcu7vMvuF3/xF3dv93Zvt3vw
+gx+8+7d/+7eDu/f7//AP/7D7p3/6p0Nter++c6hNv//3f//3aPMDPuADdo99
+7GNHm+/zPu+zu+Md77j753/+54Onb+TecfxzcpD6gR/4gbs3e7M32735m785
+fuw+6ZM+affCF76wOvGds7uP/uiP3v3hH/7haPoTP/ETBwfw7qd/+qdHV3/0
+R3+0e/rTn46kg2PN6x//8R/ffd7nfd4c4m/91m9598j486XdR3zER+y++Iu/
+ePdFX/RFo6l3e7d3Gxx4wQtesHvGM56xe8ITnjA+e9WrXjX+/fzP//zRDAHc
++9733v3BH/zBwV17CMj62I/92N0jH/nIIbjP/MzP3H3913/97iu/8ivnELyv
+bc/Xfu3X7t7qrd5q95Zv+Za7b/zGbxyf/fu///vuQz7kQ3Z//dd/fbDRePvB
+TX0/8YlPHP895SlPGZ+R5od/+Ifj5nj3cz/3c3ef8AmfMPrNWHz/N37jN3bf
++73fu3uLt3iL3Vu/9Vvvfvu3f3v3/u///rtnPetZ4z3tPOABD9i96EUvOrhX
+S/VrvuZrQlPTcXTQ+23f9m3LZyd2X/qlX7r7uZ/7udEOEWJ/iWHj/tW7V7zi
+FeOjPH/zN38zpNhKNNj+tKc9bfd93/d9gw3v/u7vPlj+Qz/0Q7s///M/3z31
+qU/F1nsd1pU//dM/3b3He7zHGNjLX/7y3aMf/ejdDTfc4K3J6Dd5kzfZvfSl
+L9397u/+7mDyK1/5yt3Xfd3Xje8yyd/5nd8ZevYf//EfrSvXjQG+3/u936T2
+Z37mZ4aOeX74h394d+rUqd3HfMzH7L75m79599qv/dq7X/7lXx469xM/8RO7
+j//4j9/9xV/8xVCoZz7zmbuv+Iqv2D3qUY+azHv913/93Q/8wA+M3+6y6HzM
+TTt+vtOd7kQ/5zgIqqBj95//+Z/DNgjvxS9+8e7+97//EBxF0HZxdiqM8RVa
+jLEYv7Z9hvvQwjsveclLdtdff/3und/5nXdf/uVfvnv4wx8+xsO+cP51Xud1
+dr/6q7+6+6Zv+qYBC9/wDd8w+olZU7B6byrMx33cxw173SvH2aFgn/VZnzUg
+hyEwtDd4gzfYve/7vu+AEtBhTL//+79/EI35tV/7tSGjPGgpPo7vGsvtbne7
+ochovec97znsu4xw93d/93dDq3y3xtYac6dW0z/+4z8eknz84x8/3gbWP/Zj
+P7Yx+fz4CEN0wtIpB0FiIsZRstd93dcdA8CI3/zN3+xB3nb8DrjysAaCRJCB
+sGYqr53P+ZzPGcjwUz/1U6OvX/qlXxqMYCJw0gAIglUXauxOnz6NsQd362EQ
+IBN53OMeNyzZMD7t0z5tG8Y9dh/8wR+8+47v+I7RFb6xk+c+97mTf8CFDOEh
+W4jh0iN6pmmciqV6z99w7UM/9EMHfHu+4Au+YFjr85///AGEIB3LgIzheQdL
+yZncr7rqqt0HfdAHRVVg1Kd+6qcuqnJpqA5spJqv93qvt/v0T//04TVIAVeY
+CpP2niaRbpgeMFDf7bYuDDNEBs6SBE9cDnJ8F36RClPP+/qudg+pzO0QPHhM
+0QwErymbx5sMwSAZJAX/+7//+wEMD3zgA4dOeOjNQx7ykN0nf/InD29yv/vd
+j+6MvxlF6c2Rxp6f//mf3z3pSU8aqoIgcoR+BkN2v/IrvzJs8ru+67uG7bNb
+LlqU4PmzP/uzwSxtkM+3fuu3TrV5znOeM5hqKMgwlPps6/qeYyRRnYgeOYIO
+/syD/5oAbVyvyOBbvuVbBlzgBggR5VAxkUf8H3JoObimKoaCDNYE5LVjKAKZ
+n/zJnxx9le8bMMt3GUr5oYNXpzvPfvazh+/zgOKP/MiPHOr6Pd/zPeMz/hFt
+H/VRHzVYi33f+Z3fOf4G4va6c2KwG1u1p39wVL8fGQ755BjCIx7xiLjB8XVq
+WtZWjFz055pDHpYGA/Yf+ZEfma/hyG1uc5uhIzSV2yNEGBEnxKjKeTV1xwdX
+6VgJd3ff+96X1PpvFweXb7nllt0bvdEbjRHz3lwrT04x6CeJciZG9rM/+7ND
+ehzgfUYb9x6SRVcenIoG0HGcve1tbzvctUcQyxmRJECgCTQFhhmTh8LBQBjJ
+ARrT3e9+9wESvmMc97nPfTiBoeRsDfdpAE0yHux+x3d8x2H1HHHZ18EDBs0n
+B82FgZNmgHfjjTdqo3lzfvfZn/3Zu2uuuWb33d/93VMe6CVOD80wTlrPQVYE
+1+9etfurv/qroaXoFFAIIAEi/vkXznOQn/IpnzLkCkChlyiteHuPw6jC6kkB
+QrzXe73XCFv8TiK/93u/N1w1mPWzByZyXLTjF37hF8Zn3B0o8A4KaAWoZ1vs
+8DM+4zOiFL/+678+FK8jj6E4IhUmhmhNU1SvMhlM1myZ6FQKoIcBhEzgd73r
+XYfn9T2O7C//8i+HA2N6Hsoh4kJa7ASs8ybv8A7vMIbCHAkbw9mPITB1CkQx
+KEhCbXABjBkHD8U8EwLrE81v+qZvyrgO7jdoPj1CbLAiSgM1aPEZI4CGJYap
+HCBLGzFOCkw5RDhoZe8iNBFYxQz4NJUDVAqdo4BcERq1gZ/65XoEF5y63/Gc
+CyrMONeohix2WbpWEcWiMGenqsYZnjhxYnCAZDu9G5QViDdVp6fp5fF3MOMd
+FFabHV8eH6PPg6MFCRNutEO6eSo06r8dG3BAa/xXP5/vkfg4Wecdegi6p2wU
+ABqcO3duWDVyKKKHD6rvTRyGYGU9s2uKUaQd8VJRJkhbqS6gmK9qCpjoNvIs
+w8yf11fz5xroxR7Akg53vrGFXRwBV+8/TqM+CytWFtZzxAcbf0P2wZXobton
+3VjXgDzHVTqfXrya4Lv+dATh1YtRdiBT7W9j8DWxWMUKLeejux/8wR8cruXL
+vuzLomI39ktkABREu9Ju/vaB3Sti6pVhNIV0d+xX2Cg3LMX8wi/8Qk5mvmIc
+lBmgFsA+ugmgeLx3DWkqEbyEzSKFQr58LBBA71d/9Vcb21ZVOHj7/iuLgBU/
++qM/CtAzQMjZynrwmEUyyAMhlanmq7pt6D94nfH/k4eUzUMBBRZcTd4D3oDb
+aEMr0xWqi8tqiEn3MEgoV2ngfF36wgx3Iz4YY3rrhWdawP6iJK2AT7HjvsOj
+I6UmDQnfo/t1AuePCLjYk6/ikIBnfV1ewFWVmzq42K9zYcIKuVqh5E39VWrf
+GjdfF1WAoWLfZAHJ5vUyxHyVz6EHFWpNFggxZd3Fnn791FA/WGlQtFZWobly
+YwDx2sOcIn3qIi+t/PxoG4+XgbgGiInUyye++aIIsh4MLf+UtzTiLXGBkYk7
+Cqqvai0nwIc+9KHjTclH/VsufBsJVeORVuZAeWlcNTdHLBzhEWtEk2HeZVSc
+9cSRTWd0U6nZIedEvZIRMguKQtIgyd9Ffhyh37mB6zaOvWXzl/Kn5OQhUnUX
+mlz8WMEeF8U3BlIRyMGbNWWSjI7O52BF/5LI/cBODCxFGYrESnS1VPtS/1kz
+POn3f//3j1elQ2WL13SLxuLPItKwilliv7zjla98ZT6mIwJBCfliL6J6XCpa
+pwDQKbwAl9v3zg2WaBGMyAS952ec9SgW+Q6OFhDcfmPoQxYTarhoO95MSBCA
+sZXhHWlUgQ5PfvKTRxxhaOIlDKq45+DB3RwtCoKnOV6ICsOD+m6a4xLgAW+q
+OYVPYZLC13XNZJTIOeWuQo0zZ87QmjBZNAeZKzmaTKZ42CbCK03Jx2JKII+I
+IjDpFlgQ4NPqpNDCVWhJo32dCX7Jl3zJYG4XhwdAU6wi8GCDmINbmijNpC6d
+0ApA058EOXIBBTkhmM89QR4yll+I+8FLGVhUggSYtgztTFsE8Sb090TJqPj0
+KMfHALSuR3+qVrt0d+0MLvJoEr4n9CJAwa13hQwe2A8QMQfqoJYDrRGGWrwy
+GGXlUKvJlVr2i8dMvsgLtUJ7Ju1j/5X0Dq5vnVBzuPOd7zxeR7mQtsQVbZMo
+UyU2OQV9dLTGSmpcbU2nhz5IGIwXIbIjOs8QoWkpbUmwPimK8MNjUAZA8NtM
+wkGirVsL/qZhXl5Njdj4OTeslDx66BE+IZGXI2X6CG1Jkt4xYGR91Vd91fgu
+cfqdR4QdkkmaIQ3jUaATnDx16lTRYj7nxEiePejUDp9UOn66GYdEVi/Pnuh0
+crTEDwiqWIuEjWWU9zvY3Nld/lcFYr6eADt7peYeUS0PRoGMluf0d0gBBviU
+F73oRaP27Gff9S+5SqfhrlETlNqSNJVyDp3fBgyg8tB9zFwGjCotqvbWKDNg
+SAFUkloy9cx83K51EMxJ6wzCg4jCpwutCfhxuT+VSiveiV82BTw3IFn2yCBB
+grCY0ydZBmdCghtnIQWRaQqKZOZqS2wPtpTl9sP6Vy5CQpyH06TGsOgOXeAk
+6A59xB5xi/foJWqxT5lM5JpMgjbIn0XjIccoFFfkrClb0hJ5c4oryBV9qNYB
+cTR5RKbB1spEjjdMMKPAcRDIcPiJCsVWUFOWQqEWXvziFx9c3ZzwOohl0HiI
+l3IdovQzTgTdNQ036JPPiR/HhA+MXbFCBi4oDCjKbgQ41e/kBHWQ35Z1TU6Q
+q0wZhz3US40ZJySPKY4YMl1HT+FXOJHqbB5Ka0iGUkCQ4I/WgDdyxQnaU6/e
+rnVaC/ws901FdASxxRHn2hzousTc5xUsJmhDl7GLH9kufmhd+gOKVRrwk3ZB
+L1ngQ1elPDlYJdbL3J7fFRoK4CbrQIsCB1jJZ2AE9JQSzc9EYip3UpkE3S98
+4QuHogNQbt+0DMV9zdd8TVCRVwVECnzSmCO4U6/SczqvhsGI2ULi+jmnslVS
+KRqFonQ8x8xNTo5xIxQPPOyfTRvM9f0dWAizDDQYyXFWUwerx1RVKn7Oz6i+
+itFez+443iVtfI9yYAzFgOyZIVItute97jX6CUazaqOkKREI3ORtVMEgIv8J
+GYRduLKvx5yYwWFQAytmonRq1EFwClM99JdZIatIuK6VzUi1LFkpRp7oxrlL
+sEGCqoKv9VqvBXLOtS7yAb0+YcxfUiqeUbTGftkf6bEhvFbjef1VF+9/CFU8
+7IhEsbKd92CR4fss9RDNQR+WE7bpClgaW2CBcxYbIYFLwgefcVEAMDUif+eg
+VXz5Jd8DPYIBcAZoqRUw5+SZVbSRruvb5/oWIZW65c8yYnU6pNIIYVoNY1PE
+e9+KA6Ba76hImEKK8gitAzAPo8cZlKeQhjoCoAhk5wEIed/P6uU4gJvcRCbq
+WKowCAgLRXp2ZIxcv/VvKd2W/XSNYIwgiohLpASUSZBCzoD3xGhKQIpZuOD3
+0t0bWgHJi4mC+UoZNgU8PsCRShgMUQHIs63aLI1I+S8aaMLDwGhhad5dFyQT
+wvltw9+DLWe82/CGMBNQCTY92MQbimuiHJSNDRpWNzXYhS3sNGkEccCBGJvB
+AD2mc+nSpVGV9vA5KIcDmZgSWxHHrDucnYGDFAoJQTpVLZCCRF3s063jQ1/9
+nU3gqXLhHfpvJMJ1GmJHSvVeDezgxqGU/EA0S4GF40JqPqMZ6AlkgjgZI/jB
+gsy98RvXXnvt8AseLMMmbjdZsHBUEbz6bTvapucFy76PVhplfMZjXMQlFKM6
+wQbRoP6Jqpcs3L4Fzzn0pMxMYEUQhkXpDYe5F5vu2n+mbqhWQTb/KuasFm+7
+qs35YU36REssFD/N9IDr0AaaYULB5HQf8IuFSNKPtiLzlzwaft58883DSvGf
+QheRsSDs9SpY0jXDr6a3xQ0XRtmCXYorOA4el+l4mIqxcKO4LqASZFVQfGMz
+3wDoJNuMLfhXNE4IiTgNmBKuAK156DZDwdNDz4wHuuGkuh4VF44Jsfcu7OT4
+HrThTug4RwQmfCeDZ5KZ81VLNqtXphPw8bqFC4oxugKeBVh3aq6zhHaMUxVo
+U7JIj2BhlgSPDdjDIopbXzvfb9FN1QC+hw2aW65wtjXk6u6PtZDobkk4WFcv
+yju4sKijekqAhqso+R1rxZCz0OI4M6P0iJpmPfjs+LMskfgknPEGWuX7QRJb
+Kv4d3NzUsLU9Buxm7alF3xSeHPIThWbVAf9qbRpORn+9A8aiNlSBnvtu6UEK
+YyCJEDAa2xJpgw4ZAcMjepFshSZZXoMBAgrTcATS3v3qJhAAUArzVqyCouiB
+8lzTTdBZ5mD6N+sVSoCRKT6BYsrDQvy5Xu+pgXt0R0b0oAc9aCClh5f3zf00
+y5lhb6TANMELTogMSIQiEeArXvGKfB3DTMczELOOPBcL1zQwocUVW6baKDLI
+/NeDmnbMMvQ8VogUnqQHIgZVIDOmlZAJM/G94CxfFwbSGC1KP6UxaEYYJDO2
+oiIEMYDWzV6eeWroJjmI/wL2wLyDpquam/6k7qxaZH2IlQFCY0syr+2xCZFZ
+CGRjrb5fYXTERikAtSzIHLHVW0VRi+2e/S3iUguGV/ImOV4NISMmJeR5YJYJ
+aNbLE/A7fHDFfVF1HyEdVAmkGKzRMpHqO4xhDVBCxerBTQhjFgggVTNHjhzB
+/hDCwDJLzHAs9KRGDJAIOIkaSwjhhxHBl4tl6QG1p5HFkO1rxwbkAn4yn7Nd
+x4YaAHrmWNq/zukY/B4ATg9PqWE2JLwDvtyHf4WJ5QOmwISP0lUghBA/F2Ce
+6z9ztjJeD/6KFWrILbBtFc7xQYRAka4xgP2c3oURjaC7K0cDhVNGE1ypHuIM
+YuEtmyv7Czf4MH8SJRZn1ulmfpvZFYsf0oTQbr5Etkd7FMJDCMjAU4R4dUGd
+UUCWndMNvRG8785Jwi3dYoKMZAZ8x0YLVKflfpsWC5uH1/uc4+gINblm9dPM
+j+u848UZD7IhakWPEVFeaYrL+0QVlbPCp9Qs4tIFk8xKcsvdCktaXA9qmpPv
+QvNClPQLxugk5vA9SkEnWnf5UH2jCyNJFR3eKa4cWYYDeMxxbzOpZ2fEAQrJ
+JDOruuHmcFDoUIoxu8NsigDMVPQ4ZrZLiwuYw1HUZAb1hkYplKKKCQFkeRUO
+1+edhhwdcqST+5ml44dyOrAr8Q3XhZ8ioDxSwyI/XDci/oyHNBK1qfr5ENe3
+AhIgsWBKAGFMrE9R9Gy3hDD8wxtEAKRy2xkvY+Yays6avRurdK5ZAKQJqGjM
+NaYz3TJXSKFwW+uEV1oeNZYqCRlZcA3nhm7ctxPGZZKFwySbkuvpFrGP9Mcb
+w8nMahgCw4UPiQ7DU5GLNVQQEQN58SLqfIuD3ROjoaFCPfCQm9ji8pSIT/b/
+Oc8LFy7MEgcDAP7WkmSSARsuX8uOJZStmN8rybaJuOxkONHtg/S07T/laBom
+yU37uM9u1/b9Lh+UVwQjGAM4lgtGwjjXjO4xbTkluTCEVpihvUIjJgxNeakX
+vOAFsx35XkeoB5m+1g6IT2WocrtG8A6Yjo8Uxp9UrcTmBTEHyethiqVphn3+
+/PmRDl1qPQFZIIPQgTo2UQZk1t/CBdDqa+WgWorHRyGOKxZQWRGkSJcuocxd
+7nKX0eV1110n65hdsldpFW4IYHTLAHG0lGedMJZ0G3y9kmgfwYerIceH9zEt
+Ii7vBV5zCY0KDqXfR44XRnzDGuEifaLlYh8BGtDL/g8rCOVQfH4x8aqmjHjE
+QfhamHZIEidGhCKGIHQBj1C6TDu5lZf0SfYsDg0FLtf2ULgGOELlehJmU40j
+QwOPDkfXT8/BnRg5srgOMLFoNYGS1NFWRuYmdMFNuC32FyFi0zXdL9UFyvr2
+d/OWgRjsIjDvzFrayeGyBPhWgvGtSPY7ko8192E869x+2/6PMZkmT+WULtAn
+3he35SGsGApUjPwGK34cH5oilpV9Q88Cupm7smnGQEiYaTCl3Dd051y7QMzO
+oig3XSexfZng6PR9frtLdwsedCt9UWkqCDkIj4Uz+JtZQsGRflTar+828dhn
+pk/TN6AV15SD6O9tSxDAhuhwru4+OivJmozm4yWQhWZMd78J5tyhmROIlYyR
+BqpZKPurNyuElSo87LAaK4urj8At9oHPxaiwmT5gtbiNnzHeIu42/WfsYHX0
+AjKKPmdAva25kWBYUZQ9NMjlSrh+dULQIuNYixfUgkuXh0bpFcWwJGGEKFy2
+xXlQSW2SjNh5XSchYPK9YlkMm8/AYUhXnN2ovW2CkME88MK7qUiCcYMjw1QN
+tBwHikdUsYU2/k7WcBp7QZDSHaxOgJM4jDu7/2GJXF6/oEplH+s0DXMRzvO9
+KC3neNvWFEoFGyBuF2wmOxCXFQcltUjExxTEeDyqNMoR+x1KJ0fQQvZMUXYN
+Q3yfW71Nd+07pEUy7Mya5GALXKJi8st6Z6sXXTPYKL7gypgCoa+FMVkkoRpJ
+Mkr2wQMwM9/n8njWlK18V1KaR8xVIgrnmcdNN90kmzjM+W1JoYlfAvXgE41e
+F32ixkA8IiRrvwvjt3LwqSEdUE9zPdwYKCfEEmxqorI2vjCPCsOybCiLxjyQ
+RrbE8dH/VGKxTk/7rU1HBwvpu0j9uqaIVECHqq2/GT9gBefTDV89HB0HkLI7
+G4mQjVdVj9/MFBsh8/ypi1GO8m/hstcJpl7tgODkUEtxahYUsBl6YpnOZtWz
+wGDwCgxMEgwrMNRrEQJ7J3rahlewpFxLlv9iPvcspmPjprArfs7uGjISZnEZ
+OHaoaHByzFiJNnFEUKKIxN8Bljt0E8Fj38Mh5lMYeH3z3KucPo8jJfBwfdCi
+5LAx6fSgjzf0ZE+P7XVaVjMpWDzIivPsWPDbxe5GtAZ9sUEIwnC1ierpC2cN
+QBKswBDC9jWAbQk2v5IFAgZQormxrddwCbpT67t3i6I/lsgrAb/yH9M/c8C+
+rldYZPhlX3fqFmm1oSO19OD6bpHawAOxIvdq8fMRdaxqly/r2ZQZfy7uO75v
+jkk4RAtUwfTe5ZpoKBZ0ka+ZfHbATiwXdSmDYC62MAR2JwRu7j64B8Q8zS2o
+ZpaCXWoCmVMsT4EIlCTjSwaFB0SJ4CLwPv0qSyMvrfYeoYM0a9wUX7M0XHUi
+zfobGUMx3kCz9dm1rXTZ7iLsYkf2F/JU/DDFk4Yn2vE61mGjKAAg+B0OXd0D
+B5r80dmzZ+HR2WaoJRTiagVEMOVh7PQBI3g31o2EYutan+ine+j0/PiADRsT
+k9lJOLNQVT1YFEMHbOcg8xr3mUUKwE2H6MfKsFn0tSaMJmPTrNCXr2C3vJ7J
+tno3zeI04VGlVCSuaVXiVFGTOShjx14uGxncNintA9QTw8OBMjkjVJFSFHnX
+Nm8Y5d3udjf20nHExWH+oRxzdOVV8AHIWK7ICd6BcFKnGEpcvVA7ZwVgEiHz
+pad7hNRSl0kpufST/f2U4JSSTvYIOBdTasIlGG4FTDH0/v0KhhGVVVTpAohQ
+El2IkvbNHZ0VQWlluoAcPAmrknLQ3SL75uY7dcy8CvwhG7iJ2iiX1/YRw5Y4
+Me34dpEFeUmcwnxQ0JMrhbz+f2kMh4rAP9wxBAmDPvUhYMZsQxBb85n6oILU
+bt/+FAIZ2/hW6jQ5BN4zSaM+ZaFoOASZfN9ulVP9fYGF/IXG4mjllwf3XziK
+1IoAZvsQwQSF9sUpL3nJS2b7FOLqq6+G+rN9IY9FK2pfwMmmxpualdDR0O07
+Y9pYCcwrbp6xoOhe9OFvZSbJ4FlH5vdycAB2ZOEaXWRtCmMWB994mHP8kxSn
+UtGmdBOsoCWT6wTIKOHXiX6PHikdcu8pUnFD7D57dVGr/OG9+y3mYrGLyZX0
+R8EAQXwIbgtnCTr9MXxOwiKCtT/JfNYtAAa4jKYb+ztcn2KFoFRGkXiiosq5
+jwz3jRfgCiYUIHwvWc1+w9bRgem9u6ljym0Bue/ThLkDa6vGCrf81ly/R/+J
+nnW4PHVGxCNv8luaoPbCgE2Dts8AuiDPzpZwAmzCqmxtltoLweUi0WGZT+/f
+m30Cnc5fZp8cJLNb+8QJ9ffKyw71yftlhQmu0CRl/Tu1wWc/SmqsNIqZ06b6
+NwsJMU75gNBBsccqCwgUgfF+WJR66+2a+cIBykjfK6hPaYUPTrHyMuZLrWHP
+bkZEm4FTgbmlrWuNPhN8rFvO5DqlTq2+J8aAMF/oYxQXL15ESfguarAvYu0O
+0Qar1nF0+Ux3Pkt3oFKGbh9nuqOdLIG18E1wrAw86wvUlA6fXrIxg0j3cd4G
+gdRhX6U9MRIc4b0oBJ+lIoW4YTXwRTU4KZs4vrR+Gavv3m9gqz0UVhxVhxn+
+qtYR2Kr+x/r/uKmywi0XHMaXCfGQyYchEaoWat6v3+LLZBYAuzQoncqbOgWd
+ncLYnkSfnao92ETgvxppOqXuSnwAR4Qm96xxhO0wCMsoS6wLncGKlPJ4Dc1I
+rkxrGzJJdkX52jauHF0i/JL8q7NCemsd0vyr4Ts1NVaMK2cQSQHmAHk+i4mK
+wsICIC3XBqblP7Iqnh+AdYCtPo6CK0fZ3y19TqtsofPe+Vmmj4Uq6YmsWC6X
+UPaWnqA2rnBehc7JH6kTRmGguSo6XMPcAsvTc3mGKi4vKu7GNMwU7nN/qSST
+A1+VKNAZLznq6dVgB271drapRJnrtFcwshFqBfvzPSAoxsL9h/VnkK/Xtc3v
+iZn69IwJGFgPBSFfvofHyOTu7tHqBUS4waykpJLWLCiWF00bhpwZeO5r8F/s
+khDPa37XbPE+5W8wRMHlU5hV6VfnTVdkVhRDa+2RGr2Ozj0dkt5su4Mnoh8L
+t08v3xP4+W0Y9hFfS0mOgmITxS1RbI2fG9qEozQqa04FOIwNGtBnBAnxS5JX
+NYsTLuXYBj/PKcYrjjDRjMALEkkkE+exDmmtHez8PJE9amEkv3zy5HagA7QI
+Z0zFSGOoVtoHlF3q6Lzu7FChaK12cA54MjeJhAIAv7DPmbcIxRAwp9rLZhTa
+0sl6Rnbf/hP2gbkytRnxsiNRrJ7NBatAZWR6FvH6mwhXqT2ytAJBgQbE3Hvh
+BP0A1DSuoL5HeGoUQdIWuM2iam6tfj8y9mIeH64op8z09vCJK15ZooKLjRA+
+hovyAQ4ohRCmKbKDEL0w9z7dEmJ4fMRU0BqOshjR//HjxyUsj+qPhZk+6rJ7
+vk2zNEABS8Pu2QNVFueDiY9RICsbn+Z+0uuGHWTtvodsZLA6SeFRU2LX7GcB
+UogBHEbJlbJ4nwHlq5ojNJiXOHbs2HAyQQKxsEUYtsc2RyI6GCiYNCC4ryKW
+eptCZY7HepP+DJkKNpv6bm1QSKUPbagUIikYRukFoXlUCw0JtJfGbhXaiyNR
+5tDAbCZv+A0lv57uH74cyjsBjAaatBdfZZcoJ4KEckszMOIpcMJvl+mCAMgm
+DPWlojiD5tggkYj8kf0ZSvo8vrmNhv0ox9l/UWoVn0KEvT1kBoNmM5LVbQM+
+M/hCDdZ5WLwRJyR3L2Zse/qODmyA717OeOWlgFBlIOPlqsTt+HJI0ts2OIoG
+mor4wAZ0SRjxRv1Zcjgzo1nrgC+kwG2nMJC8k15Sdzzb8qirRjfgOcVd1mqw
+cj/hv0fElnKW6R7tkmp5tMyByyAkJvuZwC2+T9p5aJBb4Nnq1lax4W4vWD54
+RH+25kr5Hh3kXv2WeSFME6OjDBlGwA3j7x2bsbhFb7nl0t0EhwYHj1vy86wD
+1ZJ6Jb1KTKJb8YhiHVG2sLQQphcB5zipNb25dNln/MTDF1VMXpLvJVdR4byl
+CSVZhHbAPiQkGAO5pZKJUCTW3JHfbmpChXTYRq9Ky7O4JDXTdUzZ36TeXJT1
+mPJGnwYzfsvSkzVqiDqsicWQ0RHWc9v+65oVrEumk0JlkTLsPUzfVpMAbiWe
+g+w7JHl6aWm7lSIy5pt7PIppveaHiLNWbo0vYv+AK4lJj3v7+ukRu2WvJiuk
+u0Ftf5MixN5XS81nLJLceeONsm2xLaGkTfOO6yr7PiIjDFqj+1T6qHsXcA5y
+soZKXk/kHMqWqT71g159mtotzSPulm6jptQn0w5XiMGyhVCGBQLprq+RNRdk
+p9yo1/T6DQ/U0YOxn18IzykpGcwavm+DuTg8LFjunGR4UtM4WbZE/7Wl7uih
+MX7mHtMXm+ldzrOvhPZkFMZldegm8U2zYIX4waTvHe5wh7GsI5hDpjhmCRT/
+Jx1Bn/rhq0kXY+KAVli63zl5bihrzvNL0K5ZJk5dYBXjEVjU72t1isjtAs6G
+Kr1SaCOtrnIaAqKFk895znNmr1yAgFrIiFl6pZA0BZUEQOH7kKuEe9whGbP9
+kkc6ZowwVMelq/dqFaQtKrAiQOgtOqgOLjSjgZtsRwgkZJLXJROiXBxrNnkR
+7v+BwewJ49btN2TcQ22zvzD0R73HsFEnixXCAlGUGhA5q1GjWo2ibDyBCHPP
++SVJR+Q/qlPWmVEP5bmAmpqQ9MFSzZCFlcynorJJFueLLI6WG/Qe/BZ9A8Gc
+TQGo9WP/e3Et8T98zSTA2YUsp6v5upDKhE6msQ3D9EliW5lSjTg7VTDDcm4U
++JMkq8KtiEgo5EBRvhfP+bKk0a9GRD4G/DWOWRjGS8lpz8IOYrgd2EdD11ko
+Cs48icdgDbo0JdEYZeoFJqUw2xJkXyFdrFXFs2y0rPpU/5lkDCTJXp/lGYzI
+2Q+FO5NgeCOC4h8SE/MN2SOwLwBuErBehZmxnW0B3UYtLAu1J/r/DJ1USEx8
+jP3FnI3ao3O3rAYyaPyMi757QxUrVrDLpneBiyQP/GU7BXxh6cwG6bqr6D9L
+bPsIuVmP7PDo1ZR+I2Qct45+P4l/ei7OY3vxo6oA+Xy/FOjMIFpRGoJ4xHqK
+C5lH7JULJ8dk47YJGSspuOMJfQ0LmXf97cT42vm5bkVV11dYts9IhjYn76N6
+vAK3m/UseEC3zGRlRMAxk3hZMU/a2uMVSlRzRADNMo0UjHhTWoEOXqY3zp9Y
+RqRp9ucrAMhKE5Kvv20DPzFahVUZtLmD4umRsQTg+JwgyjGIigW3tHCZrOkN
+yGvySCGgGBBwlnOzE8sg73GPe4wjLAP3l4WWiaU4bkndog/ZsbUuAvRwPyCF
+bw03sxZNq5kRQzQVA35mvgOeuIxj5RxnSizQYcqONNjqAZdGBs+pikXSLxvM
+hmpxnEiRTmanLmZBRskBhmWh6bqYw8OvqGWosGUM3uHMtRdtYmTGAMSdopsx
+gFf5jxwx9dgc6szhFw/O9TDI0VezNAnZsC/H/8FMSod1UTBN+b4KgNTjTi1Y
+xVuFI0rL3zDRIL7UXQQQvLCCqlh1m+bAZXH1+JrmS2oHd94EHnPBLKiyT4CP
+zTRTGaqEkGVtXeWeRItqEGftYXgFfw1MiJAT0+gUp+GY+XSR481YWn2+dXF+
+OLgYqC7EKiwJwGVJJEhn0PgKI+/dPJEYKfh4AIM4ur6XYz1oFmlTfImvrB/y
+KRZvLJ/BJoXos5v6cMPTQ9EI26DXtWskY08FBcyASbsVeb5PibzLmnNOAkT3
+PgiylCQLyyi4iMFKKgaktFiomWpDNijtBl5tjEMSBIhrbJAY3ehaU+KnnMm1
+neipxnh0zupqqdfKPKHFxHOgsmPax/XHRATxtVpgknVcDF3U7D+e33EdCfRh
+jnUoT37ykxsIzo1sKKULf0uCpWm4KsDLZwUQR8aq56PrWZqh9xVNGGgxbHZW
+RKZzKKKi43CUfIbJmC8CuHFr5W/7T1A2qe1WeJ5rrSke78LnlclE4sSR3Z8P
+7a/SDuCsSlesz1d9rQd18KT+zFecibJ0mJ3QTBm8A1w22XsIk98zAotjrMO4
+brG3wwvmD6+Hum03TQ29azUAI9N0RQ5pmuw54Kc//emHmk4zV2r6kT126qiY
+xSGV6V82Jh0Dd4EZp9iLgdMx06P+1o+kY17Mqql15YFp68zfb2M6Off45aRB
+AKq6aM4ha/opCT/Mp6V9JmyB+36J7tGRX5q3WAemfZPCth4Vdh3SjhMjtFE7
+lsWoO1nEU4NNx2E4s0vHLMuKM4X2dMwx2SHjt5yihVdiDJAla+ntm2k68+Im
+AtI0uzdZbI3WOsnNPKHemyzvWugsbE0t6UqCXvc43HB44NbSCBM89B4TXv7y
+l0eiBMzl+S1ZPgxRibZFKD2IW4U6+8rrthEyR5MzbQMvStO0ggNFWJsGcmYo
+nF+xnoV0eIpmI6Gx+CDgyjtbhrgO3ErA9raXD5wurFu8ia1QZj05hfpBw1K3
+61pLAQwXjngzXMbHH9H4jFs2Y3oxjxJ7+a+0DOFsKKBihZNpWTWdemiZFkIV
+LddXDt6hhyOJo3Lqlxmi5R/C1isMkTkJV4VsTMfpDgUZIQQTuV5AXlFTCCE2
+oqIVUNAKU5064zRDlLIwk5wJJG8tXqdlIAIZTR9VXJaWzZxY6Mc80zK4cO57
+hkhRfLYPOY6OHINy8dQ9xO2frYiR9at4Xp50VlA5YBUmfiKWJZuUsq1KQhi9
+gXoOkHFb7SGdy0q6sqIYrQGa7jNFsAKRjGi//eToEGTvRDh4/Pj/duobkm3g
+k3lTI8KXKpXEeoDZU467AkA9lsBS6+X5cwpjjEemx1CqkUM7nvAGUbdvnvFh
+cbWiQqFYeNYpzKF2eW3tWhSRdqWy1AnqRnQmv9RB3IVzhHDrs9vf/vbzDp1N
+LfuQ242HPUMwm1V1lZgq7r9Vf2aYxLYOizbTvbV7YbMlNKtola4toVi6HyaZ
+fEooQdctqLwShl/pnezrg0d5h6V1FeDQOzf9338Oposy+FHz8L+z/emRLTgh
+OtQwqr7S4uAl61e2Yz1MXGKQGI/TKi+yRcSzWLYcPDiLPpcfRsiP1GcZ4a2P
+/dyOioLCSS9S5OrvrjvsCHs7ztdJ9tsSJBkbeMJsAFO6OpZbHNHw9vKZQ2Tp
+K+VkfebzZQHXrcm8dVZ5a3qOzchLVFYx5wMP0zF+2jLIYR1XIqIJnczJjOH/
+8t1ul11us6n5znI28iqmexyWoApY394wJWhh+Xr0jkhqORjQ0Hh7+UrOuDG1
+C+I4QouGs05fJJCMDBX2IR8ZWcHpgV0cjglnibQaMq0UnMCw8gNz2YzkPfPl
+6RPyy6dyhlEuzEM+BuRyB/a11cGuGRMN4CUMFOHCzCS14ggBo4A49BmThBa8
+q1qxGCWd7B03NSOoWmkT6mQTH3xGH9rwTZ80nDu3lGB759IQsDGo7OnTPADU
+ZoLCg2TFZh+8C8tE5/jHkvfnjB0dvOmr8S6XuK9ng20kLhKR5OVRuC5PldY4
+BJTtQ+8bhkr6TF2858LHq/J1XPIo51j5SRtISnqRFBRCC01zGpFsz+Ia9eO7
+LJqWudLMKCgXJCQPt0ks5/74W24c0g8J4KyQaL9C7dqRedLUaIIyFsePFtK2
+isOKDpUR+/7QTWo0Opdhich7gUiOszOsw5v6jw7HkQ1XIVlQpJwXpdPVSjKF
+pDTuR9sg7LqxNtLQukw0vqe201nLqLzxkxSOyATASkOGL4YhKooh4GIkYuzL
+lAMZfQjtVI7cdJWHyy4b2v58h7G4Vk9GqVyUXWrUVrTDvFqIg7EyASNQI87e
+cg8BQvDslBKPOjuQKepeRFDt3NxUQRNRObmSAZnUgDKrkc36+4HcfWBdVoN7
+OGgZE755iBf4iJypmdpACj0cPANe1UXBQgCrDbyNWijwGJ06k/ezuUMMKWRN
+GynpU8sbe1j8BzkDU7M1uPfKV74yw7r1HVh3H8PIHVheRwqZ5c6g3IGVixbE
+HKwXWdpjxTlgOJdaGRY10nYnBaOsjtM+Y/GsAsaxdvidmpZ21W/2Z6b36C6M
+STJhqibAaHQFl+gLjmYeAdlKMIuqcUpQWVqvXKEqIpXp5Q3DQygReAQtsjjb
+R3w3JzGpzxqdqooAXlDJwRG8LS4CCYelVkIQVTMwWsimTPOznfp9k8l9V1Ub
+D95Q/NwzhhIPN2sZRDboGYmcksJDRj/n6JbLVQ3fMc4IIBH8V6TOSITm2gc/
+kFTKkQuY5L0MlDwhrGW9Ob2NHlgYRv4ggolUwrgN7X6ruo2HC+J+cquq11Lb
+pbHcFStixzmLHZOBPAtKzRizyVeXXB3Qlqeyc79DQrjCQgw9a498x9BzEpc5
+gwAA8JaLFz2b4HqQF0dr0j5/9Z88FXPgIuZBJKLPFIwiprKVQmVUj+wZVa7R
+ZfNG5zO2bRmAnz3UkftAle9qT4LG8OgOgRA4tWRsBIY+iaCfS7CZ+QGUbNd/
+9KX3kGf/U25i4k1KPbaLga4eWmLyNMeJizp0pnRpIouYsBbrcgWFd4iWdjHN
+Imwb+/UjYDG9oH5K4Ugd1hkzRWexEiZRgzGQIrCJUZA8vrPwLB2tNqKDUlAY
+RDe5Mkssy0a2MT5gXiuFOPrYt06NWWLLDQJ9OCtLVTIWRjIbOkZSpGeQQlG8
+EgLSKcEKSSTMkokaJaYIFZkhGKXPpCbMiu5jqOWa0UUTOPwZnc6loQUul+ki
+gxMs2+QOauiiAefERRQbZfZ9ZdeCNTubPG439Bn4ooaOiQmMwPf4CxFefBpZ
+AJ2AkMivTzMZntd3oTEEBuY59rz6WE8YAMygTxxuSV39eZPPPQcA0+IcI04D
+4HyOXs9hCyjhsAF0gjXfwWPve8+I8JklkicrzFWOYBNPM0lOk3hq6gMauamM
+JDfX0sJ9iL1dlCGTBYW4biV31BCttNgwWaw5/UqUM0zoikRWaKjUytBzwW3u
+F+TQCYRXXK/As93JO9rQvSBR0cl5BNQIuR7GBsp6dnYYl+KafhiRdvqW6PF3
+nxuminKGiS6ZAeVg76VsHeHNK8LFnv707Gc/u14r9DnYtuF2vNNLZbZ8Fkns
+/lWvelV2/ug1OZOHWs+7TI7f6oYLWW/qyrQ/x5hmOoALWg/aYG/L4dT45xVj
+ZtZ+rt6ydf/yGevtgD3VutOTEuwlFq5e670Y4tBhfAaVdfUe6U4Oe778GHCa
+y7NZiIVvNJhYZe45PII9EXeevjf58lHl/C7AUZ/9/4xK4iPI4VPZlVrp/2VU
+W5Xj9KFRUTrv5ygSGEpuXVa6sanGRFGkh0tWY62wfEuGt9MYUKV2VAoSAYMj
+xpwdKDool5jDf7ABjpqdFU7xEIVQm8qcnHO5nbaOyKcvwZ7MZk+KP3Hi/Fnp
+/doDzyAxF6zyt0VMtrtw3bmOAPQioEZ12diRtpb6gXA57Kyazur63W6/Xhc6
+8ZNQbB78ua0WPXxm24kBYuI28bvMuNXphv4zvDNnBfPYiiC1GJG3gTnw93CX
+uF3yWY9BzK6ZvEKMAkeoSYy95CgdStpwFLoIutRnysXkbZzEgDy8TAFaOkRD
+Szs33oWN/BzsESD7imJ35UVhozBCn+U4DsIvSAng94tQtj12Qgynh+WYBUbj
+fUxi6sKpWW7fVknlcEdKZfQFtBkSBnEBwgOYe/ToWPa+7jzNsSEhTLiUlfI5
+UkPYJd5DgHxTbS4UiCZksnlUXsofhwLqArXBFYma+ChTWquSvP/+6O1tgWNW
+Zjej79yECMtFVQTbk029wuDoaCZ3JkZZKSko6aNSA1RiPKrPq8K03l5///6z
+QIn6ZCGQeKGS93BD1d/bPA7OlB43/hwbosqBzEuNWDUtRZT7di8YT6dzLLXw
+rSAvvYh/aGRueHIyW3rhDtU9NLtcuGU4hzeDzAX5oiOI0Zca37U/ZkT0opf+
+p5Yj4TPVTRmD2rCA3Zu19pp5EhMU22KQrZYMSkSkOARWaSN0znoVSo9mWXCv
+XB45h3tS7t/fQaEUl8KgWARqAZoJja2dU0Pn+nLPoY/aQZfEs+jtcyMyb8Au
++q6tQ8uBcpthmWAUQ1Apt9BQziyurzy0/8wvii8hgwCfjyzIzvSRwBD00Hdx
+pXM0Htiv0iUssUxHKYXrLA24/aJy9Iknx2XxZnHiusMjoc5Cpf1hQtu+SiGU
+axUiPxZEdoofeMgByPOYCI+Ygz/59hzSAyqSmUzMPLreB3top3nqw3md5flu
+12Hy+nIT6aTYOFO87ymhbE1BcEA9oqI0gEdgUqKMqIyBbRBTlp+VKR1rWVBD
+5SlvClmEhY/tFlkiLOpL/zIsMuiTxeZXic1XRVfLWaBsN1sHelpy3Q/FB5hv
+UmCyKum+3RpuWOzQR0RmPTz1VTBQNl1XIOvB8GJundkeX1QKEsgX/Sf7Kuad
+biORaQMOHMjkBwEzzjLw119sKRfe5cI0+gLFSqhnF/lKx/CsMoJB+hFtpR1d
+0C32mAyHKEHLXDbRXDo7iFMeQj9dl4PS5NyABgz5NtPIYXom1Px2x/7MgPS8
+n1/auEwbFMLKBHNgkzV2DCW2TYO5Gc7sdLOUZkijxFpmR3irAqotd7hm4CJ/
+Qa5CRSkNPsmcNadXQhNoYLuu+gbEwQ9Qr3ZgP9yaWRiZ5IPv3Z8Gs6mZEqBz
+W+7awzBibftccVsfvJGs8Gx/B9rjIB0UZcn+5MhOzjky1pKfGRotq8f9rEFO
+UVy/fczYGnSL7wkImesZGtkp5BDHkMkMcp+MKI6LpfZOSTq01+n6W+VWXmXd
+vIDKE9QSGuGuKSCAQGMBAk+SexTpBgHS3mozEERr+bj1pGKBc6cZc1bAoHl6
+r2eLdSFdTremqbL1PILZ+nqOt7l8EIm5HfKXGSas9hk/ASIQrjQCYKhNDs9m
+QpTXz/inWxMHPeMz2qfkGMBItk1Q28iSRfstzp/a9nGI3OO5JnlZUzceHoIH
+328UuXqI2uwKcsCPmlBO/GIJPidaGoRDfmYRImBFAAY3LvjeqDMiCFKGMyle
+l2qGYqRQ8F6FeugapW2dQR8ceZC7fAhfZIiPfqavZEDn6CZPziSYrEIbRSEz
+Hh9FTLrey3puCnC5IzI+/sEYy0vGEUFu3IUpetf6S1/60ov9Z0TgRpZP+0px
+OeccEgC6lnO3B+0+o+Tr0hKOU8FpvVOYIHyGJ+Nk/+3qyz7bZyIWTJ2HaG57
+9pQfRSh36M+og+msy48AJm495uxqmJnbkqL1AjEAOE9v2C5cleBIZkKsLsV1
+RF4R8raD5OTQ7fV+1SjWughb1chUkzN5Av5k10djT4qXg2gP3751bF5h2xO0
+aRkWUNmfXO5Z1rvgDhhv3zs/LJbz9h8AFi74HgdHuKghXHxRO9svRdvO9V+X
+mZt8YfnbkuXdiAKAthGCvqwQJhNooE3vUyZwuNxDrfAAynK6KvdVyrAtor55
+SAhOoD7X+cAQusWgs+Waa1JMFAL0qT1jhHomD71TJsVGa5vNgrPOTMXCeHa2
+pgv64FKK4WE2ciiQpaFZE5fTcqh8YXu+SmXx2W/bYO8wwgQjaZ2cB7gavNc9
++ZkDixmQD4jCCQjJ+m18MRILNmVN2mJF/D4ZLzdDeE0Z1LGKRxfyktJlJTXF
+IwPfH5v09xrWfO6lZhPK6CT4d3FLWs6J706GXvcW5CqyeVfttr0QrXskHJXs
+ISVSyw1LdFNwBsLoem5Wo6+kyiQyB7kPTk4Oq4QuqKeHOaMLHqQS5n1KyLPJ
+fMx4VL9nWmTUncSR2Qs4hjIBs9w1GWVjNmoo2V3rdzzWJbFqSxTA6VFSIkVS
+jv+eN8BvQaCPofG8uuroUCgGWx8f5J4IIEfNtabSBwRz7kz9LRfKrkWQaLjW
+CTsHEosZAF9u2fYYILylMDn3TMCWmyKD9JghuTMxsqIZ0vYnMm5HBHpfYlzW
+lnN1GV5yYIkEEvBS3Ffe6g6H9c63+9Kw2RnTF/hasZvOhHuIQ2QpQz7Golz8
+umRQPsbB/enWVw+NtfhJWk0P9MzZCcnohFxarUE+qhcQBw3oBzWldkXFCiD9
+HFy7EEkajKSaX88RT3Vre/3iAIWuYI02GH1fSjJTXWAgEDQ54TMuyRRzrppL
+zKR9kEo7ZQNKwopS+72a23xm9oOXQWYUbFK3lqdnFHTDJJqIpVDzuh4idFzX
+6SkHG0GWJ/kbm2DeOYGds9Q82WeRFXOfSw9PzUFge9+XM5ijNlGxVb4mvm7k
+m6+kMlXgmoO2GCmfxsFLOPaTBnOHQi5Y30vj2Dxhgpov1TKWhnQnHG+E3G4g
+FUuiTtn0Sjg0EIDm3JRetjsm1lmUKBJloIR3hfa90WXeYW+Q2FptHxm3A5/O
+CsI5Xl0CW1yXk4hqRqqzLMncLiHMuSYexJI8B8AWJUgJGwXjIIGLYnn0fdFz
+4svRKfksh3Gs8T5YzNabbMUWbeSwg/Vulqw8u9OtCEdkbuP0+DafwaAbbCfh
+OJXjqHIR9EwUjw505UKNtasEhZgH29nza5bU8185gEvdKRcEhmjT+z3vm/1s
+WddlzORm7fPRNhW6jBrhEE1UZMAfegF6QBBo1FWOyQVD+EpvmBoxmeks/YgN
+SB2gFDtgTeBGhaOv7D0ynPfpAQXM325uKVNLYGgaykx0ZfM732ABgjKxZs2U
+lNHmGmQmxML8mTtBePE1bOnzxElhmpJckn73ETyZ7QSLuRqpBBYh8dkmtKxN
+zN0KnK49Lrym1mhf+ZrQZBjcXconZrMLp6NBPuJy+uy7MXLxJVsDpsrA0U92
+6fN9gHN0Xsq4bF3bSglXJ58fTeI/hvFJgm/m4FWUkYfvEh9I46xxDhQs8X5O
+7d9n5lt4pQlGOO/13mYn+qSNucuW3SoLZVciN07U0kAU2Y+a3aWQg9ozpWTJ
+utgfKLEdyux9ippD65kWESm0mjiizPvFydtZGzAeF5ZV0bQqezRXnMeMYCrM
+Y+nspKKSHE8F16iOs4yPdHoOOjst67MVzg4UJ1amhe9MkC0IqlFL1wQx+8Tm
+2ACLXLK1zFZgCgPfvrQxjJWyFSYnZgKmGOJQ7N7km6W0BtpViIkXsIJeljLO
+EDaJD4hjuRIS8YUze1YvTS4UsJxgPpYT0WsIWNiQZc0IMxbQQd2hFl5YUkIj
+zGnikWgMq7mtBI0+d3ZPlqKINfI3j9SsqEmJhnJQqpyijhc5kyd8pAx9FMwc
+EEfEM/bNzFl5n9OU/MdyjEDcTIo1iqAThM+iFA9VLAsJUbiVi7v9hzDQY1wh
+SikL0fsl3BtEGYCZq+XGeMQYJ03lCM10qtwbVwntplXs2w5UTIeBpXRxSnSV
+3hGX/1hd8TbHLhIDNVzLxLns49CdW1cPQ8ETU6aZL5HgcoXCM2E3qRkFyMAB
+8KEkwmn7rEYXNeX6e8HQvD2OnfqaJI9yAKkKhbexnBsoAeMwINMBRECYppcS
+p9LkcmGZZWYQWemcnkR1cF6snrthykDSE5wxFqqSFRU0GXONO5/1dMcth0VB
+m1gSLSoOpY7KrgET8ONRQXLBS1bLsEFIsZtx4LUjMEnFl9GxMPynVSk80Cj8
+p20etBlaDsiLuy0RZ5krshPACpmpfDmQLaG7bkiVaIAQ7wYeoXuibahhGikL
+MBgVqki8LzIdn8M/jJdL5fQhykX/6bwww9/LttO1CA2faEduj0FKxG2w8u6c
+p4A8jiC3ruaoK6T3FVRZD3Xn5rOmBPT7TWQnB8VMywhYSW5q5FsSMTDDHMc9
+k6ntkO+cz8/4xeOMWYmvBptVRSTLMngnRPs6fEtYgFcGW4Y9z8UnQes/eFqi
+wqteVd5FhqvnyXEGjwyZI9kk1PAZDTK6rGckL7hAkzGv+B/x4K1ZQWjCGkUj
+pc7pjTdEcTJf0hbTJgoRfNEEkYbkwkPSmkE5MZWIDi222e4SpeECRMsL+A1h
+LGmwQtLxWTm9eaarHvkTrdb7meCBGrw6YwE6bKxPxOlFAmeG72TIiBKXQhuP
+MYMWeldd39QsARE5TxkeoKoCtG3e7qrReg4poDp9s/Rwr4r8lgcbHPBKwRn6
+ULHlxt+cFmzSLeea9YFMA/x9Xc89k9/Z41Uj7mNT+MFQqB79EjWRrbMhyJ5a
+0hES6hravm6xTfH6ilXFXRFZDwQzflolcrQwJx7PQHOQqf963/KIloJrSl99
+QOech8sEBCDCbnoBwfd3dpybJy8q63gEG76vfWKOr+6fc0p25n9SKfZvMWlL
+ui8N3lCQ3IzNNgT0jbyD5yhR8o0NQVDazj7NOK6b7XJO3Y3NLTLKVBRo2C9c
+uzRAXzu56kNyY9VE0naWIiUg41gU1crUzP5Mmy0CTzn/hlVg2x2sao6ASkxv
+TVCZ/JnmPT/GP1jB6xYr26uhjMw9Z2yyKna9SWIbGZNCCS3KCQK5KjZr33SX
+zScdwg6lp704btY60yro8LmQLefI813kvK8HnByex3wubyHkg1zWUO83TW93
+Y4MrfYT79EPfuLxPno4OC0lhIBMmuE0bnFyUfkXyxskCxQPaFsnupy+ODdqg
+Mqkuqb4AN6n+ZcLRUy7BocmwvUYX4fAgfBzmMFWGAnjMPa3Hs5rxREiEo1lx
+jiym14McZCZNdwywD2UYkEFNc6wR5tyx24FgcBBEMAFLuLbK/NWDnkxjZkJc
+vxgjjdG3d/UHS7yvL9/hcqzsKWMN78Q2eItZ1U0MCAgSJ7P3Z3CTq0b0kgNl
+56TduaF1tA2z+AuSoy3sjDbk+npTMWN2bWsth4LhefG4BZXpSZyxCo2XsFzL
+hoFSm9MtKBWsZYJ2xELoqFj0IFdGWl3vHHQesbQxN0BxoqIDyzrt3bDIK6sJ
+BHRM3Sv4zCizEhvvccRQOVeGsJQaIQW7Fgsi3hRdVsQYorWIQqIlosvyM0BC
+GXFDzRDv8VkdZW2C1jAp35VUzOB2K9JSzL6h/romivzpnfHo1E6xtEhfc1EW
+J2C8lauFqEzQaVUknfC5OD+boCik/JV935gae/mIEAW4QRa6CxUvkzDxCMk8
+yO9jaFJ/YB5KPxanSb9JGMvhE/6aEUCbBR8XukPDtd61NytH4ppZSyP7NPzE
+3NvLujgi0VcxMGvDUSHqh5TCCbtEM8EEQyyBIBqoK+oqagJgiJHDCXZJDRek
+SgLfrMzL4ej00SD3BZhtH30K58IvTppmZBEPqsvmc3SIiKIXdoyaj3WA9Xqo
+yeXvxEjPiIubMKA7LHCazT31eQjJQXn+Fbz1pPQgxL+WN9QgbnNYvDrLPi2P
+LRllaicaNBJeECc6mA71oY0csulKnYL34sx6zXiqsVnigi7D0hyoeI3XeI2h
+2PuzeLZ7+8AX2g3dRGQxMcfbwnyYid+d8/dxV9v18WBNPEuGkGgu3zoxtGM9
+MB6ElO3EpVKS3HeeJTuAS+hEfeldH5iXatF6HlCWK3NIgkQKhUX2DMxLe7ci
+KGzK03cIhojcfrwnYluLhZtZ4AM9KcZ6GMoVbvaLeNm2nQFeAfyst7Ar4oXP
+Cez1hGbWa9k99Uqi6G+lKTlSig9LEojvVExKJY/MWNkF/8tm4IdJvAoykpmY
+IRELcbnVeqSIgcyDfjMPe6sq0AzPRbEd6U5nTJKMEyHyRsfpZHUDnTNGCIlY
+3Cu1TW90SG4j9FeKaBrTG0DKyQDZViFjoEuGJ4TEpeJ/ll0zbx+RMkzFkV5P
+nKvoxc6myQScnL1F6FnPTrGpmd8StTEvXILixsMhGwcfwloV7rKCgPbwXjg7
+L3XdLuro9Q0HK9JY7BERE7vATdqUSZVslVntDLud7JJwXBBc/IvYKRkUxjtQ
+CRhKzXPAmiRVSG3vhJ1jvUHwmqafd0YQ/Pqf3Fi/WaKVz9nXbHiPeMQj0mdm
+mQEjoCKEaiF98pr0Xp8YTq/mWcDbgX76FA/Nyzznqh/+NRFMqUsEpSsRiMTl
+eHOUoHhvLlApmdIRXAVZB9cszVF9IFhgmONoBYOcz/aljWz7j/qzkVXYXVVM
+v7F7y3aN7KoGO72N+NDRM1InNii044/Ke+ZCayHzej9nIUFXoLYqLdNobRwU
+QmOV+fBdwo6huubP5L1FVi6tNv40LcCzFm27JeMgp3LCFaYCL3lCtRcWt9/P
+cWqws4v4oxYTadCyknIEJU4iEa8vZ41fibMQwRQbIWKJELNU6879Z3Rjdmbe
+/HkWAU4MFJZhEWMqHRWdj+BmLGmOt6LE9gtJH3XneIkcgZGJEDNoKaGIcXzP
+SPgb69rKg6X6xv4T2Oo3N8fuD0XeJuayiSWHe0tClFds3rGZZ38b49F5YgY1
+7gLguqwlk0kexizr6D0N6wQRZcdHBiDTp2qqA0VpSiC0laGJsgCXvE/rIt31
+1tOI6nj/X3ydI8iomhW3m5zOj67FJIDUxivpbtLphMWpb/Ti73mmHaCEfsA3
+8uI8IAsBiyLWe9QI3B40awpv7u/nCDB9A2Jn4BxZ/pYCb680m30DeZbqPJ/0
+DaF5IHKnxetVrVDPdnyO7ZCQtgO1c0dkwJ6QctpzZl/hG9uR75n14qzLj+ag
+dVJRJsyp9a66yWzrKpUTbUbrmVTF6ZtbF5bDA2dlhpthqXPJ4aakZq8dMZ0b
+H3LhRO48N7DCzrAA3cSs8HbLlYnI8GVdOXc0tQCEmYInvazVpx3iGI/4pXP9
+HCzCx8sFKcFlTKcffeDynDoMIbsJM9vMlEyCbPvSgaGPdLbwJKKnxuKa3DRX
+se90wCvzX7MJDwYwTDGNMmm1EQhgt9ae0pbMXwHnrIUMn8BHj3+GH0pvFhsr
+IWc2j38BvblaoM9rjzIzupxjGWmhKOHGurksazHSHWFz6xSheZykDe8UdOUa
+UkiDnbcMnprLngmbKw37O2IL9CVONQaRfHn+gyzvuhJrlYbFrEyIyXBo5SQy
+VuUEGeTeFLbFMigA5FEGQXff1TjHyh5E1e6BCWv5H0GQqFt3vGBpQroTkSkV
+r90xp9zEmO7YE9thHPlebmLwW88jbIHNublUAkP4BqOifxiV5U9cHxMsszzR
+oo3bVX7Feq8p/FXANzcWruFn2VQGwsPkCrkHLs3RG97d3yRgKbOd7+aAgpqm
+nUmlvhmbmCr7FBNAAUGauf9sK5151VaLwvZcLmD8mVvTlJ6ltSA3PZOWiqhA
+txxfer71/aNHRxiQJCE9i41FEDxDIcUhAZwfviQ7tz2MGRGK2mIGUwiqBjZT
+CIpszYkUCKzlP/ILmgpj9gX3W8WYF/tjqsM+vD7nz7cxicIVwnJxO0ON3/c4
+yi/N5KgRvqKMer3TJZdP5rOs091OAtxepwvCUc634oS7t3YTRjuy8cDJUsRU
+jDKrqBBYLaaD9cqq1dDQB8PSqchDJc7hIgXsh+RxdDScM2+zqsBw4h2ADH2D
+4zj1hCc8IfmzoAjZmQ31mH2hO/IJkVCC0nmZ5LEBkEIyEV5ZeERB4Gox+HWf
+/oxy5Pawq5chWqS2vyR1i+Ta7CYOs+rsSMz3dK2kJ2rMPWtwqI/rmDdAKUXm
+lqy8u17Je2J593B8vS2XYLf23Davk//gqfUKgtnyyqlQgjDZhtTQYTsWkhW7
+MxfJf5t4wIis9zAlIKR15I2sa6b1G27knoxlHb1MVdnXb/fpjkE1wRkq5MKu
+0pYEDuv9YesqocP3cm9GIaxVhyjcDCPW3a85yZ7OMhSmCKElrKWra4+Hz9nc
+DsTGMC49YVnWcK187wsux2+93OlSk8n4RTygVgAoGOwCz0yLiFfBitnCD3s0
+yiMmTmESzvhOSmeyOCakwONv+ztTtumd3P5+nyaDZBRbOA5QpvaUufq0xTNI
+0U3cxJHjiLDJ4TDSAN/PRniVZ7OnNFFY5nvVT676wRROFnR0sWbGRdAW6Tzn
+3Q8zDLhmPytL5quEUc94xjMmw4ywD8YdD0rKaWfyA88d5uPaTMGdnohyX03Z
+bldSkF5XFnG8qpcwsajNZQ4COFYKEbKwv1xe2Mb3Ag/hY0SGlWLB3MIiC4ko
+xDo0PvdJiAcNeH8N3HYDJ/vyvoqcICcKyEsx8v0tDTPc5v5ymUq0gaHhoWN5
+wj+fmQfIiUgc4OMf//jM8qk8KVyLSulkdtTzdckllJsuv+bQSCCrcKusLYs2
+MuWdVUm9czbr55VYQI+xVmqUOqWOARYhVmIeDylYSn4HIGjQdf0KAWlFklWd
+piWVMB+LmIuxdz3MMw5GNCJmPNMUQxQGmWsDhBTzis1jwyBBPikWgKb2zk0d
+5v4WErA5HC4B58rHJGc6vX4xNVqbKzNEmomZc2SY/DAOilCTbyVDkn4ya78l
+x1SFyyKIOKA+DTGzvpphU6hkFI2omR8CgcoKsImm0sZ4VBMLQg36UjxPMrQG
++cFv1aqEj7EtIKxJqR0Y7HP84rU4UlCGL8udrujtlVyzJZ5egAfZMuM6Wzo6
+LEpcb/S58lU9wK4nMXu511aMbQjbokvaJu4MisvHaH25ohubOVwNFyna6Izw
+iqlODpRQRXdcJBdEkUxolku6upvTK8l2cehQkUnzWaoS4+I/YZZuWBK2FEMz
+bEqWtcCZjM98lTA990/e5fDYudocjebJLU2IrdAqK8DgTa6CMv3G0nrV9xWL
+Szf2Zww353td6LbAaJ8FMbw8HQQoZLyC9uW3wYLQ3p41zSAnVa/tQx9GK9/L
+bmD9OSg97WPm5bfIklMSnFtWLm0XByYUWBe+9EVR/fXtvmnWZ+JNKXetR67s
+ycQKJOBwDN/whB9HBt5v5RHkrGe1r+zMORq+t26GgZNRCt4peeulhY5cA5w7
+jXPkHyugKDRA/kPl+UqqPM/fu9KZIRv4ZJOdR2QaMpIPO3X20kJasvrLuJ2F
+9n67Zzcv3MdZoUlP08wA+dacPTPyEULWDRMQCyqmy6nZeY/2yCgpnpmnFWTq
+M7uIMJfw6X7ZQO5LkJRcfsEtK8rE2ebxrh85liZQY0TiDeUN7kawkQ352qPy
+4b/QM+e1qFXnBlf1y3n39lYm67MgJxkwNplGV3xeZ/xzYlY2GG5uZS+DulId
+/6blM1tHreE/0tZC+orFosBsm4b4Nu7ABtisedt3FebFHyTN3goHowBAqS/7
+m4rCdLFasXy9EahPQGpluzgiLgvm2F/4ahMJ6fbpBcOzyl5Um7I0w5aC9E+/
+k9mm/2Cyzc/NvIe1sWXWTXhfenz0f2XaqQEkpObrmTimGZSrXs8sBwIkS5n/
+YWhHMMye+1ODXYxKnTxLP8Gasb3sZS9bAwbQsV+PcXREe33qdCPlxaE+XDhi
+U7IXz+fGtlSTsVNJ0PoAz7YoCEmnBzs5aqJDNXtH2sreeG58ylaXBNC91Xxh
+1sEbjn9OjrQiJbPAS+8Tb0ncOPiHj6wkfBVKSIaxIEOgfNpDks8YtOlgK1/U
+qLNKVqYsa2B58hSFMtbnfXTkjmTRcLBGu3EcYXfmcTiYG5pWaNCHqM7Sad94
+N/rIWQPMlbiyOkIkzsujFdblXfQp5IpE/cx50i/9QH/99H6MSau+coPQ9f0Z
+UefAwE5gH94iADa0hK3SRV10lWXiASfYu46mU8I+8eR+MdGZ0Q1NwcKs1icG
+0L1M2hwZwHJpXq7oIU1FQeAWqVBGGCnkI31SQSJy2QePuR4MIvjkIbJknsJC
+PhIpzIjghIogtQKdeYgEqDUazAzl0iIKAa5iO0jrI0kmJygc89xvXLswEFJy
+zM68gxRCIUjCJzjDoQQEyQhK8ZM/018kmSRJNJvrMXGjyLlxE+MbtRiNn/FZ
+4wFNlAHBM5zNnhcDY5zrxWP4bo2hlZabBp2eK9TxM7vlc/aJPpyXGJFDQkUl
+1uM9kaWrd4AGFwCji+Gnxi2N24mMDEmRycpfWX6RcLL/nNKe2d1Mq85FDhvq
+Qa/98R9bqUGV2RLVTKNxHgj13UKydaqkr1Sd9LNI+Sz90hRgU82UlhIgB1BU
+hUDQbNkPVZW9imSL/lML/bDKehctKMjOdUjzTDbDoNtc6dw8cNWIXNcrh03l
+Zl24hlObyMGElASYIXEeEnh40dLtF8bls+PdnfhI5QTzsuYERlLZWJlHe0SW
+c7095VJyW7GtS/4Msk+O/29TgGquJviNxKRkafv2522np0xjf1vxiXmMNJGp
+5Ui255ah0wMQKb9QOxuiiS7Vuv3d3seHjZF+VqW59jaXIlsuAcmKhEmtNlKM
+UQdTAS4mnBp/PjuotS8lYlGOiwiwHxwouIisb3tY0IxGeQhYzT07x8dgZLyI
+MY/CiWdREi/IA1KGdSG/wXRhan63L7YdDjlSp6Aogp/760avGXHlcpnlYF5u
+NMtZufoj/WyB91BA9oFWc+tK6AlCEhy5EHKrXl0cwMfb+r5DE9cVnL2WcVZv
+4RPvmHPLNlqvXg95muOX96r7rOcR0ch1TySpKOfouyxvvT8X3sPbGurZppTs
+oKRvq8El/sANuo/SSAB887m0FPT3WqaHNCNMhGUeLg6JxxB5mS650AIT6OZo
+6ZgkonUnft7Pwp8awlq3/muPlwDWc43xllCRN08RmNSFz8TTKaT7ntyF267v
+phfiXXvJ8YZUo9QgvdBIVrnWKVdMSQ4Hpvr+1tkzwnkdrrSYcRnr1MszF/vY
+/szQ+0LZg7frz+hrFr4+/HATudbCDOeDFkL4VVFMmqBSPjOT885rE8dG7U3s
+JTAvS9pqOdv5ulwRpJdQOG3kbftvYhrq428MpGC0r7KdhNFR645snMlMOK/O
+XiGGJhwPXbb+Nv1nJkHRuFVmwZ0XQ99pa/ih3bBGjHC3288rUd/Wq+kb6VtP
+L8/7B+G1+pTKvqkyY8p8MqYLL8w2rLd9AiOzBqm1MOr1UHaqoG/HD6XQxcFZ
+52FBOXS1/z79MDH9mGdbzyEhYNWCfE8f2WWUMeknC4p7yXXu50OmmGOPp1vk
+C4f2ldgTQ+mlqbxcLoMpHcxJoXIokpUBk7pd9wmkaQTnrn4QbijIApDVhnTJ
+72S9rFHkvD6OV2DwuMc9Ll3mmkxdWk5eUevskhqYMdJcGAOlc+PfOsnZ6dvl
+jKEbZLFe3AWbBG7wKbeZ46vv5WZ0gbPyLLme65Ewb86Broj1RUPlCBJcgzIZ
+CygLtRSaysH4dI9huYb4qqV7DI/jVr1RptdWuiczPoP6MwPTkcWhdI9yI1Bc
+T/egEHPhwzplKdFamPWYpoJorE/Js14em8O1zfT1BrUR4QoHCyMjTgtrGLa6
+KW0hulAIhSwFsoA5FHIv7tNaL4zk3KiCAD5alNsnPBw6sgql0y0spf9MTre0
+KN3KHnon3uwWKfzldrjE9hmUxkA8P8SY7QQZMft2tV5pb33mvtc+vm6aF2gj
+RvtFzD1T3uc///mRIHTXjHzUz+aGnvKUp6zXPkvbLUgMoVm8Xq1WzxU61WcQ
+H36th7IzZgV/M6GkK5ouN56eczU3tWaQJoyKyBgaL575nTg0yMYCSqVnz35X
+ZnIe12W6o2WrGQXAohI1IXb5xCc+8SCrdwEYlwVK2LbMIas56VrvAxpCBhfQ
+SSSX+TQoR4EoR2XQQSG3MuC2LhMB03q38QaT4akEiANiPDxhuuam8TS7FiR/
+Ajm2n67pHIP0eWWxEY/apo+q62KSa6GPjpC/ZxiyBzF6xLeJite9rPIoEqZ2
+OaUF7838NkwMOPAeiYei3P1GjSsUDEXSBOLcLfhozVBfhHeQW4+sXekbmAeg
+MaiXvvSlaR2/BMikXciS1rHQeNfWrQbvC+YuH69xML2SyPy6JJeP4QGzak0c
+JuVkNyzAFo0CnRhGqsgAIZTwG3RBVJ6mgY98ZR2niJq/oIuqqAyjQDxNC+9M
+Ha6LaUUi/MN60rNiCsqWQT62hQV4s+PBwwlyD2LQe7X6sXZqSatpvjAjxrdm
+rTE+Zq9YstYr5BxZI3qXbpcty9K4JWoNWke7R/ZLnbZoTLnF7ExaywEiy4AG
+Cf8ft+D+bz//QxNnENyyeVexosX691y/cmJYO33KqV6UpRSkb0xMKVqFhTlo
+pKKax/XHAnoBtI+f97znvXN3SxbmG/gECFsO7/IrGFMh2avx2VG5SzoIAbTq
+lKOe8ppXMxHJNhV19fheLiDyiOJyqZAoE2JwqBCZr5AyZl+slZkcaZnUA5us
+W6+pPTa4kqBknPhTmNCD9Ihv6OZ+b/R1I2lku5JGkwY8fq7jTUUP36AO3Qen
+HALz8X2JJWXyHRMMFDkXsWYqaU/iiRH4ZF2LBxeLU9G0HBS6Xz137Szq5KHH
+fXXE+D3bvlVdWL6pFv+qMJnV4suYo+ULJePLxKvCkCmhiJfrAj1sgV/hLCwJ
+ynU+NNHnYDg32VKTXDjpQQ1GeQSD1h7QXrmTeh3tFQIAEFEeP6/cp2oYBkrH
+O8aatIHxrFTUn6IJVaHzfT3GaHs/M3rdSE4EWd7N6gWfUS+0SIDQIj7jkQjZ
+ChYRJAEKvPAkFziImELjwpcpZEpEZfMwn/IrETL3TSDq5MeaRAFrh+pTL7gi
+vgUsczn+zu/6mciy9d7Q6CMWAD1TBCLbXlIVt65myWnYYJ6VWKnR+OzwPavn
+R7PqKKSdLaqcKynhtL+Z6uNd4PTerK4Zvs9EUR6YZQEMYzZ0FTJehjYopolm
+ujo2dNmcnrW3VlPl9hipiL6NgdTlCaH/1ter3jyydSGMNtWkBAE0uk+GHrYm
+AOVn+qidQSu4YBW0L7NGNAX7vUOLVG3hJTtTGcI/9IMD4ZUHEhUwRlGUcQ9f
+lXpidJH7Aj2MoLAwJUrCF6iyPxRCheg0SRhJHtSDUSMETLnJmp4rBgl2c6sq
+qJZm5oozhQln1F6mMEkVFYT8XOHSq1GYS0NglAJ0YKCHeSMTGWpY8h1rWwky
+hXMPky6FmSe9UhiYyrTdfEdhVHY9zFviwi3L2giCSRsyxI/CUADBFkGwjQLG
+V6Mw27URFIafYO4KANgp3s0htTYc8XagB5wJXkAOhQJVlJPS8ITEweMpIog8
+veO77FryZcERO/ZOeNV3dM6l4CCIGIVq+LWf6D4xtGnVHoo7tef0cF1Yg9Wc
+JwebyrzZvxLLFB3tIWLkIoGt+d3wDcd72OBf/ggEYZHfIaVDcw9pz7YhnNsS
+l4MC6X5x6UwL2NrFnO9NkLyWUFd8jUmsSBiBQXQ3VFe8Pkv4FMtsDVyG2YXN
+U4HUYDltVEIjs11wmVCNpNfWjRgifsrfFaCyE5G1e5fCipIEukXrNoQbRpoQ
+nfT4mZwzrNzWSe/pTU6gJZTUxbgP3BF/cBNIqm5qGGavLgxdNwyzhyJ9NmGC
+Tc6mRidaYiPYlQC33GnWV+tOhpNDqvq45uxpNKchPMiZW6wJ1aWhc/oApSy7
+K4mjuoBqYEIwFQhMNSJIgkAx1eA6RLQJTTyiKFhIQMoyJkoEE5hswvcyNcJM
+e+PEF3yvnKSwb5sCvc0QH9VR0KCwqOOu2SVYI1p5bu627R3b014YBYxAHSeB
+Ypmndgomo038Gz3PnXxQmWYxWe5WdOM1IgBDSCEaWXu0SRtGkgMX7eAod76N
+5J4D4GkB7aCgKMAjr+Ez1CBpblz3zDRXThAz6rlNo/G+8pgapfeMHLpJn0Qf
+KiLa90AfqMzJYK5pTW3TRLUcwyAfha37NDu4/5zgB1qU7Uzn6sM4TJoI6vqa
+qeE+Dbt04WCFJ+GD99HMQkhTJVp4Uqg39YrrltMnpBAt0VMoS8IgjivnFBl4
+rq1JurjfbTH1ilJgdR7KUunIJo3zc3uAZJFPAIyZZeWb1Kp7K9I89S2wlGOR
+smV3f+Pr1QNMM43qMVrbKjKtJLsXYOTaPxqRyTHt8q3F+Sw2Xsrr88wJXWNG
+Hu7jWc96VkamB94WsAJOVOZ2E+CrDpcAm1vYZ/bbHaCSY4mW9ywHyFoG7UKw
+TPgYKa+cjWvAXGBiZOQIyZYTs4FkDhhPLp7Dz/22nb5yZsiNnwBZRGzyuLeP
+TSaVWmTl4TpB2FekFMXmgY/PVDHPXoZnBvRDrWS0ZJDjD3TBKov69Q6lULpO
+7WUNaM/4RvnoL8RKyCnKKqlfXN60QtR6nVQ+1pPzM5kDyJiOQeUIFDAth8kM
+qBS70ChNi8OovSN5X13TAgDxkcO/c/aGWCNlsBx/UCiTjJzRglGTaYfGu50R
+yeETmBhXOsFHiHRCmYgo6782Wz01r6bPk8Ote69kdAe/siY0p8cwHN0wZAGb
+iKW+k96yIHD2dmR/iuyxWfPQTyll+gGzh4+z2xZym53P0h8+6pnPfOZ9egSc
+wnpzbvaJMdJKPKI/2JmjZ/rux2u6AyoEV0V/Iki4XTaVXQjeFOiK5auFbSvI
++dEYJ2OGNjsueOwceRbNwzYrHQgtBXBD8V56hNCFwOtmQBkvV1rMSY96EZH6
+UybEMd/vesx2PgSrrDh2LrfhkrEwBeJxqXqudCtn49JlwU7BzkE4JlQRFDvd
+Y9UDzC1Dzdz7dQubFhlkLAnT+fbnPve5t7S+rvcTozuXguyvNNoqOXxrNmgf
+2u552KiydxPIMwHZYwWL6S347hFBifV4USXy9Mbn8HQ5MUhvRcHt+s/EiXkB
+13b2d10Y08s6ZrGMbMiFrk/A3FLS1FhgLWwtB9VXWebAcZG4WFJhOscPCDiE
+wLnaPaeyg9Fx0P5ul0tg4R0/4quWJNzSzRIHY6IbaVZ5QcLqX6qHseIgvqWC
+/zQLnNGqWcwC5uvBiZFF7psFNQp/+1ngbYuuXBmKlbMP76G1BTQ4KMGHQKUh
+1x9mCWQVrymyb7SfGzEPvOtly4MCsQxRKc0Zv4idMysZhTbDpAAmudMUejl/
+oXO8DcVh5JrLMazqTkX7I7spX80OypgJVOM6Kq45yHFEvidwRbGoQHeplfZF
+XA9vgeQuyzzZfEko84ieM4MgrYmAUivGA62yF2pRnEyrWc20GOkYT1c6t1bP
+DnQgixVRcmNkdud1FHLwyBar0ACbYN9y3Q2NURbY5qM2orPDhxahSHcpUeiu
+r43q+bxxnWBFKxic+5iia7mEV3KSFvyLsX0zXDqlV2iPy2ZIimQ4B2VgcRH0
+sO4th2pxx7lGJuda2B+dYC5Bd1cx0xtuiGgjE0MV42M2reAN6utv3FxixbkZ
+PHZCpUGi8ZbiBDpgEi8vOkQ7cywfl70oRMYL81biUzWDQ+eObnCscawuRm6m
+ddvxa44GJpFIg6JSpSBOVreChtS62IjYXgHJ5Lnk0PcRx3f72VxPNi/7PnRj
+6MXdkEBGRIcMOX26I4j1qjIaDr91n88UBpUOkJANvnQ0cIUM5eqQIL7UPXOv
+fu/XksBx8nX88LqxMOdclr4GsUSnfHGWSGupLDnbvUMwewOriKpWG9C2ebWr
+5iWv9McwxXegkCPMmXzJP3LRkhSJKtfwthBwi0ToW+751KyijdcTgVPf7BPY
+z/eeGIbCRJN5Ue1KtbNMs+e4xjzEtU21dIOgchcF7mAH1Qa1jCvNAQ5dQzOj
+rOZDNSp9FNPVrK64lvWQIwaGameoxBUZLYtKxWS7mnAjmcthuHB1I/nsvO+V
+BeoT5Kmt5gx4tiQz5qriKZnk5fvUCauPxJ24Th9VC3JbNv1V+xTvZWOnIrwq
+kAhM9m8dyiFdODtkuwbirE4Az9JySQYnt11R6w60Y6MIQeWdnVRYmwWB4ldy
+Nf2aw39xMvdvqE30fOPghJrGfh39hQG00DHTBTjBaasrETi/Q1KSILUldcey
+xp7pnTfJnB9aoaiA5cZAtMZAe3JbhzUuiJJxmofOfcrgAMyJlMoGTvU44Jda
+iFe8muOUKKM6y35S6uKQlO+wi6zK060VGkDMOCRvKt3GIZnhsvbn6l+aBwTm
+4RqMXZYGHGEpJMp9O8yXe8ND/+5vUdm2RnB5crLc7chHCOkAbzm5fBU+ijn2
+SxVOzH2yNEIzvUkk6ZigQcYr6syG22qi1SzbiKkYLQZ1hQ0xKOGfJCSXTF26
+dGku1RZP972d27EB1VkmDET10koxUdF6sm/GwV0fnTx5spvZCns4QJMMjXDh
+vH/hdB/Zf2Tc3rVdu83rE57yjfCCZ2qgzQaNdbnCeoALawdG9WqQXLKtjEWc
+1XrwQsUEvdvA/P/YvC+dry3jCicEVvnq8WWoirX7NfRnhoRya6SsEffoPoUR
+Q/AI49iObahZ6cPhepU+4EZPEGeo6zrfiDMXxPXlC7niksiULcBurkVleL6a
+HWc4JHmIG2egubfbHHuKLGviHFZya9rq+wgTnmhaiJsrznVZUHmxkVIrIC09
+Grda9t7eelwX5x1q6/4HWuBnqguSiF6kY+kblNHsdm6xmvDJuZdLRATiREfa
+BcynerWX79Bf1WVwRjlJTSVf+0SATG50uYCPmeQckqTLfFT2Qp9ss2Jt0j3F
+aojhbKyLPURDYIk5lt3DdjEPqdCX3/KuIUK93sTT5J8coRbUoYDKWaZcgK7v
+jPV/7WfJS4jGXM0IUORkeB5xMaU07HWRj3FefjoMVOtMa46TxfG5vcRu1LSi
+ohBaNCLAWc7Gz6W22yq1/WfI20qImw8BGcJzQ2RHgppckoJdkJB/AeRc+P46
+5e1MxmWz9GCt+K6c31RlpANvmjSX858YuN5bUQcYU4DS3yxwVFrlDj0YbrKo
+2H1Iiy8MJJWIi5ByUn6uu2c+cV5YDNskBtVh/Dhp5CagoDytQRc/xZ5o2Dwb
+7/jEA2Tn2MsTy5AUJhk5OzLxVc1caGL1BLP7UP1BGIbmSOe+HHH0iFhmUk0G
+JnyMYGsGcuahmAYGwHIw5Pfid3IRPWlVDF2QHjpJ3FQLhRS4+7lsMOgexZEL
+FQciR/GSN/ro6KhZkqjC06lmvpKFeZn/oNHm0TgJoMNqcKF3tM3LkTlgqgbe
+xRwiUZTszwXalk+LTvuujqH5gGU9s53Vi7F8z7+iwop6W4Fylbi3MwfiwWCu
+mu2WqDMglf0cqpySMyI7kzvI2c1ZpQBeBEJWAiVjoYOEIc+RUQsWyyYuNiX0
+fz1fAJAq4vS9sKGE7LKrO5TkXKs9JSeGA1JsIx5eg6KV1HJuDjWmwub79SIy
+q1QklT9/7irUFCor5PLWC9V8j+1B8Hm543ZCG5kgYqZ0WyFHoG4jbS7nNUz+
+A3gTMzUxgWnYyq5sSJnJOKgzk8RdiKULUqjvZ8mxuIzW8O7Ay0r4Fnm4xQ1n
+W0WOvVrPA8xmblSkmJ8jnWRg5EpJc2EQFtotFDkrN+fsREVg9czCycxKiBQ6
+3p3dr+ccpHvS6fufZ/fMXNfIwlt2I+BSf0z3Jg34fN0jw7KkUpYsgOWIDp9U
+t+1kUG1dr0wESpIsujaP+js2bCVnyU9suHaEmCRCahKYlLUYqKSBxEx2UnBJ
+MlcJ4eXhogr5toFRnOLxkZGEnR49pRhF1bKaRW7FJe3vMZx1UvrRVaU5EZT9
+6yAkhp+LMbMFmrLk0o7qKtxEdE7lY+yynSLydt0yYmgtQtazALtQcGi/BztJ
+rcHfu+wyvQcL6MVVAxwJrqi5/dLE+nC7XQw4yPWz2Cm2NTMEZ1ulh8pmskHu
+SgkwgNqDLC4b6jNGEC+LnncObHN0/Jqg48hIAC8MPLH2XJckyg41I1OWtwCU
+rO4UZFHv6qK35Oe6gp5CaizYPlsP+MhZFgjOgXk52koZQqKZhxcrs89GYP47
+J8imaRIknrVpoJTvpWnKIrvLI4At0Lq5G8O6qCUx4AElYUe9OXI0idXcEBxm
+Gdwb0fAQMzXclgGzq33NY4N0Jrm/DuH4MDBKErYWlZ0QnRxxKQkybZkxBvLh
+FkjeeJjnuTWeHMMEI6LHihRZOpcjVyGyn/fnDZwYfky5hc3yPMLnQot1E7bB
+2uWTLlDG4CByulCRojjMQhe2rqUL5Ql1DyahwKmG8LSnPW1bc77t8uQfqPty
+ta6Ynhru78s9OVAjxyTqhSVIdtfAmLhIfb+7+tgspHeYtC4QYlAq433/87DX
+HBcppfUoewF2lPbGoSE6kyt9M/mN3Tvfn121VzqtaV2PJgMwcBE/9teIc8Sh
+sIpFUF1OXfKbS8AoBypIMV2w6yyATBeiFDXJzJ8RWcFCugCP8g8RlbzeMW4R
+CcbgF2ArhE75DlKIdTIVAC3EUuvRWl71+X75wrF5Vg07L6eZ1ScGmYUTYJSW
+s3WBEeMST+Z4Md0QE5fPnwKsnn/vu/dyV2Vm5f2WE3wJDtv6TNosBOAxuhoz
+z4sDxOKie/Wrxgp82U59P9s8aKJXBG9pLvUuzaEPi1g/D3j/fo9jkp65CS75
+E5UDKtSPVPp42YsLR7FqN/38hlswyUI7Ea3BCXZxmQoKudUEfCafz8IRzEki
+XOh8GesgHELW8+hgjLXGNLGClmt6rGjMYWx0mQJCPzuvwjrjkicwpxJ7WJcJ
+ib2unpxFEg+pKGrTZ8sOcz4hoQoIaVaqKPAXAGTvOxWq8ScrhBE0iIJmz5jI
+ix70jO3olotzc0rusoVwGIHtyPF9bNUVRUCK4hQ0K2b1BFxOnuGHLRDw23rg
+obwFrAgr12M/xT/R2BxSrBcu1cBKe+/WH0P7nOlQMlxPMBI9rgdUibh6bmi2
+mkM0O/lfj6brpwk+Nwiy41FPYt+4KgoNFhghXBTAFbtyRj3QEujvD4rcVp0I
+5EgCV/sUxDGYQuZj3a94TzDqq1I9P9NbnzMZOsLkCPMQx4+N1BehoHISc2xo
+uY97wWgOcBTApF6wTKzjAnui6TATMBYX7tpvMTk4qcHy31m6DevswrcUOlvw
+aDc2g515X+nWAawz3Qjf/Ft4l8vouAn6rCrIjqULYSEUWi9nya1yep+HgB4d
+DqvXAM87o9At/BfI52cwYKlK7g2lF9id62PoTVZE8AMeyERyRdZ1K/e38MJk
+JsJooYA9FiilsuSPq8yR59jDjSBesEWdeGj8Ee0oJFI/7/b2jrlQQuRkiYzP
+clYGS9S3RdXzDNzzg2AZGzXDq4QnVI8KMG6ZobDEklTGs94FhWzkCTWF0aV7
+qSyh2Dp6Fi2v4GYLH9bjH7NROwdcJjiFfgDArp1cBcq2hHrgyGAkfqimP3rn
+CI3AnufLeI9nzFPUqIl93LUVGDiA/eEfF0bOyuVpjqGxAxqTe6kVvhSCGYKY
+TepSRpjDwQOKm1buzUlNGVqUtl/TPTFd8RtmQEQ6JdpJRZt3MNVLE6Qk0o1C
+iiw0oxBUFWtVD+0QKankOOWcTaXGl43H9MairIgB64S2e3d2PN8ZmEQh1H1j
+yiyEfy7Heuj44JxEWyNo7me7Gu6xEXOU0fh1h2K4LqgIh0UwQJQtBXhJJJua
+tIcXpU/hes7/41xXruegvHnA9YUR6GVlKLuE9O2Xx2cs3zoxD/7YZFYZS7jO
+h6rtwxtVXlN9ZYq5aYNPafGPR2hCnqKdGkvKjpjGNMitHFlyMe7CwdtslVx8
+bZYftwOwUj4poDrZkmZreIpvjAOJdAozWhw5K2yt/eRkOUDS6+RnXp/7gARv
+ydkpA1XMA3iKwGQVEFLzzl+L9BHbqypmd6n1AJMUauBcatOpRnBN7DZzcmb5
+anTrDTL8QY2mg9gTA/OFUx6KozRUiLEpxJkhC/EJq2BbtNwgDR58+bnYmoJy
+DN36vOots+9wIU7G+vvS2hmn4oFtBnJohTzsquAzExsMHIv8mbkwu55RzWW0
+yEajomkxP8d55s4SjiOfrZWeFNfIVtK0Pw9iWwSeIjPA2+8CPTlUxhaYLJFA
+tMLJfgJ/O4ibMHC3WJjjiGAp6NmXA/clIgt0Iu+1RBThifXEQYosMQl1PrrB
+lKv7UIhqE9EAwaMqa4QrhRwxpecdKgbKuljMsI0+K9qlA+Ux49KVIYwJX9Wp
++RCZAN1nTqpksIOyLhvOs8TGb7kcCY543aohk3+amXa7HdSNg0APFMONip+C
+h5gPyE2vXEEdlOF4lWowPF1LSRG90sTlt1fQbDSZwbvY6gAhMDCL9excP9Ys
+ge2WiTIinNN19v549AEru1yeQgRx9grDiSBiRPVv7jZkr2WqkLiWqfIZSLbz
+xrLS7JIwFKEhsMvCmdLs5COEKaqmVeYuldnZUXNpdEM9GHU1v5ZQcv5U4DSH
+v8M3AwdCAlHWerzFDtLXQyWNCmW6Fi2tl6obXfYV3NB9AAqBHPulEcBPKACy
+M22BW4ILhW1CYafzruhN6b0uDKqYpddPpwSidtZ7DSf7s59eMSyWuBbDYsX0
+0aBFpDmHRPZKwyki10cTRE4cxNbWVYORWUvIl0s1RSGQQliZVWM0ChSiByP5
+9qIjzoCZXn5t1FpkC+lZr7y//Xm7VofSAqCQrguM4kyhr9/hnDp2SKe9DCJX
+MqvDwEbsyuqADJ9KZTbf7xW3BgeIGUCJ1oSofcPjRt2FQUHWsnngQta9ZVE5
+RtN1JkqjSsNyW6lFH2TlK8ukZF+d1b9thMgG6a+HwbKmMoHkoDiPkP0BNFNx
+cKorzbNiBQlTskuv6w1Sq5eyNc2Kx/PdQpYQx43HBwoTwn3KQVnkrlliiMuM
+GtRm84M816gwAS9ZXQ0jk13Y2JXsSbpoPvethfT1CqqQTpksgHOuTkjPREZW
+bCGtb5CbpPsOJUB+lrWqm2ify1pP9TQJRPeRziGX0gUtaQIXsHecW1gngOIU
+JXVCZMHHvoSx3cJB/oZe78Y0MlW5wgkr7JRrPL0Z96bD4teJyJMIU52mjn1W
+/7yrrYjIsaw0V5pCyiXtVFzWaYxMgGYFZs//DR3kg7IRJEahKUoIAkXTIJU3
+p7clqdt0z3wAhPS1IihX2sOgyAJxXYUMvcQpQWagpVGhV3Qow99NR3Rp/A6m
+KW/ue84+aRpjPDhG6+BxVrtDR38TrmWOPnfG9TEJw1fPue5To1nJX5aKJAkk
+2WJB3CDJQhX6lbWnpQRR4ysJHp4JAjJBBlme+tSnHhL8seF9nIwgpCvSE7Iy
+vUx0UkKrDnIEZHbFma0oR5l6qNAalhLWXKJzaoAFsENxlq/gL29R0J61gwbG
+mLLd0aRQoiGK5/QJLCx+hUbwgXXZmcE+QyOHIEu3F7ua3mi8biierxOiynD8
+OF7x1+jvE4QGgSKO9WB1EKLYTojEIAmIb6eVnUqMsht5iCPKnmfcTWMhahjB
+rLRltUAC4tw/IQEtl7zeQRsR59pXFpor8CSnjgpo+WaumEtKyBjGMTWnzOT8
+W/uwUhoh8JSRNq6dGSYgsPAfPeFlZBTKAjwxk69sIaL0ZxRFTx28m0K6Jnq3
+8SRHU1nAK78n+pDDogyBRYUcVikrNOWoPcm0eEMGkctY5o6jLTtUsUIOefq9
+5Jl8JlNX+5vitxUA5pZ7J0pS09yZRyMM0tbp+mqWTYm7cupwG97BlaQXQMoM
+v/LtvKZlCo5KtgOcnBKaqGclDy2Em5yidlrcHxdzYS5L0wtcpQiKqDn0BjvU
+uPydUoCKavPIcAOHd8ve2N1gdO/hPVjz27UGS+NDlmZ7sqDJujSYgbWsTWHW
+vyTE/mN5vGJXIkakjLn+lVK62SHTsJjXOeKMEPsmnqZuo1QfKs/+RhC8K02w
++ic3aWE3BVLj5oWV5X0fS68kyG3f40FuzMRtAaxKjpwEl5G2j7YujEpPH4c1
+dJtURI4BhCxH9S7pSDaKrPt1F7yFJI0SKETmHP39sX4nR2yQpaA5UgXKC3Fi
+osxHGK95XLb1PffZsGpwKmxRRxObhENI51Y55mwUQZMDIVJ/A8vJcUqtz/3v
+jNs27ZyepxQlFoaKKcv5XIK8TbGfm8vgsvUAesqUmCx5Qc++n00bD+wumK5Y
+JitMOKvcA0id97fabNkwhmWrOjDPwh4MxQCM6C7u1LzhwfANxlMDxtZwNEPQ
+9abDaCatQxY+Zu2QPIVvCVQIMkS/NLhUZD3P8jKeZjo1SYPFwud7YOJ0Lans
+WEIdwGVXwhSQZxQGV3b+et256Ib5CUqr83PNUnIWrbAsviqbKUTr1LxYWOOu
+9rrWmHFv/Do/9BSaJkOQV0FWgCRogCrMgytRFpO3JUamKbRAuGdE9DE3Zxxt
+siFD7n0rHV6X/fl44dkDWh6wKhuJKIegJ5k/amVUJAA7sl3U7/Dq+PHjc68D
+p4QaXbzheH/zHbATSORw5LlW8dToVlOCCD/TPXAoYi5qs81Ajszmpe3ZYgRi
+cqVWDu3ITLbB2j4vZskZgmoc+5rGuaHSNIVFGVEcgaoLM+EgWV2HnFnrYiCi
+L4WeqLfwiuLZNdWXHT54MSpTe6KfTDFm3xcJKj6QqCrkvP7g2AAqeGq6qoAp
+iexqR6/dOoF1arbo7A3LQzedFHRknJt1ekDqekiOsfpdF/RsnfRYdyMnFUc1
+sYgDl3tZs1cEa6E3718Kki224icuVhIZ3cneFwvycb0sKfPTAlMLvdZbQvkD
+00gU/G6rpW/n2VAd2klL4QlzxV2fwXCyFCzEQ1IrvBKipIugMN3KzZj4w08o
+k3cA0Yeynx3hFtTQlhHhN2lmz6G+SdxpT+kXLsjk/19z97JiVxGFAbhN59YK
+QSEIErCJCJqBIJnFUVQcO9JBJm0yyiNk7DsoeYE8pUJcX9X6a9dpoiA4sAfG
+Pr1P7VXr8q9Lraoijf20BsHOcaXjXPFVLQe7bFu5KQlVatIgWvsY/1WYm7SH
++3Job3bfqNUX4zMj0X/iFDe8Fd9X7ZKMfFb/LuqMTkP81ox/1CqdhnuT5SMA
+HzfEBWEMS5BUYF5NMBkffKPleJUjZqSueFPzyi2PIJNj406MJqIotf6que/P
+OCyIEKexKfbDCmg/XUO37svzRgVoK84SWwXn4L03B6+ypkKlRQ4sBroIG8vc
+7/ckJDacHeHlSjLOAECVYaQeRS8UlPPDnAvLs1ZJVZVYOSEqikBzPU7JnqVw
+RBPYs2fPIhc0K1goVrZcPm+5kAN5kEvfL7MWkbGGsehC0bOwtdXxgmZsu31w
+lE+WZPmKJDZ7LeggLtpBGYEhFO5aw1YBt5hY8/2iqeoNY8Mcc6kdZcwewlCF
+D/Vsth+SLa6x5iyKQj9WBjP7GozxuWEMkc6zUCaWYkUsT7Ikea9XpMuGqAUd
+xz0882r2vszQ3yPPVPqybiQkqHnuV9GmLVrgjGU5Q+TDZmnusHYyk/aprNL4
+3Ek1ttW0QC9b1w1J18V1+IF9XA9dN2d2q6x1NCrNJRBR2AGiF2MMz9PpdO1k
+NQ3AyoPDADzFK4pT+B1WCooBkxDKih+cLvY+bEq5bYLkH+LGRVX0hcmwNhm0
+DCmUsn0pACaFUpVXURj255CWXO7ed4YuSqm3dSywU/4plArB1QRQCsJlpeXq
+I3Q+CbYxtSxD80NEgM/2AiqeFMpnYdRkcr/i+vj9QRcoJOjeSDToZYK8XB+h
+2j3sn7Q55FZFRupfs8AJEaB4AK7xtBb/V2/+xXDA0jN11Lwo25XgrXBzb+9X
+u2IONXzsHOjwWSwkZx7Aqf3gD4ubaWmRb+V6P0M6+KTihwc9EQok8cgBByj0
+/6wHlmGDr6tWrLLY7PwkdSgyLlGbxEEEwi8VXfOg8oRLFQuA9mAr18xkHmK8
+YBS9Oe73mev4fYr6+LFIXaifbT2MCgp4pI+DWeucxMvlslfQRp8qgM1ZVqYv
+4kBNEqz6d7/dMFnKPieozoaK4a0c2WkvAYwZgVQREbcp1IWhYIdDknbGjLxc
+QeboH705UgqfA89x0PTBZFZkGTpf97rUNVLRTIxPR0te4YZa/l5Rt2ZWlH7c
+xINO+Ohb9IUcxCqK4oinHJhYSL3ejvn0rBBtEU+O1BoOFDaEeBCCKBqyfz2d
+NSE+6RUcKLMM8eZkl3xqOwykQtZs4kBc35O6tlVhF6d42UNwJ7lJD3eFGaUN
+ic13ce+nQOW0/pb1vabW44miWDA/QO50kf3kHncAX+zMiFSQzu1X92UzeGn1
+4iLuK2T3nal5FNxARqWFtPjwXlQ5rkGAW9SlD0bOIGvmKUzbgn+Z5Uct9gRk
+aMY9dp9VO9MXfSis2i6XSdiqCQSOQ+zn/fU5CyApSFF0Y9zLdXvPpIcghBNF
+aOYAgFO2CgjUKMmbGTJkl+tgrD1KOeBtCuTu2hy6vXzAPrUvQ9p7G8Wk4jIx
+nArKfpnUtbpE7qqGWkaiXOASy2SlgrHt6ALazJr3jXg0g0M05Qp38yiVZc12
+AoSxDD/9Tlni4lG6PtN1hFsj5hMVAT0V3fKvZ9msSB0oYTwShABCYsQVoF2M
+QEHIJ2WJR+Lcer/odo/kXDnRnUC2G+jLujx6UHtz6DH1oUbFl2SaueaPU2UC
+WLe1uYqKr1dDgWe2lOeMU2ohn9MuoUeXLyi574cEvFN+c2EVd/22H2hCjY9K
+18WQCrXvqQ620D4SkKccB7HMTJse+H5u4U6c5zt9S/e6XAoy5ubmjNHtidsx
+mBfr/ByeLxeWZisC7DjQdk65z9pZNFA4UVsKhTsNTDyXdn3ZXBXKeh7rRH2d
+yuzNDNe4uic5oLb9Q/SFeoJNilBSDq38VJ9n0APdHHyigmRRYJzNe7AbHhyH
+Z90cBQO6A8hWE/ackYj6IG+Oytmyg0Ke7/vjPbbfLp9+xwT3i7XB8CwHHgaZ
+DrHHzXKmkFYAagPew3Kgy6OB94wBKaMKGQN7iB45ojN5zXdNub9hERzZzgX9
+B8ohqjfDt1RE2TdxYXh9vt8hTO91puTRLBWDg9Lv0EEmTKFDpsigt+GM3+bu
+jrPcJWcgs0q3bB/5nT/7FnjJQkIvQ+de4Phsao+/FE0RQsGrJ/xTkwbQyNtM
+aqK5mYTMfSz+KI4+7ffSGnE6bxhXUHbQxF/2vLbDb7oieGsMCFMTiajxPPjb
+52c3HZ+VIwS6MT7n9puZbbiObpiR5wfD8FPscYwz+M7CgeFMkXofR3XN9AAL
+hM6T/LUywrYFfkJ5uaHc8rNmcLZf5Yc8yEImkZVduJk1/tXfM52QWNjQfJ6T
+tTIs8BYN54ei0gAV1gyrlEwyXEUxMeeQKR6pHFg6DUMgFglJviF2n6UwhvYv
+8+OVj1z03pCR6lB3ro5nqU/u/omsoKUZIqfGvb/zbuaW8Jn/kMzgYT31sOfJ
+/eeag7BPecf+xczTy2EXPV7nOt4epiynjmmLaUpBMzJvKWMP6Ua2omxnafrh
+RXp0wb7NsE/InivtsoZlqq1+azvQtkVoLIkgow+lG59hOazsrUHNlk9b9sIg
+RU4JvK0CgpPslvI3PQxH3nQ+bNazfnvUY9Bg22N0n2qLUaTNGFyaz6hhxlCh
+7hsO+7DIuT9X6u+3b04lJ5FwMgkdYFCqAoVTeYNsVUIx+6Ep26xW47FlhjhH
+Ebdh2KlUyL6Y8kIZBgo4mly9MsN4YxjwtJUAAhiGVhbGPTmllf75Rmomgq2r
+q6u8hExwo0LeeknFUPWZcpYB4UbuKuPIfRZoYl3yD/OZIdTdAbAyPwV80Zhy
+n1Da0mzJPPSKNXT8i7Aq9j2h984AIb2jaVflEi11wMIoMFhgGjmCkKJiHlUJ
+wblmb69T6M3i+jIO1TEJSZZxJCZ6S6nLt80gsW3a5p7smjoP29BrImuiQepJ
+Zephrc5JZvZ2i8mwB+vebjESZVV/tGbmO7YmlQplGD6xd2GsYeSX2bsVfYUD
+jYsh9LLNgaFJtECKaqhVvAzv7WlxzfD6weTju0mZpJxAYO/VtDJjyCsIfb95
+zDO9J/rs5/4MGGDUcfj6+fAIPAdz7GvEf+g/iSngxm7tnGvalH/sz+idYfbr
+N6l7dxyu11MJplAR03rO+N0SmtenfxSoBBTyuO7jvo05u7n/aGViwSxEWJNz
+wDDl1atXpyPfGe7NYfUsgIOmy6CG+V0jgt0Z5ciZZukAvoi/mog/e2QjsvD8
+UApEKV1de5S6oTM/uCMNsQDWj47P/4Or4v4P/z+PJZq9GAI2vrqil1Ry+SRm
+In4tqHjcH9NsFWYOttidviYgJd0A/sBD4fTFfM9Vs5cTJFfdZIr7+gD6JMBV
+f5S1AV+Lo0zcutDr16+/7j/TKDEav6E5jfKVnmZTB/0EOUaHH8p/pS7PT+kQ
+w7D7HHeU9Qq1k2z7FIGgLd3FuSaCKqRJQLjcgfZZ6lq0S2ykYp68gfPrBY/V
+I4OxfWT9+MlFHww7vIB8uWQPe/29UvmezfN+CnayFJk6ELTYUMzPIKIRAJPj
+g7Cl7C9zIGQ81n6XOUjDMFmImTkIHVzwwbllaCmVyrudVF7Bg9VnEQZrRwyI
+VEry5sKjX3bluzNctdZS4R4F5GwMJM2PMKQOwEGsoyxExMwakzMReud7lmVT
+YSJEB3L4LBMRdRAkpxdhYK44Uqdu7nCSDbgnOzRAU6vEnAXh8XKY5NTNa1Py
+ZwiTEiGLkflYecpwlogwJT/2D1iQ5i9CPjmwl/IZZXf+ez6mbix7SFKIkXyy
+Gfc9Zppib8/ySZkmPRc9ZbcUJ8GIyn8tuvh76zGJjcT6WC/EPpnm+QgPrMnu
+Nxir1OcCvbyW9IQZSSEkQKbKlDJVptjXHdZY/ntruFyfmQaJFcav5xl2OvJv
+jP+ej9TDqYMOy4wq5zr22d4xP2MwcEM5M88xYyGr/U55jt5qKfLb1enUuWHo
+VaHpelyA3ndPramzEAqYww9JSoNGkbAUl+SxkT+a37s7Sr4U0CZpAb/OKVU4
+CljIFWGpz/Qy7RieYEWWUs59Nwd4ePny5SLV2lhfKpOZPe8hxTSokYUxFQxl
+kmKhzAqOMwPUoV6PCGorMji5Vl7M6krnLPHgAt2djlv9Yy4hi4kEISWQvIIb
+ECezcmtKqSGXnixVpX/OF5Z/yRd0mpOhGKBn9aKhKEc58QuCR7MrS8tI2dDK
+q+T4NSIAdilp0t6O9NeEZITe+ObNm7N9SdlnphegpPFcE41VQAb8RVKAUsUA
+ejMe1PEFxb+ew28bAThaXmm9TJHG/RM4+ut8/Pf+E8eR7XSRO0CCn8qq/fjQ
+m38RM5y99xc5/1sJ\
+\>"],ExpressionUUID->"1c7a87a3-12b5-4e99-98f7-bb172de020c1"],
+
+Cell[BoxData[
+ GraphicsBox[{InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwd1gs0VGsbB/BNqiFFSVFoCA0mDVHqqBlS6WoqNJxC5dZ9KjoKoYhKRe66
+jVBKZahVyGU4XYg0J5RqymCKk2QizhTx/d/PWq1Zv9n7fd7n+e93k+H2/Rv9
+lCmKGsI/8kkpRvGjz6FoBFM5VM2O32p74GLbig4TuOUyv+GjHofiaXRm7YA1
+Fc8stsKRTu22xbCdIPtE90xcF4ZdNtTmUOJ3C2LOwnbPFvZegnUW/Tl2Bay4
+f+2o6TQOxX+u1zqN3H/Y7XsJXKOq30rB1KKnqRunY7+qwtIxcIvlp6BuWJBr
+pGUA07UWJEXooN7Jtuh1pJ7hGEs1XfT5Qav6HBwY6NR9EvaJXfHwA1k/Q67W
+B9ck3Cu2Rb/yVxcTnGdwqPRPRg8SYYZylm8cHMIzOfQVDrR32y2Ei30XVXEw
+v8LELVEES4c3lZyCI8d61pfArAfr+6phKZWoeQUWrG4t7IJ9Ar8s5sM6tj+1
+FbBz3obv82HN/Q02vTBnk+XRHvRD36tu/YLU39gbn0X6l+x0vgALz97Vd4MZ
+rJnP2LD8nZXpRF3Sx+oxLejPLiF/XwPmF2+3WuoFFyuu8i7DLRZDka8xb2T0
+krvh5PqX/v3LSR5uTiEHYcFhpelkrhazDRJy3VmeWTgTFmUoj82CRSYF/LPY
+p4uprC0h9TJGOCRXxt9RJpb4lEfvTE4l33sv5abAwlOJrAUwbWHG40moE9jY
+r/IVz4n7l+RzKpwXsE6tlDy3WdwQM/TR5XifmQXnzdv2tIo8xxc8B2KfnoaP
+npiDm7KNVgLbLct82gvTLtYv/kzqPXMtDCXnsPpRtgmZS2vngl8wpaXldIjM
+IVE/HmCA7wslx57D6ZnlESI4wTxmrSn6TE/hDyvPQv5XHxyMgrmrhirmEm/z
+r3hN5qvLTeHAfMeEJYbkuY5yefaw8wODw1tgmoZuqxGct/tKWjQsZkl6Bsl+
+Qym5ZE6pJE67DOaNv52eANs1x8YfhjVNmcEHSL6DilFzWPhL7raIrN9T6/0R
+/Wv6LN79L3muxh03Usi5iQ/rOUHOQXVznhuZ16dURZ08jx3er4xggVFYbgzm
+446aKiuRc2ja6TuAfAKb63j95Fwc+LDcB053mTN9GE5/5RFVh/eKW7EsRg/3
+c2kH19rD4qsGMldS/+XxKw/xXtboNO/KIefYivbLAaa7e7qoot/AdycXt+K9
+5jE2v4uEWcx7Oy+Q9/6HW8x45CENKLq8FdYJ7zbMgFn0njYHuOnM1GgdOvYp
+CbJgw5xuMxM/uIUK93CFmV/EAwUw7YTMIYKsz2s4MwjLHTm1ZXDQ3I78BYbI
+Y5P3WFXye6Th/PZ9cGDS00BvWN1cpHsJVpg6DJTC6WF+typgfsWmQ9Mwn/Ns
+h53NMDfX/PYeOOcs11IKF7MjsovJ/JFx7q1wnE1fwwD8+FJ9ZSMs/u+QM52c
+x0GXSlJPwY//aQMzT9VOuQbThFnlVnBOEv1FBLmeUnVEG46fG8D2hAW3PzOk
+qDfV36h1PiylsyQXYF+r3+Ya5P7dagXz4D1a2ue/YV5WZ11BCfqPVpm6ugkW
+JtWU28D8lY6u1TDPwc0rF3nkWeauKiX5tKWe1oRdVQ145bCga3VIqBbOhxbX
+uh6Wxvd4d0/Bfvat4zuJ2SJHP1iq53ViIvanL7a51zOZQ9VvVm5YSuYvNLoW
+B+stHUw/YkjqjJ+/CA60lFqUwaJ2wwwlmE8f+UvFCH00jx9t10ReMmoeF46b
+fOfIB1jYnye5BLNiwsbL4T1TacpdMD0q5qIO1v8YsLOaNxu5Wi6zcYVb/uEx
++DAVR/2+AsuS077kwdIzfiE/YKcdzq/fwF2prkUuZJ6Hvx8MwbzKnsP5sL1b
+1ystY3jINV4Z89t9lfXNguP4JV9d4GLHVl86HJmvO3IOZqbzFdowp8njySNY
+2PJxQAnu0gye0gjrnZRqfEZ9QUdr9itYxfZv7mNigyR2CVyW9WTMVdJ/+U3R
+SS3yd0VwMQTm3/ilYw8zhLy0TTA9+dKK9+hPJI71tybrnWqWBMBiscv66TCH
+M6mmA/NR7cZcFZiWv8bTDQ4LPak1hLyKT7E6RMhvy/srjcOwwCss2QLW2Zey
+QQ33i15kbbTVwFyuzPrZMCt7Ac90EurvGvfbGZbPsw6fPxHzOt+feQTWrK+v
+91XH++Dv/7kI5l7OFokmoP+GjoIfsPBZnWINvFbV/KA98pAbHqCpwny7Tlks
+rPnsDw+FGqnflNoEJ2SVmurgep77axrdBPc1jr3gC28ZflAbAEsTK+rfwHFW
+Tok3yXWzcx67sP9jea5HByz86e6thf6SbRuDtUzRT+zRCbWwYiUzxw4WH5CP
+RGIedds9ehthAedgFUuDnB/3dG84UlZm2wA7WTx230ac8k2FQfJqkenw4HQf
+V43NsHFou+5yUv9tv5wPC47YKJmTesbZaw7Ba4OXiWlwnPmhp1tgTSPTetKf
+IixHby4cFLXPtxymNi53eI798qhZOulkvge1fhPh+BP9HodhlszK0wz9tiis
+gj1hzZej0SaYh+/OClpB1r+7f0cN8/uOyVe1J3lEe15sR557UjvDiaXf+m88
+VMX5KggWOJN68vh1yTT8PySEWekDC161Fx4fjzz0aq9Fw5zyItv4cfh+eFPi
+PXK9PlG9ZCzO8Qxr96+waGNTmwacPvGUy1zMx5eFnEtR4VDDuT6RQSRf2fqO
+tXBgdvH1SpjuVXBqAfxDdslVfQ7OxcjsYS7MWGM4gQeL29alpcNOvrruApiu
+z60ej/qRA5s722HOsWFmGvy1dqVQnwFP0zBciv64N6sU62Eq6Ht7H5xHNzoY
+DAsmv9LPxzzy8LrlCbBI2dt9C+Z1/uOQwVWYft7Me5j4baPFNVh6+HptFPKJ
+35xJz4Q1s2XrZbCN33XzOFi+nW+hjzxDVvV/2gv7/Buwaw45r0Wlq9fB4oBI
+PQruOpGWxiD93coIuY71xlMv2imT+0cOy2bCNQ47b0swjzzL/tMO7H87Pyaw
+FBZkblWcQL/R4WMrLsORk/PdT2Ae2UhTZRzM6mDk7ML8ZffuWoSTvM7SE5Yh
+L7HmY/cwOOFG5k6dMcj37TeDWHLdvOt2vxLOa5dGG6lHrbI+30oh79RxwSJY
+WvjHjLpRNsV6uXfeN1h09L2y3gib4iZO+NeE5OOyL6FymE0ZswUT/Mk8/l6f
+KofYFOPP2OzbJE+9av3Z8HCuX/B/JP+F4RO6f7Ep9bP905zM0P9bVSNtXKe5
+iFUTYGlP7YVMeGrR/DctsM/n3HQ+6lMXV1vomaP+3YLeuN9squzWpN7NsMg7
+7dAr9OOqctT7NLESrVcP/X/9R9uwCBZq89c3wzn5ai4NML3X7H0s5r3fOyHm
+IyxfoOVhrow8rYUd7f9f77f0HhwoGqchIZ6aoT8DecnHHJ1TZ05+3/xU5sE2
+devKC2Gf5BdVAbCeiVNlIhyZVDt3BRy02sxvL9m/zHlpH+oFHbWZvpLsn/RU
+dy8slq7fZEj2b5yhWop+mL8DE0cwL+eGyqaP6DcwfTKjDRakWo+pRv7cy8es
+62A6i81IwfzDjowjFTA1FOywCnkpYn5tLYNFvYrGPgWbqmH+rH9C1pv3vL0+
+iHyWKFm/J/d7nX575AebkvfqBg2TfI8wlSL68Dy8Tw0ySH/H12x8JmdTa9Wz
+rnqTeeqsaqu+san4h4OyKySPO90Xbn9FPzlREhnxHIO5W7rZVI7Sxw3zLFCf
+tn9R8xc2JVR6/jEUjjT0uqSF6zbb6sfWEEd03lLDeuc5knWTmVi/cunD3B42
+Fe3xeqsbzGk/PljTy6a25CdMuwD7dJR5mn1nU3GPAm49gaWcvQHn0K/o+LLC
+bzCdE2o22o88fs63U5+LemrmN/wH2NQeuaJOH6ZPql4nxPzcA9Sx2bBP1Uhz
+zX/IKyqng1wXvZw+4yry4v0t1JhEnGjQZPyTTQna/jo5QPafzLd3gWt+DzNf
+k/1XeUVNJ67tnl9E/KRtSijWx511Hj1D7rdXrwxF/celnyb4k/mqqCuzsL9m
+xJNGR3K/r0sDH/lLXmcUGcPUpGsq4ZjHlZ9cNxEW/Ezrd0X+jzk3v48iL5Fl
+g/F05FV8ZU3SMMnPMS15VyebCmLE3lIheY3Uz2lox/u2w6RIh9QrDln0WoL3
+8RNPYAdHuvF3ipuQT5hZ5w5yPbRwmqAOz7/60tEM4kcdnfoivG8F7pI3xGWz
+ftTcwfPsYzFJPhRX4zTvLPZL1VwSQCwYtV8YVEnlWU+5c4+Y/CSUUyrk05Lz
+P4Clt9A=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.703763748652328, 13.714402573074395}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJw11nk81PkfB/BvIkdiqgmFbZyxkpFopjBTUiJHl2NTDZUjRKWaQsYqx65q
+ioqu36DVqN0MHWSpKdqMFULOkmxb5IhEztrX54/fPB58H0+f7/d9fb/f8dHz
+D9+0R46iqJf4IUeKRn79wKWUyNGUS6X7hY5/0uVSoZEV2gUmXKrDtT3xKbwm
+kD0vABa8VqbHEcvSJD/AXbp2qwxhQW/VsfZFXIrX1dqQr8OlrkhVb92Ak8Y5
+F8zh685cpWg4aOk1vSvaXIr1vKXeFxa+7JbIweLkF8XOcIVPyOuABVzKNib1
+uSNZH3rjWz0f8TNWxrrCzVPrSu3h35NMf+fBlOysfqkWl5JnX70RA2tVspTd
+4AbnB+5ZsODOPdqwJuIrThpXwfxA+9q7MM/92/5RmJnYUngapo3SvQ3Rj5K5
+zfefYbrMTcEVZrLp2ULY0JRdFQ4Xfdi2/x58Ylez4y+wcNcWg344QsVz3yWY
+VyA9YYP8th7qpddgfiItJxlOCn9ncwHW2u6m2Qkzn/YfFZD1ipmmK9BPb+/s
+J9thlrMjMwXevc3y/RLYQ29uZR28LNvMbRj1sgq/aSuT+Tye01lA5js1McsM
+FhwKHgqGRZUbo6zhUM1Derqwh6+JtzFczuhn1xhjXsWTsknEGzA8qRkPj3o0
+WD6AvSf+jl0J8y7eX7Qdvrt1gdyEEfoTZwX2oN4Bv7HmMtgj+Z0kEJYonqi5
+CIseeWQ0on+lBeNmfJh7McbTDu69myDaA1Mzk2MzNbhU9OtPq3kww3BzpZIG
+me+5XwPh9ALnZ/x5+HtL0bZjMH/axLUROu7foTEVEl/wz8GGBLgrUynqT2KL
+EHVzeNRLwfJfkt/90kDPXC5Voj3/4GzUL7bmfS6Hk/JmBNvBThm6XkWweFTf
+PoD0d0nX+CnctV3fIRlOirFY3g2rGi5Suw5XKAVu0EN8Vc65i3eJ/WtZwbCg
+xX7TA5j1fv2cElh0StE+H67dahlKR/2+B4qGLsPN4SbpoXCo4E3uUTjiW0/3
+Q7ihddVSF+L4uRMK6J+3hD5A6uWGCXts4YY/9j6rIfO2+Xh5J8zUyJmRCNOC
+Ytv3wlqDH51XwFqxx6/6wjpne3i9hqjjaO2QFUy5HDUQwRGNlcsHkU9LL9TH
+G5Z0m3w9D5eY8NM04fS46HeGsNNU9JwOAxyrhu5nop81+g+z7sDNHcNTNLgk
+YY0wFTaRiT8ewXwiC0POCeAI/97Zr+bgOYjZXH4MDuLnmTrAQTZXsuNg6cM/
+ywtmI+5QtEYaLNyyiMaEGfs/8iXk+pMJ5x/RuNS7FEtJA8wPfiS/B2beXrDm
+G0wTKygZwEGpwdE/ot7aRA2nEXU8jz3ecZ6kvyVlLm1w1c1TMbFwR2G5/RBs
+eL33URbstMvlsw6uX5bysK0Upu1OCt4CmzRkPa2Gk9bGvLkML5452lMPezsl
+hffDkTcurK+CmcfDJGtRb3Pbt/2FMOvp5y/X4A6boAvnYbFe7plBuEF0OD4Q
+NvEp1mCj/6qxvItLSHyVs9cj4IbvBnd6yTzKPOekwUWuynrXDcj3YYqpCJYP
++ynai8y7OrzyHKwjeSBUhkWhXgohsK+ROrtUH/07dhmZwlJ2uN0hYsOUvGrk
+1/F7a7kMHv1hh8sO+ERFqtekHvk+8xO3oR8pqzeuBuYpC9xdSL/sIioPpgKK
+W3djXkznOOFlWLBJzdRcDednSjeeJ35RPTyuivc1Y9szss58rRvSMhNzaDr2
+6g+4o1+rt04F7zv78KAMFma8SB9QxnVvV3zqg2mnfnrLhjd4OfA09cnzMLn4
+rhLiGX095QCLfinM8IfXvJ+TGQ5Lbqk2OcL8M+fL0mGhVb2uL/yl/urqErIu
+OuCYqUTe9+zbTTBPkjSshviGVr+OdsGMJ7mDV2Ctl7a/9MOCwLtRq1AfX/ec
+zweSb69BxSAcUSv9UgdT2Z+PZ6Gfct/cxHxy/jG6gxP6Lcn4uyUejtBZtKIZ
+Di0fW+MCc7Ppp51m4f4lsX5TJr50tlMIi11SVj8m8zo6VXQTFoSU3Isk824a
+Lz0LnwjYKDOGI7QXTjnAWyY43q0MnKfrPvoY8ZNsa8zOwbR2SaYa8YBHqwcs
+iTrGskB9oj62WIucP99BxYz0U6zZ2rgQ54eUac9Ev+mp4vE0WMSZX9qiiPtk
+KbQOgyM2XFDLmoF6FQ427iTrstaocAWSL7cvBK6lIqxc5THn4X3bzsAdWtxM
+x+k45jh2/wUzY4w++8nh/oWbsRSRX2i4Myd3Gt7HqwknmbBIKM/Sh3u5shu+
+sNT/t5ZqCvenbWVFEtxRv9BDAr/yXUUrgCPyIrvL4cnnK/9+Sa6vUTirhOuj
+3VoTBsn54a7UIXhxnRtzOnk+t8qU5ZA/aJm6uTJ5/jZeGf8NVt0xHiZHnr8C
+HzVP1EtfPBXVj+t5685/moF+PFxEMc9Jvio25w94Q6mttYjM19ZTxx79N2/t
+/RoIU1aqOXmwmJF11Zhcb3xm/xhxokdjCfr3mFnQT8f8mq/O7TeApfob709h
+nbHca14S9kmMf/se5sOshSpyZJ8kOKJ4yBIesFJdvwPmzVS9H4v8ouPx2m3Y
+99C2L7ydiXq9NZqU9sLSKPdL19CP2NS6Qg0WNiw4EIv+RQkWqlXYB4n+3Bjt
+hnkNCOL8s7VJfLHY/BuHotIFeueJ3Wsqn01wKIls3m4RzDt3szxujEMppYbT
+y2DGqR2xEV85lCi6V34c5v44GJYzzKGap9E1VpH8U9Pzl37hUBHCpsBUHfL/
+x9afMcShmDerU3tgRmqZ+uHPHKpi/v0+B/RDWSvvs4b5Vy2eXYClivsctsFO
+X9PvtBO/+ev0G7L+c22FBubTMbvv/T3E69rT2bICplZ2qVUjX21Ap3gdWY+v
+LKSPcKigyv/NWknWDZYHRpJ6JXvU6TBv1csjjaMcSlqbNlBH8g8WLzIc51BJ
+OilmR8m8Ny0Tr0P/td/k/ZRhBoutbz7JocSu91iJqF9QGJxdBg+0/W79lcyH
+Htc1BdOGDwt2kPn6VE7UwUrBP+c+wb6IYlqI7OEgbl6AKSx98iZ+FeJLD2u7
+p5N95+Ay1lvMt8hrezod5m02/7QI9XUErW/Owj5IYCSaZoh+tPLMqtfCopZG
+hw/o33vtdJvpMDVxmpkwyKFGs5tutGBfJEi+3WXej/lb3z5RCXPFQTJeN4cS
+ysl/biDr/fXtL96hvvXT3o3A1HNH3VsduN/tvdbmJF5aA9ugFfnvFdccJPkD
+npSua8A8ln9pfErW77udeFuDfFn5Xbqol2K8W3ugEvH5n3wOE4+ZlXhUYD6u
+nCgZcVjM3t0yxL9y69VsMg+9D8n7nqN+reunnYnftPJn1GF+z3p8w4nfGnvu
+bORQ3HoZFUP8nTcV2Yb8fGOn/TBXRbuDj3pF6Y8tXMi+NJEjtPsHz9MG508q
+ZH1ziHzbv8hv/WwkH/m5EYsTjLrQ7/J9r1eTeR8JtBvGPILkilY/Rj/cvWtV
+TXpQnyoj2xKWLq4wzoY9ctL0MzAfaeCHTVvgoh813KewDxIs2fVk6UfU89yv
+fRfM9ZyI4iC+UEEaXId9j3TEyv0k8os0jczcYO4Ky81anRyK1/nkYRv2PVRz
+QJ/pKw4l0B/pOU6sVe9tV8+hGAV6/BXEfZ2zjpYh37VUBbJP+v9n4Ds+c7n/
+AZXP1VY=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.2230354724127457, 6.228068696807429}, \
+{-1, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.999999999998018`, 17.}, {16.99999999999754, 17.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.5, 17.6952}, {0, -1}], 
+        LineBox[CompressedData["
+1:eJxTTMoPSmViYGCwBWIQ7fP3PxAYODCAgYrD9j0SAo5yhg4MBV2fk8xUHBLS
+urLCHYH8FZsnucSrOPDG2kw5mg7ka2judq8Aqr/TN+lOP5D/YaPBr3oVB/uj
+pTeubAfyd0xhe1Wq4lB15Oj8F3eB/A1eZmuiVBxW2Ghr5DEYOTAkPGC8oq/i
+cFDoVNgHWSC/YvXC29+VHeQsVnq6mAL5HNen/d+q7HA/L2H+LFcgv0HsEF+e
+soPohtDibj8gX0COxUhF2aFGtThWJgDIf7Fi1bo7Sg4/77LIHvAC8jtWWC6f
+reSge9voi789kB/gaXEvRcnBUemR2H89IP9AfnedtZLDLhfv5x7SQD7D7ylv
+FJUcpss5sd9mBfI1rM4uklRyWHloQVPNB6D7DTQfSSsrOUTGsjZ9vgPkH/g/
+/7StksN+zvVcr88A+QEfuNUzlBzUBVv8bx0E8hPsLXfPV3JgV7VkeL8HFB4c
+7YEPlRzOnq++/nsfkC+wQU9eU9khPyAjK+cEKLwbk/8WKTvM1eZ4Z3cTFL6q
+R5ftUnaYLdbiz/IRyI+YMv3bb2UHVQ+dec/4QO4/I6FmrOLAIncvY6shyP+G
+GSyxKg5bt/NFfA8H8j0OHlYtV3GQ+w2M3nog/0J+PHuDikOb3cflHCsQ8hY3
+FKd7nUPo/7npcqLkR4T5zU+qN/zmM4bb33D+u+BBNWO4+9atmj51srkx3P2B
+2i0aLI7GcP+JXzv2X8DZGO7/7y+rN6jaGcPDJ/5jwFcRY2N4+B2Z+6uWR9kY
+Hr6lFvG1zfzG8PBvu7P3h8ovRPwkb9sisf0JIv7u3pB9yXAREb8f5c9ybziA
+iH8V2d+P7Lci0sfCqz2LHq9HpB8O71U9JRsR6cuuZ35C6i5E+vt/KGzb7lOI
+9BnzwnQl/yNE+i3bd+X6xP+I9L3YzCpBXMkYnv7vmXapa3sYw/NHmlxhrnKB
+MTz/CMw7nG01wxiev/ZOKZ26Yp8xPP+l2z1/v++hMTx/XgLnX2N4/gUAffB9
+2A==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.5, 8.354800000000001}, {0, 1}], 
+        LineBox[CompressedData["
+1:eJwd1wk0lWsXB/A3c0kp0k1XppQxKQ0y9HI1oAFJhohriAwRN6XSQYpQSolS
+HSRz6SrciIMGoiIUF92jgQaVipNIvv/+WqvV+q3nefez9/857yHlP3fbegkx
+DPMLf+lf5tcE/iiwzP//yLKMq4vq9eh5LMNNOHbHEi4fSH81U5FlrDPFlnPg
+hKf3E/Ngfvr11ouw94pjV5WV8Ly5h3AmXK1R9iQAZj/fXZMARwxpTC6D+WWX
+9V1g98FAgzE4acmfB+XgBY9KDq1UZpnFe7433JZhmfxwA5MAOMmztmgjfNLg
+/OpUmL9PENo6k2We+KgVl8NKk7+MWsNbTXiLH8NsYWJo4wyWKbP70NEBM43F
+K9bDFRU1yzrh4nr/yCZplrF68POPZlhaZpmxC3zihbFXNe0vk7o8Pp1lJKtm
+2uRSfdPkJl94w3N7oURaN3ieIQKb1FZk7IbduG11LdNY5kyQe6At9cdRKX0K
+r715IHsF7e+OeyiG/ZzuqbuUqb8BL3U/+MaqyqIZVP9VxIdRuM+9bu4UOGh/
+bOE29POv6zOxqTR/mpssD44bfuj0G+Uj0P+sh3ne/HX+tC6tp+z7LRc2z9cs
+saHzjvQbKSAPu+tyVhE0n8Ea2QRYxjM87CbtN7ly/jOs3pzw8SudX9mw9g/k
+++t6hsRKFdQfdzWMhhUPj3ZFkvW6ggphQV/2usdw0jnXZ5VwhFb89LmqcJy8
+Twn8OCrnmxfM19+yKgn209tbXwgrnYveZwd3+4Sf+AhLyxU5CMHTbD8cWzAf
+9xG2Xfgi+nEaSbGyh5tjfILV4bJ5um0HYI7iCzYP83VMdYpPgbkLP0bNh/8O
+nW59FR5MGD5yGfn0XvsZVkD1AiXOKcLL43sbad3tRtqVLcj3U5TU4TSYbxtc
+F4P7SfjgqBIDs1nvLvVIoc7lRcl+dN5Tlb/d4SwPi/5N9Pz2+lQ52MpE1V6P
+zlf+vefXVJbZU/NWaRbMdPh3y2P9ROTk8J+Yj9VVqfOBMwN2BryDmbg47ms4
+pG/hwx7yvwmnYnG+5FO56V2Uj0gMsxH9vZ4f5PSSrHD7gCz6N02vdhmivMpT
+2Dg43tDJfgb1M5x9fAI2d62bYgAHWeiL7kEeOp/mPNoFS3t3HemC7RtCorIp
+n+hTq1cgz9D3z6/1w0kH05hI2Kt8a4yuGt5nYyX7W3C4RvxYOMzNSi1tgTUl
+7v/3AE5yYNPb4H6T5kGZBchHNOvsHXi0y1OwHV58zccyEV7yh3knF+ZJGYau
+gRtmv/ynB06Sn970Fv3kXSoVmbkQ99N6cSAcniS1LdoIdmvdoMXAMywu+G6H
+k3oW+R7CfAVpZq7BMJOlX/kZ+RSU/xNxgDy0gPeO8svrdCHzm/i235DvGfOi
+cdrPcdrC0n3leUXedYPZRYdMnXFfrSdLAyxof27HxQZJlln1ZkSgA3PXBnd7
+w8Nz849Lkz8Iji2HFfx3+nxD/+wuB4lVsN2jvKYOmt88JjkIVo+I7aiF3Z6N
+LXsOL7G9El5C3vDgqw/Om16+zKmQ9r88/WMe+lm+ReneNVrPjB0chHvcH2dU
+wAzbtakd8+RtDPBqhZUEandrMG+a//A0ASw9pNS2FXmU/b50oSrlZbdrxV36
+PCxquecIWwd0Tl2I/ExtF11IhQe1Lj/dT99/y5N/9dD8mrK3ymF2ry6jro77
+8TUo58NVjvIRoXCzi1zHZzgjI8SwBrYWPjvvDRxhnzciqYH7qP9UxIOfKXbF
+28LsfIPqaPiOje3IadgtS/nsYtiva/qRRpgb7OvxEP1tmHX04Si8+ICmNvWv
+uqykUVET886vUi/AfO7pIwIDmB8j7pGB+TOTDPQsYKVTH66cQz7VphPtG2FW
+rT4+FXmyM1NK1sOcOUdNryFvv8xNQoaa9D56T3s5hWXG7ptuW0D1E1yGDOFI
+7YXJU8lH1zjUTmaZFd0jjz6jH05WXOV+eKMnyz6F+SXmSZ5weaqwVin1n9gj
+Gw1/KtlafZHmLTV1boVLAs6KxdP6WJeDDeo/sXRsOkzrAg+Z73CX0Y/jhyiP
+NwW9leivySfWOYbqP7lWlYb+lRsG3p2j5785FURjPr//zgbcovX8IfkgzC9+
+QzmnB+a9CveyQz457ye/mo7+rXefV5BBfuWRRpOsYOkpZlMC4Y+NGyMTKZ/r
+l5pKYWtZ3ul2Wp9zZvwdnG5VrK6shfdttE9RFPczfmimdCDMrjaqEIMlmxLE
+b8PcF1P8P2F/sODjcyFtfH5MWvsr4cDeZf5rYZ534HAIbDFH620UzETVO8qR
+lWMrS2H+s+shm9HvtLg3ZXxa363T54B52tbmyTA6qG+9rcMW85Yo7T4oCys5
+xFavQx47NE/Omkduq15nRu+Tb3qYAswvfvffBuR52GogTwZ286taH4z8M/YF
+zBaiekqiWuUSLFOzft3h93R++41/1OGIlre9j2E3m06PenGW0Riy87tB1q9P
+Ow9X5aY4n4HZ0xU5XFjt/PZP+2HOwOOcTvjs6rtmntr0+0R5vBnquSY7mW+l
++df2Gz+Do3ZbpWyiepeyOxLRT4toRqQN1WO7Bt3Qr3jzln5Xmv+c3Zc1mIer
+WLs8jNav5kYtwby27QKf8zD3jNPYXOSRWP2Vqafzava2foeDe4alJ+j5qnty
+lchv8ORJcxOaN7WqeQfyHX8r8Tma8vgrO6AL3jKRoPAYbnbffpR+XrB/WRbK
+L8L7lj+yQwWeN57rshOWvmPtTPc182fK1xswL3u+TS+eN9jTbzYCu/Ebfvei
+79czZXYrdennlVo5nV8l+SI4iPxcwP2E/uKUD6y6DLt9530Ugi0C+CV15BYZ
+gRDmk962aEsPeanRxxHkcXy/vvAAzD90NeQz8ur12ao2SOuJWapfkGfvCc/E
+97QeHDxPAg6yLNjXTXb2vmSM+6gWDeM8gJUsX59OE8NclrWxRTB728ZSBU74
+drMgCeacrtDpFmWZWTWdKiEwlxE91QAfWcnobqPn7QrS3sM1s5onTGgeI11j
+YzzPvSeXrk39XNffdgfOP/qkUZnOf+P7zBPnf5RvE1Gi80Y3/dJCfy2G4s7q
+dF7irIrJmGforyuhhnRemqTIEHzBVD/akZ6/772eT98/Y0GmUXT+97beOnwe
+Il8tFdyk9fbvx84gr6G7lgcpD0a2v3q9FMsxaA/KmbMY91M7YdaBfDtVx5uM
+yaHZDkbTWE76NsUcD5hruFAR3xccscWFc4/D/PAbPPr+0MgamFwMM6NSp42x
+ziR32rfR/oOv56Aep+/1nB/DMGukw5ijfm8tKyKrh/5+xvYdRT9x31r+1oHZ
+JTpauZIspy3xcqAZzNcYSy3GPLVrFjy3gblmahL5k1nODPese860v9v/2yUJ
+luOhWL7JDeZ9ixDD+8bZOhJbs4PMX52fLcZy9v/55xUnev72QHIj7qPxpvh1
+qscTdDrLwjsm3tWugd2kzJWOibCcXNcLvStgzpDqSg0R/P7o2KesQf2mWf0Y
+F2Y50rETWfLU31HjM2LY3+luEyNF6wfWiZthf9Uu7zYhmLnqp1GE9Z6ToTFj
+lEdYZpMZzhN/KOozQvl+mCQYE2U510QXzRuFlYR3aTSj3+akolmTqJ/DUfdu
+4fNwKNoymurzfsz3z8TnQT4n2U2R6qc82BOPPErXqvkvp/lOqdl7Iy+uZoC2
+LT0fu1pbA/evOvhkKJieH30xvRH56v02MnCG+m2cFmk+leVkZU/MuU31JoJL
+T8LFP6R9+bRfWaw7F/czkSVZIbYE+/VzjU5g/Ur9tUEtmH8izY6Fv0jcE2yC
+mQeGTTWof/zeo5ZA2O2hkfNseOnc7NzjMEfb/+w69Df7femjDKon5JXlhP59
+ZBzvl9B62Mz3jrjPVXrjm3lUf9mTK5sx/95jkzwe0P7GoL1r8b703xVa2gCz
+0V+H1yNPFYsC7fu03zHT0B15x/fM/lIF814WhqTivhJ/CW++ST6ZHy4Qwu9r
+neKrcuj5uZ6xkfAlkXW8VJib7TtgDNc0TPyKo/7f2P+nI8Ry2n/ulTtIvl21
+ywa20a1TCCJL1vlcxf4FwWNyO8k7XS6oC6POWYvX7lTfZPu/LbCKg70JmX9U
+xf48+rNQDSv0onny7Af2of8A868Ru8nTPhz3wP2/qTvXGEH9MJsvYn5OcV+r
+fzLVX6l+eAnuv+3UGuEiWlf/5/MkvP9yxx78eEjzJUtH3oQdXvLiB2i/04Zf
+pshbk7PvkfRS5Ktw/m4WPGn2jNLlMO+TrmQ7XFFZo+lCnrF4dits/VvLlGgy
+19zxIvxKr8UwB+Y23QhZBitJnbtVT+td6eqXcX8Zc/0T+6i+83o9PvqbRP+P
+18c++leC/R8W37Y1
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.994885276715344, 4.925732979470893}, \
+{0, -1}], LineBox[CompressedData["
+1:eJxFlglUU9cWhgMij4AoS6bk5t4DqSKlokSDrDIIWwFBHoUUQStjRBDahwxP
+K4iCgNWWwcoghVgGtXVoFYkiiAhCUygoolTFIaAGEQGLNCo+UFTeues9T+5a
+WVnfusM+Z5+9/38LIxMCorU5HE4J/rH//7sQpExM4+tj4EjyxfOiEfw5l6s3
+rcCcMWBcW4Pg9YlCiSwNsyqw4d4QAvOjUT/xlmK2bN6nNY0g+C0UGw9YAydx
+KJk7iWB7s+ukbxFmyd6lq28icO2dLyzwxJzxfOL7QgSbOrVqC98uAE7+z116
+jgjKFy1p6GjA3J28l+5kgHNdp9Q/C7O6a4vIj4G0w+Lca4GYD/2aFtNBw6JB
+dV+kGLPcYHIN0PBbzo3+AoQ5w45ztFEAHfUOiSvNMFvqJ91wF4B/5xWLS3zM
+0pP7O3spMLB9sqLBGrNKvflUNgW6p2OEsa4s+1WlfU4B1zO2KTeEfV7doeVA
+QdtNpapkJ2ZOQFThpxTcOcZ1uFbBrk8cMGc9BVub3is2NLPr59moiilomrjM
+HOxl46d8rjdKwSrp/opXasyicwW+6wRQ4vOy3/sdyzTE3hDAhmI9I+V7dn+y
+dP91NPyxbDB/2zjLNW47HtJAyy4zWffZ+PHrnaMYSFmrk/T+Ars+xwr9hwxQ
+3uvFuTmYjTKVqtUIQj3BOlzCxv+lOr0SgZWd6qXYkP2eV2F1L4Im4U9+Tr9b
+4Xz5VKVPIbg02F08vhVzd7ZR6DsE7Veu29NWmA/1rBX1IxCYPIhIvz0fx1t2
+NewEAlCdvH03F7OlamZ1EIL03oIvz3thlmu1i58x0Hso7eWaWZhbmFHDrQy4
+pR4LSe2dh+PdeyhS0+AwZD+dVIdZtKLNLJaGkBWXKp6VY7Yc00l4JADPpmCZ
+diH7fNLyK9ECGAs0GLBm+ZBevdckBcWP+xUu7PPSoATvSgqilh+YUXIGMxxM
+WBhBQe/RygHzLszqzx6ZOVMQqJ/XtOoZZtWe5G57Ck60LeEnzsHr45Sg474U
+vB85U9kuwqy6bJWQSUEYt9Er1w+z6Pbz/G4KeMlJnAWbMEs8Dtg4CEAdcMBa
+8jW7X//jzlUC0DN2FtumsvmI447Z0bDSsmdB+BbMYBHVc56GvbN2nKKlbD5M
+H3m4MlCxWDzlBJjVSuZIIwOSwSWGC03Y9wds6m0RuHsc4072sfs5Vz4zG4HH
+3d+sHcswJ0bd0OpCsG9qc/W7Nez9DUNBr/B5bR+eW6OLuUVHocuxgOl67Rjd
+8x/hfG2Z2DeKoDVC3KCIwSwXx6guIoiRO7+oEmCWhIsjExHYnvz9aXSPEMe/
+V9VhiKAwzzzPrQRzvlHtX6UMZP4ckGKzUcjWa+d35gw0pw03FzlhNqoefLOf
+BheHmdfDEOaMN1lP9Wg4LK7f1jmbfb5e/fo7AVC+Pj9mGrDfX/woyUwAbb6P
+5TnGmKUjm1/UUTCrKKMr0gqzShJom0DB5ZDR8/pumCVP/nFsJQUWF8dnCMPZ
+eDah+8UUOL3CcrVLc3+tncHbB4c175/63tj7VYvm+7Hrdi0tV2riy8sF/l+P
+atYXUlEblT6uWf+tOq9s++ea/TmeeyM60q/Zf12cOcS1afIz7ln17e0yTf4G
+woa3tMQKSX5Xu7mYHvxESPI/26nVMOCxJTkfec5Vz+WlluT8ti15V/ra25Kc
+b2j/YqXshQU5/+778w7rfGFB6kM6f6d8Xzsi9bPRt2Z0zipE6stHv2zwlzsM
+qb/TyTJuzi6G1GffRe7xP9wYUr/RB4LOuvMZUt/K09my4wYMqX99uzvyCFOG
+9EfDE3q6RsyQ/rFTfJs4EsmQ/hrjlLUkVjCk/2Sry7os+hnSnytbhr75txUi
+/bssu+XTbuxDH/pbGHxn8s8yRPq/xcAldW8bIvowe+GIo7wXEf2QBvt0vWH5
+//piH7BbMb8VEf1J1/1Biy5CRJ/iVGe9DbBuftAv+yId/hdDDNG3UabPtiCR
+IfoXa3IiwG+YJvp49pQ7zFhDE/0MdZP+0F4rIPoazw2/ZYbr7oP+xhdciMzd
+ThF9rtzmxisd5BP9FvnsOuMewSf6XufxmWzkKY/o/5T1BDMjj0f84cyRuNYp
+Dx7xj/Avlz2Ya84j/vLxr2MP/6nNI/7T6MZ3iZ/JI/4UZtKvMEE84l+Jg/9q
+7fTmEX/TDtZOdcnkEf8L6Rkt2qjgEX+ULvJx7dblE/+862O3Z9ibT/z1QYqo
+yW43n/jvrZ3inblyPvHnr/K+atl9lU/8e/3GQosdN/nE3zc1B7v0KfjE//P1
+0SonGZ/MB+qC0pHItXwyP+jv+c916RSPzBfy7eW58Tk8Mn8wrm+Llbo8Mp/E
+o7qm+1vNyfwyGZQ1Z9M9MzLfrPskveeuoxmZfxpzHC5c+9GUzEcTWcrwLh1T
+Mj95Vz/7WyvVBD7MV5OD7HxlDP8FAmqi9g==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.4452, 8.75}, {-1, 0}], 
+        LineBox[CompressedData["
+1:eJwt1A1MU1cYBuCb6lxjO6tSsKKgUBjUggWalI6wcVEUbTKsyBiKUiIKjSgW
+A6HiLG0E7cAfhuAqq1BAYZMfgaqFQRCmzFIrOMewDFa0Okb8WyfbQFHZe81u
+cnPyJPd85zvvzTleO/fH7qYRBLERLzUSzlk8viQxTY2rSIJjSC+ywfdl1S03
+4LjAkKE6WKGQ8Yvh7p65rP2wM8x38y5YKW8wCWCOWt+4Br5vKih74kMSzfM3
+7gyAnaFRledhMu/RMm9YUtY+sR0ubkhn+MBBizJPuMHOV76PguGTppnyn7mY
+v6nDLoHFs9aZMnhaL+7ZB3vqNCkymNA0P9HBVzWJHwfDQb/+I7fA82vqzjHh
+O5PXaQSfJLxZNaIX3iSxoTY/IRSunRO72QEnDPdN7YMlzBLLKOxMUmVXwQS/
+gP0AJm9bjg7AywOiw5/D5qVNnH9hR2TrJA31tdzPd7sEkIRuU3+FB6zMT5n3
+IWxoTN4VDstnoucEws3uL8gd1PdrY0b8YNv6Y8tUsPSbnkI3+PyUaEQPm63s
+opeo33Xn2hcmar6Q6P8Jlpoj/Kxw26s+owG2e4ojhmH10eVv0uAML/ec32Dn
+pddtPGp/wtbRe7BNdlYwgTy+Hxx33KTyy++3XICr36amNcILXT59Q/2/Cc4H
+l7Vwd3sazx8mpv44tI3qp/OY9i8ecgqmD3Kp+lXr2ddhuy3Rfxx56Io4Bypg
+20eMwBpYfiXBkQ/HqZ9Zt8OKjlRhDhy2yOLqCgdlbW3PhhVeIdx+L4zP9BI1
+HFNipRfCbRkVkWfgrp7JTglslmQfuQrnVmrmLoaVD9cWjcFJruXJD1aiL8PI
+QRb6vSgQzLbDxGUaLwruXGNv0sN0blnkIfjxD9VDX8LdHue2tMIlL42ZGlis
+3fPnOJw7bGIdgZXxdV1uyO94/YbhE7D2dKo+AmYPVugMlJWiehl8Rvnej9R6
+WlWsPBseGjr79T2q3t+Cjjw4KsnoMg1/y+8lVHCWJNR3KfonopcsVsAHBua1
+iOHkdbfWxcOlefX1cdT+RRf3BsN7mCmr0+GVGeF9NLjpYUthLlz8/l2aFf3G
+C42JGpjuoWKfgkWMrFIVLG0zimPghYbewkxqflj8XQZ1XhYsebsV1gp5cRbk
+N9HLcn+3vlLvdxwuPTmQxYQNv0yd3gIzn/5Ot6F/9YLxWm949dgn/Hd5XpKu
+mPHHebiy9/A2WJeTmmiHb/iMjrJh6VcFktuwvDGisnwF6jWVp5hhcVXIGAN2
+fpZgGIDZqxq+03jinriQc9gBv6buHY//7x9/8j9sjKv1
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.6318774622309, 14.558628882191854}, \
+{0, -1}], LineBox[{{17., 17.00000000000231}, {17., 9.999999999998607}}], 
+        PolygonBox[{{17., 12.9}, {16.6, 14.1}, {17.4, 14.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.9452, 13.5}, {-1, 0}], 
+        LineBox[{{17.000000000007276`, 17.000000000003638`}, {
+         11.000000000005457`, 13.5}}], 
+        PolygonBox[{{14.51826734053906, 15.552322615314452`}, {
+         13.280184249251306`, 15.293188945044921`}, {13.683281069670574`, 
+         14.602165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           
+           9.996694214876033]& ], {13.823799910437668, 15.984057296392571}, \
+{1, -1}], 
+        LineBox[{{17., 9.999999999996362}, {11.000000000001819`, 
+         13.499999999996362`}}], 
+        PolygonBox[{{13.48173265946094, 12.052322615314452`}, {
+         14.719815750748694`, 11.793188945044921`}, {14.316718930329426`, 
+         11.102165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.823799910437668, 11.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{7.5, 5.}], PointBox[{7.5, 12.5}], 
+         PointBox[{17., 17.}], PointBox[{17., 10.}], PointBox[{11., 13.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T14", " ", "P2", " ", "N28"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdief/fggjhihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdief/fggjhihjij.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:eJwd13lcjNsfB/BnCG2Y0jLtaXErhSIl1UxapLQKU0IbkihKi60iDNowUYhB
+ERUJGVRGJVM3GW5SQnPj1iAJyZTo9zk//zyvt7N9v99nOs8508Ni/NeNoyjK
+jUZR5EkNjOHfXyxqDgGdRdmqCfjlcM7JDnV5OFqnURgGc/4NcpkNy1QukNeA
+QzKz/WJgc2tTo7YZLIp+Ykm9EG5vC4o6A8vmmvXZKrGoUbVewWaYvTNMpgrO
+yZu335P038cN9VJmUTy/wN3zYX5PxdVe+D33WsssuH2Ttub+aVhPKD86F9YP
+667TU2FR2l6Vn1xgqVnXmxsw9fb54FrivNkT56sizpaj3/fCsUm30y/D7JpF
+4SVwseeB9HFqaNf7vev/8b44ssgFVhwXE0hDPqkX9WZvgnfFWauYkvwWydES
+4dIF9C8eMCNYyo+EufkucRFw0m3f3EXEWvnZcaR/1OuhSbD5/d03EmBqeblN
+NdaPL53VHg2XB81P2ABHa37gLSfjd/+7QhHWjy/wtCT190x7QPJp1+y5QxGr
+J2WvhgdsNgQ9IvnnObBV4fQaxsw0uNyJq/EW9aEa/DJJ/cRjV2WqYMVYvpXE
+GPN8oy+pgFubEkfy4PK1Hz7XwvxzHi2esOSD7d1+2Py2TMp4mL0ieYY15i9d
+43Gh1gjj3/VEc+EMihF3BC5OtcuVQ7x9svmVa2EpTViQA9tH519iwSJl9xIj
+5M/YnNc9C6ab/HIWwGcuWEWawamNAcdWq7OoeZeYx61g4Y9xpUMwV3ze2A2O
+zB3o2M9AfmobV4TD5Sva3kzQgKdl9x6EGesUrLbBxRtcnW6Q/vczWY9Je9LB
+o69hd0lh1jhNFjXoHds/Efnk/KvYaQAz6BXJFnBqqJ2FCcxLTtnnBYsjxlqn
+wZxCx5IIWOjGDZJgvsLwxNFYWP/U47VX4PZdBRO3wgKvv+NWweac3P5wUt/N
+/M7xcMZuveQlcJJetH8xg8xTPNmAtL9prPWGGT/X3uhHfLz4m2OjyFeFKRop
+h2NXGe7mw+nth/5EwSZXhJMPkPrc+sdaD6Y8vIo3wqKy7BCRIeqhoGyzHi78
+WhueBke+Lo3fDQt9AmdYw6L5r9quw6/jRZv7DVgU63Q3h6zX6ptcdR2W5vC3
+hyKevqaPVjthet+y0E54KUMzwR+mnFTp65HPrh0Bp+fDIUF+O0Zh25QpWiZw
+8ZYcuXzUi+KY/j0DFladeG2thfGrfogt4fLa4SlPYBeTFyOLYcaqV1SgNvJ0
+U7bcQNbnBZ1uhQW7p1pkkvW5WVkLdZD/6EPXO3DS9KH9h2GVSaq8btKfM87v
+Acx+XeaniPwERfd+t8O3MiLTLeG8WLv3L2HZnjd5PrDQYO+Fathll7dbBByi
+KJTNhJOKt1RuJvUJtf+5BJYeeXg6Cs4x7Zo1jHgKA+Kcgkj/kiJ1Hqwi/+24
+PWl/eW2PC5wa8Hq6MiztveTTh/wYjXaqrxEfJ+j20gI4eHC58Rl4TkqYMBge
+MH+RFgAL5jdFzIZvfTLkTyL1dLXsZMBz9EK5/Ol4f4LSFi34fZD/2EY4KVym
+dAFs5DT8ShemJ6/M2wazAnd0dejj96PJjnkEUyJqRwHM2WH1bDbi42dbXd8E
+i4QJzGtwe+OZcW7wgEPRYnvkyzrgEmEBl/OW322F9QcXGhvAOQ7r/9uqi/jP
+Pv5uCLOi57ybrIc6Ri3qsoQjCxPbL8ABrTnhHrDgzDKeKp4mhSd3kvXsRb/V
+/fAc/dV69xhZf8rNx2l4xrd/WVeNJ8U0/esSniqdLwokpP291Jn8/4B8a5IS
+8nNZbfCkAS71HDOzhgcUetXq4IxrDn/5wfbCx2o34fQz/o7hMHtJx8o8eI5P
+/F1Sr4HY0d54WLjhrxjSLn3w1tGTrMMIf+YD67/9pqcL1w/6Dc4irjrzVYx8
+mm1WZ9JIfSsVdh6GZRSzPgpJfWy3HXIkjirrPgBLhHIe4+DCmHc1DrB+0h+z
+V6iXvl+zA5mH4bWrqBGWnaJS4QRzxsKm/QOLdLZeL8KTw7947CeefJV3n5Tw
+ZChf+jkf/fiDk+8e0SG/x6Cn2XDSroQ6dVhgLo4dI/Mo5XXcxXt0eT44xYm8
+p6FD1fHwYIlJ3iESV2fkeA/49fxVV9pI/o66fxbA7vcrQ4yRF6Mp5r4zTPda
+KdwG848cmLoOZpsuH7kP580JvX6K/G4yFFz+kLqd6GeL4eiyfjcb/E5zynon
+WiKewbBQ1XVw5LkBi4Mk3hczPQ7AvCMM6g2J9892jVOwb0vaTXPkV1WUGMSD
+ZZ+2CWNh3/mRh/JhiZKVdyGc8e3EQzKe/dhTqw6OZH+/vhF2N1KSaYLLt1zZ
+40L673Qcq4RZbY33NMg+0TaDeQg2kThY95HfQc3OhU6w0ZY0cQ3cbnO2RIx4
+JD21pVziS9Vbo+DIHt2IWJKvTW1iN/IT0q5yAuCQ36UpXrC4p8faGWbdLP9Q
+jr8rboX2JEeY41a3TRku9G8Y70banev7E7Hv2abKHV8FF688TOvFvqhv35Kw
+h8z/weZVBBxfWdFSBouctAZ/YF91v3HHQAILs7TEBXCVs+H2mchn4IunxlqY
+NfggaDupp+R2jx0cUODLqCP7ZuLfnpYwNet5nRL2naSljrJOsEBjaMMasg91
+OlzeAEtCjE0uwWLjsILzsFS4PLwHlri3xX2E6WvlWrXJdzr11h97xGev+L1k
+MfmuaP4+fRyO1Bi4sg7meJomke9e+xFP0wRYMEH9hTXyDe45appMvsP7+30S
+4FSnE94xsMT7ukERPJBd3B5IvrsrF6+pId+Fh6ty7eAk9W2aD2DZDm7jNPLd
+y9HIJ/0j+J9VJWQfNj+yaiss8r+/4h7MObfHxJCsZ2OflgnLehWNq0Y8t2gn
+U8g+zr82j74Ipj6tmbwIZjzkxlciv8Jk7xMm8BxlGV09mHv0CUMTZl/JPZSG
+717p1KuTGbBvQVjqO5xDmt+brTCETZy1n3nAkW5sS7LPF/uw5cg5Le/2L9sw
+mPrz3ZJJzml7d63nwnTpo6MvcA7iHVut94yM1zqcvA+W/FXvrob8Qj6naXnC
+u05rhIaSen28HWsBt17MPnsd9r2kY2FGzq0u05T+kHPQsGMdE+b+Q28g5wb3
+V+qJm2BR1vK+bNh2eFPKFdi9P3DoCSz7o2vuD1iQsuwuDec8d1q56xLEJ7OW
+e9AUDunxpnjknFn004WcizkOr7K+w0l5YfF+cKS3mrMjOZfur3Qglt46+moH
+rK/zaRPpH1l9uaYQFsRFhpvDeYor7fnwnA+qSgqw7W3XGxUwe+jT825yTtrz
+tOQYHHHdeFUlOSeV5Y2uhI2cY7M5MHX4KX88HHz88rpgWKpIs8hDPMHfmh/M
+g/lR+g8Z5Nx7sd9dhYx3UX16CPkZbS8J+E3OedOFmwdwLs2Z+7b2K8wanTPX
+n5xrTZok38g5KTBw4JYy+Y69TaWRc6xPZpQuHCzoOK9D1r+gocrFPSN15Hq1
+G8zJ6W/RJP7gW7yT1FPB93Il7imi2k9F9+A81fWlUbAsSzGV1HeAJttgC5cG
+ZfC8yD1CgXN2OpzaoGxJ7jW+BqdOGcFU5FmHj+SespUvZsLao8nt88g537Ek
+JhbmmXU7JMOyptOdK+AQrdIft2CTvfnpFOKpN1j29T9yr9q0tGE5fGY8VSRv
+gvbRRa6lcHtqoKYBzI7fMfsPzMlfMDoTLi+t+uiKfAPm3T1lQtqvPmXvgZuN
+QnsZMOtbjepFeGn3tY1/ML/t3CVl5bDR/iTzThLffUl9Iey+SLnoBjxQm2hL
+xqtkhOemk3j9VUwcYE7Ryo8ryL2o+dRQN9Zf+tYpbyYsYDfaboNDHvYkTCD3
+xOftuf3Ij/WnS7eX3KtqZU8Hw8X7qKbn5F4yd7vsvqlYt3uBbRO5t5zfKXWd
+gqen16kWUt9jl69Pnoz3/tVzn5j0X7C+4D8Fsv7Jf8dIvf1ebGqXx/oad8fI
++qyjkt1f5HBOPk7LDCf3rufau63gW9+yygpJPsOmo5dkEef9fvpn2FfdeK4v
+3Gy/dIod6qMv9WqfBWcEP6/nkHp1rVN3gqPTKh3bYN/90st7YfpDp1w9U/wd
+mB6kfYZFJ6arhMHl5holiVjvtZ9/0GmYJ91wgYH4ZJqVExtNyTmp6kU9XB6Q
+RvtEHFtxNRb59D2qNR2DB85vP0JXxH684l3tBDOsF9UQlw9HmA27kPYcy8mJ
+NNTjvXDL4z5Y9ER/AQuO7br3/SkcGzEuwAfmiGZ8vQpT+veKzGDeu3yPVBLf
+ggt7RZiv8Pblp/5k/c6qRieYZx20zZj099d5lUbiYa80/IV8YyvfbzyBeH3/
+UbtG8g+ZWs86iPzaD3SeuEc8w7djNfJ3UZ46Wkzq01H02WgS4mqN33UR5j3q
+GOydgP1FvMWwhLS3bDhZIYP9L9o1WACLXV2n54zH39OIwuduWCC/Qnp4HN53
+bNiwEuJhGYl0SmnYr8oHFJeSeldzBSMU6vtO2yKbxD/pzn874TPpRl/bSX3W
+rJppBbfGbzs3A/Urr35ZrANH5Dd7bzcj+1b+54Wwr6BerpbUd65YlwNrW1Z/
+k5uJfIc7rH7Bo5FN6z3gkIw1bhlYX5reqJMGl68xlrNEfM2TjN1KYV8Oe+Fb
+OD1g6FQT8ZeD8znIx+hNQlwnLEpJ3mmIfOvXTfj7LZlvG8OxCGb/WO30Aqab
+vpGMn0Dug7RpAjI+JeaoDcy2Mpc/T+KJGWbbwbxsuY07yHy6J2/KwmLKvsWb
++N+U4+cxn++sYZXpM0n+ndsnwgyum9Ug8hPFXfJdiHgY5SP0v2FW5L4wN8Qb
+vHDBlmJYfLCmZzby027V5GeReiQY3KAhf76j2kAKTHXej878zaQGG44f2036
+ay6brPqLSbF2taZzYN5d2b03pExK8l1O/jycqr5VIXmISbXyDAUNZLy04U3K
+IJMqfJZUKCXr03rNXn5jUoJ9avrWiFfwpM834yuTap6qpUXyY73caFM8wKTq
+b85VewSnlgx1z4L1F09YMs0c6011d9GDRzmT60NhQZOWaxzc5xHCLSPOWqOs
+j/lGHTN7v8PURxpPDevJRg9bWFlgPl27EJfvTErsJ2+3HqbEG425iK/v3OWg
+LNL+csTwyw8mpWj7LOYKHDL77STHn0wqwNNHWgmzju2lRyFfWec29Tuk/e0D
+4zXDTCrk07Lcq2R8XXb7pBEmlc7d8ewYrB8Y6swmNvx9eyssDgh54AKzuhaf
+XUL6m6qsf4zxlFRkpwMLls0O7ML8VcdWx34h8W8zfpKD9fVjGufVwalHJra9
+R3zsst9Rp83Jd0NxWIJ8QryfPNhB+geocq4hf/2l4YfCic/XFRzvZ1Jz5J5e
+XUnqc1LT9sIHJpX6RG43m7SPKIXfec+kImMza9aT9os//GliJhW83OXwXtLu
+3xO38iXeh6fTihJiGwdRwlPUd4LPSBfx0tKSrlq8P+tJNbqknkOGrLwKJiU6
+9GjzOmJ6rOKzkxhvnrj9BjH5l1dN0clzFut/TP1DYw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.684589195445786, 6.720523577306384}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt1gs4lGkbB/AX5dBxQihTRoRknbXTonm/SqTkkBWdDDmUlUb4UmyNqCQk
+20E5NBY5rCyb1dhNjdN+o5XGodi2wxRFtBrWOh++/3N931wXc/3e557nue/7
+ed+ZR9f/mEegPEVRz/BH3v/3YtLUPPJuTFPczSYuk9o0lf8wvbJiHU1Jip5M
+/wFHVzwMCIDHD+oyb8MZdNPzlTDXuuQfZ1hszszvNKKpcrMGOelKmmqWsVdm
+w30duk1+MMtqg85RMq549ZeOFTTFe8TQ3g6zwpaP2sOiptcfLEh8SvrSPC2a
+0vqprM4QVt7m3KwC2zkleRjDaT3vXp3QpKlYy7rv2TB3OiRnWIOmSsdcrNzh
+xJ5wyWl40UmhynGYl28ZxILLQ+rEGXDXnhMeL5bj+hpBcx3JZygosAxmGsc5
+/0XymZVuyIa73vSFL0d9UvcjOndgUf/2VDbcNTzG+Q+s77Xb0BMWTbhmzMAB
+b4+uDoKdFNuNHbCefo2KOBTmz601uQln9KfOkXG6N8xuBN4aKW9DPq/8nF/o
+hnr0H9ZEWMOsPeNFRTBL1OunDBcxtCtG4UWeVexW5Gdks7XQBv3Y/7j95zT4
+sGmDgR/s1nRdkfTTaHLfvSj46qZ5ZdOGuF4nfceDRcdbg8pgraLlp9zhl8bN
+8n6w9JZ/jCacpmC6XRMWawkNGrCedOvRZ+0G2H+13H4f2KhGczwDzoi1cXyJ
+/MVD6zMPw6xPTvmu8GFn2/VbYaezTcxq9GPn3aDzJvC4fcO/VsN9lNywLsxr
+7O1MUMf9cXq3pj4cvUaQPqyG/QsuUbKE6YPyklCYcf6kozNs1FPpPa5KU+aa
+atIQMl9Rq8FNuFxv1YkrJJ/L32zwgKcflob8Cstc//JbC/dY3Ze9h7llkzvU
+YPVIP/YS1CfJ+3OPNpw1efuSBcyv/73cFu6qvXbMBe669tw3HG6YM6vzhYVs
+u2NCuPRkdnsQLFgnXLEI+QWUh58i/WP5/lshGC6qjdd1JTZbeqoeTrjY3WIG
+e59KFWqjXubUFb158GH5vSYhcFr33O4nyE+oJ7pfDJceL12RAps3qn1+Bkvf
+peY4wH0mMS4DMK+KPjSxFuvsnTzYCydUMXV/IF5R90oMsxzvFx+AzfUDay/D
+fSesG9WId9tz7OFPg4uXSfTR33nTv7YjP+sHz6RXYbfdqj96wT0J36wJgJW1
+HU8+Rr2hXrJtHJhSDDG3hsUNyRaG5PNy1/xvLsP95N5pwoQzLNva5xjYrxc+
+vav0yXXOxqPw/gu+J9bDjNGmj0+W0lRkwavALTCv8E1J9xKa8qweeXQITgu/
+Vq0Hex9hmybBrPQU1tXFeB6aChmVJP61ZjEbZv6klPOarH9/7q4qbJ1sNF+J
+1HfOb6EuzDBOSjWGeU5OJlxY3aD5wTaYVcqzeQzbFQSH+MD8O1Y79mC9hg+u
+3VxY1uH1eQa2G3ec2Aczyg4dv4d8xxdPLXOGheU5GzegHqavmel6ODoq7l4q
+bJJV83GO5Hc74sorUu8Wl8gmWFotLl+F/kS6msRfhLmP3uc4wwGyfrvNZLzE
+v4ULs46V6YzqIR+5mNoDsCDuaHchLK5rNaTheVtP+uyFM77XH1SC8yOfOzOI
+8yw5VVhPuX/cq3kN7ler36NcYKeWsI402HzAW+575M/XH670hVne8hFJqK/5
+umnYVzDPv9XvIPox4urepwuXV3/qNlqE++WYVYQGidcZO/PPAvQlS1CnScwO
+znuqgnoNPwzpwwz+0pV1yuiPMj/VjqzXZZXyXAnXBw8V74clF8wYy2FrH+3B
+szA9uFAUr4i4WxkPS+G0rnOnDODE7pMencTZvT/Ozsc641u75ohnX7kvxDg/
+ackNPdTL26kudYJ3Xp5aQsPmDnLpFXBpjpbmbliiM5xpj/X4QXpjpF+sYGZy
+N5yYoxrrBQuyuL9mIN/owmBFBxIfFtvsjnqkyrevGJD5Sh5aKaDe6PnBlVNk
+/bk+US7Myrx5sxHmLm3V11tIU+yLLsPnSP0eCaGnYW///LebYAHHLLQUzgrf
+1j2si36mNakXwT2PH9zNhyUqF8rDYMm+hap7YLeyjQoULGta/GIRzKrXdTmI
+9Q73GRWKWYhrVTFPRX588eu2ZGJd2YnryL9j+oHHPtjtXHvTGdSXXzEisIFl
+cWF2nuiHW1xlCZO46N6b1ein9QrNRgbx3R/YAwr4vp8xLl4Gl9tJ7zfI47lu
+23xiNSxa9si8Sg6/L/uCasl8otue3k0UTSXbB2d9zSLngUB3RVhr8ZOqGJjV
+cOP6h1kOlZx0PrIAptds5xnBkSrLl0iI/wiyfTbDoZgpNRXjJN7puOIATNtY
+FTBRr0BVe9If8Qz1dUEbSf2OAyUWcxxKuXGbeCfpz5ctEj2sVxS8cunXMP/l
+KxWSD5XSJu8OixLk3n2LfHs+imc5JH77xNwG1CM5YD6hS8wN7ewj9RUkxY+R
+fl1rs0xE/epMaX0tLOV6Vi+Yh+fadUHwWVKvi39IMNxRVplsCwsKNqncgKnv
+FPa/0UH9woiIq3AGQ4naokOeF5PX+2Fu0pM7havxbvvd2GfMz40veq8Kp03k
+9rvCIgMLhaRV6P/0Joc4eXJ+2CxcBkvq22qTkH/f3vSxuzh3sVb2jkaivr4z
+Zx/6wdKXq95+h/5wp0KHTJnk96uet26aQwlnlBw0YHpsR17tBIcSuI7baJLx
+vNu+EWMcSrR0ZIk5GT+TsM/zHw5FxZjMHID5Flyt6L851PjuBZbZsGij5+Tg
+EIcSbyhmfCTjT1MSGmUcitUzFGCH/Lh3eusV4OgWUe4VWGRU8MrnM4cqcrbU
+64ZpyfS3p2HB9enw9aiXSr+kaI147+J7CYHE2eK5OTLfxMBUMizY09CuNgw3
+h3nlwHzZsdb9yEcYtUz7BokXipsbRziUUazdaBRMR+Vps0c5FDu+rukrMn7L
+LT8L9cl6t5d9wPpU56mhl+MciifP/hBDfNdvUw/6Iaqsrpsh/Xg6ECaYRD4C
+41geLLg83Ss/xaEylO/NdeGcKtUYtpeD+QejKu1gfvLaimuIlwWq2ObinEr/
+nHn8EeaTcByNF8HSv3+8exbrMTTPNZ/FOZWb5uDVh/yU1wVKVci5taOtZgb5
+96UbcgtwjqLUHEbaUS8jc62HNywINZk+jX6IhWX5+jCfdeT+uk/IP3FMYyHx
+JcP1Pr0cKjHc1JyYkuOZ/PIO/YllOegRd6slyl5i/9KNk91IfGquQ9QzzHcg
+cdNlMq6n8eXFFnz+i+ONL4gtA1zXNGLcdVD2BfKj9gfNDtYgn3O/2cQTi3py
+HYXYT07NZ3IOpxZc6LSu5lBa/QP5q1AvFd5vYihC/0fXOnoTR3ylEf4b+nvE
+k8cnno2LnMV6jI6J6+kw39d2W3YH9s8nlJ1MnMd22PQC/bdpGf2GxHukdilI
+kc9232IL0l9127QW1Cf+HHDwNdanzRbt8HiPeldf2RVJrCHzCUQ/yiWn60bJ
+uVWV49rdh++P5DMDR2A6tKei7CP251BKRRvOpbTDyQM/wYLDVdEbiA+8Pv0O
+8VrFD6S3NMh+nte1x3zCLQNx82FKvWvb4x70q21zSQw51w8nns98i/gq7dXy
+MHXuQ/T1P3F/lFu9ycK5ifpjb+ZoG+Irnk7vIjY9s2tXPfZvl+mxlcT/fzHI
+P3X6v0/i0Lg=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.6402550371571483, 9.170599194669919}, \
+{1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.999999999996135`, 16.999999999996362`}, {
+          12.999999999995453`, 16.499999999996362`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.407378835015717, 17.441896309779956}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwd1XtUjGkcB/B3KwltRmwzk4aJMtlNJuWWUZM6mZkucimDKElX1Ipt7Iop
+o600bWZJlHTRqlOTjhhhVOy0km5skqnTJksXZHTaNdTZ9vv4Y97nfM5zeX+/
+7/ucM9ahsZv2GlAUFYEfGSkGeSzlU2wyzuNTE/al2ZZwXxwzJhXWHdg64QZT
+qvj0qfP5VOmc9wdi4YIc/0kJrG52uX8F9t9qN94F21/fuG+A7I9462TO5lOv
+44dFFlw+VbWFJbOHz/xzNduFmNX/wAU2v1N5LBjOWcbu4sHciYoXJ+CuZTIz
+J9hUNVL8G5wqaHOfBxt5D97+A6Zm6I9M4n0dO9asegnrlNw91+CU4bTN48Ty
+h97bYPGSmoNmjnyq/dmbWj368ZzhxbWCpZL47LMwNyIx2AbmfqV+4Az3rhWa
+cch6oc/SbhafkoiKZGS+gJW2Uw6LxOfcWTBtdUb4BtjqHO3fWWT+7NybNvDw
+kpOJhnB9a4puJlzx8n3HKOqJUww0m8P13FDaC1iaPWTqAPudL97QBreba2N3
+w8ZuAddq4aw9m1TlZF5t4VMF027tvjod9S0SL2aWEH9TvuEn+MnRaWMXSb8j
+Jx5/ggUe+zJyYf5AfU8S+vf3oELy4cjDXtunIr/e9a43vuRZUX3dF47USHOu
+w+yhvJTTsPNf0u4HMMO0Kr4dDs9ypfeR+RjXzSbWOLferWoCLs0xXr8SDjz9
+qYfkmTXwtnUH7MNkV7rB/MAnXYfg/moZI4zkk9L/KAnOvGxJpZH1wheZybDu
+vNJDCYvnL09LgA8GtDa2wfqy4vzdMC8t4ef3cCrrne06OMxAd2bGMj41qCvT
+WsL23glLFsJiW+rRO9Qrux+oXg7HhX1wvwtncwz618FVTM7VU3DRnKkSEZxl
+yZPvgPOMixQ+5DzfX9cvhXlBg8eFcE1MG3sabOKYpXGHpftHl3ciz4JZEosV
+5LykSxol3LTCLoADh7h7JuTCAkGe1AKuD3j+rgBeoFZVGpH9MnlLLUwzaJkc
+RT/+dh9vjcGdzg2KfnL/LnxfwSZ5F6470gH3tfhwN8LJr3ZWPCT3LZgSp8Ps
+6mCD32HBjfaVTbBEOWx7j+R5k37RDHmk3/2QqSH7yw/bBsBWgobEFnIfmZ+3
+5sLSyzH6bnL/hWvqeuFWfUgTyZdtKjRkLeBTu1bdSzEh+QxHGmyBKxIaMmxh
+O0X2QBLMd9hr5gVTWu3aEli7/SkjCubOVk6qYYO6U/lyYmt1YSPcERKUfA02
+2aVkECv61hR3woxfzjy/A5tHfDuohyWj859ehmVbHnoznJBPdPl+GUyFWw84
+watKiiOD4PwrnHERrCv7s9sBvt2Rpw+CKd9Q+n/oJ9lx7GQU2W8cKW+GjdSG
+J+Jg2sd5NXlwx5vA6Qdhdu7dyTjYf5FF3AFYMJtW6A27pGW6hsM1U3rOOsA9
+Zce42+Eshol0Lnw7LGyxN2zyNDRnNjystbJ3gUtltYV02C96tb8dnPr3UB8H
+bpz1o8oCFvtomZ6wSPX6qDGp38ZWEQMbNxlVk/6pC5WMi7BeVeI3Qu6XnGf+
+jJzvqLEehLs8o9Lp6Jd7vPvxa7J+oYeA5KHhzHk8DDdO1r0qgtm+mdvG4NIG
+06FBWHJoPNoQ7xsMqOz9biHy4xU20eGuz8HxUbCXXjPFkdS7LT/jEswrC//B
+j8zXde9qhrnRTFHsl/rjpSNw2GhVuoLUX6fQG9ngex6LtLsJ94UmCmfCKzrp
+U3pgifzO4a/h6eR/xRn5k9GG/z/9qkJF
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.23789659515192, 7.38794612872654}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwt1gk01vkaB/C/NdlfJZXtlW7WoqERkr+8OuXmpHJTpN4yIRUp68TMv6JF
+hm4RIpRJskXZalJvQpEQb0KblGgaRZahqPt95lzn4HzO81ue5WfR2xG4fqck
+wzAX8UnfGQn6Ysgy/3yoskzzX9419jD/Q0HJWjjNQbUkBj51ydcrFr5eO6Om
+meLGcwWFsLGtQZOmEcsUezrllcObf4uN9YVbBAN/XoJ9mUcVxbDq3OxfDsJr
+fYLMR+FTPOHYUlitRyhpYcwyXH6r+K4Kyww0m0T7wQw7+MeAMsuURZj7JsLd
+ZyoWf1NimZUOr2vLYNG/9w9NKrLM1l3xCxtp/98Pw0YUWGZd3arspxQ/4nzq
+kzzLTKzKze6A+XN2vxqfzjK/W0Rot9B5j/wD5sKOEbG+d2j/9GI7LzmW2dCn
++EMu7e/heh5MY5mPivrBcbTf0srSG366cvfGAIoPRiiaw1qWAZqudF6mhfZi
++Kcbn2UtYbZI9eVOOKpA4KRF+4+uPf0QTqk/2CZPcbVsH7qvKK92lwScVfD6
+0kzk05WU6UfuLnKQfA8nyjyqV6B+HJEebEE9FfpX1fXovLxrStWot6M2yMuB
+PBKaVIJ+bGx0sdlD5znda01Ev2a6v3+cRfexNsnb0c/73jmvXtD6x91XlNFv
+iaM/V+uZoJ7+DpNEuPdeZbw/zIg2ffwAx/gr6JfD/LQ5z+Qwr9zSSntJU8wz
+bVqZBL2XYYvMNTB/0s2I5rc/66PyGVh0td3ZBf78afOxNpiVcnQswP0Ku9VW
+KC5Ev20igt8iP4Gu4yNbmJ/d2jeF/Ocf26O5HRbu9RyTgPmdPfEH4Szdmz1f
+UH+z51HmJFlTb9cw+rMlY8/dBNq/Ws15DP00bfBLjqX97KhYCRY6p5ZGwqzE
+4TBH9H+bl3ueL8WdHm3MlGWZsXCNTS6wSN9jzAD+JX203YzWx30dfC3DMtYv
+G3fwyFd+q2uG88zEDiNUT2W+aAiu2tqQ3wV368d9csJ+SU1RSR3Z4F/2D+AX
+sscNblI//K5n78f9GweqE8ppf9ktTzvk59G0XaEKzqq4LdBFPYWP17k0wUzg
+wHJl1Kv9vOP0nxS/K0r7DrvsG8uifDjrc6f7Mf/slt66FTBjfaL8Nvq10Cun
+l+rtDjLwC0d/PR2XRt6m/FtLliuh/9d05SplFiF+8bV3KMxtbz/uCouMzr0s
+gsUqDhXpFM+zqb8O92dPTPbBQjXHoGg4Y02GtrkZ9gUObZ0Hz+pZ8H0/zFeJ
+EfwX92nu7RIVwVnWL5+0Ix9rq9bm1zA7YRH7BfkmqKtHypjjvqrjzjIKLFft
+xbsxE2bkNqtKyLNcRNT6EB1yaH74uBzLlSj53JsHsw6GrmPTWG5IymBID+Yb
+GmvLwIG7/aO1YOHZloJF6HeR3OolM2h948Tlg5iP1V7BO1myXZnlsDTL+JXY
+LBlCPsLZP+aeg52en2hvJZemrgmBec+qR0upniVTy6Lh8+taW1Mp/1X+m+vg
+m7VlCUeovvs6G5bi/NRpFnOCaf26Ky1iWHmJmLeX1ve55iYiH5d0JVEg3O3l
+vCgQ87/j7spEwYy+zxkPzN++/oJtEsWVF7quwfzd3+p4V1J/h7uSrTFvleT0
+wV6KH1vbpIF+DfqbhSqjnu4rA1+fo58XdMVfF8JZrmE2HPqdkvO00JXcyc76
+oshyH0eN40NofWbSK4ESy1Wc/HA0jeKbxP1bYFa8PPQuzG1NL2Lh+SeLbd5R
+P5vd+gdxnnpX3B25xVjfsYnbB/fzr8oZwkybTnAN8klaJbBzhLvdy88PY34z
+JBRKNsMsf8hPFvlbtxV88IeFGX5hstNZLq7hVWEozN/pYvUN87O7N3skks5P
+jAoal2W5EaWSsShYdOp223cZluudjDL4me4z40fqwKfFI6b7aX3y4VgvaZaL
+91B95kPru0Zu1Uihv1edjOl+LttE0wNe5fDB1Jnyi88r1ZNiuZ5DMVK2FD8b
+EKyNuJJ6RIsp2WlKwQVx3oXcfD7lZ181Vkjr3WLOapAzDyTZ4j67NTOD1Mge
+N4Wf8B5+TBQO8qhe3mrzu8hv2szqs7PI0bKJlzH/98UuRXReVsos2xTUaxGZ
+72RO9ahyPx3H/A+fCzFzovtnpbvtRX9GPy2Q3kb1rHBpWIZ+xuZEL6B+cPVT
+AQPo56sT6xsyqJ9B55eFYf7KOtOnqum8HsGTNswjcMui4n66L1X04Bvi0ard
+Nco/oP5fFWpH4fBS3mxLmG91+Wol1t8e/TveHWZNq3JWw4q8ufrhcNbcyfcF
+uG+pUsxAIiwaXVTQT7+ftuWYF9L6uOPN0vChlTuEInLvsQR5/LxaHVYybKL1
+bvO0pPHeG5ZND2in+HfOeBL9URJ3unVSfDGPm0I/I5sKrJ/Cwvy3kWqwjfPW
+4haKW/nkCdB/QYxRVB3lH2S1IV2S5UxOrI67QedtyDXkS7LM+vDevjxaf/r3
+CbEE/p7ElBekUf6Wlr9USbCcOPjNVByt12207kK8jn92/Fc6L/VaiBH2F3i3
+Xg6h/Z9LN1zG+f6KMyYCaL/1jnF6Dx3yRtf20Pot3xrUMe+j7g/9Aql/7w48
+GEW+169bRIaRLf7ofYOf/wsqyrwY2q8VE/UE7/mFRp9KCsyJD9bcwfwHLEwW
+FNN56fPtUzD/ZEF+fSPV/8bD8j/oZ1wPt3wAZmwOa3yE57znZapa4PyBd72e
+eA9Sz5/1LoGFHa4HUuHhxenjnuSMIxezMS/bFM/SQ3DWrRXHIhB3jOmYuAR3
+l+zcpyVPc6m/cZ/O04jvTMB7u9AdyLyDmb80nToxv+/0YfH//wfl2P8BT1Cq
+YQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.72092184717428, 1.8721747773942476}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwd1QtMk1cUB/BPUKljCgNaUEELIpSn1QJWBuwTdGOIkZSHosTwkIfgLCoj
+nytMcBXLYAqCo0V8ApH4BGGKghMVkTAmn8qrDLVugB2gaxC1Asr+1ybNzS8n
+ueecf25T21ipJN6Aoqg4fMlJTU3j405TWnLa0JRi9J/o93Bvckjzdjhpjr/N
+EKmvzvvQbU1TzRtbY1tghaFffzBczJx4WQozJU7u7EKa6sz9OL0NLjiy0TEe
+1urZUAdyn954hQkcYqCb/dyNptjk6/fZBTSVf2d8fwmsLb8adh7m3D4TEwy3
+ct87noTH97ptMIBT2w9JSV0zeH6kwZWmxF3Tqx/AlI/lRRnMV7nUzcT9rQ9c
+7gaQ+tWzE0Ewx/+7j1yYI7E7Wgb3b0xpeO1CU6aRPdnjMP+N6PETWDmnPX09
+9unsKC/shGmJ/6IzsOmqmVd6YNasJvQlrMixjh2CA8sUW52Rj+vnxeum4Sza
+XhAOVxxcVc5Hv1OG2cnJcNrxbN9AWLGioisRZjIkZ/fAvTOMnINhn5IZ/qeI
+K9RfW8Lsw4CYP2BmtsylDf0GnG5sHyPz0xajCbBP081XZsiDKlerdJjf9TTv
+gTMsFFD8FNhiU3SgGC5Y+I73F/IJ9prF9SZ5Wg8eXgtnlIykLoOtFjf1XZ6P
+OXlujlaw6eTRbxfD/K49RePoJ8hoeK20Qr8rfx+/R+Zfr5LZwgLfa9X5sHB3
+tbrREvcZWVetI5Z5LNsJK+UDjTPJ/LMCzqyEq7uXptwg+RlL1i6AOSs7wqVw
+ld+rz3iwcDBH4AA3KcNbnGAfP/u9z50xL/+FOBQO0yw5Vw5r+v50OQwL0hM7
+dsLKd03FauJ45tc1pK7waHbDfLqEKJEDrPUcLs2B5e3dEgs4yyuz+SncKK41
+M4FPrQweF2Jf4eVdFA/Wf+DYMTBjHLdIQKxddZfkM5o1+SoAZk5bTz+GqQH1
+gURYeEjV9xyu23b7eAHcmyDZ3APrB36+0ghTK75R1cIZDYM2/8IKT5PH6bC9
+/KSnOfZVmC+PsYOjzeYni2G9X/35esxXIM2Pi4CTfro21xfOF3VZp8CM59il
+WuxbplFMpMG9hTFhtrD2fcST3Z/ea51THo+mPDKfum+D69965bzlIr878dpA
+WKO7fzkJ7m1xLLIl/Q8UnhiywPuJFPn/h/k2HfNuToP7V9vl1JJ8w63UPDjJ
+wHNLKvGjypoOc8yrO2lG8tGwgkWnYcWuueInTvg9FL3pyoM5u+VpR2Bmw1fS
+w3DnyLQ0CM66+SjuHLzD3bzWCI7eJ7frg0efvcltF+D9XchzXYh+dRn+w6Ww
+MIrx3Q5nuRVFpcGpD6dkt2Bq39RwJKyfvaXGCvtUDblxg4mbp+RSmP/jrbYg
+uECXf/13uODZy5RwOPBFT9IM5NNa08Amw01jLV+KYHm6Y0Qu8S/vjoXAbPdT
+3SVYEF3fHwHbT6rWqGElVxm5Bk4Ktbg1C/MLQ5xyrWBt987flsOsbKlhJ/qx
+9hf2byZ5xFbtZeAo0XBlJqw5+LCSA3twqWdKWCuqEiiwT6NKHHgO1hlXxkyS
+/L433FENt2be8EmE9Rcrwkm96QfeBGuGeYOWlJXA4snFY75wluFEAgNz5m3d
+VPsF8vAK27Ge1EcNKC9Y6DGitYTr5921bzPFXh81hWSfkBCp9x64f6t3djHM
+jsruiWB5W4/NOrjXQew3F/70/+CIOjlN6P8BDe0+ig==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.763809742330267, 6.7361902576697315}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwl0w9MjGEcB/BHXX82yUVDu7t0FNGViqiQt+2cs2ZyazlpIR3RcbJLl24k
+1cr5EyPpMKzlRKflxS01x26c2erK2TXVnFxlw/zLn66bfJ95tnfPPnvfve/v
++33fV5irkim8CCGpOOj+fy1m/u/zGdK65mjeBpij9n3jDfOX7l3RAFsUiojx
+eQz5Y2qUvYe5P2S9b2G2+6A5Ioohcn7mGRMsve41lANrw3eZK+CBIt3Zk/BY
+YrdSAovt4pQWOFhpDSdwovQFMcOetJlOVsgQ5+z+Jguc7S937IZNDd/uP4LT
+dQlZfFjJ25/XBMe2LGx8HcaQ89N7aqrggMvqtjq4o72zij5/7JdYkAsv8/FZ
+EEfnYZ0/k+B8rzTNFFjT//z2XDi2LexOL/LkP+O4Z8Jfiy+5bsIaY/PgLHgs
+pZhbAWvdExcWwo07iGUPbM1YbhTDrnrV7K2wMqqSq4TNkjbdFrhvU7hQD0uV
+jl8K2E5kzi5Y3hxdUgabbJlBHORZ5rxSaoA9xJC3gub/u/nhANxqn7yhgC0n
+9kt4mPfAjJUOHVwdXtOxAy4rf6O+CUtF+yS0T9ur+JIHcGL50y43zC9sqHwI
+m2ctX7BOxJCTvsy3W/R+n7+IzsDBwic9p2CWZSa64U/vuO6dcIBPkZ9fNEPU
+gZ1founzCt5J4uGMbIHjM+2zWCNNh1mJanMTbE2tXbcdtv1cr8mC1dahhFzY
+rBAdnkbz2yUdmfS8dKO8ci7yJc2JXwNfc9Ufc4ciR+tjnQB2joasL4PPL0lJ
+HcM8msltd3lwRqdfzDM4f6RGbxOgt4u2gjq4uvqI4TpsTo5bnA9L2/28a2FD
+S0xlCmz1VGfpYbnxaTYflg/MGX4Crwo5uIQDc08/P0Rw/3pO3/hv9JW4ytUs
+gyOPvOSP035PRAruwX3jqjR/XG8Kfn+Xh/nVN0LKI+Cw0tp+mudOkNY3nVrv
+8P4Ii9cKC6tgVvdy1zya39/4mM6vIb0mCVxxzlcViLyGAC/Odlh0dVKfBXPs
+ozvp9xM5+D3SAFviVl/eC2uHN4z8gMUlZBHt12yY2pEcg/drilq7kvad4+kp
+geWD7Ggg/InXzRrhWOPEvhbMwyl0FzngD12tI4tgbajL8h0uO15wrx75PJNY
+sD/9/0OZf0nWbpA=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.613477323709358, 9.105546654636697}, \
+{-1, -1}], 
+        LineBox[{{6.999999999983629, 12.999999999992724`}, {
+         12.999999999987267`, 16.499999999996362`}}], 
+        PolygonBox[{{9.48173265946094, 14.447677384685548`}, {
+         10.719815750748694`, 14.706811054955079`}, {10.316718930329426`, 
+         15.397834175673825`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.823799910437668, 15.484057296392571}, \
+{1, -1}], 
+        LineBox[{{7., 13.000000000003638`}, {13.000000000003638`, 
+         9.500000000003638}}], 
+        PolygonBox[{{10.51826734053906, 10.947677384685548`}, {
+         9.280184249251306, 11.206811054955079`}, {9.683281069670574, 
+         11.897834175673825`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.823799910437668, 10.515942703607429}, \
+{1, 1}], LineBox[{{13., 16.50000000000231}, {13., 9.499999999998607}}], 
+        PolygonBox[{{13., 13.6}, {12.6, 12.4}, {13.4, 12.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.9452, 13.}, {-1, 0}], 
+        {PointSize[0.04], PointBox[{12., 4.}], PointBox[{7., 13.}], 
+         PointBox[{13., 16.5}], PointBox[{15.5, 7.5}], PointBox[{13., 9.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T15", " ", "P1", " ", "N29"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdief/fiijghgjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdief/fiijghgjhj.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:eJwd13lcjNsfB/BnCG2Y0jLtaXErhSIl1UxapLQKU0IbkihKi60iDNowUYhB
+ERUJGVRGJVM3GW5SQnPj1iAJyZTo9zk//zyvt7N9v99nOs8508Ni/NeNoyjK
+jUZR5EkNjOHfXyxqDgGdRdmqCfjlcM7JDnV5OFqnURgGc/4NcpkNy1QukNeA
+QzKz/WJgc2tTo7YZLIp+Ykm9EG5vC4o6A8vmmvXZKrGoUbVewWaYvTNMpgrO
+yZu335P038cN9VJmUTy/wN3zYX5PxdVe+D33WsssuH2Ttub+aVhPKD86F9YP
+667TU2FR2l6Vn1xgqVnXmxsw9fb54FrivNkT56sizpaj3/fCsUm30y/D7JpF
+4SVwseeB9HFqaNf7vev/8b44ssgFVhwXE0hDPqkX9WZvgnfFWauYkvwWydES
+4dIF9C8eMCNYyo+EufkucRFw0m3f3EXEWvnZcaR/1OuhSbD5/d03EmBqeblN
+NdaPL53VHg2XB81P2ABHa37gLSfjd/+7QhHWjy/wtCT190x7QPJp1+y5QxGr
+J2WvhgdsNgQ9IvnnObBV4fQaxsw0uNyJq/EW9aEa/DJJ/cRjV2WqYMVYvpXE
+GPN8oy+pgFubEkfy4PK1Hz7XwvxzHi2esOSD7d1+2Py2TMp4mL0ieYY15i9d
+43Gh1gjj3/VEc+EMihF3BC5OtcuVQ7x9svmVa2EpTViQA9tH519iwSJl9xIj
+5M/YnNc9C6ab/HIWwGcuWEWawamNAcdWq7OoeZeYx61g4Y9xpUMwV3ze2A2O
+zB3o2M9AfmobV4TD5Sva3kzQgKdl9x6EGesUrLbBxRtcnW6Q/vczWY9Je9LB
+o69hd0lh1jhNFjXoHds/Efnk/KvYaQAz6BXJFnBqqJ2FCcxLTtnnBYsjxlqn
+wZxCx5IIWOjGDZJgvsLwxNFYWP/U47VX4PZdBRO3wgKvv+NWweac3P5wUt/N
+/M7xcMZuveQlcJJetH8xg8xTPNmAtL9prPWGGT/X3uhHfLz4m2OjyFeFKRop
+h2NXGe7mw+nth/5EwSZXhJMPkPrc+sdaD6Y8vIo3wqKy7BCRIeqhoGyzHi78
+WhueBke+Lo3fDQt9AmdYw6L5r9quw6/jRZv7DVgU63Q3h6zX6ptcdR2W5vC3
+hyKevqaPVjthet+y0E54KUMzwR+mnFTp65HPrh0Bp+fDIUF+O0Zh25QpWiZw
+8ZYcuXzUi+KY/j0DFladeG2thfGrfogt4fLa4SlPYBeTFyOLYcaqV1SgNvJ0
+U7bcQNbnBZ1uhQW7p1pkkvW5WVkLdZD/6EPXO3DS9KH9h2GVSaq8btKfM87v
+Acx+XeaniPwERfd+t8O3MiLTLeG8WLv3L2HZnjd5PrDQYO+Fathll7dbBByi
+KJTNhJOKt1RuJvUJtf+5BJYeeXg6Cs4x7Zo1jHgKA+Kcgkj/kiJ1Hqwi/+24
+PWl/eW2PC5wa8Hq6MiztveTTh/wYjXaqrxEfJ+j20gI4eHC58Rl4TkqYMBge
+MH+RFgAL5jdFzIZvfTLkTyL1dLXsZMBz9EK5/Ol4f4LSFi34fZD/2EY4KVym
+dAFs5DT8ShemJ6/M2wazAnd0dejj96PJjnkEUyJqRwHM2WH1bDbi42dbXd8E
+i4QJzGtwe+OZcW7wgEPRYnvkyzrgEmEBl/OW322F9QcXGhvAOQ7r/9uqi/jP
+Pv5uCLOi57ybrIc6Ri3qsoQjCxPbL8ABrTnhHrDgzDKeKp4mhSd3kvXsRb/V
+/fAc/dV69xhZf8rNx2l4xrd/WVeNJ8U0/esSniqdLwokpP291Jn8/4B8a5IS
+8nNZbfCkAS71HDOzhgcUetXq4IxrDn/5wfbCx2o34fQz/o7hMHtJx8o8eI5P
+/F1Sr4HY0d54WLjhrxjSLn3w1tGTrMMIf+YD67/9pqcL1w/6Dc4irjrzVYx8
+mm1WZ9JIfSsVdh6GZRSzPgpJfWy3HXIkjirrPgBLhHIe4+DCmHc1DrB+0h+z
+V6iXvl+zA5mH4bWrqBGWnaJS4QRzxsKm/QOLdLZeL8KTw7947CeefJV3n5Tw
+ZChf+jkf/fiDk+8e0SG/x6Cn2XDSroQ6dVhgLo4dI/Mo5XXcxXt0eT44xYm8
+p6FD1fHwYIlJ3iESV2fkeA/49fxVV9pI/o66fxbA7vcrQ4yRF6Mp5r4zTPda
+KdwG848cmLoOZpsuH7kP580JvX6K/G4yFFz+kLqd6GeL4eiyfjcb/E5zynon
+WiKewbBQ1XVw5LkBi4Mk3hczPQ7AvCMM6g2J9892jVOwb0vaTXPkV1WUGMSD
+ZZ+2CWNh3/mRh/JhiZKVdyGc8e3EQzKe/dhTqw6OZH+/vhF2N1KSaYLLt1zZ
+40L673Qcq4RZbY33NMg+0TaDeQg2kThY95HfQc3OhU6w0ZY0cQ3cbnO2RIx4
+JD21pVziS9Vbo+DIHt2IWJKvTW1iN/IT0q5yAuCQ36UpXrC4p8faGWbdLP9Q
+jr8rboX2JEeY41a3TRku9G8Y70banev7E7Hv2abKHV8FF688TOvFvqhv35Kw
+h8z/weZVBBxfWdFSBouctAZ/YF91v3HHQAILs7TEBXCVs+H2mchn4IunxlqY
+NfggaDupp+R2jx0cUODLqCP7ZuLfnpYwNet5nRL2naSljrJOsEBjaMMasg91
+OlzeAEtCjE0uwWLjsILzsFS4PLwHlri3xX2E6WvlWrXJdzr11h97xGev+L1k
+MfmuaP4+fRyO1Bi4sg7meJomke9e+xFP0wRYMEH9hTXyDe45appMvsP7+30S
+4FSnE94xsMT7ukERPJBd3B5IvrsrF6+pId+Fh6ty7eAk9W2aD2DZDm7jNPLd
+y9HIJ/0j+J9VJWQfNj+yaiss8r+/4h7MObfHxJCsZ2OflgnLehWNq0Y8t2gn
+U8g+zr82j74Ipj6tmbwIZjzkxlciv8Jk7xMm8BxlGV09mHv0CUMTZl/JPZSG
+717p1KuTGbBvQVjqO5xDmt+brTCETZy1n3nAkW5sS7LPF/uw5cg5Le/2L9sw
+mPrz3ZJJzml7d63nwnTpo6MvcA7iHVut94yM1zqcvA+W/FXvrob8Qj6naXnC
+u05rhIaSen28HWsBt17MPnsd9r2kY2FGzq0u05T+kHPQsGMdE+b+Q28g5wb3
+V+qJm2BR1vK+bNh2eFPKFdi9P3DoCSz7o2vuD1iQsuwuDec8d1q56xLEJ7OW
+e9AUDunxpnjknFn004WcizkOr7K+w0l5YfF+cKS3mrMjOZfur3Qglt46+moH
+rK/zaRPpH1l9uaYQFsRFhpvDeYor7fnwnA+qSgqw7W3XGxUwe+jT825yTtrz
+tOQYHHHdeFUlOSeV5Y2uhI2cY7M5MHX4KX88HHz88rpgWKpIs8hDPMHfmh/M
+g/lR+g8Z5Nx7sd9dhYx3UX16CPkZbS8J+E3OedOFmwdwLs2Z+7b2K8wanTPX
+n5xrTZok38g5KTBw4JYy+Y69TaWRc6xPZpQuHCzoOK9D1r+gocrFPSN15Hq1
+G8zJ6W/RJP7gW7yT1FPB93Il7imi2k9F9+A81fWlUbAsSzGV1HeAJttgC5cG
+ZfC8yD1CgXN2OpzaoGxJ7jW+BqdOGcFU5FmHj+SespUvZsLao8nt88g537Ek
+JhbmmXU7JMOyptOdK+AQrdIft2CTvfnpFOKpN1j29T9yr9q0tGE5fGY8VSRv
+gvbRRa6lcHtqoKYBzI7fMfsPzMlfMDoTLi+t+uiKfAPm3T1lQtqvPmXvgZuN
+QnsZMOtbjepFeGn3tY1/ML/t3CVl5bDR/iTzThLffUl9Iey+SLnoBjxQm2hL
+xqtkhOemk3j9VUwcYE7Ryo8ryL2o+dRQN9Zf+tYpbyYsYDfaboNDHvYkTCD3
+xOftuf3Ij/WnS7eX3KtqZU8Hw8X7qKbn5F4yd7vsvqlYt3uBbRO5t5zfKXWd
+gqen16kWUt9jl69Pnoz3/tVzn5j0X7C+4D8Fsv7Jf8dIvf1ebGqXx/oad8fI
++qyjkt1f5HBOPk7LDCf3rufau63gW9+yygpJPsOmo5dkEef9fvpn2FfdeK4v
+3Gy/dIod6qMv9WqfBWcEP6/nkHp1rVN3gqPTKh3bYN/90st7YfpDp1w9U/wd
+mB6kfYZFJ6arhMHl5holiVjvtZ9/0GmYJ91wgYH4ZJqVExtNyTmp6kU9XB6Q
+RvtEHFtxNRb59D2qNR2DB85vP0JXxH684l3tBDOsF9UQlw9HmA27kPYcy8mJ
+NNTjvXDL4z5Y9ER/AQuO7br3/SkcGzEuwAfmiGZ8vQpT+veKzGDeu3yPVBLf
+ggt7RZiv8Pblp/5k/c6qRieYZx20zZj099d5lUbiYa80/IV8YyvfbzyBeH3/
+UbtG8g+ZWs86iPzaD3SeuEc8w7djNfJ3UZ46Wkzq01H02WgS4mqN33UR5j3q
+GOydgP1FvMWwhLS3bDhZIYP9L9o1WACLXV2n54zH39OIwuduWCC/Qnp4HN53
+bNiwEuJhGYl0SmnYr8oHFJeSeldzBSMU6vtO2yKbxD/pzn874TPpRl/bSX3W
+rJppBbfGbzs3A/Urr35ZrANH5Dd7bzcj+1b+54Wwr6BerpbUd65YlwNrW1Z/
+k5uJfIc7rH7Bo5FN6z3gkIw1bhlYX5reqJMGl68xlrNEfM2TjN1KYV8Oe+Fb
+OD1g6FQT8ZeD8znIx+hNQlwnLEpJ3mmIfOvXTfj7LZlvG8OxCGb/WO30Aqab
+vpGMn0Dug7RpAjI+JeaoDcy2Mpc/T+KJGWbbwbxsuY07yHy6J2/KwmLKvsWb
++N+U4+cxn++sYZXpM0n+ndsnwgyum9Ug8hPFXfJdiHgY5SP0v2FW5L4wN8Qb
+vHDBlmJYfLCmZzby027V5GeReiQY3KAhf76j2kAKTHXej878zaQGG44f2036
+ay6brPqLSbF2taZzYN5d2b03pExK8l1O/jycqr5VIXmISbXyDAUNZLy04U3K
+IJMqfJZUKCXr03rNXn5jUoJ9avrWiFfwpM834yuTap6qpUXyY73caFM8wKTq
+b85VewSnlgx1z4L1F09YMs0c6011d9GDRzmT60NhQZOWaxzc5xHCLSPOWqOs
+j/lGHTN7v8PURxpPDevJRg9bWFlgPl27EJfvTErsJ2+3HqbEG425iK/v3OWg
+LNL+csTwyw8mpWj7LOYKHDL77STHn0wqwNNHWgmzju2lRyFfWec29Tuk/e0D
+4zXDTCrk07Lcq2R8XXb7pBEmlc7d8ewYrB8Y6swmNvx9eyssDgh54AKzuhaf
+XUL6m6qsf4zxlFRkpwMLls0O7ML8VcdWx34h8W8zfpKD9fVjGufVwalHJra9
+R3zsst9Rp83Jd0NxWIJ8QryfPNhB+geocq4hf/2l4YfCic/XFRzvZ1Jz5J5e
+XUnqc1LT9sIHJpX6RG43m7SPKIXfec+kImMza9aT9os//GliJhW83OXwXtLu
+3xO38iXeh6fTihJiGwdRwlPUd4LPSBfx0tKSrlq8P+tJNbqknkOGrLwKJiU6
+9GjzOmJ6rOKzkxhvnrj9BjH5l1dN0clzFut/TP1DYw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.684589195445786, 6.720523577306384}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt1gs4lGkbB/AX5dBxQihTRoRknbXTonm/SqTkkBWdDDmUlUb4UmyNqCQk
+20E5NBY5rCyb1dhNjdN+o5XGodi2wxRFtBrWOh++/3N931wXc/3e557nue/7
+ed+ZR9f/mEegPEVRz/BH3v/3YtLUPPJuTFPczSYuk9o0lf8wvbJiHU1Jip5M
+/wFHVzwMCIDHD+oyb8MZdNPzlTDXuuQfZ1hszszvNKKpcrMGOelKmmqWsVdm
+w30duk1+MMtqg85RMq549ZeOFTTFe8TQ3g6zwpaP2sOiptcfLEh8SvrSPC2a
+0vqprM4QVt7m3KwC2zkleRjDaT3vXp3QpKlYy7rv2TB3OiRnWIOmSsdcrNzh
+xJ5wyWl40UmhynGYl28ZxILLQ+rEGXDXnhMeL5bj+hpBcx3JZygosAxmGsc5
+/0XymZVuyIa73vSFL0d9UvcjOndgUf/2VDbcNTzG+Q+s77Xb0BMWTbhmzMAB
+b4+uDoKdFNuNHbCefo2KOBTmz601uQln9KfOkXG6N8xuBN4aKW9DPq/8nF/o
+hnr0H9ZEWMOsPeNFRTBL1OunDBcxtCtG4UWeVexW5Gdks7XQBv3Y/7j95zT4
+sGmDgR/s1nRdkfTTaHLfvSj46qZ5ZdOGuF4nfceDRcdbg8pgraLlp9zhl8bN
+8n6w9JZ/jCacpmC6XRMWawkNGrCedOvRZ+0G2H+13H4f2KhGczwDzoi1cXyJ
+/MVD6zMPw6xPTvmu8GFn2/VbYaezTcxq9GPn3aDzJvC4fcO/VsN9lNywLsxr
+7O1MUMf9cXq3pj4cvUaQPqyG/QsuUbKE6YPyklCYcf6kozNs1FPpPa5KU+aa
+atIQMl9Rq8FNuFxv1YkrJJ/L32zwgKcflob8Cstc//JbC/dY3Ze9h7llkzvU
+YPVIP/YS1CfJ+3OPNpw1efuSBcyv/73cFu6qvXbMBe669tw3HG6YM6vzhYVs
+u2NCuPRkdnsQLFgnXLEI+QWUh58i/WP5/lshGC6qjdd1JTZbeqoeTrjY3WIG
+e59KFWqjXubUFb158GH5vSYhcFr33O4nyE+oJ7pfDJceL12RAps3qn1+Bkvf
+peY4wH0mMS4DMK+KPjSxFuvsnTzYCydUMXV/IF5R90oMsxzvFx+AzfUDay/D
+fSesG9WId9tz7OFPg4uXSfTR33nTv7YjP+sHz6RXYbfdqj96wT0J36wJgJW1
+HU8+Rr2hXrJtHJhSDDG3hsUNyRaG5PNy1/xvLsP95N5pwoQzLNva5xjYrxc+
+vav0yXXOxqPw/gu+J9bDjNGmj0+W0lRkwavALTCv8E1J9xKa8qweeXQITgu/
+Vq0Hex9hmybBrPQU1tXFeB6aChmVJP61ZjEbZv6klPOarH9/7q4qbJ1sNF+J
+1HfOb6EuzDBOSjWGeU5OJlxY3aD5wTaYVcqzeQzbFQSH+MD8O1Y79mC9hg+u
+3VxY1uH1eQa2G3ec2Aczyg4dv4d8xxdPLXOGheU5GzegHqavmel6ODoq7l4q
+bJJV83GO5Hc74sorUu8Wl8gmWFotLl+F/kS6msRfhLmP3uc4wwGyfrvNZLzE
+v4ULs46V6YzqIR+5mNoDsCDuaHchLK5rNaTheVtP+uyFM77XH1SC8yOfOzOI
+8yw5VVhPuX/cq3kN7ler36NcYKeWsI402HzAW+575M/XH670hVne8hFJqK/5
+umnYVzDPv9XvIPox4urepwuXV3/qNlqE++WYVYQGidcZO/PPAvQlS1CnScwO
+znuqgnoNPwzpwwz+0pV1yuiPMj/VjqzXZZXyXAnXBw8V74clF8wYy2FrH+3B
+szA9uFAUr4i4WxkPS+G0rnOnDODE7pMencTZvT/Ozsc641u75ohnX7kvxDg/
+ackNPdTL26kudYJ3Xp5aQsPmDnLpFXBpjpbmbliiM5xpj/X4QXpjpF+sYGZy
+N5yYoxrrBQuyuL9mIN/owmBFBxIfFtvsjnqkyrevGJD5Sh5aKaDe6PnBlVNk
+/bk+US7Myrx5sxHmLm3V11tIU+yLLsPnSP0eCaGnYW///LebYAHHLLQUzgrf
+1j2si36mNakXwT2PH9zNhyUqF8rDYMm+hap7YLeyjQoULGta/GIRzKrXdTmI
+9Q73GRWKWYhrVTFPRX588eu2ZGJd2YnryL9j+oHHPtjtXHvTGdSXXzEisIFl
+cWF2nuiHW1xlCZO46N6b1ein9QrNRgbx3R/YAwr4vp8xLl4Gl9tJ7zfI47lu
+23xiNSxa9si8Sg6/L/uCasl8otue3k0UTSXbB2d9zSLngUB3RVhr8ZOqGJjV
+cOP6h1kOlZx0PrIAptds5xnBkSrLl0iI/wiyfTbDoZgpNRXjJN7puOIATNtY
+FTBRr0BVe9If8Qz1dUEbSf2OAyUWcxxKuXGbeCfpz5ctEj2sVxS8cunXMP/l
+KxWSD5XSJu8OixLk3n2LfHs+imc5JH77xNwG1CM5YD6hS8wN7ewj9RUkxY+R
+fl1rs0xE/epMaX0tLOV6Vi+Yh+fadUHwWVKvi39IMNxRVplsCwsKNqncgKnv
+FPa/0UH9woiIq3AGQ4naokOeF5PX+2Fu0pM7havxbvvd2GfMz40veq8Kp03k
+9rvCIgMLhaRV6P/0Joc4eXJ+2CxcBkvq22qTkH/f3vSxuzh3sVb2jkaivr4z
+Zx/6wdKXq95+h/5wp0KHTJnk96uet26aQwlnlBw0YHpsR17tBIcSuI7baJLx
+vNu+EWMcSrR0ZIk5GT+TsM/zHw5FxZjMHID5Flyt6L851PjuBZbZsGij5+Tg
+EIcSbyhmfCTjT1MSGmUcitUzFGCH/Lh3eusV4OgWUe4VWGRU8MrnM4cqcrbU
+64ZpyfS3p2HB9enw9aiXSr+kaI147+J7CYHE2eK5OTLfxMBUMizY09CuNgw3
+h3nlwHzZsdb9yEcYtUz7BokXipsbRziUUazdaBRMR+Vps0c5FDu+rukrMn7L
+LT8L9cl6t5d9wPpU56mhl+MciifP/hBDfNdvUw/6Iaqsrpsh/Xg6ECaYRD4C
+41geLLg83Ss/xaEylO/NdeGcKtUYtpeD+QejKu1gfvLaimuIlwWq2ObinEr/
+nHn8EeaTcByNF8HSv3+8exbrMTTPNZ/FOZWb5uDVh/yU1wVKVci5taOtZgb5
+96UbcgtwjqLUHEbaUS8jc62HNywINZk+jX6IhWX5+jCfdeT+uk/IP3FMYyHx
+JcP1Pr0cKjHc1JyYkuOZ/PIO/YllOegRd6slyl5i/9KNk91IfGquQ9QzzHcg
+cdNlMq6n8eXFFnz+i+ONL4gtA1zXNGLcdVD2BfKj9gfNDtYgn3O/2cQTi3py
+HYXYT07NZ3IOpxZc6LSu5lBa/QP5q1AvFd5vYihC/0fXOnoTR3ylEf4b+nvE
+k8cnno2LnMV6jI6J6+kw39d2W3YH9s8nlJ1MnMd22PQC/bdpGf2GxHukdilI
+kc9232IL0l9127QW1Cf+HHDwNdanzRbt8HiPeldf2RVJrCHzCUQ/yiWn60bJ
+uVWV49rdh++P5DMDR2A6tKei7CP251BKRRvOpbTDyQM/wYLDVdEbiA+8Pv0O
+8VrFD6S3NMh+nte1x3zCLQNx82FKvWvb4x70q21zSQw51w8nns98i/gq7dXy
+MHXuQ/T1P3F/lFu9ycK5ifpjb+ZoG+Irnk7vIjY9s2tXPfZvl+mxlcT/fzHI
+P3X6v0/i0Lg=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.6402550371571483, 9.170599194669919}, \
+{1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.999999999996135`, 16.999999999996362`}, {
+          12.999999999995453`, 16.499999999996362`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.407378835015717, 17.441896309779956}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwd1XtUjGkcB/B3KwltRmwzk4aJMtlNJuWWUZM6mZkucimDKElX1Ipt7Iop
+o600bWZJlHTRqlOTjhhhVOy0km5skqnTJksXZHTaNdTZ9vv4Y97nfM5zeX+/
+7/ucM9ahsZv2GlAUFYEfGSkGeSzlU2wyzuNTE/al2ZZwXxwzJhXWHdg64QZT
+qvj0qfP5VOmc9wdi4YIc/0kJrG52uX8F9t9qN94F21/fuG+A7I9462TO5lOv
+44dFFlw+VbWFJbOHz/xzNduFmNX/wAU2v1N5LBjOWcbu4sHciYoXJ+CuZTIz
+J9hUNVL8G5wqaHOfBxt5D97+A6Zm6I9M4n0dO9asegnrlNw91+CU4bTN48Ty
+h97bYPGSmoNmjnyq/dmbWj368ZzhxbWCpZL47LMwNyIx2AbmfqV+4Az3rhWa
+cch6oc/SbhafkoiKZGS+gJW2Uw6LxOfcWTBtdUb4BtjqHO3fWWT+7NybNvDw
+kpOJhnB9a4puJlzx8n3HKOqJUww0m8P13FDaC1iaPWTqAPudL97QBreba2N3
+w8ZuAddq4aw9m1TlZF5t4VMF027tvjod9S0SL2aWEH9TvuEn+MnRaWMXSb8j
+Jx5/ggUe+zJyYf5AfU8S+vf3oELy4cjDXtunIr/e9a43vuRZUX3dF47USHOu
+w+yhvJTTsPNf0u4HMMO0Kr4dDs9ypfeR+RjXzSbWOLferWoCLs0xXr8SDjz9
+qYfkmTXwtnUH7MNkV7rB/MAnXYfg/moZI4zkk9L/KAnOvGxJpZH1wheZybDu
+vNJDCYvnL09LgA8GtDa2wfqy4vzdMC8t4ef3cCrrne06OMxAd2bGMj41qCvT
+WsL23glLFsJiW+rRO9Qrux+oXg7HhX1wvwtncwz618FVTM7VU3DRnKkSEZxl
+yZPvgPOMixQ+5DzfX9cvhXlBg8eFcE1MG3sabOKYpXGHpftHl3ciz4JZEosV
+5LykSxol3LTCLoADh7h7JuTCAkGe1AKuD3j+rgBeoFZVGpH9MnlLLUwzaJkc
+RT/+dh9vjcGdzg2KfnL/LnxfwSZ5F6470gH3tfhwN8LJr3ZWPCT3LZgSp8Ps
+6mCD32HBjfaVTbBEOWx7j+R5k37RDHmk3/2QqSH7yw/bBsBWgobEFnIfmZ+3
+5sLSyzH6bnL/hWvqeuFWfUgTyZdtKjRkLeBTu1bdSzEh+QxHGmyBKxIaMmxh
+O0X2QBLMd9hr5gVTWu3aEli7/SkjCubOVk6qYYO6U/lyYmt1YSPcERKUfA02
+2aVkECv61hR3woxfzjy/A5tHfDuohyWj859ehmVbHnoznJBPdPl+GUyFWw84
+watKiiOD4PwrnHERrCv7s9sBvt2Rpw+CKd9Q+n/oJ9lx7GQU2W8cKW+GjdSG
+J+Jg2sd5NXlwx5vA6Qdhdu7dyTjYf5FF3AFYMJtW6A27pGW6hsM1U3rOOsA9
+Zce42+Eshol0Lnw7LGyxN2zyNDRnNjystbJ3gUtltYV02C96tb8dnPr3UB8H
+bpz1o8oCFvtomZ6wSPX6qDGp38ZWEQMbNxlVk/6pC5WMi7BeVeI3Qu6XnGf+
+jJzvqLEehLs8o9Lp6Jd7vPvxa7J+oYeA5KHhzHk8DDdO1r0qgtm+mdvG4NIG
+06FBWHJoPNoQ7xsMqOz9biHy4xU20eGuz8HxUbCXXjPFkdS7LT/jEswrC//B
+j8zXde9qhrnRTFHsl/rjpSNw2GhVuoLUX6fQG9ngex6LtLsJ94UmCmfCKzrp
+U3pgifzO4a/h6eR/xRn5k9GG/z/9qkJF
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.23789659515192, 7.38794612872654}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwt1gk01vkaB/C/NdlfJZXtlW7WoqERkr+8OuXmpHJTpN4yIRUp68TMv6JF
+hm4RIpRJskXZalJvQpEQb0KblGgaRZahqPt95lzn4HzO81ue5WfR2xG4fqck
+wzAX8UnfGQn6Ysgy/3yoskzzX9419jD/Q0HJWjjNQbUkBj51ydcrFr5eO6Om
+meLGcwWFsLGtQZOmEcsUezrllcObf4uN9YVbBAN/XoJ9mUcVxbDq3OxfDsJr
+fYLMR+FTPOHYUlitRyhpYcwyXH6r+K4Kyww0m0T7wQw7+MeAMsuURZj7JsLd
+ZyoWf1NimZUOr2vLYNG/9w9NKrLM1l3xCxtp/98Pw0YUWGZd3arspxQ/4nzq
+kzzLTKzKze6A+XN2vxqfzjK/W0Rot9B5j/wD5sKOEbG+d2j/9GI7LzmW2dCn
++EMu7e/heh5MY5mPivrBcbTf0srSG366cvfGAIoPRiiaw1qWAZqudF6mhfZi
++Kcbn2UtYbZI9eVOOKpA4KRF+4+uPf0QTqk/2CZPcbVsH7qvKK92lwScVfD6
+0kzk05WU6UfuLnKQfA8nyjyqV6B+HJEebEE9FfpX1fXovLxrStWot6M2yMuB
+PBKaVIJ+bGx0sdlD5znda01Ev2a6v3+cRfexNsnb0c/73jmvXtD6x91XlNFv
+iaM/V+uZoJ7+DpNEuPdeZbw/zIg2ffwAx/gr6JfD/LQ5z+Qwr9zSSntJU8wz
+bVqZBL2XYYvMNTB/0s2I5rc/66PyGVh0td3ZBf78afOxNpiVcnQswP0Ku9VW
+KC5Ev20igt8iP4Gu4yNbmJ/d2jeF/Ocf26O5HRbu9RyTgPmdPfEH4Szdmz1f
+UH+z51HmJFlTb9cw+rMlY8/dBNq/Ws15DP00bfBLjqX97KhYCRY6p5ZGwqzE
+4TBH9H+bl3ueL8WdHm3MlGWZsXCNTS6wSN9jzAD+JX203YzWx30dfC3DMtYv
+G3fwyFd+q2uG88zEDiNUT2W+aAiu2tqQ3wV368d9csJ+SU1RSR3Z4F/2D+AX
+sscNblI//K5n78f9GweqE8ppf9ktTzvk59G0XaEKzqq4LdBFPYWP17k0wUzg
+wHJl1Kv9vOP0nxS/K0r7DrvsG8uifDjrc6f7Mf/slt66FTBjfaL8Nvq10Cun
+l+rtDjLwC0d/PR2XRt6m/FtLliuh/9d05SplFiF+8bV3KMxtbz/uCouMzr0s
+gsUqDhXpFM+zqb8O92dPTPbBQjXHoGg4Y02GtrkZ9gUObZ0Hz+pZ8H0/zFeJ
+EfwX92nu7RIVwVnWL5+0Ix9rq9bm1zA7YRH7BfkmqKtHypjjvqrjzjIKLFft
+xbsxE2bkNqtKyLNcRNT6EB1yaH74uBzLlSj53JsHsw6GrmPTWG5IymBID+Yb
+GmvLwIG7/aO1YOHZloJF6HeR3OolM2h948Tlg5iP1V7BO1myXZnlsDTL+JXY
+LBlCPsLZP+aeg52en2hvJZemrgmBec+qR0upniVTy6Lh8+taW1Mp/1X+m+vg
+m7VlCUeovvs6G5bi/NRpFnOCaf26Ky1iWHmJmLeX1ve55iYiH5d0JVEg3O3l
+vCgQ87/j7spEwYy+zxkPzN++/oJtEsWVF7quwfzd3+p4V1J/h7uSrTFvleT0
+wV6KH1vbpIF+DfqbhSqjnu4rA1+fo58XdMVfF8JZrmE2HPqdkvO00JXcyc76
+oshyH0eN40NofWbSK4ESy1Wc/HA0jeKbxP1bYFa8PPQuzG1NL2Lh+SeLbd5R
+P5vd+gdxnnpX3B25xVjfsYnbB/fzr8oZwkybTnAN8klaJbBzhLvdy88PY34z
+JBRKNsMsf8hPFvlbtxV88IeFGX5hstNZLq7hVWEozN/pYvUN87O7N3skks5P
+jAoal2W5EaWSsShYdOp223cZluudjDL4me4z40fqwKfFI6b7aX3y4VgvaZaL
+91B95kPru0Zu1Uihv1edjOl+LttE0wNe5fDB1Jnyi88r1ZNiuZ5DMVK2FD8b
+EKyNuJJ6RIsp2WlKwQVx3oXcfD7lZ181Vkjr3WLOapAzDyTZ4j67NTOD1Mge
+N4Wf8B5+TBQO8qhe3mrzu8hv2szqs7PI0bKJlzH/98UuRXReVsos2xTUaxGZ
+72RO9ahyPx3H/A+fCzFzovtnpbvtRX9GPy2Q3kb1rHBpWIZ+xuZEL6B+cPVT
+AQPo56sT6xsyqJ9B55eFYf7KOtOnqum8HsGTNswjcMui4n66L1X04Bvi0ard
+Nco/oP5fFWpH4fBS3mxLmG91+Wol1t8e/TveHWZNq3JWw4q8ufrhcNbcyfcF
+uG+pUsxAIiwaXVTQT7+ftuWYF9L6uOPN0vChlTuEInLvsQR5/LxaHVYybKL1
+bvO0pPHeG5ZND2in+HfOeBL9URJ3unVSfDGPm0I/I5sKrJ/Cwvy3kWqwjfPW
+4haKW/nkCdB/QYxRVB3lH2S1IV2S5UxOrI67QedtyDXkS7LM+vDevjxaf/r3
+CbEE/p7ElBekUf6Wlr9USbCcOPjNVByt12207kK8jn92/Fc6L/VaiBH2F3i3
+Xg6h/Z9LN1zG+f6KMyYCaL/1jnF6Dx3yRtf20Pot3xrUMe+j7g/9Aql/7w48
+GEW+169bRIaRLf7ofYOf/wsqyrwY2q8VE/UE7/mFRp9KCsyJD9bcwfwHLEwW
+FNN56fPtUzD/ZEF+fSPV/8bD8j/oZ1wPt3wAZmwOa3yE57znZapa4PyBd72e
+eA9Sz5/1LoGFHa4HUuHhxenjnuSMIxezMS/bFM/SQ3DWrRXHIhB3jOmYuAR3
+l+zcpyVPc6m/cZ/O04jvTMB7u9AdyLyDmb80nToxv+/0YfH//wfl2P8BT1Cq
+YQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.72092184717428, 1.8721747773942476}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwd1QtMk1cUB/BPUKljCgNaUEELIpSn1QJWBuwTdGOIkZSHosTwkIfgLCoj
+nytMcBXLYAqCo0V8ApH4BGGKghMVkTAmn8qrDLVugB2gaxC1Asr+1ybNzS8n
+ueecf25T21ipJN6Aoqg4fMlJTU3j405TWnLa0JRi9J/o93Bvckjzdjhpjr/N
+EKmvzvvQbU1TzRtbY1tghaFffzBczJx4WQozJU7u7EKa6sz9OL0NLjiy0TEe
+1urZUAdyn954hQkcYqCb/dyNptjk6/fZBTSVf2d8fwmsLb8adh7m3D4TEwy3
+ct87noTH97ptMIBT2w9JSV0zeH6kwZWmxF3Tqx/AlI/lRRnMV7nUzcT9rQ9c
+7gaQ+tWzE0Ewx/+7j1yYI7E7Wgb3b0xpeO1CU6aRPdnjMP+N6PETWDmnPX09
+9unsKC/shGmJ/6IzsOmqmVd6YNasJvQlrMixjh2CA8sUW52Rj+vnxeum4Sza
+XhAOVxxcVc5Hv1OG2cnJcNrxbN9AWLGioisRZjIkZ/fAvTOMnINhn5IZ/qeI
+K9RfW8Lsw4CYP2BmtsylDf0GnG5sHyPz0xajCbBP081XZsiDKlerdJjf9TTv
+gTMsFFD8FNhiU3SgGC5Y+I73F/IJ9prF9SZ5Wg8eXgtnlIykLoOtFjf1XZ6P
+OXlujlaw6eTRbxfD/K49RePoJ8hoeK20Qr8rfx+/R+Zfr5LZwgLfa9X5sHB3
+tbrREvcZWVetI5Z5LNsJK+UDjTPJ/LMCzqyEq7uXptwg+RlL1i6AOSs7wqVw
+ld+rz3iwcDBH4AA3KcNbnGAfP/u9z50xL/+FOBQO0yw5Vw5r+v50OQwL0hM7
+dsLKd03FauJ45tc1pK7waHbDfLqEKJEDrPUcLs2B5e3dEgs4yyuz+SncKK41
+M4FPrQweF2Jf4eVdFA/Wf+DYMTBjHLdIQKxddZfkM5o1+SoAZk5bTz+GqQH1
+gURYeEjV9xyu23b7eAHcmyDZ3APrB36+0ghTK75R1cIZDYM2/8IKT5PH6bC9
+/KSnOfZVmC+PsYOjzeYni2G9X/35esxXIM2Pi4CTfro21xfOF3VZp8CM59il
+WuxbplFMpMG9hTFhtrD2fcST3Z/ea51THo+mPDKfum+D69965bzlIr878dpA
+WKO7fzkJ7m1xLLIl/Q8UnhiywPuJFPn/h/k2HfNuToP7V9vl1JJ8w63UPDjJ
+wHNLKvGjypoOc8yrO2lG8tGwgkWnYcWuueInTvg9FL3pyoM5u+VpR2Bmw1fS
+w3DnyLQ0CM66+SjuHLzD3bzWCI7eJ7frg0efvcltF+D9XchzXYh+dRn+w6Ww
+MIrx3Q5nuRVFpcGpD6dkt2Bq39RwJKyfvaXGCvtUDblxg4mbp+RSmP/jrbYg
+uECXf/13uODZy5RwOPBFT9IM5NNa08Amw01jLV+KYHm6Y0Qu8S/vjoXAbPdT
+3SVYEF3fHwHbT6rWqGElVxm5Bk4Ktbg1C/MLQ5xyrWBt987flsOsbKlhJ/qx
+9hf2byZ5xFbtZeAo0XBlJqw5+LCSA3twqWdKWCuqEiiwT6NKHHgO1hlXxkyS
+/L433FENt2be8EmE9Rcrwkm96QfeBGuGeYOWlJXA4snFY75wluFEAgNz5m3d
+VPsF8vAK27Ge1EcNKC9Y6DGitYTr5921bzPFXh81hWSfkBCp9x64f6t3djHM
+jsruiWB5W4/NOrjXQew3F/70/+CIOjlN6P8BDe0+ig==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.763809742330267, 6.7361902576697315}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwl0w9MjGEcB/BHXX82yUVDu7t0FNGViqiQt+2cs2ZyazlpIR3RcbJLl24k
+1cr5EyPpMKzlRKflxS01x26c2erK2TXVnFxlw/zLn66bfJ95tnfPPnvfve/v
++33fV5irkim8CCGpOOj+fy1m/u/zGdK65mjeBpij9n3jDfOX7l3RAFsUiojx
+eQz5Y2qUvYe5P2S9b2G2+6A5Ioohcn7mGRMsve41lANrw3eZK+CBIt3Zk/BY
+YrdSAovt4pQWOFhpDSdwovQFMcOetJlOVsgQ5+z+Jguc7S937IZNDd/uP4LT
+dQlZfFjJ25/XBMe2LGx8HcaQ89N7aqrggMvqtjq4o72zij5/7JdYkAsv8/FZ
+EEfnYZ0/k+B8rzTNFFjT//z2XDi2LexOL/LkP+O4Z8Jfiy+5bsIaY/PgLHgs
+pZhbAWvdExcWwo07iGUPbM1YbhTDrnrV7K2wMqqSq4TNkjbdFrhvU7hQD0uV
+jl8K2E5kzi5Y3hxdUgabbJlBHORZ5rxSaoA9xJC3gub/u/nhANxqn7yhgC0n
+9kt4mPfAjJUOHVwdXtOxAy4rf6O+CUtF+yS0T9ur+JIHcGL50y43zC9sqHwI
+m2ctX7BOxJCTvsy3W/R+n7+IzsDBwic9p2CWZSa64U/vuO6dcIBPkZ9fNEPU
+gZ1founzCt5J4uGMbIHjM+2zWCNNh1mJanMTbE2tXbcdtv1cr8mC1dahhFzY
+rBAdnkbz2yUdmfS8dKO8ci7yJc2JXwNfc9Ufc4ciR+tjnQB2joasL4PPL0lJ
+HcM8msltd3lwRqdfzDM4f6RGbxOgt4u2gjq4uvqI4TpsTo5bnA9L2/28a2FD
+S0xlCmz1VGfpYbnxaTYflg/MGX4Crwo5uIQDc08/P0Rw/3pO3/hv9JW4ytUs
+gyOPvOSP035PRAruwX3jqjR/XG8Kfn+Xh/nVN0LKI+Cw0tp+mudOkNY3nVrv
+8P4Ii9cKC6tgVvdy1zya39/4mM6vIb0mCVxxzlcViLyGAC/Odlh0dVKfBXPs
+ozvp9xM5+D3SAFviVl/eC2uHN4z8gMUlZBHt12yY2pEcg/drilq7kvad4+kp
+geWD7Ggg/InXzRrhWOPEvhbMwyl0FzngD12tI4tgbajL8h0uO15wrx75PJNY
+sD/9/0OZf0nWbpA=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.613477323709358, 9.105546654636697}, \
+{-1, -1}], 
+        LineBox[{{6.999999999983629, 12.999999999992724`}, {
+         12.999999999987267`, 16.499999999996362`}}], 
+        PolygonBox[{{10.51826734053906, 15.052322615314452`}, {
+         9.683281069670574, 14.102165824326175`}, {9.280184249251306, 
+         14.793188945044921`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.823799910437668, 15.484057296392571}, \
+{1, -1}], 
+        LineBox[{{7., 13.000000000003638`}, {13.000000000003638`, 
+         9.500000000003638}}], 
+        PolygonBox[{{9.48173265946094, 11.552322615314452`}, {
+         10.316718930329426`, 10.602165824326175`}, {10.719815750748694`, 
+         11.293188945044921`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.823799910437668, 10.515942703607429}, \
+{1, 1}], LineBox[{{13., 16.50000000000231}, {13., 9.499999999998607}}], 
+        PolygonBox[{{13., 12.4}, {12.6, 13.6}, {13.4, 13.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.9452, 13.}, {-1, 0}], 
+        {PointSize[0.04], PointBox[{12., 4.}], PointBox[{7., 13.}], 
+         PointBox[{13., 16.5}], PointBox[{15.5, 7.5}], PointBox[{13., 9.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T15", " ", "P2", " ", "N30"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdief/fiijghgjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdief/fiijghgjhj.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:eJwt1QdUU1cYB/CLgwaZImisFIJYRJAYlNooJHlAWsBRYloBlREVaUQs4AAq
+tEXUQh3I0IgDBdEaDit6tKFHxRRXFKGcFmhYEkUF62IvBfu/bTkHcn65L/f7
+vv99j9hviJFumkAIScYvfSUm9A+bIf/+uDBEFv3AZvsMhrDjVaNtznh/uPNo
+y3SGpCzYekELW81ddEYIV+xMCvgNdr/1U3mBNdZ9hg/T9fy5CYIpcHCKv/Qh
+PGnpq6TvrBiiPeheY4D9Q4o9PiSwvPRghhv8VXvIFMU07DdqcGgLvLcjXOIN
+61d/4lVK+3H6vM0Q1qxpvdUHv/S1TXhiyZDE/J2DHvMZclC5u7wZVmY3nEmF
+53s/7+qE61gX827B7BZFlBE+T14KDd/DR3bapHrAfsHWKxe4wu5PVN9Sd6Vv
++BK+ti+to5La2aRmM1xvuEI1Gf0Sm6CrcXDyvNvH/WCL4ASzLbD4caQ0FR52
+WbkuECa77o+VwhzPjR3ucN1IavRdOm9F4j4WnLm7IKAaVvok//wn+hG/iFmv
+hjVqS6vjMCc+evd+uOtrq8frYKsi1yoxzMspEtvBK66lyjvRn0yukz+jeXo3
+t+yg84mjVl6GT5mVpXdjftVVo9MHaH7fhf8SRvO4E579Dc3PZ7/01lSG5Lre
+/iMM1loEXnaE89W6jaGw3P/S2gMWOD/lwPEoOPbkilVvzBnCN/zY+kfYz6nn
+s0dmmL/o6u0yuGLp9YgBU1w3K3rkMcy6GN68EB5e5BLLQb+Zx+IaT5ug/86n
+CRGw7GDeck9Y/uiSaQnMm7q22hhmvXs2oR/WcPu/p+5q95mzBHnppULhp3BK
+aNj6RFjbfq8qHSbxQb1lcL5y4cAQ3a92xq5mWG56U5KE+kQqdxih6xPOB7PQ
+r944VW3ExX2zbIx9BNYq35cYw1r+tdJpmE9Zl8h9T/fvL9Imw4xxPPspPNwm
+4N2BOcGNrytd6X02z60LTm9yup8BOzEOY62wdrBdEATrPNf35lMHneTPoudd
+FqhdCMtemenbMJ+u7KczOajP8/OJOgsn2lX23UG/wT4mg1vgrriP4v6g8zSc
+ihDQfNTysuvGqMtMXTyTXp+V8XvWFJxv/LkoA3p/O862XmOEfMxNooaQf2KY
+TZgtC+ed4Nz7Fk4pGS14aciQ7uyXpub0et/SzbWTcV6hN614tJ9nDStrJqG+
+geZSKBzcqUjpmYh6oa+Hj8IWfxbKvWBJzJydjbSfr2Kkv03A+zx7iQ3m02zy
+8tgOax6kxUbAsRmaikBYFsAqKHalz9XMcTnMrmlXv4ZZu34cPwc73bx33Znm
+n5laPJHW899jGQpbeKqXJ8NMle2hPXD6ushnk9CfTnxCcQqu8+VWZsOq8jjB
+BZj/TtDwIeZR5nl4FcKZ35zZkQ2zN1VZZ9Hz9mGr3sD549va4mC5fLl+HvKQ
+e0eu84VzawSmS2HOp6q2aTDx54hnUQuJPb2f9E+F9ffx+UT3N9w8+jxPnxvr
+B6tcTvBldH3NFjcF+smdFBjjSM/bvP77CvSvuhHe1ou8cu2WNF6heeVtZbQ0
+f5KXrDDA/navO5XUfuHsCIL1u0dyFfR5mfzXDum4iGhm5MRnw5JziysevRUR
+mef+oVM0fw9b1YEREelKe9x6Be6WjmsjhkQkcU/t4lY4P/xv5x8GRCRlY32M
+GfpJOTza9LxPRFhFAbJl9LwyZGPlvSKiSxuVH6L9v7cO1PVgP3N+Tj3Ms7/x
+IgKWBGRdsUEemoHKPik8PF54YgN1ZEnfCbh7VaETzVtWlvSRG/aTK/amtcB6
+x+f6yagXW2sgNlqAeWIdig37RUQfc3OrM2zhmlRti/50XGG5AOYls7fxBzHf
+Erswb5hpSrgmwDysh8l7+LC+/27VzGERCW6JbOHAJIh//FeYU9JS/Q71uptb
++abIg0Oyv6yl5585KGbBOsuonmO0n7eOhWdxPX/k8r4QmPnCs12H/SVPq7l2
+dJ6t2tUlqE8ci2d30Plttzs40P72bU6j969EXdfki3kyH2xbkUTz8gocc8L8
+uU82GK6GZU2S86pXmL9d+PtS+v+m8coH9V0iogzJmc+l+Vf6Szo7UE+ofke/
+bzRZvZ3zHyIPxcxohq7zTtuzG0SEOW3bF0ZdtGjv9XuoP3o+ZD/9PpnoprFU
+Y74Xz+s1rv9/Tx8R/PfKZf4BIR3UrA==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.545705156331749, 15.828020625326996}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1Qs01FkcB/DbZJnFMgyKoxojPeWV7anmrweKCoW2nWrSU1o7JVJLHq3X
+JKaIHtLUqdSUkkUhNdFmNctO6JSIOdrooZo0FZrY7z075zj/83Hv/97v73fn
+/x+70F8DN7MIIXvxR6+kYxifUQzR0KslQy4V9r7KhMk/Hg1Z8IH9BgpDWGrm
+sP5H+Bbb5+MeK4a4jEsf9cmCIZdv6q634f/SNyP1m2Ar/p/n5sKykFBFA3z2
+uPD8KVyZHLvlL3EtWPlqlwGuxRYmk3iYF+l5but+LkNEI9h+u2B2QP50A1i1
+7O3Gp3DJTEvZeXPMr77+LRD7nrU6sk4I81obHz6Cp5XrdTvCKp9YCyFy+hZ1
+rR8Fy24cbeiAu59xL9jAaqdqt5DRDGm63BzgDhMnx+HbsNvG2qciev9Q7T2O
+NUN0M07eOwlr/Ba7+cCL6qa0dsLSnfa+oXDB3qrwicjH0+NnroWb+RFnd9C8
+d+rZc2BHkfruJeq1FcEDWF981WdPK+zi1ZZRQPdT+475AnOqM8yc4IKt5v1D
+MIms2FiEvGuycza/g/1vPGjmw4dPXBmuhRkVcTuKejXP3a/G0/ms4Ggj2F7r
+dZFP1z+8bksG+uUqSd90jfbH/495Y+FfmkP2Tqb9kK9cex99Vz0TRhw1w9XD
+XD8drnL6mtjPYYgiSGoXBq9URm9eDUvjpLbbYJMPp7ujTDH/VmpLMqzu5NT5
+miD/UuFxBcw+umLkvB+wv+nchZbYz4+zTxVojP22hf0cDwdHFUpyjJD3Hit4
+ALbqrw4ygF0ay1tjkb/dmdVWZIg+1feYjUS9c4wrJqTB6iyWQTIsEucWZsPF
+0cf7v8LmVt9WKKmrS0s3oH+KA+sfT8R6jPR9TzEcsyBytIzu9z4o9AWsVkam
+TkYesj19mQ4ur4+tvAn7D4kDtPBNvs03T+RXm5w43wDrBk/2VMCiL2EmErhm
+UkafJepNSFx03xFumdsy5AeLEhtXViJPTHypMgQmn7eumAUPHcpd5QqLRzTZ
+FKE+2486s8dYj9NZmDkOJiZeNktov6ofnclFPxhNHk+CPGLPFFNreFIaCTyN
+/OIzXFKE/h7TSsylqNc/NrQihD43bvJTm7/H+X66smYMzJ/RkDmFjfUqXQoJ
+rPvosPq1PsbH7OpiwfkTcq4Wf4e8HV137OHXMa59aXoYD1Zs2QA7pUw6GTcS
+6/d9Tr8J79bzKcljYbzp0ZHxyGN+f4qwYwTOvy6s/TSsfdIWGwy7ZMXr7FFP
+prUshkXHd+ZbyeHAUgvLLoJzaatyn4p+ROxwju2DZQNBZ2SwxPGLyAnzxdb2
+8/XQT8P2UYsyYenn2c3+8L7VrS1s7K9xkgQmwZVJ2WHZsP+tpca5sPC4JJ2P
+vJqe8of0fGy5gkQ5rFav1qPfh/LQsoFxqE8abnvYBp5xl3swBuasCXtMz8tG
+47zwMvXvqXFecFqXp/V12OV+vHst8qeYPPdJhsV6ByJmwheDFFkOMInJNJKj
+/nMHO5YewX6Kt0mED5fGaHc2Il/xMcdv59E/nxfcnZ2oh1jWWXrAL9dldf2N
++kUbhLtf4Tk1zvP7iRkWEIVzv2UJvEP1zPQvnYC46HPyjsH59d6vvAcFRDpU
+ZVYAewyX+D7+IiCabVGmNfS9Y7OgJeMT5r/gZtHzXTUtxS3uo4DwIqvGCuHx
+qje2lR8ERPYknP2APu91heEBGgFJyNNkeiHvxbJw5bF3AsI8sJ2lhGN6/z28
+7q2AqP2O8ALo93OwZEJfL+73frLqISxLDuR5Y1x0m5m6GP1SGUb5e+N+zSHz
+ExeoM7Rdze8FhFN/KlkDu5ctjH6O/Xj2S1jj0H8yJU0+iDy8GwtSnWGLoU1J
+o5GX2C82tYNFeaPzHbRwVr2DFvdrU5ZHGNH6puk65XCGSVJ4GSzzaLzrA+9u
+rzEy/4z+HUqUNiFfr0J8jQszL/stlsOxT/auuI75qoOvVXdRX3uAa1831i+W
+V8ndYYutzR1l2F96dVEOfb7ae60Oje9D/TziOp2eFzs/YD7yM8+nJSjpe3dq
+a64D+sFEeWb9Rt/Lht3Tt/cg32DKLG86fme2MqoL/VX6fXChDpWPfftUQPyv
+WMlnw4rsjXEzHiKPb3SNCE7QGdsuVKCfuyeYnaPvcfpJqP7/95fL/Ac/lbt5
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.128720493773297, 4.310154074720437}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.00000000000106, 17.}, {16.49999999999894, 17.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.25, 17.6952}, {0, -1}], 
+        LineBox[CompressedData["
+1:eJxFlA9QTFscx7fUvDJjee+JGuXPvefNY5Gcq9VkJr/8eXbVa3qkUsafVfqz
+prJpUGJRNLymPLZC78VEWhH5U2vRtsZKjJSKsJJpp2yZUYasJu0752nOuzN3
+7nzmnPs7vz/f75mhSF4V6ygSiVaQl36fjdjt9r0+IPrvQeAfLG5OOkU4VPHj
+pnkI/Jb7fMvTE1b/4zVtDYKYYnFchpmwi0FSkowgNr0yVyKaD6JIg7YuE8Gr
+8Tk1BxDh/JA71j0IGqbM+xArI9xZbBqXiuDcdHPIjUTC/S+tl6IQNA6YJsYd
+Jjwz/0SLFEFcXuHwn2WE6yoCnV0R9HgEKTbUElZvvuLbwoPb8SHD8mbCTW/N
+lYU8TM6eL3ndQXjj0FdbJA/Br3yzhrsJx6d11XrwYDl+NqDaSjhH9lOVmYOy
+yPzciB6anzgs/iwHIRd6psZ2ErZpsuSpHJgnTU7TtNH11ZnKIA7qJZl8Qz1h
+UUK42puDr6JlgQ46wjpT/10vDnSXCtPDztP6Av6yenCQsHjWwq4CwrKgX6by
+HFyVvg5/dIjWeyNl2I8DwWnE1TODsEtFVEEUB9sdZ8gfbqPnG132HOQgNHd2
+YtlWwjs7ktr0HCgjWpaupiwrLVV85uCHQTdYTPdPAK9ygYfxxTO1JTSee2uj
+XcWDUT43JukIzW+JveYKD3LjMZx4mta/r8Snl4ewX3N3eOgJ+73v/OKJoO9j
+3uYnz2m/l7VafkOQxhl+v2YjnKL44L0FQXbpor6GKZjUJ9u1bxf6rhOg7Og6
+Vo0gfd29idKY/9e17XA1+BBm/wsuKcU+5ZjFr2hX5XSbMDu/OmDrY80bzPIL
+qH566ugnzPIXb3gevtFJYPVNcu411IkFVr+mfM7tiz8LrD+XVa2atZRH+6e1
+dVT70v2j/e0ddBjsovFG+6+8x2kX2DCbT0HdsweeVszmt2JVfHZFO2bzRUO3
+akfqMZt/RNN+s1SHmT4CLe8OJ17ATD9Va9zfnizBTF9R55NV5UWY6c9/S7RR
+XoCZPpunPcwYcwIz/VrTG9u4M5jpu1fpDPpKzPTv3n3979NGzPxRo4wfk/oC
+M/+Euvr3FX3GzF/Rb/iqlW4C85/U0jTh5EKB+RP175DtjhaYf3XqP1RtewXm
+75vrB4qySgXm/3r9E8cUk8Duh/vXBryPWgR2f0gcqGAWsPvlXyACxJo=
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.25, 8.354800000000001}, {0, 1}], 
+        LineBox[CompressedData["
+1:eJwd2Hk81OsXB/BvthCSRLYMCUUMWim+3bIUlSyJrCWSuJQQqSlkS0iRrea6
+ol8pa0Ulc1WytLio7Ea3ZEmRNYXf58k/Xu/XOc/znHO+z8wwSgf+tDrEQ1GU
+wjyKIr+p4Tn8SNPU7x8pmmozXbwpcilNMXieq5nBseaml5bI0BSzvGcwBN6Q
+bTKUD3NN9F9egeuEuwdNZGnK0u71jlS4z9tWvBseHmv5eRouW/Rt2E+Opjj9
+jrE7YYkVf3tOwYWRXwr54A6X4Sf+8ji/b1o1bwlNWfwcaW2FG9pY4RvgwH08
+e7UUaIou0ZWqkKSp/JozOT4wK2OgbCMcoZIllwqzWwwzShbTVFVP9MwtuPBc
+iDATDhnNOkHMld67oVSCphLDKuJIfmJJG48xzC13EDsBu06+quxdRFPfG1QD
+TMj+vl2iWXBdcc79hTBjLubOETjAbqPaW9THCnc/uAdOlI6mM0i9HnMff/uC
+RKAHPHyQ/tcbbv6xgs8AFl8WUkr2E/skXyUPczxkl36Cj7p/mBKD/aa3ZRmi
+nvy3gUaSsGWigVIuHCgw7qwFczcLD0ihH4mlJkbOMLPtSmscXPzBpvNvOFHg
+U84cvFRfw3wWZpftEvXBfEojpsq9UT+HpSLzBm4TSonvJ/M0DNiuhPmGVNwP
+DliGeunMOhfYJOgSW1ARLsvJioLFj8RV/wVTXtfLUuBbffyPFBioJ6lA/gKs
+OWWbfhhu6KrnepL8N+b2BcT81UwNOPZz8q9vsHh2Nt2C81/+aq9TV4J16tYc
+g1fPHXfZBw/flaRmUL9B+/7yMJgxuWxjGJzuIWdyFW7QetA3iXm88fj2OQ+m
+lwRbH4ON1whN5pP9hLo5I5in5JumzTfhxPytf4TClQs8h9NJ/gaZU4vhuAuR
+18+T8x7UHH8ijudhWazmQ9bf2eJ+Bva4L5llSfL5pDL2wSx9vrV6MJc33cUc
+vr9LS0uaxO9JfrKDj7+wK5tFf4zuK2ZhsKd3ZccgzBqPTi+HL/7JOMyFqeKs
+USGcb778j/edJL9I5TK5Tw1pvSafYGZivMh7uKrpuecknOi5x2cH+jtkLR0k
+ifOYhttOVcIiX6cNNsGsbNEhcr95VTuFfGHXgx7pafBEfMUL0j9npLBiDO4a
+F/w1ALOzkpUNMe9vmVEdusrYr9/Dhsx/U2CJ22k4seHC04vw1ms3HOvhQguF
+niR4+8ydi9LLEW9+rB0KS01c+ccVtnzTa2YOS5REdefA4i+OveMl9ys4VegD
+TAWns/Jwfijz520pFfS5auu/G+GvrCUJW2BGG0eU9FOyMfOjG5yYWCi4CR7j
+sbAMgrmtHUP3MA+z0PrBs2S9n4uwLqwrctn4HEy37U++h/lqXP7icJI4p8LH
+GJ6yWB9/GKZelnyvX0hTP18IJO+BOd1OT9fC950zDq0j8XzWl1diNLVeKUlD
+htQTE7j0KqwamaP0C/XTN23fXoGL0qPP9cAsCZWIanjofJNvPcxwuOCihv3u
+8fK/ewSzC+rSSmCx6mtupWQ+90zNdFHPtBPz4H2Ye95aOA3OcF1aXUX2V9Jx
+I/dhnHOZv43sd/Os3mnYuzFejZxv+SFg/XeYHWjzWB31ia8e1HDFfHiT9/7n
+DA9b6S96Cq+wTbXJggvbtV3I+8NV00jfDzBLXmjdXvji5FVTzRXIL9wdfQb2
+65+pCoY5dW8NEmGfLI+85yvIffSho2Djt5IPxFURf+WR4Q7baknU2MHDi2w8
+V8J8wsntV2HuqmU173G+X9V5vUbihA9N5PU4M+B9iEcN9ysuzX8W9f9BZXmp
+w5bcQa0zcLG2X+5WmNE/JzZNXl/KxRPWMGdsj00AbMmz7rY9TJtVJfRinvPU
+j0TZwq4nVlNTmH99pVS5Gcw2/ctaFc78fL1+DVkf+M/tk6K4Pzq2qXIwa9+2
+9CkRPJ+5c6vnUJ+r6GxrHvyDX6Gqh9S7uE4uFvZVGU1+TuKPQvqvwzv3+Tfn
+w7SOIPszrH5sOCENpuYZnnXC/opSqanxMMtCveMnbFxa7hNL1gdd2PEI9eiZ
+xK9NgtlVb6lk1K/Y3pGbDSeGx6VsQn9VtSYClWS/9oTCIvjlJVvlXrhQ/8rZ
+5ZgPr/xlW2nUX7hIl3sBblGLit8Diw/pz/bBlwW37E0m/W6/m6mHeZs+kxho
+I/l8KRu9YL7dRdtU1RH3+ro2ClYQoTYehympHyNx5PUmdiW6EmYere0KhAtf
+Tv0UXIn6OywizOB3E+khO2FOTXwoDzy+46RSHMxc/qdTHnl/sgq345B4eEau
+Pnl/jerqGoT99N8ncdCPs57lB5FVqLfKYmAz3KSyaVYZpvTDC/7EPJ6sf79N
+C+bWVO/0xLxupLlu1oYZb0QZPphnRNSRLlWSz4maIc9H+ppfuBRM/y+zvHYB
+TWnHaXbN4Txqa+ozJtz3yvTjR5h9w7z9uTDujzPz4QuYJbqs9gJs3jWWcYvE
+8wSMouCHCsrPE8j61xb/lMJzbrn7TpJ+vj/Jl8B+EqlPtnuReYxoWWfCRfa9
+Jm7ER+dWm6MeWaW7eQfI/hlsFWnU+3eGgbMvzPgf78cJeEW7+FAE2S/YZisX
+/YX0RLvlwlzGw6Ia9J/iaGzdSGxn2GyF+dRIXO6bj/4aol0u3oeD2jO7jcn8
+5KkJYcx3aMd4Ruwqcr6nogWZ9/X5G5pJvmfV10D4X5GkNIYG7pfYo40x8PZh
++2gf2DWmq+sseb3t1a0ugznvmv91hZc4a6tRmnjuE5/k1GAnevn/tsDUTHXD
+O5yfr2AVEwoPa6tPHYPDy4Pt8jXJ++dQ6yzqP+htx98EsweOeM6D3cxkvn8l
+68/bJk+if/kj8iNzJP/tWOcg5vWXcaO5wGr06/+2vQ/zTJLNecIDs3afejqF
++d/xmvGbQD53XGJOBQ593tj3AWacL60+IYTX+zzN6VoSf3LjxYggTS2oOFhy
+B2aFruvIgvNujpgkapLPd7v3p2Bfl4LR48QeSz0SYHog9YsDyW9yFGyGJdnz
+t5iS/YTElEyxf13WqWp9Un/DcoX/4HU9L/jWk/ys1gI26vnndcSKzSRfOVop
+CPW75MZ83knid9/ccUR/VTdbUrxIvXdlh0zQv+QqL6Hf9bzjM9bA829KHWRz
+SLyqz2EO7ntwYs80We/yJLwc83vj9ibfAPMQZ5ulqJP70Pdp5Bxs2X4pwwWe
+C6pUfA0zM/2Xk79PcguUFshpYf7rDoRFwnWseYGesKvBkCB5Xl9bnqgVwYWW
+RzeRz8OCmRX8EzBTeAGbgqM/6qqt0UZ+jn/ITpzvbsL+5gWzesMEAlGfobi7
+bApM+ZtsC0c/kyqO9Q9gdmfDw9Po9+X91NTXZH2LRtExzKNMqDWmDWY0uVd6
+YV5vdRWVO0i+oaSjL+Yps3KzZTPMeW7jHYv5p42WeT0jcd+Bpur5+Puw0FXu
+LtkvTE5RA1b207FLhrnG29UqBGhq/2lro0BST/mDFhZ8c/HChfYkrqA1Pxge
+0inmMST77dN3yIatqryN1Eg/jYOWM/CZAMZjKZhu7HSMwP4T1nqaYmR9mM9i
+HdSTwas2RMzxEDz+E64Z6JyUIfnheRvbUH9F7tJ32qS/zw1mT9GfolNOpiXJ
+39UnkY/+k0WCB0LJ+U06ouT9Sqyy7kshyZd9oGSN+W1vnPD8SvJ30/KzojTL
+zOrQARkm6jN8IRouRrNsItvFDWFGgE52O+ZfKZCk507ixcXuvAtp1i7NeQWx
+ML117Nsk8n1Ofj5YSOJnp+aXw++1XQ2ayfqi7EwzWNX9ru44TLW8KL2F81LW
+qXtI6KA+4dt/fEJ9u+Y3yWrAnIZH/82h/jPlptWGMO298yIvHPkwRnKnDnl/
+4zCn0f+iyqRBW5ibu87kqyDN+izicdSexLVtDw3Mp1k3c0pH7Ejc/sOrKQGa
+df7S7AIrst+oyLQy5r9vLCzUjOTvFdngz0+zyqoE1TeReIKX5QAfzdKRNZPW
+IvWYP9yUDH97eMdNkdSb+nHElw//j0xcU10EU+7a9GnYodKGxUfOywquq0R+
+dvFo0DST/L/zTZKJ/ROiHKdHyXxq792qhY9lrn49QuIar/ZFor76ILe4MTKf
+uI5QB9wH78cfL/8i8+sJczLC80/qOSwpTOrtW5m1Uohmufeyp+RhxrAVW0yY
+Znkzf46vIVYa4/sIt/Q3xOwh9YVVLmIvoFnmf/fN+RNbaSnqi9Cs0nfiIVdI
+v5f4xm/BwoasHw+JlW2WDsGZZSlePcSFpQIzeD4OkbG35+vCVdqOrYhfTQjP
+1oS5oyYfziGu2/aX0W6YmvSP+oXzHEeOxvvCnKN+RuZ4fip3mA9jYJZR9asT
+uK88zPcMNvHaG6ci0I+aL3d3Edlv2v4pC/2ypzTEKn6bjxuA5ynm7ub0FGYE
+DR/2Js/zcOfJZyRepN3my4/6ilRaOKS+TgeVGDwPe7kpxXIS19fe8pQXn88l
+Rivuknqm0xtV4P2LZbp/n19o3lDCg3m98nK6RNZ7bDQNgBvDPSrCSb5M7+rD
+PDQlHBGrEAiz+1fuToA3151NOkL6bfaz+Ix8zrMoqQPEA3seePPSrN32ZdFO
+pN533lukUM9Bv+o0YtdV56hu2M34VC3J56799fQx6u8M2evqQ853WhV8A/3t
+MA04Gkb2m1FKvoj+136Z4ZD6uLJXz/vgvtfKCU7lk3qGv+hswPxUJbmB9STO
+d3X3J1ho9aWAIbLftr2tRzFvtWB3Hgk97Leu27kG92O2v3/JBpjbG2Q+ingw
+c8tlZ5hhflx6EPEfN/idI2D2++iDBYjvN/Dff5Osf9z6awviBbKa0bVkvc3J
+2ly8Hlv0d8z26pHvJ8yv/Yf6Zsn3N2Q/8v2NIP1/jDpz6w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.272475489649668, 5.171062742038147}, \
+{0, -1}], LineBox[CompressedData["
+1:eJxFlgs0lekaxzeSRqXt1rf3/oQ23/apZJtFUapHJyWqQS41yiW3UeO4zHHN
+uERYFKUJKdtWNGWXsyu3cRuF9tAocteFVHLUaW3KYUqc9ztn1jvfWnt967fe
+/b7f877v8zz//+ojIc7+iiwWqxj9mPf/Hw589b/3SmB1OvLOiglYevPZjaUR
+iMVs1zoXAoR2TjztPxA7iqhWPQIyor8r8UsngDXivHJWiYAzdNF0qy4HWPp3
+Y9MUCRBpzaRWVSOGB3QySUBd//2kvH1ctF5iW99eAmynFZ+MPEcMLm2ueQQk
+b9QL3+/HA5bwtG/3RwL0f7u8hH7CcF+j7REO5KfkqFoBCaxEv9ypIQ68kocc
+pM4i1s9JunKQC4+UqQtHf0fclJM3PMCFXM/gpxGTiFm/Thrt54Esen72OksH
+WKGuIebNPMh4b77V4zMadxzmrTckoV8rtLHpJWJ2jeRVGAmPv0Q8fFLPrO/T
+M3eNBJ3NFu1uGYjFHw5ry0go0IrIOuTIjFdGvmgnIesP18Cjmkx8QvWNFSRY
+X0kN1R1A8SdqVLJTSLCfNslcdAWxfu3NE9YkWNbqrPKLRiyfW14ywoMjbNMW
+9iHE0qVp3/+DB8+fOS0BJ8RNw5npc1zwHBMP+3+LGPpLqXgubA1ROM2NYc4n
+xeKXeQ54VacpLypnxsM5LckcWOX3tmhglpmv8+i8BgeWFZd6HTiA4oPpZnUp
+AW6ruTVe7cx+Jq1jvAkYuL9VOO+Azqfpwl5rIwLE4rcvcgcRe69/3L2YgKfv
+4oOXhKxC8y9yrrIIeB/Kvjakoov20+w/o0XATpVM1dAixPJIxTfbCRi5HtZo
+aaaH9l8vj0Z54ubM1nxdw/DUM8koAbyTG3Ptufpo/pRnwV4OOFXpvE/ai7gz
+cPHVFg64zdj490YhlpdEl23ngs6TfaYheYhDh3ZtuMcFmV03Vy5B3NRlINvC
+Az/36qs/VDLzM5sXS3kgsXo4mFXB/H/fG2UtEpykJrLdZcx491i4PwkBH4aN
+tfIRs66FtolJyDb/Nqkygfme5rGYZhKEvWH+Vr6IE1V2K6G8CpDbTAzsQCxV
+KlhSi85NV7Z8VICYzdZ1zCKhxSNrq2gps55U2GBPwqKhOOPwCbTfzpJ/bZri
+weGer687PkB8Rm3oYjoP3kmGUtc1IJa6t4do8GCRe12c6B5idp9D109cqF9p
+3BDwDLE8zMFEmwuZpc1t61TQ+iMK2ioXOPDIyYUnWYPYMcWzjuLAOB2sUXIA
+sbfllx1NBNQoReRwzzDxu/YoBxPwWC/hbMkjZn6yZ64pqrfwbFGK9moUH0wU
+qhLQuNtv2x0vxML1NpULK8FqOtXtk4RhtQWXFQR8ut2cv2wWsXTYo9OSAEHn
+DqUiGz7Kh9bLh2IJOFEbaHkiFbGQp0R1EdC3EFtW24LY238kyIoDpunD6bmf
+EIt/3llWzoGE+ndxTQIDFI9rTe9aLhzV9AncZ4cYFExTJFxIb0g5/sATsXjD
+SzOaB9PaJ+22HGU4amfcJXReSytiDI4hPkOcPqxEwsCtTsfwI4hDH1r4oTwf
+TWsm0p0QC/9m/CqPhG3hrfOrNjHjVc56v5Lga+SrZqGLmGUz6Yvud+vMAnr4
+eLx46NJk+ws+nt+SvUlhtJWP1+fHWo9HlfPx90usTf95upCP41v4j0Pq05/4
+OP4V72Kr753n4/3F7TieYl7Mx/sveC/Kv1X91/mctNVM3jb41/n1xOhHBSkb
+4PM1UTzparvZAJ9/0q582Y8xBvh+npvVzXk3GuD7U/3GOvCDiiG+3wfLYq4r
+uxji+7etudi0R2yI8yMpO9Tn+IQhzh+z0cS/ewgpnF975jOCx0IonH/kYM6/
+PX6mcH5aSCWvXXopnL/Rh6w3dM9SOL9LI48V71EX4PxPcrt8V6orwPWx/EZO
+fdBqAa6f3rwAiTtPgOtL8bzN2/uqAlx/cDXsrs9HCten0ivLqVWDFK5fkXqj
+tlEdhet7Dzer4P4lCtd/REdpvH0ihfuDSE2/720ghfvHHafHllWuFO4vXRVm
+gjAHCvefojK7g6fsKdyftvyybmyFC4X717jgVueZ7yjc36iZhoI16RTuf3cc
+XqrH36Zwf5yI+y2ocozC/XNgICrytIEA99dTXJnYN1CA+69PfO2nXVIB7s+n
+2mYkGnMC3L9zM6HtuJ0R7u8VZqrZ5ueMcP/PF428YQ0ZYX04GPbBoJNHY/2I
+NzPp7N5PY32Z/kZVei6ZxvrjIrD+8uUajfXJ3z7B6odmGutXT5Ypu+MxjfVN
+S7P/s1c/jfWvO2a8cKaLxvo4XhI22cHM/1M/PVWCan8sp7G+BkjrZfJzNNbf
+Lcquv9tH0lifq6Naa7rcaazfkX6vC3o20VjfSaVWTs5qGut//oxMrKdGY3/Q
+mPHa21mRxv6BcztRSbJghP1FjXObuq0Kjf2HTkLwnXYujf1Jzld2+4M30ti/
+CG9Uxb70orG/+VhY/vlYDo39z/YA+c6+Dhr7I5+0+JxstjH2T6ITOtsqDhhj
+f1URlVJvWGKM/VddsFC5UG6M/Vlj64ObHZvXYP/ma98fHpG8Bvu7+LVnjWNb
+Ef/p/xYUmPda+C9XmtaC
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.0548, 9.5}, {1, 0}], 
+        LineBox[CompressedData["
+1:eJxFlHswXHcUx7e7pUobK9sWu3uzFhV772130hJvjjZBBolkZsdbUUKLeg0p
+lYSIdEIWsSE606gKCYISHcmmEYnnJlGvbT0a0WXKLKslTUhMgv62f/z2N3Pn
+zmd+957zO7/zPV9hdPKRWCaDwQhFj/Zts76NljUw/l8U7Kwz0nPqQVwdo5A/
+JKH4Y8L2xHHElcYrbZdJGOsJXv98D2K2XKpfSELDtYxDv89aASPA15OTS0KO
+71WV5jxis4S+iDMkeG+vWvfvQ1yfqZR9T0JNl5d1+KYlMCIv1RXcI8Gn89sP
+w+4gvrug8nhKgthq/8+vzmo5fYdQTEGwxHu3Ogox4wO3rVQKqkx7soXeiH1Y
+i/43KbCYu5D+3Anxzcy5wC0KXDfc8xjOiA2ONccBDWQqP9DCC7FFUvNWNg37
+XnfaqAhDrHj3GOsaDedexaWYfYM4t3xA8ysNB274/aWpQqxSqGdmaRAIHTPZ
+fYgr49uG5mloa7BZil3S5pMPFUzRIPXVPB83QvWl5FQ0dtLAjHY2yLdBXLrq
+3CGjIWaOK5p3QDzybEIVTkNowB1y3Q0xWxTHEtCQ2csy9dHuf31lT+ofFAgd
+ZSXmVogjefcfyCig60eNIl9D3DqwOHiQgtu3fBIUYyj/ZNAMYUyBJ2dL2VyJ
+OIXB4U+SYJ9bH/iGRFuvS0ZrEwmLEROB/oba88Yb7i4hoUruaBL0ixDFd1ca
+55Fg0evBcUpADB0/ivJJiHl0osWEQFwayAgqJ2ElPFyqVlqgeO3ttR0k3I4X
+d+SWIa5uvOc3jzgiy9IuFLHBkv/kLgrKyxIWlGLEkbSBayQFspbViyUmiFXu
+ccwrFNQa2X4yz9B+zz2VvUzB2kGbHPuXAmCov3xrSUyDUfjI/bv6aF9dMNqV
+SIN9X3d7F1eb347Z+wMNhS9S/k500MaLH/i0n4aPdsiibEMQT743aD9Dg8sa
+kvNJxIrGYckC6vd0YtVEnW5f86R4p0yh+9/zfTc/mNfFT5CK93ps6PK/7F72
+jGUK8fnGZiY6udu688+5GMen/KOrbzbwgjk9oqv/VtGZxw9rdfcjzxs5cDJJ
+d38V7TVpprTufi13MS9P9wnw/Tf55U5JRQLcn9ao4seHzu7C/TM3PRwQqyFw
+f0/91hLwRELg/n/RwgqqHeJjfaR99pUoOYSP9SM7Hab22ORhfTXETKkG5Tys
+v23fF6PJ53lYn3vt8hs5p3lYv9bsB832pTysbzW7aGXjOg/rf8xNxD6i5uH5
+KMy7TtlRfDw/LWUlnD8z+Hi+go8edbDt5uP5Uz4SC4bfJPB8Rg9K3x7zIvD8
+Vv7bf7grncDznT6Xt7lVROD5b2KPm5mcI7A/DD/NMuxMJbB/OJKpbWJXAvuL
+tDjjov4yH/tPSMhqjXc+H/vTVUnajf16fOxfEeNER3omD/vbM7c2d9tpLva/
+746/EyVx5WJ/9PL34zheMsf+OZTU9xNLzxz7q6JQvSbNMsP+W63W+rMp9uf/
+AHbvO2E=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.25, 15.145199999999999}, {0, -1}], 
+        LineBox[{{16.5, 17.00000000000231}, {16.5, 9.999999999998607}}], 
+        PolygonBox[{{16.5, 14.1}, {16.1, 12.9}, {16.9, 12.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.4452, 13.5}, {-1, 0}], 
+        LineBox[{{16.500000000007276`, 17.000000000003638`}, {
+         10.500000000005457`, 13.5}}], 
+        PolygonBox[{{12.98173265946094, 14.947677384685548`}, {
+         13.816718930329426`, 15.897834175673825`}, {14.219815750748694`, 
+         15.206811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.323799910437668, 15.984057296392571}, \
+{1, -1}], 
+        LineBox[{{16.5, 9.999999999996362}, {10.500000000001819`, 
+         13.499999999996362`}}], 
+        PolygonBox[{{14.01826734053906, 11.447677384685548`}, {
+         13.183281069670574`, 12.397834175673825`}, {12.780184249251306`, 
+         11.706811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.323799910437668, 11.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{6., 13.5}], PointBox[{6., 5.5}], 
+         PointBox[{16.5, 17.}], PointBox[{16.5, 10.}], 
+         PointBox[{10.5, 13.5}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T16", " ", "P1", " ", "N31"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdieg/fgfjhihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdieg/fgfjhihjij.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:eJwt1QdUU1cYB/CLgwaZImisFIJYRJAYlNooJHlAWsBRYloBlREVaUQs4AAq
+tEXUQh3I0IgDBdEaDit6tKFHxRRXFKGcFmhYEkUF62IvBfu/bTkHcn65L/f7
+vv99j9hviJFumkAIScYvfSUm9A+bIf/+uDBEFv3AZvsMhrDjVaNtznh/uPNo
+y3SGpCzYekELW81ddEYIV+xMCvgNdr/1U3mBNdZ9hg/T9fy5CYIpcHCKv/Qh
+PGnpq6TvrBiiPeheY4D9Q4o9PiSwvPRghhv8VXvIFMU07DdqcGgLvLcjXOIN
+61d/4lVK+3H6vM0Q1qxpvdUHv/S1TXhiyZDE/J2DHvMZclC5u7wZVmY3nEmF
+53s/7+qE61gX827B7BZFlBE+T14KDd/DR3bapHrAfsHWKxe4wu5PVN9Sd6Vv
++BK+ti+to5La2aRmM1xvuEI1Gf0Sm6CrcXDyvNvH/WCL4ASzLbD4caQ0FR52
+WbkuECa77o+VwhzPjR3ucN1IavRdOm9F4j4WnLm7IKAaVvok//wn+hG/iFmv
+hjVqS6vjMCc+evd+uOtrq8frYKsi1yoxzMspEtvBK66lyjvRn0yukz+jeXo3
+t+yg84mjVl6GT5mVpXdjftVVo9MHaH7fhf8SRvO4E579Dc3PZ7/01lSG5Lre
+/iMM1loEXnaE89W6jaGw3P/S2gMWOD/lwPEoOPbkilVvzBnCN/zY+kfYz6nn
+s0dmmL/o6u0yuGLp9YgBU1w3K3rkMcy6GN68EB5e5BLLQb+Zx+IaT5ug/86n
+CRGw7GDeck9Y/uiSaQnMm7q22hhmvXs2oR/WcPu/p+5q95mzBHnppULhp3BK
+aNj6RFjbfq8qHSbxQb1lcL5y4cAQ3a92xq5mWG56U5KE+kQqdxih6xPOB7PQ
+r944VW3ExX2zbIx9BNYq35cYw1r+tdJpmE9Zl8h9T/fvL9Imw4xxPPspPNwm
+4N2BOcGNrytd6X02z60LTm9yup8BOzEOY62wdrBdEATrPNf35lMHneTPoudd
+FqhdCMtemenbMJ+u7KczOajP8/OJOgsn2lX23UG/wT4mg1vgrriP4v6g8zSc
+ihDQfNTysuvGqMtMXTyTXp+V8XvWFJxv/LkoA3p/O862XmOEfMxNooaQf2KY
+TZgtC+ed4Nz7Fk4pGS14aciQ7uyXpub0et/SzbWTcV6hN614tJ9nDStrJqG+
+geZSKBzcqUjpmYh6oa+Hj8IWfxbKvWBJzJydjbSfr2Kkv03A+zx7iQ3m02zy
+8tgOax6kxUbAsRmaikBYFsAqKHalz9XMcTnMrmlXv4ZZu34cPwc73bx33Znm
+n5laPJHW899jGQpbeKqXJ8NMle2hPXD6ushnk9CfTnxCcQqu8+VWZsOq8jjB
+BZj/TtDwIeZR5nl4FcKZ35zZkQ2zN1VZZ9Hz9mGr3sD549va4mC5fLl+HvKQ
+e0eu84VzawSmS2HOp6q2aTDx54hnUQuJPb2f9E+F9ffx+UT3N9w8+jxPnxvr
+B6tcTvBldH3NFjcF+smdFBjjSM/bvP77CvSvuhHe1ou8cu2WNF6heeVtZbQ0
+f5KXrDDA/navO5XUfuHsCIL1u0dyFfR5mfzXDum4iGhm5MRnw5JziysevRUR
+mef+oVM0fw9b1YEREelKe9x6Be6WjmsjhkQkcU/t4lY4P/xv5x8GRCRlY32M
+GfpJOTza9LxPRFhFAbJl9LwyZGPlvSKiSxuVH6L9v7cO1PVgP3N+Tj3Ms7/x
+IgKWBGRdsUEemoHKPik8PF54YgN1ZEnfCbh7VaETzVtWlvSRG/aTK/amtcB6
+x+f6yagXW2sgNlqAeWIdig37RUQfc3OrM2zhmlRti/50XGG5AOYls7fxBzHf
+Erswb5hpSrgmwDysh8l7+LC+/27VzGERCW6JbOHAJIh//FeYU9JS/Q71uptb
++abIg0Oyv6yl5585KGbBOsuonmO0n7eOhWdxPX/k8r4QmPnCs12H/SVPq7l2
+dJ6t2tUlqE8ci2d30Plttzs40P72bU6j969EXdfki3kyH2xbkUTz8gocc8L8
+uU82GK6GZU2S86pXmL9d+PtS+v+m8coH9V0iogzJmc+l+Vf6Szo7UE+ofke/
+bzRZvZ3zHyIPxcxohq7zTtuzG0SEOW3bF0ZdtGjv9XuoP3o+ZD/9PpnoprFU
+Y74Xz+s1rv9/Tx8R/PfKZf4BIR3UrA==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.545705156331749, 15.828020625326996}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1Qs01FkcB/DbZJnFMgyKoxojPeWV7anmrweKCoW2nWrSU1o7JVJLHq3X
+JKaIHtLUqdSUkkUhNdFmNctO6JSIOdrooZo0FZrY7z075zj/83Hv/97v73fn
+/x+70F8DN7MIIXvxR6+kYxifUQzR0KslQy4V9r7KhMk/Hg1Z8IH9BgpDWGrm
+sP5H+Bbb5+MeK4a4jEsf9cmCIZdv6q634f/SNyP1m2Ar/p/n5sKykFBFA3z2
+uPD8KVyZHLvlL3EtWPlqlwGuxRYmk3iYF+l5but+LkNEI9h+u2B2QP50A1i1
+7O3Gp3DJTEvZeXPMr77+LRD7nrU6sk4I81obHz6Cp5XrdTvCKp9YCyFy+hZ1
+rR8Fy24cbeiAu59xL9jAaqdqt5DRDGm63BzgDhMnx+HbsNvG2qciev9Q7T2O
+NUN0M07eOwlr/Ba7+cCL6qa0dsLSnfa+oXDB3qrwicjH0+NnroWb+RFnd9C8
+d+rZc2BHkfruJeq1FcEDWF981WdPK+zi1ZZRQPdT+475AnOqM8yc4IKt5v1D
+MIms2FiEvGuycza/g/1vPGjmw4dPXBmuhRkVcTuKejXP3a/G0/ms4Ggj2F7r
+dZFP1z+8bksG+uUqSd90jfbH/495Y+FfmkP2Tqb9kK9cex99Vz0TRhw1w9XD
+XD8drnL6mtjPYYgiSGoXBq9URm9eDUvjpLbbYJMPp7ujTDH/VmpLMqzu5NT5
+miD/UuFxBcw+umLkvB+wv+nchZbYz4+zTxVojP22hf0cDwdHFUpyjJD3Hit4
+ALbqrw4ygF0ay1tjkb/dmdVWZIg+1feYjUS9c4wrJqTB6iyWQTIsEucWZsPF
+0cf7v8LmVt9WKKmrS0s3oH+KA+sfT8R6jPR9TzEcsyBytIzu9z4o9AWsVkam
+TkYesj19mQ4ur4+tvAn7D4kDtPBNvs03T+RXm5w43wDrBk/2VMCiL2EmErhm
+UkafJepNSFx03xFumdsy5AeLEhtXViJPTHypMgQmn7eumAUPHcpd5QqLRzTZ
+FKE+2486s8dYj9NZmDkOJiZeNktov6ofnclFPxhNHk+CPGLPFFNreFIaCTyN
+/OIzXFKE/h7TSsylqNc/NrQihD43bvJTm7/H+X66smYMzJ/RkDmFjfUqXQoJ
+rPvosPq1PsbH7OpiwfkTcq4Wf4e8HV137OHXMa59aXoYD1Zs2QA7pUw6GTcS
+6/d9Tr8J79bzKcljYbzp0ZHxyGN+f4qwYwTOvy6s/TSsfdIWGwy7ZMXr7FFP
+prUshkXHd+ZbyeHAUgvLLoJzaatyn4p+ROxwju2DZQNBZ2SwxPGLyAnzxdb2
+8/XQT8P2UYsyYenn2c3+8L7VrS1s7K9xkgQmwZVJ2WHZsP+tpca5sPC4JJ2P
+vJqe8of0fGy5gkQ5rFav1qPfh/LQsoFxqE8abnvYBp5xl3swBuasCXtMz8tG
+47zwMvXvqXFecFqXp/V12OV+vHst8qeYPPdJhsV6ByJmwheDFFkOMInJNJKj
+/nMHO5YewX6Kt0mED5fGaHc2Il/xMcdv59E/nxfcnZ2oh1jWWXrAL9dldf2N
++kUbhLtf4Tk1zvP7iRkWEIVzv2UJvEP1zPQvnYC46HPyjsH59d6vvAcFRDpU
+ZVYAewyX+D7+IiCabVGmNfS9Y7OgJeMT5r/gZtHzXTUtxS3uo4DwIqvGCuHx
+qje2lR8ERPYknP2APu91heEBGgFJyNNkeiHvxbJw5bF3AsI8sJ2lhGN6/z28
+7q2AqP2O8ALo93OwZEJfL+73frLqISxLDuR5Y1x0m5m6GP1SGUb5e+N+zSHz
+ExeoM7Rdze8FhFN/KlkDu5ctjH6O/Xj2S1jj0H8yJU0+iDy8GwtSnWGLoU1J
+o5GX2C82tYNFeaPzHbRwVr2DFvdrU5ZHGNH6puk65XCGSVJ4GSzzaLzrA+9u
+rzEy/4z+HUqUNiFfr0J8jQszL/stlsOxT/auuI75qoOvVXdRX3uAa1831i+W
+V8ndYYutzR1l2F96dVEOfb7ae60Oje9D/TziOp2eFzs/YD7yM8+nJSjpe3dq
+a64D+sFEeWb9Rt/Lht3Tt/cg32DKLG86fme2MqoL/VX6fXChDpWPfftUQPyv
+WMlnw4rsjXEzHiKPb3SNCE7QGdsuVKCfuyeYnaPvcfpJqP7/95fL/Ac/lbt5
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.128720493773297, 4.310154074720437}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.00000000000106, 17.}, {16.49999999999894, 17.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.25, 17.6952}, {0, -1}], 
+        LineBox[CompressedData["
+1:eJxFlA9QTFscx7fUvDJjee+JGuXPvefNY5Gcq9VkJr/8eXbVa3qkUsafVfqz
+prJpUGJRNLymPLZC78VEWhH5U2vRtsZKjJSKsJJpp2yZUYasJu0752nOuzN3
+7nzmnPs7vz/f75mhSF4V6ygSiVaQl36fjdjt9r0+IPrvQeAfLG5OOkU4VPHj
+pnkI/Jb7fMvTE1b/4zVtDYKYYnFchpmwi0FSkowgNr0yVyKaD6JIg7YuE8Gr
+8Tk1BxDh/JA71j0IGqbM+xArI9xZbBqXiuDcdHPIjUTC/S+tl6IQNA6YJsYd
+Jjwz/0SLFEFcXuHwn2WE6yoCnV0R9HgEKTbUElZvvuLbwoPb8SHD8mbCTW/N
+lYU8TM6eL3ndQXjj0FdbJA/Br3yzhrsJx6d11XrwYDl+NqDaSjhH9lOVmYOy
+yPzciB6anzgs/iwHIRd6psZ2ErZpsuSpHJgnTU7TtNH11ZnKIA7qJZl8Qz1h
+UUK42puDr6JlgQ46wjpT/10vDnSXCtPDztP6Av6yenCQsHjWwq4CwrKgX6by
+HFyVvg5/dIjWeyNl2I8DwWnE1TODsEtFVEEUB9sdZ8gfbqPnG132HOQgNHd2
+YtlWwjs7ktr0HCgjWpaupiwrLVV85uCHQTdYTPdPAK9ygYfxxTO1JTSee2uj
+XcWDUT43JukIzW+JveYKD3LjMZx4mta/r8Snl4ewX3N3eOgJ+73v/OKJoO9j
+3uYnz2m/l7VafkOQxhl+v2YjnKL44L0FQXbpor6GKZjUJ9u1bxf6rhOg7Og6
+Vo0gfd29idKY/9e17XA1+BBm/wsuKcU+5ZjFr2hX5XSbMDu/OmDrY80bzPIL
+qH566ugnzPIXb3gevtFJYPVNcu411IkFVr+mfM7tiz8LrD+XVa2atZRH+6e1
+dVT70v2j/e0ddBjsovFG+6+8x2kX2DCbT0HdsweeVszmt2JVfHZFO2bzRUO3
+akfqMZt/RNN+s1SHmT4CLe8OJ17ATD9Va9zfnizBTF9R55NV5UWY6c9/S7RR
+XoCZPpunPcwYcwIz/VrTG9u4M5jpu1fpDPpKzPTv3n3979NGzPxRo4wfk/oC
+M/+Euvr3FX3GzF/Rb/iqlW4C85/U0jTh5EKB+RP175DtjhaYf3XqP1RtewXm
+75vrB4qySgXm/3r9E8cUk8Duh/vXBryPWgR2f0gcqGAWsPvlXyACxJo=
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.25, 8.354800000000001}, {0, 1}], 
+        LineBox[CompressedData["
+1:eJwd2Hk81OsXB/BvthCSRLYMCUUMWim+3bIUlSyJrCWSuJQQqSlkS0iRrea6
+ol8pa0Ulc1WytLio7Ea3ZEmRNYXf58k/Xu/XOc/znHO+z8wwSgf+tDrEQ1GU
+wjyKIr+p4Tn8SNPU7x8pmmozXbwpcilNMXieq5nBseaml5bI0BSzvGcwBN6Q
+bTKUD3NN9F9egeuEuwdNZGnK0u71jlS4z9tWvBseHmv5eRouW/Rt2E+Opjj9
+jrE7YYkVf3tOwYWRXwr54A6X4Sf+8ji/b1o1bwlNWfwcaW2FG9pY4RvgwH08
+e7UUaIou0ZWqkKSp/JozOT4wK2OgbCMcoZIllwqzWwwzShbTVFVP9MwtuPBc
+iDATDhnNOkHMld67oVSCphLDKuJIfmJJG48xzC13EDsBu06+quxdRFPfG1QD
+TMj+vl2iWXBdcc79hTBjLubOETjAbqPaW9THCnc/uAdOlI6mM0i9HnMff/uC
+RKAHPHyQ/tcbbv6xgs8AFl8WUkr2E/skXyUPczxkl36Cj7p/mBKD/aa3ZRmi
+nvy3gUaSsGWigVIuHCgw7qwFczcLD0ihH4mlJkbOMLPtSmscXPzBpvNvOFHg
+U84cvFRfw3wWZpftEvXBfEojpsq9UT+HpSLzBm4TSonvJ/M0DNiuhPmGVNwP
+DliGeunMOhfYJOgSW1ARLsvJioLFj8RV/wVTXtfLUuBbffyPFBioJ6lA/gKs
+OWWbfhhu6KrnepL8N+b2BcT81UwNOPZz8q9vsHh2Nt2C81/+aq9TV4J16tYc
+g1fPHXfZBw/flaRmUL9B+/7yMJgxuWxjGJzuIWdyFW7QetA3iXm88fj2OQ+m
+lwRbH4ON1whN5pP9hLo5I5in5JumzTfhxPytf4TClQs8h9NJ/gaZU4vhuAuR
+18+T8x7UHH8ijudhWazmQ9bf2eJ+Bva4L5llSfL5pDL2wSx9vrV6MJc33cUc
+vr9LS0uaxO9JfrKDj7+wK5tFf4zuK2ZhsKd3ZccgzBqPTi+HL/7JOMyFqeKs
+USGcb778j/edJL9I5TK5Tw1pvSafYGZivMh7uKrpuecknOi5x2cH+jtkLR0k
+ifOYhttOVcIiX6cNNsGsbNEhcr95VTuFfGHXgx7pafBEfMUL0j9npLBiDO4a
+F/w1ALOzkpUNMe9vmVEdusrYr9/Dhsx/U2CJ22k4seHC04vw1ms3HOvhQguF
+niR4+8ydi9LLEW9+rB0KS01c+ccVtnzTa2YOS5REdefA4i+OveMl9ys4VegD
+TAWns/Jwfijz520pFfS5auu/G+GvrCUJW2BGG0eU9FOyMfOjG5yYWCi4CR7j
+sbAMgrmtHUP3MA+z0PrBs2S9n4uwLqwrctn4HEy37U++h/lqXP7icJI4p8LH
+GJ6yWB9/GKZelnyvX0hTP18IJO+BOd1OT9fC950zDq0j8XzWl1diNLVeKUlD
+htQTE7j0KqwamaP0C/XTN23fXoGL0qPP9cAsCZWIanjofJNvPcxwuOCihv3u
+8fK/ewSzC+rSSmCx6mtupWQ+90zNdFHPtBPz4H2Ye95aOA3OcF1aXUX2V9Jx
+I/dhnHOZv43sd/Os3mnYuzFejZxv+SFg/XeYHWjzWB31ia8e1HDFfHiT9/7n
+DA9b6S96Cq+wTbXJggvbtV3I+8NV00jfDzBLXmjdXvji5FVTzRXIL9wdfQb2
+65+pCoY5dW8NEmGfLI+85yvIffSho2Djt5IPxFURf+WR4Q7baknU2MHDi2w8
+V8J8wsntV2HuqmU173G+X9V5vUbihA9N5PU4M+B9iEcN9ysuzX8W9f9BZXmp
+w5bcQa0zcLG2X+5WmNE/JzZNXl/KxRPWMGdsj00AbMmz7rY9TJtVJfRinvPU
+j0TZwq4nVlNTmH99pVS5Gcw2/ctaFc78fL1+DVkf+M/tk6K4Pzq2qXIwa9+2
+9CkRPJ+5c6vnUJ+r6GxrHvyDX6Gqh9S7uE4uFvZVGU1+TuKPQvqvwzv3+Tfn
+w7SOIPszrH5sOCENpuYZnnXC/opSqanxMMtCveMnbFxa7hNL1gdd2PEI9eiZ
+xK9NgtlVb6lk1K/Y3pGbDSeGx6VsQn9VtSYClWS/9oTCIvjlJVvlXrhQ/8rZ
+5ZgPr/xlW2nUX7hIl3sBblGLit8Diw/pz/bBlwW37E0m/W6/m6mHeZs+kxho
+I/l8KRu9YL7dRdtU1RH3+ro2ClYQoTYehympHyNx5PUmdiW6EmYere0KhAtf
+Tv0UXIn6OywizOB3E+khO2FOTXwoDzy+46RSHMxc/qdTHnl/sgq345B4eEau
+Pnl/jerqGoT99N8ncdCPs57lB5FVqLfKYmAz3KSyaVYZpvTDC/7EPJ6sf79N
+C+bWVO/0xLxupLlu1oYZb0QZPphnRNSRLlWSz4maIc9H+ppfuBRM/y+zvHYB
+TWnHaXbN4Txqa+ozJtz3yvTjR5h9w7z9uTDujzPz4QuYJbqs9gJs3jWWcYvE
+8wSMouCHCsrPE8j61xb/lMJzbrn7TpJ+vj/Jl8B+EqlPtnuReYxoWWfCRfa9
+Jm7ER+dWm6MeWaW7eQfI/hlsFWnU+3eGgbMvzPgf78cJeEW7+FAE2S/YZisX
+/YX0RLvlwlzGw6Ia9J/iaGzdSGxn2GyF+dRIXO6bj/4aol0u3oeD2jO7jcn8
+5KkJYcx3aMd4Ruwqcr6nogWZ9/X5G5pJvmfV10D4X5GkNIYG7pfYo40x8PZh
++2gf2DWmq+sseb3t1a0ugznvmv91hZc4a6tRmnjuE5/k1GAnevn/tsDUTHXD
+O5yfr2AVEwoPa6tPHYPDy4Pt8jXJ++dQ6yzqP+htx98EsweOeM6D3cxkvn8l
+68/bJk+if/kj8iNzJP/tWOcg5vWXcaO5wGr06/+2vQ/zTJLNecIDs3afejqF
++d/xmvGbQD53XGJOBQ593tj3AWacL60+IYTX+zzN6VoSf3LjxYggTS2oOFhy
+B2aFruvIgvNujpgkapLPd7v3p2Bfl4LR48QeSz0SYHog9YsDyW9yFGyGJdnz
+t5iS/YTElEyxf13WqWp9Un/DcoX/4HU9L/jWk/ys1gI26vnndcSKzSRfOVop
+CPW75MZ83knid9/ccUR/VTdbUrxIvXdlh0zQv+QqL6Hf9bzjM9bA829KHWRz
+SLyqz2EO7ntwYs80We/yJLwc83vj9ibfAPMQZ5ulqJP70Pdp5Bxs2X4pwwWe
+C6pUfA0zM/2Xk79PcguUFshpYf7rDoRFwnWseYGesKvBkCB5Xl9bnqgVwYWW
+RzeRz8OCmRX8EzBTeAGbgqM/6qqt0UZ+jn/ITpzvbsL+5gWzesMEAlGfobi7
+bApM+ZtsC0c/kyqO9Q9gdmfDw9Po9+X91NTXZH2LRtExzKNMqDWmDWY0uVd6
+YV5vdRWVO0i+oaSjL+Yps3KzZTPMeW7jHYv5p42WeT0jcd+Bpur5+Puw0FXu
+LtkvTE5RA1b207FLhrnG29UqBGhq/2lro0BST/mDFhZ8c/HChfYkrqA1Pxge
+0inmMST77dN3yIatqryN1Eg/jYOWM/CZAMZjKZhu7HSMwP4T1nqaYmR9mM9i
+HdSTwas2RMzxEDz+E64Z6JyUIfnheRvbUH9F7tJ32qS/zw1mT9GfolNOpiXJ
+39UnkY/+k0WCB0LJ+U06ouT9Sqyy7kshyZd9oGSN+W1vnPD8SvJ30/KzojTL
+zOrQARkm6jN8IRouRrNsItvFDWFGgE52O+ZfKZCk507ixcXuvAtp1i7NeQWx
+ML117Nsk8n1Ofj5YSOJnp+aXw++1XQ2ayfqi7EwzWNX9ru44TLW8KL2F81LW
+qXtI6KA+4dt/fEJ9u+Y3yWrAnIZH/82h/jPlptWGMO298yIvHPkwRnKnDnl/
+4zCn0f+iyqRBW5ibu87kqyDN+izicdSexLVtDw3Mp1k3c0pH7Ejc/sOrKQGa
+df7S7AIrst+oyLQy5r9vLCzUjOTvFdngz0+zyqoE1TeReIKX5QAfzdKRNZPW
+IvWYP9yUDH97eMdNkdSb+nHElw//j0xcU10EU+7a9GnYodKGxUfOywquq0R+
+dvFo0DST/L/zTZKJ/ROiHKdHyXxq792qhY9lrn49QuIar/ZFor76ILe4MTKf
+uI5QB9wH78cfL/8i8+sJczLC80/qOSwpTOrtW5m1Uohmufeyp+RhxrAVW0yY
+Znkzf46vIVYa4/sIt/Q3xOwh9YVVLmIvoFnmf/fN+RNbaSnqi9Cs0nfiIVdI
+v5f4xm/BwoasHw+JlW2WDsGZZSlePcSFpQIzeD4OkbG35+vCVdqOrYhfTQjP
+1oS5oyYfziGu2/aX0W6YmvSP+oXzHEeOxvvCnKN+RuZ4fip3mA9jYJZR9asT
+uK88zPcMNvHaG6ci0I+aL3d3Edlv2v4pC/2ypzTEKn6bjxuA5ynm7ub0FGYE
+DR/2Js/zcOfJZyRepN3my4/6ilRaOKS+TgeVGDwPe7kpxXIS19fe8pQXn88l
+Rivuknqm0xtV4P2LZbp/n19o3lDCg3m98nK6RNZ7bDQNgBvDPSrCSb5M7+rD
+PDQlHBGrEAiz+1fuToA3151NOkL6bfaz+Ix8zrMoqQPEA3seePPSrN32ZdFO
+pN533lukUM9Bv+o0YtdV56hu2M34VC3J56799fQx6u8M2evqQ853WhV8A/3t
+MA04Gkb2m1FKvoj+136Z4ZD6uLJXz/vgvtfKCU7lk3qGv+hswPxUJbmB9STO
+d3X3J1ho9aWAIbLftr2tRzFvtWB3Hgk97Leu27kG92O2v3/JBpjbG2Q+ingw
+c8tlZ5hhflx6EPEfN/idI2D2++iDBYjvN/Dff5Osf9z6awviBbKa0bVkvc3J
+2ly8Hlv0d8z26pHvJ8yv/Yf6Zsn3N2Q/8v2NIP1/jDpz6w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.272475489649668, 5.171062742038147}, \
+{0, -1}], LineBox[CompressedData["
+1:eJxFlgs0lekaxzeSRqXt1rf3/oQ23/apZJtFUapHJyWqQS41yiW3UeO4zHHN
+uERYFKUJKdtWNGWXsyu3cRuF9tAocteFVHLUaW3KYUqc9ztn1jvfWnt967fe
+/b7f877v8zz//+ojIc7+iiwWqxj9mPf/Hw589b/3SmB1OvLOiglYevPZjaUR
+iMVs1zoXAoR2TjztPxA7iqhWPQIyor8r8UsngDXivHJWiYAzdNF0qy4HWPp3
+Y9MUCRBpzaRWVSOGB3QySUBd//2kvH1ctF5iW99eAmynFZ+MPEcMLm2ueQQk
+b9QL3+/HA5bwtG/3RwL0f7u8hH7CcF+j7REO5KfkqFoBCaxEv9ypIQ68kocc
+pM4i1s9JunKQC4+UqQtHf0fclJM3PMCFXM/gpxGTiFm/Thrt54Esen72OksH
+WKGuIebNPMh4b77V4zMadxzmrTckoV8rtLHpJWJ2jeRVGAmPv0Q8fFLPrO/T
+M3eNBJ3NFu1uGYjFHw5ry0go0IrIOuTIjFdGvmgnIesP18Cjmkx8QvWNFSRY
+X0kN1R1A8SdqVLJTSLCfNslcdAWxfu3NE9YkWNbqrPKLRiyfW14ywoMjbNMW
+9iHE0qVp3/+DB8+fOS0BJ8RNw5npc1zwHBMP+3+LGPpLqXgubA1ROM2NYc4n
+xeKXeQ54VacpLypnxsM5LckcWOX3tmhglpmv8+i8BgeWFZd6HTiA4oPpZnUp
+AW6ruTVe7cx+Jq1jvAkYuL9VOO+Azqfpwl5rIwLE4rcvcgcRe69/3L2YgKfv
+4oOXhKxC8y9yrrIIeB/Kvjakoov20+w/o0XATpVM1dAixPJIxTfbCRi5HtZo
+aaaH9l8vj0Z54ubM1nxdw/DUM8koAbyTG3Ptufpo/pRnwV4OOFXpvE/ai7gz
+cPHVFg64zdj490YhlpdEl23ngs6TfaYheYhDh3ZtuMcFmV03Vy5B3NRlINvC
+Az/36qs/VDLzM5sXS3kgsXo4mFXB/H/fG2UtEpykJrLdZcx491i4PwkBH4aN
+tfIRs66FtolJyDb/Nqkygfme5rGYZhKEvWH+Vr6IE1V2K6G8CpDbTAzsQCxV
+KlhSi85NV7Z8VICYzdZ1zCKhxSNrq2gps55U2GBPwqKhOOPwCbTfzpJ/bZri
+weGer687PkB8Rm3oYjoP3kmGUtc1IJa6t4do8GCRe12c6B5idp9D109cqF9p
+3BDwDLE8zMFEmwuZpc1t61TQ+iMK2ioXOPDIyYUnWYPYMcWzjuLAOB2sUXIA
+sbfllx1NBNQoReRwzzDxu/YoBxPwWC/hbMkjZn6yZ64pqrfwbFGK9moUH0wU
+qhLQuNtv2x0vxML1NpULK8FqOtXtk4RhtQWXFQR8ut2cv2wWsXTYo9OSAEHn
+DqUiGz7Kh9bLh2IJOFEbaHkiFbGQp0R1EdC3EFtW24LY238kyIoDpunD6bmf
+EIt/3llWzoGE+ndxTQIDFI9rTe9aLhzV9AncZ4cYFExTJFxIb0g5/sATsXjD
+SzOaB9PaJ+22HGU4amfcJXReSytiDI4hPkOcPqxEwsCtTsfwI4hDH1r4oTwf
+TWsm0p0QC/9m/CqPhG3hrfOrNjHjVc56v5Lga+SrZqGLmGUz6Yvud+vMAnr4
+eLx46NJk+ws+nt+SvUlhtJWP1+fHWo9HlfPx90usTf95upCP41v4j0Pq05/4
+OP4V72Kr753n4/3F7TieYl7Mx/sveC/Kv1X91/mctNVM3jb41/n1xOhHBSkb
+4PM1UTzparvZAJ9/0q582Y8xBvh+npvVzXk3GuD7U/3GOvCDiiG+3wfLYq4r
+uxji+7etudi0R2yI8yMpO9Tn+IQhzh+z0cS/ewgpnF975jOCx0IonH/kYM6/
+PX6mcH5aSCWvXXopnL/Rh6w3dM9SOL9LI48V71EX4PxPcrt8V6orwPWx/EZO
+fdBqAa6f3rwAiTtPgOtL8bzN2/uqAlx/cDXsrs9HCten0ivLqVWDFK5fkXqj
+tlEdhet7Dzer4P4lCtd/REdpvH0ihfuDSE2/720ghfvHHafHllWuFO4vXRVm
+gjAHCvefojK7g6fsKdyftvyybmyFC4X717jgVueZ7yjc36iZhoI16RTuf3cc
+XqrH36Zwf5yI+y2ocozC/XNgICrytIEA99dTXJnYN1CA+69PfO2nXVIB7s+n
+2mYkGnMC3L9zM6HtuJ0R7u8VZqrZ5ueMcP/PF428YQ0ZYX04GPbBoJNHY/2I
+NzPp7N5PY32Z/kZVei6ZxvrjIrD+8uUajfXJ3z7B6odmGutXT5Ypu+MxjfVN
+S7P/s1c/jfWvO2a8cKaLxvo4XhI22cHM/1M/PVWCan8sp7G+BkjrZfJzNNbf
+Lcquv9tH0lifq6Naa7rcaazfkX6vC3o20VjfSaVWTs5qGut//oxMrKdGY3/Q
+mPHa21mRxv6BcztRSbJghP1FjXObuq0Kjf2HTkLwnXYujf1Jzld2+4M30ti/
+CG9Uxb70orG/+VhY/vlYDo39z/YA+c6+Dhr7I5+0+JxstjH2T6ITOtsqDhhj
+f1URlVJvWGKM/VddsFC5UG6M/Vlj64ObHZvXYP/ma98fHpG8Bvu7+LVnjWNb
+Ef/p/xYUmPda+C9XmtaC
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.0548, 9.5}, {1, 0}], 
+        LineBox[CompressedData["
+1:eJxFlHswXHcUx7e7pUobK9sWu3uzFhV772130hJvjjZBBolkZsdbUUKLeg0p
+lYSIdEIWsSE606gKCYISHcmmEYnnJlGvbT0a0WXKLKslTUhMgv62f/z2N3Pn
+zmd+957zO7/zPV9hdPKRWCaDwQhFj/Zts76NljUw/l8U7Kwz0nPqQVwdo5A/
+JKH4Y8L2xHHElcYrbZdJGOsJXv98D2K2XKpfSELDtYxDv89aASPA15OTS0KO
+71WV5jxis4S+iDMkeG+vWvfvQ1yfqZR9T0JNl5d1+KYlMCIv1RXcI8Gn89sP
+w+4gvrug8nhKgthq/8+vzmo5fYdQTEGwxHu3Ogox4wO3rVQKqkx7soXeiH1Y
+i/43KbCYu5D+3Anxzcy5wC0KXDfc8xjOiA2ONccBDWQqP9DCC7FFUvNWNg37
+XnfaqAhDrHj3GOsaDedexaWYfYM4t3xA8ysNB274/aWpQqxSqGdmaRAIHTPZ
+fYgr49uG5mloa7BZil3S5pMPFUzRIPXVPB83QvWl5FQ0dtLAjHY2yLdBXLrq
+3CGjIWaOK5p3QDzybEIVTkNowB1y3Q0xWxTHEtCQ2csy9dHuf31lT+ofFAgd
+ZSXmVogjefcfyCig60eNIl9D3DqwOHiQgtu3fBIUYyj/ZNAMYUyBJ2dL2VyJ
+OIXB4U+SYJ9bH/iGRFuvS0ZrEwmLEROB/oba88Yb7i4hoUruaBL0ixDFd1ca
+55Fg0evBcUpADB0/ivJJiHl0osWEQFwayAgqJ2ElPFyqVlqgeO3ttR0k3I4X
+d+SWIa5uvOc3jzgiy9IuFLHBkv/kLgrKyxIWlGLEkbSBayQFspbViyUmiFXu
+ccwrFNQa2X4yz9B+zz2VvUzB2kGbHPuXAmCov3xrSUyDUfjI/bv6aF9dMNqV
+SIN9X3d7F1eb347Z+wMNhS9S/k500MaLH/i0n4aPdsiibEMQT743aD9Dg8sa
+kvNJxIrGYckC6vd0YtVEnW5f86R4p0yh+9/zfTc/mNfFT5CK93ps6PK/7F72
+jGUK8fnGZiY6udu688+5GMen/KOrbzbwgjk9oqv/VtGZxw9rdfcjzxs5cDJJ
+d38V7TVpprTufi13MS9P9wnw/Tf55U5JRQLcn9ao4seHzu7C/TM3PRwQqyFw
+f0/91hLwRELg/n/RwgqqHeJjfaR99pUoOYSP9SM7Hab22ORhfTXETKkG5Tys
+v23fF6PJ53lYn3vt8hs5p3lYv9bsB832pTysbzW7aGXjOg/rf8xNxD6i5uH5
+KMy7TtlRfDw/LWUlnD8z+Hi+go8edbDt5uP5Uz4SC4bfJPB8Rg9K3x7zIvD8
+Vv7bf7grncDznT6Xt7lVROD5b2KPm5mcI7A/DD/NMuxMJbB/OJKpbWJXAvuL
+tDjjov4yH/tPSMhqjXc+H/vTVUnajf16fOxfEeNER3omD/vbM7c2d9tpLva/
+746/EyVx5WJ/9PL34zheMsf+OZTU9xNLzxz7q6JQvSbNMsP+W63W+rMp9uf/
+AHbvO2E=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.25, 15.145199999999999}, {0, -1}], 
+        LineBox[{{16.5, 17.00000000000231}, {16.5, 9.999999999998607}}], 
+        PolygonBox[{{16.5, 12.9}, {16.1, 14.1}, {16.9, 14.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.4452, 13.5}, {-1, 0}], 
+        LineBox[{{16.500000000007276`, 17.000000000003638`}, {
+         10.500000000005457`, 13.5}}], 
+        PolygonBox[{{14.01826734053906, 15.552322615314452`}, {
+         12.780184249251306`, 15.293188945044921`}, {13.183281069670574`, 
+         14.602165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.323799910437668, 15.984057296392571}, \
+{1, -1}], 
+        LineBox[{{16.5, 9.999999999996362}, {10.500000000001819`, 
+         13.499999999996362`}}], 
+        PolygonBox[{{12.98173265946094, 12.052322615314452`}, {
+         14.219815750748694`, 11.793188945044921`}, {13.816718930329426`, 
+         11.102165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.323799910437668, 11.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{6., 13.5}], PointBox[{6., 5.5}], 
+         PointBox[{16.5, 17.}], PointBox[{16.5, 10.}], 
+         PointBox[{10.5, 13.5}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T16", " ", "P2", " ", "N32"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdieg/fgfjhihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdieg/fgfjhihjij.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:eJwt1gtQU1caB/AjtjwEIshDtlAQzAKuRUOX54rJpUKxksGAvCqMIiOIGiVF
+aYMiG4Uqsm4LiDa6FHkEDUIhIkKwyvAqRJYuEW1BsBApICLViFgDIuz/dDcz
+mczv5jz+35d77sQxPjksQY8QkoU3/STqRbz+xJA/XhyGjPyrNboQLu755pBq
+PUOazpZyXOBV9iuCLsDpaYrCMhuGmI2djjgMbw8uDbGCxS3EOAa2bKkVSlYy
+xMfqt/AQuIj11e4n1livwFlK/TDQ6/twWNpVVEXHd6RPDnZYMSTa1nKYrld7
+0XliE2x4t0onhVPO/pDTY8mQzdku/A446aqbWghry8xVc3C7p/e79rDqaZH+
+e8ivb+FZNGrBEGXUpnZvOH2fm0sLPH8hPigCtkv4beN1uPvFmN9nMCfV+3wj
+LCs5F58DW68aMuiFp+62FVyCB+Tul2dhxXeVAzUwd65l+AO6n2hBdBMeXWZX
+vgfWPF7b2wRLkoYKyuGCEya3bsE7/vPx2hHYJKvmwzo4x9rzpQ3q8xtbJymn
+eWe/rg+EZaoc9zy4UL5QuRtmX6w2E8MaG4PiFNqP2xrbGJh/rHflAZhzY/bI
+Bjjfz14YBgvu96XQ+rd87DHoCGt81tdMoz9TBi55g9hf/At/vha+qP69XAL7
+REljxLDcqc7cAm6W57ED4bkAh2/OoV7pgu8OW7j+TVW5MazOZVXMr0OOpV4e
+aSsY4toZ6zYJ9/ePnxsxx/2gqPlqFO41Dgjmw4rDw6NPYTud/92bZrh/uKzv
+F+H0rkzRh7Dg628tHbC+X8OV9w8uZ4jOffyLzTTvxiIjKQv7eXEX0mDxC/uX
+j02Rb6Qo6Roc+0vTP3bBYvYynylYZLqzWR9WcLeNWqD+OBlf1meC60LPBg5s
+Kf1C1AvLDpl/EgyrvDvPv4TnD6oS4+HmhMYJT8y/df62Xiqce1Lekw9rqgOZ
+E/CUJrxAD3lUU3rHTsMzaypq0+H2js4oer+0p7l56WAP3Y26LNjPiWsrRD18
+/QNN9Pdjm00oemB26obRRPiZvPSoKepvDk78aStdn7gdXQ1rHG6mecCiyEfv
+uMAmofWPrWCB9SLLGpYEHLk2iXpNGpQPh7CeujPPW077Me7ZkQA3PxOy9sCu
+se1ercgTPZRxfw2sjl6Ieo164pZkvp1G/038P18wok4bbGiHmRWbUgn6IRVq
+7hfDfJfLviPLcF4vOt7IhsXziooGI9wvXSLfY7BrxM6K04aYdzWqMQPWueh9
+tMuAIRMDcYtnYJsyKyZIH+OzYoOv0PkV393b9C7q6ju1vZuObz/lveMd9PMB
+N3UO5gxnxxcuxfWSsuPrkTdr65sOPVixVfTeXjj3QbBTgR7ytryRy+D+a4Kd
+obDP9sjjw/R5pIk54wt337z8d2P0K2Bf5tgnsMbrn6Fsen6Cq6ePwcrhj6x9
+YSHLQdkDF/ZXPtgMk0zha2/s90Gh/lAYnR/oklENy/6qK4uEmc6fM/6CvLGP
+pp9vg5PasrWlMP/Kre4tdH7NuJaF+nQBczn0PBZnVbATYYms7bYzrD4RsaIE
+5txL9DClz4eQhEONsKvwb7/S/HLDQ+KrsKKN7V8MC1qPvBXBZlF7zHbAhg1v
+K41hw09lc/Q8svn5Rkexv/hkjPwh+qfm+ae0IK/GykRWCscNPl0YQX1aq0Ku
+CBZtVEePLUG+Rc7nQXBSKCu9h2D8nRzNGjpfnN8XtsgjysruCzawoGFD/et5
+HlnVcNDHElYI/L+9NMcjuSGDHXaw9ssfD8fqeEQ+8bbVna7Xd9Kf9zuPKKY7
+V4fBqtr6/VEzPCL6OXl3Orzq15mVtdM8YvbkeUE1rIz+TPrpCx6JmzVPHocl
+4ifz4VqM73JKdkR9zVXLz2x9ziMaS//nsbDGoD+j7BmPiOMdAs5TlzxeWgRn
+7yUDXbBkIdyPg/Hq1dcFOtqvn1gHnLBedkLNFhb9/dtaMjVwVkzmPH0+KoI8
+f2jF/u2apBJH+vzPrTZWIp/4wJUhakY1FV/9kkcMD1pcsoWzS8z/fRb1qJbP
+WCyHlVqj+chXPMLZ358wi/3IvXWOE/DmU3O7aB7lubVf+qIfTOf1V/mw2d4h
+ZwYW2CkjIqgvj3BmMF6ZZz1nQfPPKkJCYfGf92Xepf3Krx+MxH7Ni6FFubSf
+jrsmDZBH2ZU4vo2ev21qp/3ILzk9ced9en7MXV9Zon5BTnSy1g3rSUzzxiZ5
+RMq1L/oR1rrXpSSO84i2xaOyHubcOR7R+Aj9Yl3fV+VG+z2gXjqA71d3O9dQ
+L6krUKmxnlZe2AQzxvf0Wc3oZyB38YHb//8nFN/+3+c65r9ilhyv
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.907871335428632, 17.11903631971389}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1gk8lPkfB/DHUe4rFIomWrRSE4VVmqeibJGhRLusiagkTSK5JyS5EjZX
+y0QUHTurclQ0VK5Ks6JW5yhHroxat/h/nv3P69Xreb37Hd9reCzzPOrkLU4Q
+RBP+UU+iaw4fPZL477OAJCTiUvbUwKKmYcc8FZKMysw+FAjz2pSqnFVI/kt9
+h3fLYdrnSN0fVUgizNXuUqsuSQjybca0VUgOXdKyiUPZUXF8DSz8FutlAguv
+jZh747zPz27M/mW4/6vQ8A7Wf6tZsvgaTF8rVaWN+EYvV/1zAqa925WcDdM0
+dGUcYDLfyVZXleS3hYTFr4V5vkkfeKok2RdgE2kAc/8Zn7RSI/kOyVPulFlK
+cU51aiTpdql7yAQW7CjQNFcniepFGS62sPBSPPOCOs5LRZDe1P1e1zTfqJMc
+pnVaXxzMjByZFFtIEj+Lqe0upfI94iUls5DkxMZXHXpK3W/RLi5SJ/mXZ9X0
+qXq4met+rYTHOqQeEKiXP+Ss5Q27GP/YrABzY1fen1IjOUuLVrsrwUzpW18j
+ke/AVKaBJLWufmbvBOobNXeKHcB9/HN22v6qJId46h39GOY8DMrtXUCSrkUr
+u9KoeOfD5g6jPwv7DNSdqXyiyj6KLSA55yfHFipS9TXXf7uJ+bjkHvXh09Cv
+dTGlwej/lk7Ga39YENQp5wGT6R3hS2B2Y/wpH8xD6rRdQ9ZS5Ofxuj4Z1m9w
+kJOACaWEwVbcZ/WTl0GEDvIbTgswQfz8D39clYNZYUbBVxD/eV2YbJk2zr/d
+PGGE/DcZG8UHwOwAjeVVqiRx5sXlWXuYkL99exv6IT2k07kF5uQcdxTAd5sD
+SSdY2HJ+ZAfmEaii0x0E0+3DLW9jfqflXUNLYV6mdLsE5vH1N6vGfpgMVrlj
+hnmN1PMn6chHMK/aYTvWW98J+09QJjKqrbB+VO17aDnMTb1UrwIfWPL9fR+V
+v8zkq0bcb79v9osc6uXOW/XJB/GPiwUf1oDp9wNWjCC/VeWrzeQpWy0bPaJG
+EguyNMK7cV5ZnGXThXodFBqeFcLCq3bsX+HV23b9YAvzZi/wX6M/Am2bjjaq
+vv5bqofgdtONEf/1Y0VjhDz8NFiyrHwJ4tvoTDSh/0bZR3vVYbamv04R+l8p
+Hqp6bDHytQqazYf7rG09W7So76PvzF2YVen6yRTmWdx/9i/8/YKpxRVNzKPV
+O2E75pWT8sHWGGYb97+oQLzXS1TEmzUQf+OIkjnyNSDiaRyYZLJv1cIDMW7y
+jrBgk38OE/WmqhnWb4C5j5oOvIVtoiR7N1HrHTO97uiXgj/rljvM6eIda4H1
+ta8xkmC+vRrDEPNIDOy/3EidV7a+54P+a9eGbFZAPtxz9x7EwZHJUTK7qfyY
+6TWUs90MWi7AwhjXV9jPKd3ikfOcsqJPO+4jNuk8/j5Bmd6+SIB4A40ZexRR
+v2iF7f59cKxpvZI8zLw2WPwR85s+pvX3MPbzeEqFvyD/17LpeZVwqvvhLAG+
+n2sCr3f7wIJXXzp3wArfrwbPIF9W26L0F+jfsI75sXCYKSWj6Q+PR1cqDyzC
+/uY9XTT0M8XXNcKe8g1Fmgj9X5o9eKoEeTLXPwt5j3n6rScZ82DRKcH3QVhG
+520HvmcEvaBPejHu27/9okEb8uKryjr64L7N0977nGDRk0mJJ3DwCs133chL
+MJE9tQXzaVrs++I8zLGUnG2GO2T+XOsKpxb2aO3Fuc60rpSfYPZA9WwP6vcN
+sp6/DuYqyf1yBP35ckDAsoUJDY/N3cjjZPva5WyYvkLrnC3yNPU89ugKtf+Q
++Mo09F/zSZuwj7ov38O9BuvrdbWS6IgjKJP92oz16m5hbhDMM29lVcCZVi7T
+ZTBXp/R5LOy1+uEM5kCQG7dK4ueVY1ZUXEQgLnN6aONzPAPI6BEpPIVGYWJ7
+kF84rVJqDPtZyzmP8fuBkGu/t6+Juu9pQNFWPB8kpHw4hSen5eD3GtTPDzje
+RKP6tclTehNcJvuo5irVj792RmF+nJXqTWnasDK7c2M4+t1Z4a8ZiydHa3iC
+gXVLo5ieTswt9dzx0WX4f6eaLnErWJif3KMH24Yl5uYqI59dD/62wX6Tghs3
+JWCB7mWlOKzbp/x5YlQR+2dpnp3U+TbWsCxM29y1dBfi/vvlrJ6DAvqdNxTQ
+TuVxmjVTL49+3n5ZvA95SymybgbCvOe10SLq+6nyKNcFFqpalIaiL1v/fu3m
+B6fe+zQ3AQ/dqR66DgvspyS9MQ+DPKk5ZdzP9HehV8HRGXbeKQrU+6LSYgTu
+CQu7pIl8+DlmO2XxPU0xmBdWDPN0phkS8N7IikJDJeRLWCS9xf6t1VVuGTDb
+N3FvFkzTlFb7ANPLDX+xhJP113ydg7lFtjkNyIe428cUwcSykA1b4ZcGm9Su
+w6wrLgbVqKc2pbFzDcyzm1diCpesbTCJofqjY6z+F/oxPR1LXlag/t6o8dwA
+a5vynuSiPtFsTMsb9PNLyIvaADnkMxF4JgMePZ312FQW+w/TD/nCb1O0uf3S
+iJ9j2egB79b5p6BQCv1SvecUBFfqMsUPz8d9EW5SpfBk928mdvPQv+7GzdNw
+0+Kzdo6SuC9R4dN+xC9mxMRHS2BdVS6qE8bfF8+6xTGPrzJ/+iL/g30HvSNh
+gUSR5yRcJ6Px1A7m+J1lxKH+M2fyb+yE2WVqkrLo14CyiUQUTGwv/hwBn5BV
+dXkJ8/5InHpDvY+SSwx3IB4n4+HhpZhHyKmRw60w76DfC2t4uv4PbRbyozuG
+/7od3mX5Y1cvzNrG6lgNv35z9I476kmdMxOM4b59O1VOlsO0lQluBfD9VPus
+zzD7zu+y5nBdj3/8IEyf2pF9F/mu9VqiXw2LWLY3TOEfMjfOuVD3yVYFl6A+
+zYcdAdVUfLF+Zz24m6Z7XUTl6xTlT/2cZe6WOTmOesh3CY4MeDsnbLxDDPmd
+i+UOob+t89xNCgj0y6auDu8fYixxZlnFLIMQTO8v5VLzsf0hbvkMg+Ctarte
+As+e97QommQQdFEHu5War0PPW+Y4g+A+d/imgfsvGlW82jDKIDhPtQtCYCed
+u8Zh37D/My1pGH7/kkjX/Ao7nygMRL6lx6Vu0UYYBDviL0Vx1Cf6nXM/XcQg
+SNV7salw7LdaMzbMTYu/qYH+lE3M17sJCwOSz6bDgbqPD5A4n9pR/XgKfpR3
+hKOO+5lOZlo/o/9ZMV4HNRCff1czKRRW/Pby9pp/GYRy4nBhEvxeUNdii3xF
+thUpkbDTwbwNNmMMgtY3augIjzVE9yuhPr7Yim/z4aSKLI8MWJBkKSpEvHi9
+PEEtrFxdftQYLq3QE0ui+lGTUV+C/BPky3sHcB/nk93UUtj1g7O8kIqXctMz
+E/W/f7jtoh/yIY/v37YIVj5pZJJL5T/sEFmMfqWMbnYORb10lw4l6v1nLbI5
+8tMgg2DtluiRofrdNOtH70W+u6MSeqh5XfSLkPmIeTWYj3+EpUtHpAY7cL/1
+s7A5+OSl6Vo7Ac4f8K2yxHnhuGDd+hrEC9W/Q723/vtkV///qUb+D6LOr4I=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.922596693736967, 3.8067338747393404}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000002274`, 17.}, {13.500000000002274`, 16.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.552325660469876, 17.180083206945802}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1ws4lNkfB/B3RZQwqywh5JbrmCKpqKmtdkhWUs22RhIaUsZ2G4oG67KR
+hkaIXHIJycrdFkYJyS1FF2I2FWqLveVa/b9nn7/nwfN5zu895/f7vec978xy
+zwAXbymKorrwS/5TS8gffSb1348Wk9KaGRZbwMKQWh8BcWVPoB9My41/8QH+
+2Wt2RwnsfI8r2KbNpPicJM1puHTZQGwEXHpxxpFlwKQYwsa4HNhxnrpqKpwV
+b3k2D26jX8sYhXUGvft/gTcY2KtaGWI+UeUFF1h98vMIHxYesB2Vgp2vTz+o
+gCdYmt6ZWD/dwHH8NUwlXwwzhxPd5s+XXwHzC4+WL2NS7YopbnrE3pKmNTDX
+sVhCh3UWdDAaNZmUB09Rlzgru1RrD9zZdH67Llyqstl3ToNJXdJbt0QBlggK
+lGphTd+KwgmsR7vn9PEC3N2bK+qCPfxKKiPgk7blKcUkn+CzQUnwQEhSwjk4
+68G7P5tgt5T3Tv4wM0+wl4b12HkNPFe4u6047Djs3MzctpWMd5QovodpCVdL
+maR+9dnLx5F/1EFHeRaJ7+PIyKDetqu/qruRfCJP306Gf4sTSoWQ+D8GvjZE
+vzyUN24pgnkc//hCWKelr+klzJ/V0FXUYVKuW9b066M+m8PVcbZwVbS091GY
+v/EnaXdYcDXv99swW+GESSBsIvtHgoIRk2JJfXI9AYcW9VzmwBPshmQ/uH4m
+3biIeMvEnZ2wNTsueQJmXplmm5F4FW4s3Rj5vWn+OIV8plotVD1hZ544k9z/
+t2cE3b/ATJWcOhr8TyL/ZS7MKHv+TIT6PufaqJXDvNUPczRhsUnIUAXcPeyV
+XoL+CJIY314nDi++6wy3Ta0bTCbx3yzdIQer2Vq3nIE9jCo4z9DfdUdlT7rB
+OsLaJ82wpKkody1c2qhr3QO37bttpkry0ZsImiX7ZYw3PIl6hLc0TTZhPv3w
+eycGYd5dW58suKC6aFuHEdkX/QtVkN+Zzj7nZpi2tet1KnleMm8rPIAlYSOT
+Rqivk/bKcwD2OH5HfAu2jRJemoHlNgpaDdAvQ7+tjgYkP77POBeWO7z7lx9h
+7vltjrlwuM23jWkwpd5t0wtfOrl3bBiOSSlLnIYXrTqeuNKESdXYpvUpLWdS
+m6cHZcNhSpttqQp73jkd2APHnKKLyHixWcuktinGZX/PJtc3XWwdOQQzCn/4
+rQ9+/qdV7zWYK9o/VAA7FyjXvoBpS1Zf+Qn2qdsnL2eG/f6F89YaLr69q88A
+pvF2SP+F+tr/uXnH2oycB7Gn+KR+l1ca62FqyzqxLNykzG63JNfzPal89Ctq
++uVOXZjp15zOJv18/qaIzO9BL53Sg/nvNO3GsL7Qkb9BHg73+K66meTvHLaG
+Bo8qs8ZzYElX9mpLWDeQVR8B81aqKx2DHTyrB7hkXMXevEOL7N/hht3EeV43
+7JAPu2Qk2BF2tk9LaIA/f+2b60TGz6kKDFFf3/qIzRx49Nvq5gDYaG93HR8W
+Pw7cVgP/MbR+IAuequwvm4PPpA3efQyzlin9vRb9zsgWyyxGPSz3J6wj8Fzl
+9K8/wILXB46J4N/EDj75ML+/7sENuEh1+uxHM7JPG3+ogR8nBxp/Z459keYk
+KYdzMxbEJMESjd2SLHJ/TZcODsI68qcSBXCWbt4NHTr2w2fRE1cyrjD8hA0z
+rBYt14G7m2RrImGuzsOdr8n5sE3RJh8WV75PvQarHeIN1sJMh5VO5HlvPqn/
+WAzrqNDqGTCjSPTyFizQjl88h345RRX5FpP4+df/JedPeIi/kwgu7TjbGACP
+5i4YPgHznpWNOMN9luH3d8GSgoVnv4eV/fb3MMj8fBkTf3ifofYzJVjIeaSY
+D7uHLsn6G/VRdLWXM8RZkTdIvcKUj2GWpP/NDaaP4FGV531kf/Y9q+jogQu8
+bZPJ/TG0Dqkl8R71P6V+hfr1H3UETZL+mWSec4A/0zUmNbGeXFy1mhCmHRLz
+neCpjnDNLjj4iGbJOZK/c1CjtC6eb96qhi6YpiEspMMM+9mDGhbI55Ox/HY4
+5hXzq8Owzs3yFja8wfXS/VvwRFt70F7YL9qbJ8PA+DqH4O/gJrtFYhN4dKCn
+3xjuGM6Mc4QlpTs4FGzeeeSWLyzn1rGrA/mIThj6h8FGYbTzF2GnDxPzLsI2
+jEVme+BokdLqDDhGa1OYGuwRXymVAwuDHkpeoB/R/w6Is2HGKV9+IXmeP2nT
+0sj6vyuuCIWFTfd7L5D5yx6xyfuh1yqCQdZ7Gmk9uh2uUDb145H4sfL5LFhG
+IW7EHWaFlJrvgi0F9d84wTWngtWOwMv9lnA2wtzNJS0i+MurYzJWxHaPzrfC
+OdpfLMzhUnaC/nySL+/pXVOYH3PsPrk/c4lVBxnE5Q88SL03S555ryfrWXxJ
+H4CvaLV0kX7FLN5upEf6bye1xwtO2TfReRDW+3JvP8lfEFV2LQ2u9Bcqkn7I
+JRfYtMKxJTr2rTAvOv7SCGyf4HZ/nMw3Tz5kCt545YiZ2kpcr17lPgNrVdtL
+M2EbxW/838MLt9wf84azGtYm9MCGj73jY+AYWSW/63B7nbg9H5aI5OjBMDtN
+p7oBFr9ZItoE14XSc3pgFt2+lOyvkST3VUPwRPRf7c3kvLa4vOc1LLd0hhkL
+U8cnXIi5nKKtu2GvH7fWkPiUgncdK+DRhcbuvTBt9ayHDMyzWMVuIflKH58Z
+R78l4wdGq2C1ELs/R8n739MuII+sH5r+ZgLmuHrvE5H4Ztt6WVy/wypGORL2
+2JScaQYHGSeO8WFGVA7lDn9yn1sQCD89uKM2FTY7rcg9ClOFNVovyPnV0F75
+33jejL4B6rPLNN13mvTHLjPyKCx2mDocCwuLlccq4fy3VaXZpJ7Tr2ik/4fU
+IjPrSPy6DmqVHpOq3jNwaJDMZ8rTPwAzDIdmpVbhXFszGxABz/qWLDOBY1zk
+gpPhu3u1AlxguWb++XS4Ulk6Iph4F7csEd7fxxzPgtm9zTeCYbFtvnsTLAi8
+MrkbTjN6mD0MGx0NLjDUI59bDOs/Eb/44D5O9s+ulTNfWzKp1sQjWuVwTX/n
+G2149Crd+AS8m57vtQK2uTjdZwOfsanMM4LFMUN+X8GH5z0x0YdpcnNjD9Gv
+Qze969ThlOat/xbDC7gsbwUSb+lSQN4XZSNvfyTrq93+NfQc3HXq7tw7mHds
+xaYLpP+ZJhXPYZuxntmrsLIL530bLOZEfGqCbTrjqHpY+DRM8jccKh5cXgnT
+LqxNN0c+L+OsXG7CzoffZwTAi22CXcpJvYOWH6pg16Rll2+R8Z8zHCn0IzHa
+cCeZv7XqpicL1v9+vdMQycfIcCwWtttcpDZD+rnFvacF3umz/8NS1JM1LRU4
+DX+8EdxhBxsFD6Vq4XtFVoZCmBfpZ9T3Dathrtb+0ji4Ru219AbYR/+f8Qp4
+osrRYQ0clxr5qB+WO//GTBeWJ99rrP7//Uaf+T/tBqKl
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.54570515633175, 7.171979374673003}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwt1wlUjfkbB/C3tN+0oGPmKm5TUkKFQQpvJYQUZUmr20iNVEyRGrwto6SS
+GoU56hYVow1ZC7fFMkq0GEupG2lPm5RC/+8z53/Pwfmc531/v+f5/t73Fm2h
+/6ad0gzDVOAP/ctI0V+6LPPfZxLLfDc2ybOGC2qd9znAJdFjZomwsfBVQyy8
+eI1mzzuq7yzouwi//7m5auFM+EK7JBOO/OdjYyTMnvp+MAIuHaub/xwWRMXp
+WsGGKT7Tp+jh+sRHNW3qLDOo3LtlA8wtvvE6CI5SMlU/BLMX2VsDaizjomf5
+YxrV4z5U/QIHRn9tvgYLnO9NzVJlGUl7XGwR2VBacEyFZXQcTrfeIGeOpXMT
+WSajJ8s9m+6f+yT0jDLLDHFrP8eTffgvGnks05nZqBUAizceiXWC5z22T7Wl
+euCrUlXYPjvBfzbZsyRGBq65G5OoCHuUzBEvhudPye3owXyizGVKWbDp4NdJ
+b2Buzmp5G+yX5JBvTfMzjgWiqehnW6f8zzWweJZfuBz6/TXp2xcJ5RU8kK+A
+eeJ1nsh8gxO+B05VwLzsS52petjPuDbcPQr2aPVd7Uzel792DNbkFSj/RXbu
+inZFfuq8p5vew31f4q9ehFccrjxlMgv9rfE/8Qq+WjQoHQGLC5w3dMKrWz+c
+q4PVumf/3QC3hXXs0tHH/g7+o/mw3inbKF9YXPF5nhcclN7mmwtzZzfekIb3
+VRUPvYclwfn2Mehnv8m0KBUD9Pnxl2ppODviis4cWGSWeuED5p2jmBBsTn7D
+u1OKPHga3s0rYObcBc3LyGtfZ43nYpjVddibgzxLnzSm68KC05+n1CqxzMyc
+pHJFqqe8PmgA9/4R495B/Ti6pN5UZJkv3cp2D2EmqPF8ONxtF5J4HmY32x6P
+hXUaJLqR5CeV/Dp46OizF7/S/QfrehyxnuCap+52qi/9mCeP/W+nHZjuSFae
+EfwO9rglsqY6x1fY/Br9Nt3xCN1D9TF1SSPmCbWPH4qDPbITBlow75fhOLMi
+qtfUub3F+a734eZ8onynbdjsinw0mjVUaF4mUs/jFjx5wsrzYXDC2b6HozAj
+KLSphiWel8sFyLtRZpemzmyWCbDvUtSHd2Q//DEQZn3M61VhfrbxuhK4L6CM
+/xr3r1Dr75I3hG3SzI/SeQhy4qzhANF5vWkwL3vrkmCYXW44aor+JuvPiEw1
+pPeHf08H/Q8ua7x8E5Z87jSUwnw1ActTymBx1plgCfKQ+T5YXwpzMw6JnyG/
+pn7FGzfIecW2DchX78T5YRHZN7lDHX60SLE/gtbP2W0RooDnl2++SUj1udG7
+NOF/akTyK2DRFcP9X+XxvCw/OVmL9rf6y2ka6gd8q7zGMZ+o4nvZfnimxpvb
+7bDA++91ilhfXmOBTz0sfmN99Qk8nLF2y2u63tlwYwH6y534pOo95cX3y8xF
+/718v9AxmNm37VMhztPlutNWAe3f2jt+E/Ouj9pUsJHyaTItvYg85Cd/MIqn
+fosyZoYgr1WPR7pr4QTpqG1qyLMzoidSMAee5XLCBm47ObJ0L9xXMWX3Tjjm
+ua5mGdXFB7WFcLStpt7kuXj/ut6FrYAbKov93GCuek/vN6zvyfdbmwFLQg/3
+roLlXC38G2DR/birQvQzwuNN5s1DPUd2qQv6Tfbukp5LPuFtw2KeGapq1yxg
+0U/B9zQxb9X9Jmsb8qOmN+PIZ9mF+TErYY9H96OHkaf67Py+hTBjf+e8Gqw6
+/jJYk+r6bXZbcB61deXJ32j/eudd1XIs41XcNKmePOGpbDSsbmX34SYsyLZY
+cgiuUvyokgIzGcN1BXBbxPO9oVRXjj40g9azcL+8i+pnjSpKYVff4X5Xmt95
+KOMk9tdrqRt2h8V73HI59FuyqLzOj/ZrPdYVjvMsE5cMx1A+kROFMZiv3sdK
+u5DWc3n6PBrz83OCvTrInKtfAPJZ8nbLMgPKJ9P23ELk9/dIbcJeWGygkvgE
+Dti9quE+za/cLjFA3sUG4evVjbBfV1H3eng0YbxFaETv97/GJvALY53sK2RZ
+NeFL3B+xI/32KMykHNlpRetHjD3UMsb61pZav09kuSPqslKmsODDwMTj6E/+
+wbTlG4zp+T7UHIr+FzrNY1xhj/Y7T50xn+cfv0zfCYtCi1qXKLKcVeyiR14w
+J8ncqY18ZEMUDgth1q2w5yd5lktt8Z7iRPult76ykWO5xQ7r09bRegdST4lk
+WSZEq9bbjOp2h7SM4HPdjk0GVOdiY0dlWG793YTwH8jX1BtlUNePGXmmQP19
+C6tZD9+tWOQ2QvN2d4w/hbW83O61weLpg7wwOXo+tj1thjmnOGUXnGfL4Sxe
+O+W3xFrJAf1yqclOY7CkP+XcNpxnTEXT0ETKI944zU2J5fz1dS/okgel3m3h
+sdyl/Ul6FjDTnNezAHlVFYal0bxcaE5+hzLLVcZ8642ifl1l+X4436yvsQ/z
+KY9Df2bfRt6fXCIKXlF+o133HqE+N0h5rpQJrl9b8zEZ9R0rBsSzYKbUVMoA
+/u3dD0rryJ9uvQ/H+v3CgmofWHLlthd+HnEDh+doRlC98dq/+ej3bIzxomQT
++v2kOPAMzkfL6cHdDKqL3F/g+4kLNPHIvgiL/uHNw/vDbRoMXk7mKpadtcb5
+HFO8qE3XS5ImCDchT6OkI0tTyCWu66Jl8L2x/PiVaFhwdf943wSWy6yb0nSA
+1tdMP54EC8RBpl5k2fMygXDAt7cWm2FWTnUj6kx2e2zAKlpP7KvVi7pqzhFt
+M7reuHI0DOsfG0kMX0h12/lZVrIsZ3RFOnIB3d+wMMgA/XUbT65cQtf7z3+n
+h/5nCo/mraR+Fn8ynofzdJxuq7+V5qu01jHB/L13cpv8ab1W80JtPL8ZMxr1
+48khic8HkFeW2QuVK7C48E/pM8jzrZHE/SW5s16Bh/Nteb/57jjlUzDB3hLu
+STqbqz+fzkvPxgznsdvxaL49LPG9eHoI70vJXKMN+8n7eviBWO+jxaSFp2HG
++sa9YuwffTXN/DrM2vIXv8LzZrXGMqKS1jusdawa/SdN0fJ/S/erPAi5juc1
+LqflThssvqTVdRLP89IB3+AuWi+vbloQzmfXSLFqB3lr2ZAv3pc9IddNm+n+
+WOVNR5G3dnLC5zpYFGCysVKa5RpHb3IPqH7z8ePV0vg+eJhqXkh1dedn36VY
+xn/nb1kZ1E/Ydt9PUiwXNHJmeSJdr28foI/r8/N6gyLnUx7rDqRgPcWlb86G
+wIK9gRpm2M9LQ/NxEPWr8JuhEs7zksDuX8pD9Lub2xfYU1huf5jWY2Vzx9D/
+Pktnv1i637WdPwHn+T4+TyWd9nfQ9pZCHsLbxUVFNN+kksp2uLx+KL/+v/UV
+8nKQn6W5h2Scrq+etdIS+aos2KA0awFcpaifjvP9cXV/mR0s2FBdUob69qN9
+8cGweOzXxGz4OTexO42uP7HD0RZ+tfaFXzksKl49cAvPj5zF9uctsOTSzw79
+2H+cPgv+//8TBfZ/11uc6w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.666233980906949, 2.1296932060463307}, \
+{0, 1}], LineBox[CompressedData["
+1:eJxTTMoPSmViYGCwBWIQDQEqDiEyIFrOgaGg63OSmYrDzO9z9v9uk3VgWLF5
+kku8ioPSsWuhi37JODBoaO52r1BxuLaBb/3LBCD/w0aDX/UqDvqbjmztPSDt
+wLBjCturUhWHfy805q1RAPI3eJmtiVJxUBZ+2RDbIeXAkPCA8Yq+ikNNZHC8
++z9JB4aK1Qtvf1d26H97fYldB5DPcX3a/63KDn84o2++0wLyG8QO8eUpO4jX
+1jVNfSnhwCAgx2KkouywPWWl0aWjQP6LFavW3VFyWLTIuKtvP5DfscJy+Wwl
+h/kz33T/vwLkB3ha3EtRcojcYaJ/gAlo3oH87jprJYcJ68uXMLsA+Qy/p7xR
+VHIQen0p6c4kIF/D6uwiSSWHdau+P5r8Asg30Hwkrazk8EG39iuvHdD9B/7P
+P22r5LDt2qvvhj1AfsAHbvUMJYfOV85Xg8+A/GdvuXu+kkPCzvcHp/0A8ndw
+tAc+VHKoWCL935kHGB4CG/TkNZUdXvAILhJgAfILGpP/Fik7+D+OC/O7B1Sv
+oXp02S5lBwab++4ss4H8iCnTv/1WdpDY/v7gO2uQ/Wck1IxVHCpY/NtTjwDd
+98IwgyVWxaF0ZnuMliWQ73HwsGq5ioOa/NH5SguA/r+QH8/eoOIw1QIUvxJw
++SfM1gl348Xh+qd0Viy+ekwMbv4kuY0Vs6zF4PYL7hKwEzwiCncf13OFHb9T
+ROHu32W/cOVGRVG4/xTF3se+/y0C9/+GM08Y9nwWgYfPykwBu0x2UXj4NVjs
+0VpjLAoP32AfUY5zxaLw8Ldwbub6dFAUHj/RFRyyOeJi8Pj7bq47VzlXDB6/
+lcUd0X92i8Hj/8KO0xfs/4rB00dWp3AJg7Y4PP1kNJwpLXQQh6ev4H1hZ3Wt
+xOHpT+hLY22WmDg8ffJJLlUTvCoGT79VphrRB8vF4Om79+SaBTsYxeDpny1O
+vH5RuSg8f/BYXU8Mvi8Czz+3Cqy9iuxF4Pkr+MDHALH5wvD8x7Fac1UsqzA8
+fxZoJzuwVAo5wPLvVjYQLeQAAACtaGA=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.354800000000001, 6.}, {1, 0}], 
+        LineBox[CompressedData["
+1:eJxTTMoPSmViYGAwBmIQDQEqDis4ITTDhdu3dtmrONz7tfe8025lBwYOlz9u
+2SoOf3P6puVlAvkvylXY6lUcDp5abPiQH8hf8TIwpFLF4c7e6gtztig5MDBU
+rVgVpeJwWHOR3IlYID8hIGGqqorD9Ss5KdqCQP6F+ZNq7yk7HEt+3Lj1sqID
+ww/VNO9uZQc9U+P/QiuBfI6qjBdGyg6rtsx6HT8ZyM9QbVtzR8nB9nYt++9J
+QP6EvTcP9is5bJyc/qF2GZD/wNKnJ0jJgf3JuY+3ToHUb1inqKXkoDhZ4e/c
+30B+xaxpdyWVHBY/iEr0Ngba/0L6u6SykoOR9oXkK9lAvsGGFCFXJYdPWkE8
+EvNB/NupX2qUHG50nC5JPQ7kW+iVSR9TcqiS8z3z5T7I/SEHiqWUHXbuCGPy
+fQrkT7gR87tI2WFrwoYVvVeB/AiFqPATyg4/OgWeT9sA5Guc1SkQVnE4oXFW
+m6cCFD4mnRx+Kg5ut1fEGOqD9O+QcSpWcZgx42PG0ltA9wbskGNtUHHwkgFG
+R4MiXP5tBd/0KFVFuH47s/DF5y4owM3f+8Loyud2Bbj9ve3vJTL9FeDuu7DB
+P7xISwHu/jMRK/9uklKA+4/78yZjbgUFuP/XdJh0z7JQgIfP5GdrPz9PUICH
+X/Az/TnaUxTg4fvIYOm8LWcU4OGfUnefKYkFET+1uoZ8qqaI+LtSO4O/KRIR
+v+5mTT9YchHxfzsmVWRBDiJ9hN85w/A2TBGefvavlanz0lGEp6+1NpNnX3mn
+AE9/B5/HPjRfpABPnyuCW/STvRXg6bejd8cc2wfy8PQt4Pn4kpKuPDz9++q2
+JFR1yjnA8scOfhAt5wAAXRMymg==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.354800000000001, 8.75}, {1, 0}], 
+        LineBox[{{6.4999999999976925`, 16.}, {13.49999999999251, 16.}}], 
+        PolygonBox[{{9.4, 16.}, {10.6, 15.6}, {10.6, 16.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 16.9452}, {0, -1}], 
+        LineBox[{{6.499999999996362, 16.000000000005457`}, {10., 
+         10.000000000003638`}}], 
+        PolygonBox[{{8.552322615314452, 12.48173265946094}, {
+         7.602165824326175, 13.316718930329426`}, {8.293188945044921, 
+         13.719815750748694`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 12.823799910437668}, \
+{1, 1}], LineBox[{{13.500000000007276`, 16.000000000005457`}, {
+         10.000000000003638`, 10.000000000001819`}}], 
+        PolygonBox[{{12.052322615314452`, 13.51826734053906}, {
+         11.102165824326175`, 12.683281069670574`}, {11.793188945044921`, 
+         12.280184249251306`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.484057296392571, 12.823799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 16.}], PointBox[{10., 4.5}], 
+         PointBox[{13.5, 16.}], PointBox[{10., 7.5}], PointBox[{10., 10.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T17", " ", "P1", " ", "N33"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdieg/giijfhfjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdieg/giijfhfjhj.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:eJwt1gtQU1caB/AjtjwEIshDtlAQzAKuRUOX54rJpUKxksGAvCqMIiOIGiVF
+aYMiG4Uqsm4LiDa6FHkEDUIhIkKwyvAqRJYuEW1BsBApICLViFgDIuz/dDcz
+mczv5jz+35d77sQxPjksQY8QkoU3/STqRbz+xJA/XhyGjPyrNboQLu755pBq
+PUOazpZyXOBV9iuCLsDpaYrCMhuGmI2djjgMbw8uDbGCxS3EOAa2bKkVSlYy
+xMfqt/AQuIj11e4n1livwFlK/TDQ6/twWNpVVEXHd6RPDnZYMSTa1nKYrld7
+0XliE2x4t0onhVPO/pDTY8mQzdku/A446aqbWghry8xVc3C7p/e79rDqaZH+
+e8ivb+FZNGrBEGXUpnZvOH2fm0sLPH8hPigCtkv4beN1uPvFmN9nMCfV+3wj
+LCs5F58DW68aMuiFp+62FVyCB+Tul2dhxXeVAzUwd65l+AO6n2hBdBMeXWZX
+vgfWPF7b2wRLkoYKyuGCEya3bsE7/vPx2hHYJKvmwzo4x9rzpQ3q8xtbJymn
+eWe/rg+EZaoc9zy4UL5QuRtmX6w2E8MaG4PiFNqP2xrbGJh/rHflAZhzY/bI
+Bjjfz14YBgvu96XQ+rd87DHoCGt81tdMoz9TBi55g9hf/At/vha+qP69XAL7
+REljxLDcqc7cAm6W57ED4bkAh2/OoV7pgu8OW7j+TVW5MazOZVXMr0OOpV4e
+aSsY4toZ6zYJ9/ePnxsxx/2gqPlqFO41Dgjmw4rDw6NPYTud/92bZrh/uKzv
+F+H0rkzRh7Dg628tHbC+X8OV9w8uZ4jOffyLzTTvxiIjKQv7eXEX0mDxC/uX
+j02Rb6Qo6Roc+0vTP3bBYvYynylYZLqzWR9WcLeNWqD+OBlf1meC60LPBg5s
+Kf1C1AvLDpl/EgyrvDvPv4TnD6oS4+HmhMYJT8y/df62Xiqce1Lekw9rqgOZ
+E/CUJrxAD3lUU3rHTsMzaypq0+H2js4oer+0p7l56WAP3Y26LNjPiWsrRD18
+/QNN9Pdjm00oemB26obRRPiZvPSoKepvDk78aStdn7gdXQ1rHG6mecCiyEfv
+uMAmofWPrWCB9SLLGpYEHLk2iXpNGpQPh7CeujPPW077Me7ZkQA3PxOy9sCu
+se1ercgTPZRxfw2sjl6Ieo164pZkvp1G/038P18wok4bbGiHmRWbUgn6IRVq
+7hfDfJfLviPLcF4vOt7IhsXziooGI9wvXSLfY7BrxM6K04aYdzWqMQPWueh9
+tMuAIRMDcYtnYJsyKyZIH+OzYoOv0PkV393b9C7q6ju1vZuObz/lveMd9PMB
+N3UO5gxnxxcuxfWSsuPrkTdr65sOPVixVfTeXjj3QbBTgR7ytryRy+D+a4Kd
+obDP9sjjw/R5pIk54wt337z8d2P0K2Bf5tgnsMbrn6Fsen6Cq6ePwcrhj6x9
+YSHLQdkDF/ZXPtgMk0zha2/s90Gh/lAYnR/oklENy/6qK4uEmc6fM/6CvLGP
+pp9vg5PasrWlMP/Kre4tdH7NuJaF+nQBczn0PBZnVbATYYms7bYzrD4RsaIE
+5txL9DClz4eQhEONsKvwb7/S/HLDQ+KrsKKN7V8MC1qPvBXBZlF7zHbAhg1v
+K41hw09lc/Q8svn5Rkexv/hkjPwh+qfm+ae0IK/GykRWCscNPl0YQX1aq0Ku
+CBZtVEePLUG+Rc7nQXBSKCu9h2D8nRzNGjpfnN8XtsgjysruCzawoGFD/et5
+HlnVcNDHElYI/L+9NMcjuSGDHXaw9ssfD8fqeEQ+8bbVna7Xd9Kf9zuPKKY7
+V4fBqtr6/VEzPCL6OXl3Orzq15mVtdM8YvbkeUE1rIz+TPrpCx6JmzVPHocl
+4ifz4VqM73JKdkR9zVXLz2x9ziMaS//nsbDGoD+j7BmPiOMdAs5TlzxeWgRn
+7yUDXbBkIdyPg/Hq1dcFOtqvn1gHnLBedkLNFhb9/dtaMjVwVkzmPH0+KoI8
+f2jF/u2apBJH+vzPrTZWIp/4wJUhakY1FV/9kkcMD1pcsoWzS8z/fRb1qJbP
+WCyHlVqj+chXPMLZ358wi/3IvXWOE/DmU3O7aB7lubVf+qIfTOf1V/mw2d4h
+ZwYW2CkjIqgvj3BmMF6ZZz1nQfPPKkJCYfGf92Xepf3Krx+MxH7Ni6FFubSf
+jrsmDZBH2ZU4vo2ev21qp/3ILzk9ced9en7MXV9Zon5BTnSy1g3rSUzzxiZ5
+RMq1L/oR1rrXpSSO84i2xaOyHubcOR7R+Aj9Yl3fV+VG+z2gXjqA71d3O9dQ
+L6krUKmxnlZe2AQzxvf0Wc3oZyB38YHb//8nFN/+3+c65r9ilhyv
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.907871335428632, 17.11903631971389}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1gk8lPkfB/DHUe4rFIomWrRSE4VVmqeibJGhRLusiagkTSK5JyS5EjZX
+y0QUHTurclQ0VK5Ks6JW5yhHroxat/h/nv3P69Xreb37Hd9reCzzPOrkLU4Q
+RBP+UU+iaw4fPZL477OAJCTiUvbUwKKmYcc8FZKMysw+FAjz2pSqnFVI/kt9
+h3fLYdrnSN0fVUgizNXuUqsuSQjybca0VUgOXdKyiUPZUXF8DSz8FutlAguv
+jZh747zPz27M/mW4/6vQ8A7Wf6tZsvgaTF8rVaWN+EYvV/1zAqa925WcDdM0
+dGUcYDLfyVZXleS3hYTFr4V5vkkfeKok2RdgE2kAc/8Zn7RSI/kOyVPulFlK
+cU51aiTpdql7yAQW7CjQNFcniepFGS62sPBSPPOCOs5LRZDe1P1e1zTfqJMc
+pnVaXxzMjByZFFtIEj+Lqe0upfI94iUls5DkxMZXHXpK3W/RLi5SJ/mXZ9X0
+qXq4met+rYTHOqQeEKiXP+Ss5Q27GP/YrABzY1fen1IjOUuLVrsrwUzpW18j
+ke/AVKaBJLWufmbvBOobNXeKHcB9/HN22v6qJId46h39GOY8DMrtXUCSrkUr
+u9KoeOfD5g6jPwv7DNSdqXyiyj6KLSA55yfHFipS9TXXf7uJ+bjkHvXh09Cv
+dTGlwej/lk7Ga39YENQp5wGT6R3hS2B2Y/wpH8xD6rRdQ9ZS5Ofxuj4Z1m9w
+kJOACaWEwVbcZ/WTl0GEDvIbTgswQfz8D39clYNZYUbBVxD/eV2YbJk2zr/d
+PGGE/DcZG8UHwOwAjeVVqiRx5sXlWXuYkL99exv6IT2k07kF5uQcdxTAd5sD
+SSdY2HJ+ZAfmEaii0x0E0+3DLW9jfqflXUNLYV6mdLsE5vH1N6vGfpgMVrlj
+hnmN1PMn6chHMK/aYTvWW98J+09QJjKqrbB+VO17aDnMTb1UrwIfWPL9fR+V
+v8zkq0bcb79v9osc6uXOW/XJB/GPiwUf1oDp9wNWjCC/VeWrzeQpWy0bPaJG
+EguyNMK7cV5ZnGXThXodFBqeFcLCq3bsX+HV23b9YAvzZi/wX6M/Am2bjjaq
+vv5bqofgdtONEf/1Y0VjhDz8NFiyrHwJ4tvoTDSh/0bZR3vVYbamv04R+l8p
+Hqp6bDHytQqazYf7rG09W7So76PvzF2YVen6yRTmWdx/9i/8/YKpxRVNzKPV
+O2E75pWT8sHWGGYb97+oQLzXS1TEmzUQf+OIkjnyNSDiaRyYZLJv1cIDMW7y
+jrBgk38OE/WmqhnWb4C5j5oOvIVtoiR7N1HrHTO97uiXgj/rljvM6eIda4H1
+ta8xkmC+vRrDEPNIDOy/3EidV7a+54P+a9eGbFZAPtxz9x7EwZHJUTK7qfyY
+6TWUs90MWi7AwhjXV9jPKd3ikfOcsqJPO+4jNuk8/j5Bmd6+SIB4A40ZexRR
+v2iF7f59cKxpvZI8zLw2WPwR85s+pvX3MPbzeEqFvyD/17LpeZVwqvvhLAG+
+n2sCr3f7wIJXXzp3wArfrwbPIF9W26L0F+jfsI75sXCYKSWj6Q+PR1cqDyzC
+/uY9XTT0M8XXNcKe8g1Fmgj9X5o9eKoEeTLXPwt5j3n6rScZ82DRKcH3QVhG
+520HvmcEvaBPejHu27/9okEb8uKryjr64L7N0977nGDRk0mJJ3DwCs133chL
+MJE9tQXzaVrs++I8zLGUnG2GO2T+XOsKpxb2aO3Fuc60rpSfYPZA9WwP6vcN
+sp6/DuYqyf1yBP35ckDAsoUJDY/N3cjjZPva5WyYvkLrnC3yNPU89ugKtf+Q
++Mo09F/zSZuwj7ov38O9BuvrdbWS6IgjKJP92oz16m5hbhDMM29lVcCZVi7T
+ZTBXp/R5LOy1+uEM5kCQG7dK4ueVY1ZUXEQgLnN6aONzPAPI6BEpPIVGYWJ7
+kF84rVJqDPtZyzmP8fuBkGu/t6+Juu9pQNFWPB8kpHw4hSen5eD3GtTPDzje
+RKP6tclTehNcJvuo5irVj792RmF+nJXqTWnasDK7c2M4+t1Z4a8ZiydHa3iC
+gXVLo5ieTswt9dzx0WX4f6eaLnErWJif3KMH24Yl5uYqI59dD/62wX6Tghs3
+JWCB7mWlOKzbp/x5YlQR+2dpnp3U+TbWsCxM29y1dBfi/vvlrJ6DAvqdNxTQ
+TuVxmjVTL49+3n5ZvA95SymybgbCvOe10SLq+6nyKNcFFqpalIaiL1v/fu3m
+B6fe+zQ3AQ/dqR66DgvspyS9MQ+DPKk5ZdzP9HehV8HRGXbeKQrU+6LSYgTu
+CQu7pIl8+DlmO2XxPU0xmBdWDPN0phkS8N7IikJDJeRLWCS9xf6t1VVuGTDb
+N3FvFkzTlFb7ANPLDX+xhJP113ydg7lFtjkNyIe428cUwcSykA1b4ZcGm9Su
+w6wrLgbVqKc2pbFzDcyzm1diCpesbTCJofqjY6z+F/oxPR1LXlag/t6o8dwA
+a5vynuSiPtFsTMsb9PNLyIvaADnkMxF4JgMePZ312FQW+w/TD/nCb1O0uf3S
+iJ9j2egB79b5p6BQCv1SvecUBFfqMsUPz8d9EW5SpfBk928mdvPQv+7GzdNw
+0+Kzdo6SuC9R4dN+xC9mxMRHS2BdVS6qE8bfF8+6xTGPrzJ/+iL/g30HvSNh
+gUSR5yRcJ6Px1A7m+J1lxKH+M2fyb+yE2WVqkrLo14CyiUQUTGwv/hwBn5BV
+dXkJ8/5InHpDvY+SSwx3IB4n4+HhpZhHyKmRw60w76DfC2t4uv4PbRbyozuG
+/7od3mX5Y1cvzNrG6lgNv35z9I476kmdMxOM4b59O1VOlsO0lQluBfD9VPus
+zzD7zu+y5nBdj3/8IEyf2pF9F/mu9VqiXw2LWLY3TOEfMjfOuVD3yVYFl6A+
+zYcdAdVUfLF+Zz24m6Z7XUTl6xTlT/2cZe6WOTmOesh3CY4MeDsnbLxDDPmd
+i+UOob+t89xNCgj0y6auDu8fYixxZlnFLIMQTO8v5VLzsf0hbvkMg+Ctarte
+As+e97QommQQdFEHu5War0PPW+Y4g+A+d/imgfsvGlW82jDKIDhPtQtCYCed
+u8Zh37D/My1pGH7/kkjX/Ao7nygMRL6lx6Vu0UYYBDviL0Vx1Cf6nXM/XcQg
+SNV7salw7LdaMzbMTYu/qYH+lE3M17sJCwOSz6bDgbqPD5A4n9pR/XgKfpR3
+hKOO+5lOZlo/o/9ZMV4HNRCff1czKRRW/Pby9pp/GYRy4nBhEvxeUNdii3xF
+thUpkbDTwbwNNmMMgtY3augIjzVE9yuhPr7Yim/z4aSKLI8MWJBkKSpEvHi9
+PEEtrFxdftQYLq3QE0ui+lGTUV+C/BPky3sHcB/nk93UUtj1g7O8kIqXctMz
+E/W/f7jtoh/yIY/v37YIVj5pZJJL5T/sEFmMfqWMbnYORb10lw4l6v1nLbI5
+8tMgg2DtluiRofrdNOtH70W+u6MSeqh5XfSLkPmIeTWYj3+EpUtHpAY7cL/1
+s7A5+OSl6Vo7Ac4f8K2yxHnhuGDd+hrEC9W/Q723/vtkV///qUb+D6LOr4I=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.922596693736967, 3.8067338747393404}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000002274`, 17.}, {13.500000000002274`, 16.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.552325660469876, 17.180083206945802}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1ws4lNkfB/B3RZQwqywh5JbrmCKpqKmtdkhWUs22RhIaUsZ2G4oG67KR
+hkaIXHIJycrdFkYJyS1FF2I2FWqLveVa/b9nn7/nwfN5zu895/f7vec978xy
+zwAXbymKorrwS/5TS8gffSb1348Wk9KaGRZbwMKQWh8BcWVPoB9My41/8QH+
+2Wt2RwnsfI8r2KbNpPicJM1puHTZQGwEXHpxxpFlwKQYwsa4HNhxnrpqKpwV
+b3k2D26jX8sYhXUGvft/gTcY2KtaGWI+UeUFF1h98vMIHxYesB2Vgp2vTz+o
+gCdYmt6ZWD/dwHH8NUwlXwwzhxPd5s+XXwHzC4+WL2NS7YopbnrE3pKmNTDX
+sVhCh3UWdDAaNZmUB09Rlzgru1RrD9zZdH67Llyqstl3ToNJXdJbt0QBlggK
+lGphTd+KwgmsR7vn9PEC3N2bK+qCPfxKKiPgk7blKcUkn+CzQUnwQEhSwjk4
+68G7P5tgt5T3Tv4wM0+wl4b12HkNPFe4u6047Djs3MzctpWMd5QovodpCVdL
+maR+9dnLx5F/1EFHeRaJ7+PIyKDetqu/qruRfCJP306Gf4sTSoWQ+D8GvjZE
+vzyUN24pgnkc//hCWKelr+klzJ/V0FXUYVKuW9b066M+m8PVcbZwVbS091GY
+v/EnaXdYcDXv99swW+GESSBsIvtHgoIRk2JJfXI9AYcW9VzmwBPshmQ/uH4m
+3biIeMvEnZ2wNTsueQJmXplmm5F4FW4s3Rj5vWn+OIV8plotVD1hZ544k9z/
+t2cE3b/ATJWcOhr8TyL/ZS7MKHv+TIT6PufaqJXDvNUPczRhsUnIUAXcPeyV
+XoL+CJIY314nDi++6wy3Ta0bTCbx3yzdIQer2Vq3nIE9jCo4z9DfdUdlT7rB
+OsLaJ82wpKkody1c2qhr3QO37bttpkry0ZsImiX7ZYw3PIl6hLc0TTZhPv3w
+eycGYd5dW58suKC6aFuHEdkX/QtVkN+Zzj7nZpi2tet1KnleMm8rPIAlYSOT
+Rqivk/bKcwD2OH5HfAu2jRJemoHlNgpaDdAvQ7+tjgYkP77POBeWO7z7lx9h
+7vltjrlwuM23jWkwpd5t0wtfOrl3bBiOSSlLnIYXrTqeuNKESdXYpvUpLWdS
+m6cHZcNhSpttqQp73jkd2APHnKKLyHixWcuktinGZX/PJtc3XWwdOQQzCn/4
+rQ9+/qdV7zWYK9o/VAA7FyjXvoBpS1Zf+Qn2qdsnL2eG/f6F89YaLr69q88A
+pvF2SP+F+tr/uXnH2oycB7Gn+KR+l1ca62FqyzqxLNykzG63JNfzPal89Ctq
++uVOXZjp15zOJv18/qaIzO9BL53Sg/nvNO3GsL7Qkb9BHg73+K66meTvHLaG
+Bo8qs8ZzYElX9mpLWDeQVR8B81aqKx2DHTyrB7hkXMXevEOL7N/hht3EeV43
+7JAPu2Qk2BF2tk9LaIA/f+2b60TGz6kKDFFf3/qIzRx49Nvq5gDYaG93HR8W
+Pw7cVgP/MbR+IAuequwvm4PPpA3efQyzlin9vRb9zsgWyyxGPSz3J6wj8Fzl
+9K8/wILXB46J4N/EDj75ML+/7sENuEh1+uxHM7JPG3+ogR8nBxp/Z459keYk
+KYdzMxbEJMESjd2SLHJ/TZcODsI68qcSBXCWbt4NHTr2w2fRE1cyrjD8hA0z
+rBYt14G7m2RrImGuzsOdr8n5sE3RJh8WV75PvQarHeIN1sJMh5VO5HlvPqn/
+WAzrqNDqGTCjSPTyFizQjl88h345RRX5FpP4+df/JedPeIi/kwgu7TjbGACP
+5i4YPgHznpWNOMN9luH3d8GSgoVnv4eV/fb3MMj8fBkTf3ifofYzJVjIeaSY
+D7uHLsn6G/VRdLWXM8RZkTdIvcKUj2GWpP/NDaaP4FGV531kf/Y9q+jogQu8
+bZPJ/TG0Dqkl8R71P6V+hfr1H3UETZL+mWSec4A/0zUmNbGeXFy1mhCmHRLz
+neCpjnDNLjj4iGbJOZK/c1CjtC6eb96qhi6YpiEspMMM+9mDGhbI55Ox/HY4
+5hXzq8Owzs3yFja8wfXS/VvwRFt70F7YL9qbJ8PA+DqH4O/gJrtFYhN4dKCn
+3xjuGM6Mc4QlpTs4FGzeeeSWLyzn1rGrA/mIThj6h8FGYbTzF2GnDxPzLsI2
+jEVme+BokdLqDDhGa1OYGuwRXymVAwuDHkpeoB/R/w6Is2HGKV9+IXmeP2nT
+0sj6vyuuCIWFTfd7L5D5yx6xyfuh1yqCQdZ7Gmk9uh2uUDb145H4sfL5LFhG
+IW7EHWaFlJrvgi0F9d84wTWngtWOwMv9lnA2wtzNJS0i+MurYzJWxHaPzrfC
+OdpfLMzhUnaC/nySL+/pXVOYH3PsPrk/c4lVBxnE5Q88SL03S555ryfrWXxJ
+H4CvaLV0kX7FLN5upEf6bye1xwtO2TfReRDW+3JvP8lfEFV2LQ2u9Bcqkn7I
+JRfYtMKxJTr2rTAvOv7SCGyf4HZ/nMw3Tz5kCt545YiZ2kpcr17lPgNrVdtL
+M2EbxW/838MLt9wf84azGtYm9MCGj73jY+AYWSW/63B7nbg9H5aI5OjBMDtN
+p7oBFr9ZItoE14XSc3pgFt2+lOyvkST3VUPwRPRf7c3kvLa4vOc1LLd0hhkL
+U8cnXIi5nKKtu2GvH7fWkPiUgncdK+DRhcbuvTBt9ayHDMyzWMVuIflKH58Z
+R78l4wdGq2C1ELs/R8n739MuII+sH5r+ZgLmuHrvE5H4Ztt6WVy/wypGORL2
+2JScaQYHGSeO8WFGVA7lDn9yn1sQCD89uKM2FTY7rcg9ClOFNVovyPnV0F75
+33jejL4B6rPLNN13mvTHLjPyKCx2mDocCwuLlccq4fy3VaXZpJ7Tr2ik/4fU
+IjPrSPy6DmqVHpOq3jNwaJDMZ8rTPwAzDIdmpVbhXFszGxABz/qWLDOBY1zk
+gpPhu3u1AlxguWb++XS4Ulk6Iph4F7csEd7fxxzPgtm9zTeCYbFtvnsTLAi8
+MrkbTjN6mD0MGx0NLjDUI59bDOs/Eb/44D5O9s+ulTNfWzKp1sQjWuVwTX/n
+G2149Crd+AS8m57vtQK2uTjdZwOfsanMM4LFMUN+X8GH5z0x0YdpcnNjD9Gv
+Qze969ThlOat/xbDC7gsbwUSb+lSQN4XZSNvfyTrq93+NfQc3HXq7tw7mHds
+xaYLpP+ZJhXPYZuxntmrsLIL530bLOZEfGqCbTrjqHpY+DRM8jccKh5cXgnT
+LqxNN0c+L+OsXG7CzoffZwTAi22CXcpJvYOWH6pg16Rll2+R8Z8zHCn0IzHa
+cCeZv7XqpicL1v9+vdMQycfIcCwWtttcpDZD+rnFvacF3umz/8NS1JM1LRU4
+DX+8EdxhBxsFD6Vq4XtFVoZCmBfpZ9T3Dathrtb+0ji4Ru219AbYR/+f8Qp4
+osrRYQ0clxr5qB+WO//GTBeWJ99rrP7//Uaf+T/tBqKl
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.54570515633175, 7.171979374673003}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwt1wlUjfkbB/C3tN+0oGPmKm5TUkKFQQpvJYQUZUmr20iNVEyRGrwto6SS
+GoU56hYVow1ZC7fFMkq0GEupG2lPm5RC/+8z53/Pwfmc531/v+f5/t73Fm2h
+/6ad0gzDVOAP/ctI0V+6LPPfZxLLfDc2ybOGC2qd9znAJdFjZomwsfBVQyy8
+eI1mzzuq7yzouwi//7m5auFM+EK7JBOO/OdjYyTMnvp+MAIuHaub/xwWRMXp
+WsGGKT7Tp+jh+sRHNW3qLDOo3LtlA8wtvvE6CI5SMlU/BLMX2VsDaizjomf5
+YxrV4z5U/QIHRn9tvgYLnO9NzVJlGUl7XGwR2VBacEyFZXQcTrfeIGeOpXMT
+WSajJ8s9m+6f+yT0jDLLDHFrP8eTffgvGnks05nZqBUAizceiXWC5z22T7Wl
+euCrUlXYPjvBfzbZsyRGBq65G5OoCHuUzBEvhudPye3owXyizGVKWbDp4NdJ
+b2Buzmp5G+yX5JBvTfMzjgWiqehnW6f8zzWweJZfuBz6/TXp2xcJ5RU8kK+A
+eeJ1nsh8gxO+B05VwLzsS52petjPuDbcPQr2aPVd7Uzel792DNbkFSj/RXbu
+inZFfuq8p5vew31f4q9ehFccrjxlMgv9rfE/8Qq+WjQoHQGLC5w3dMKrWz+c
+q4PVumf/3QC3hXXs0tHH/g7+o/mw3inbKF9YXPF5nhcclN7mmwtzZzfekIb3
+VRUPvYclwfn2Mehnv8m0KBUD9Pnxl2ppODviis4cWGSWeuED5p2jmBBsTn7D
+u1OKPHga3s0rYObcBc3LyGtfZ43nYpjVddibgzxLnzSm68KC05+n1CqxzMyc
+pHJFqqe8PmgA9/4R495B/Ti6pN5UZJkv3cp2D2EmqPF8ONxtF5J4HmY32x6P
+hXUaJLqR5CeV/Dp46OizF7/S/QfrehyxnuCap+52qi/9mCeP/W+nHZjuSFae
+EfwO9rglsqY6x1fY/Br9Nt3xCN1D9TF1SSPmCbWPH4qDPbITBlow75fhOLMi
+qtfUub3F+a734eZ8onynbdjsinw0mjVUaF4mUs/jFjx5wsrzYXDC2b6HozAj
+KLSphiWel8sFyLtRZpemzmyWCbDvUtSHd2Q//DEQZn3M61VhfrbxuhK4L6CM
+/xr3r1Dr75I3hG3SzI/SeQhy4qzhANF5vWkwL3vrkmCYXW44aor+JuvPiEw1
+pPeHf08H/Q8ua7x8E5Z87jSUwnw1ActTymBx1plgCfKQ+T5YXwpzMw6JnyG/
+pn7FGzfIecW2DchX78T5YRHZN7lDHX60SLE/gtbP2W0RooDnl2++SUj1udG7
+NOF/akTyK2DRFcP9X+XxvCw/OVmL9rf6y2ka6gd8q7zGMZ+o4nvZfnimxpvb
+7bDA++91ilhfXmOBTz0sfmN99Qk8nLF2y2u63tlwYwH6y534pOo95cX3y8xF
+/718v9AxmNm37VMhztPlutNWAe3f2jt+E/Ouj9pUsJHyaTItvYg85Cd/MIqn
+fosyZoYgr1WPR7pr4QTpqG1qyLMzoidSMAee5XLCBm47ObJ0L9xXMWX3Tjjm
+ua5mGdXFB7WFcLStpt7kuXj/ut6FrYAbKov93GCuek/vN6zvyfdbmwFLQg/3
+roLlXC38G2DR/birQvQzwuNN5s1DPUd2qQv6Tfbukp5LPuFtw2KeGapq1yxg
+0U/B9zQxb9X9Jmsb8qOmN+PIZ9mF+TErYY9H96OHkaf67Py+hTBjf+e8Gqw6
+/jJYk+r6bXZbcB61deXJ32j/eudd1XIs41XcNKmePOGpbDSsbmX34SYsyLZY
+cgiuUvyokgIzGcN1BXBbxPO9oVRXjj40g9azcL+8i+pnjSpKYVff4X5Xmt95
+KOMk9tdrqRt2h8V73HI59FuyqLzOj/ZrPdYVjvMsE5cMx1A+kROFMZiv3sdK
+u5DWc3n6PBrz83OCvTrInKtfAPJZ8nbLMgPKJ9P23ELk9/dIbcJeWGygkvgE
+Dti9quE+za/cLjFA3sUG4evVjbBfV1H3eng0YbxFaETv97/GJvALY53sK2RZ
+NeFL3B+xI/32KMykHNlpRetHjD3UMsb61pZav09kuSPqslKmsODDwMTj6E/+
+wbTlG4zp+T7UHIr+FzrNY1xhj/Y7T50xn+cfv0zfCYtCi1qXKLKcVeyiR14w
+J8ncqY18ZEMUDgth1q2w5yd5lktt8Z7iRPult76ykWO5xQ7r09bRegdST4lk
+WSZEq9bbjOp2h7SM4HPdjk0GVOdiY0dlWG793YTwH8jX1BtlUNePGXmmQP19
+C6tZD9+tWOQ2QvN2d4w/hbW83O61weLpg7wwOXo+tj1thjmnOGUXnGfL4Sxe
+O+W3xFrJAf1yqclOY7CkP+XcNpxnTEXT0ETKI944zU2J5fz1dS/okgel3m3h
+sdyl/Ul6FjDTnNezAHlVFYal0bxcaE5+hzLLVcZ8642ifl1l+X4436yvsQ/z
+KY9Df2bfRt6fXCIKXlF+o133HqE+N0h5rpQJrl9b8zEZ9R0rBsSzYKbUVMoA
+/u3dD0rryJ9uvQ/H+v3CgmofWHLlthd+HnEDh+doRlC98dq/+ej3bIzxomQT
++v2kOPAMzkfL6cHdDKqL3F/g+4kLNPHIvgiL/uHNw/vDbRoMXk7mKpadtcb5
+HFO8qE3XS5ImCDchT6OkI0tTyCWu66Jl8L2x/PiVaFhwdf943wSWy6yb0nSA
+1tdMP54EC8RBpl5k2fMygXDAt7cWm2FWTnUj6kx2e2zAKlpP7KvVi7pqzhFt
+M7reuHI0DOsfG0kMX0h12/lZVrIsZ3RFOnIB3d+wMMgA/XUbT65cQtf7z3+n
+h/5nCo/mraR+Fn8ynofzdJxuq7+V5qu01jHB/L13cpv8ab1W80JtPL8ZMxr1
+48khic8HkFeW2QuVK7C48E/pM8jzrZHE/SW5s16Bh/Nteb/57jjlUzDB3hLu
+STqbqz+fzkvPxgznsdvxaL49LPG9eHoI70vJXKMN+8n7eviBWO+jxaSFp2HG
++sa9YuwffTXN/DrM2vIXv8LzZrXGMqKS1jusdawa/SdN0fJ/S/erPAi5juc1
+LqflThssvqTVdRLP89IB3+AuWi+vbloQzmfXSLFqB3lr2ZAv3pc9IddNm+n+
+WOVNR5G3dnLC5zpYFGCysVKa5RpHb3IPqH7z8ePV0vg+eJhqXkh1dedn36VY
+xn/nb1kZ1E/Ydt9PUiwXNHJmeSJdr28foI/r8/N6gyLnUx7rDqRgPcWlb86G
+wIK9gRpm2M9LQ/NxEPWr8JuhEs7zksDuX8pD9Lub2xfYU1huf5jWY2Vzx9D/
+Pktnv1i637WdPwHn+T4+TyWd9nfQ9pZCHsLbxUVFNN+kksp2uLx+KL/+v/UV
+8nKQn6W5h2Scrq+etdIS+aos2KA0awFcpaifjvP9cXV/mR0s2FBdUob69qN9
+8cGweOzXxGz4OTexO42uP7HD0RZ+tfaFXzksKl49cAvPj5zF9uctsOTSzw79
+2H+cPgv+//8TBfZ/11uc6w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.666233980906949, 2.1296932060463307}, \
+{0, 1}], LineBox[CompressedData["
+1:eJxTTMoPSmViYGCwBWIQDQEqDiEyIFrOgaGg63OSmYrDzO9z9v9uk3VgWLF5
+kku8ioPSsWuhi37JODBoaO52r1BxuLaBb/3LBCD/w0aDX/UqDvqbjmztPSDt
+wLBjCturUhWHfy805q1RAPI3eJmtiVJxUBZ+2RDbIeXAkPCA8Yq+ikNNZHC8
++z9JB4aK1Qtvf1d26H97fYldB5DPcX3a/63KDn84o2++0wLyG8QO8eUpO4jX
+1jVNfSnhwCAgx2KkouywPWWl0aWjQP6LFavW3VFyWLTIuKtvP5DfscJy+Wwl
+h/kz33T/vwLkB3ha3EtRcojcYaJ/gAlo3oH87jprJYcJ68uXMLsA+Qy/p7xR
+VHIQen0p6c4kIF/D6uwiSSWHdau+P5r8Asg30Hwkrazk8EG39iuvHdD9B/7P
+P22r5LDt2qvvhj1AfsAHbvUMJYfOV85Xg8+A/GdvuXu+kkPCzvcHp/0A8ndw
+tAc+VHKoWCL935kHGB4CG/TkNZUdXvAILhJgAfILGpP/Fik7+D+OC/O7B1Sv
+oXp02S5lBwab++4ss4H8iCnTv/1WdpDY/v7gO2uQ/Wck1IxVHCpY/NtTjwDd
+98IwgyVWxaF0ZnuMliWQ73HwsGq5ioOa/NH5SguA/r+QH8/eoOIw1QIUvxJw
++SfM1gl348Xh+qd0Viy+ekwMbv4kuY0Vs6zF4PYL7hKwEzwiCncf13OFHb9T
+ROHu32W/cOVGRVG4/xTF3se+/y0C9/+GM08Y9nwWgYfPykwBu0x2UXj4NVjs
+0VpjLAoP32AfUY5zxaLw8Ldwbub6dFAUHj/RFRyyOeJi8Pj7bq47VzlXDB6/
+lcUd0X92i8Hj/8KO0xfs/4rB00dWp3AJg7Y4PP1kNJwpLXQQh6ev4H1hZ3Wt
+xOHpT+hLY22WmDg8ffJJLlUTvCoGT79VphrRB8vF4Om79+SaBTsYxeDpny1O
+vH5RuSg8f/BYXU8Mvi8Czz+3Cqy9iuxF4Pkr+MDHALH5wvD8x7Fac1UsqzA8
+fxZoJzuwVAo5wPLvVjYQLeQAAACtaGA=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.354800000000001, 6.}, {1, 0}], 
+        LineBox[CompressedData["
+1:eJxTTMoPSmViYGAwBmIQDQEqDis4ITTDhdu3dtmrONz7tfe8025lBwYOlz9u
+2SoOf3P6puVlAvkvylXY6lUcDp5abPiQH8hf8TIwpFLF4c7e6gtztig5MDBU
+rVgVpeJwWHOR3IlYID8hIGGqqorD9Ss5KdqCQP6F+ZNq7yk7HEt+3Lj1sqID
+ww/VNO9uZQc9U+P/QiuBfI6qjBdGyg6rtsx6HT8ZyM9QbVtzR8nB9nYt++9J
+QP6EvTcP9is5bJyc/qF2GZD/wNKnJ0jJgf3JuY+3ToHUb1inqKXkoDhZ4e/c
+30B+xaxpdyWVHBY/iEr0Ngba/0L6u6SykoOR9oXkK9lAvsGGFCFXJYdPWkE8
+EvNB/NupX2qUHG50nC5JPQ7kW+iVSR9TcqiS8z3z5T7I/SEHiqWUHXbuCGPy
+fQrkT7gR87tI2WFrwoYVvVeB/AiFqPATyg4/OgWeT9sA5Guc1SkQVnE4oXFW
+m6cCFD4mnRx+Kg5ut1fEGOqD9O+QcSpWcZgx42PG0ltA9wbskGNtUHHwkgFG
+R4MiXP5tBd/0KFVFuH47s/DF5y4owM3f+8Loyud2Bbj9ve3vJTL9FeDuu7DB
+P7xISwHu/jMRK/9uklKA+4/78yZjbgUFuP/XdJh0z7JQgIfP5GdrPz9PUICH
+X/Az/TnaUxTg4fvIYOm8LWcU4OGfUnefKYkFET+1uoZ8qqaI+LtSO4O/KRIR
+v+5mTT9YchHxfzsmVWRBDiJ9hN85w/A2TBGefvavlanz0lGEp6+1NpNnX3mn
+AE9/B5/HPjRfpABPnyuCW/STvRXg6bejd8cc2wfy8PQt4Pn4kpKuPDz9++q2
+JFR1yjnA8scOfhAt5wAAXRMymg==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.354800000000001, 8.75}, {1, 0}], 
+        LineBox[{{6.4999999999976925`, 16.}, {13.49999999999251, 16.}}], 
+        PolygonBox[{{10.6, 16.}, {9.4, 15.6}, {9.4, 16.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 16.9452}, {0, -1}], 
+        LineBox[{{6.499999999996362, 16.000000000005457`}, {10., 
+         10.000000000003638`}}], 
+        PolygonBox[{{7.947677384685548, 13.51826734053906}, {
+         8.206811054955079, 12.280184249251306`}, {8.897834175673825, 
+         12.683281069670574`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 12.823799910437668}, \
+{1, 1}], LineBox[{{13.500000000007276`, 16.000000000005457`}, {
+         10.000000000003638`, 10.000000000001819`}}], 
+        PolygonBox[{{11.447677384685548`, 12.48173265946094}, {
+         11.706811054955079`, 13.719815750748694`}, {12.397834175673825`, 
+         13.316718930329426`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.484057296392571, 12.823799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 16.}], PointBox[{10., 4.5}], 
+         PointBox[{13.5, 16.}], PointBox[{10., 7.5}], PointBox[{10., 10.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T17", " ", "P2", " ", "N34"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdieg/giijfhfjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdieg/giijfhfjhj.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:eJwl2HlcjNsfB/AnWqZ90UpqSiktTEmSMoMi1aVIiiKMpUUGUVfLzW29SUpR
+LmlaqKgrSpsuSVJEU4pUl6G0SAnTXvw+5/Xzz/N6e87y/X7PmXMetPYd3Xpg
+DkVRukIURZ7UzC/8WcyiJshThUWFVNm+uAfHhuUYE/eLxGX7wv0HrmkrqbIo
+etHa0kUw1fF16Tp4RE1cm6/Lotxq4kuj4MhPUm+yYGr/pZXvYP4/FlFHYC/l
+J+6b1NDu7FjcWrj88D7RWrh8cFmfJszXfBdjPx/j62ouE4dpY5W322F+i3vs
+rA7imdws5LMAfy/mnDsD91tkvZ+EpeJdW0TQnpt/qSpCnUVZmNIGVGB9k8CN
+cxeyKEf1tqMmcLiwwuUAuIuml+FE5m+6sqsV1mennDwB222q/aKpwaICfng1
+ppL3TG7QdljHJ/jIffLez1UqgLxfoGLQBVsE8zKC4cj2qZFx0t5bWvkI3Kqe
+2S1F6jcrb2YP85udvdXgNN6rBCWYdvM4Ux2u/vMNpwXz58UfilaEwz3Ol0fC
+Ltl/PBOC6+83FzHgku5kWg/GZ0lM93QgvxG+3j8kHrpL8PcYmBEqefEvkp/y
+TXcrmDWeP7UZrubUbJlBfXSGdp+QJvGufpf8HGZf2tpRh/oVCeXZFcKq386s
+CYXrmx1as2GjKyUvTGH+5PDTIrhny8oHA4swX2d+UytsU7zGIgeu/pR7Sxbz
+2RS+ZbLheoMSUy944qsL1xCmTqjuroXLL3x8O62N+V22716FfHRi1iq8hlWX
+vi+7D9tNC4nfh8MHKw5uRH08at7J3oLLNWLE2mGe+GmxG6T/qX3C3prYP7ev
+eZH39cWPHo/CkbaTWpUwl1M1aEVnUQIVme882GOB0MUgOEBDVHcYnolaqFgA
+f0l+8kIW8bEfjX5vgyPt05uXwxYTzQtHYTmnF7M74KALe4ZpWljH7zMLT8O1
+IS6m8rDwnzUKacRvOcYycGOuS99tmJ/77BIFf3ka8+kh7DERljSA8Zy2O+TW
+kfdO8zKfwS7JAp3HcNrL2cvX4fJ3tQ9LSD3HvyWEEMuy7K7Aefp37jvDBeYK
+VCAcQK3014N11h5LtVtE9rPru1/IX1hPabE8sbNcWyVctEGG3oJ8g5a33I2A
+u54PbjgHe8mVd3rCtH8aUm1ghoPaXEdYP3LWfApxuykMyjqR9o0mO4vgoAZH
+cV/Y42iTiTecaCIilQ4LDl9tWQxzJ3Zt+gSrJwbQB0mc1YViWnjy9ccqy/Ck
+G8874oYnTa7/yzk62advzFPxTDsyN8Of1IV5ILgTT7cleZt34mk3oau2CON6
+re2kkbxtphwafWEzsxrvraT/+UnbYtiomMv1JOt6r339OFmf/GVBx+DEdaa5
+K5DXVY2JffEkjlNpcX5w4+HlZ8m65xRt3P43HGKa8KkJVnQPfP4vXLRTZoOA
+vA8WzCf7Mm/a9pQKxg1gR3V/hCdujzisJOt+s9qyh+zDuYoPneH+3xm3OmBh
++Uc/2XDe+LOlT2Gd/dkRR+E0zQkdsk+7LmdocuAS4bM2sWTfcj6KHyT9L1rH
+ecGRop96nWDB47065rBUnGIjg9TfN9VDkuzj4fE1ojDnnk/4R7JOzK5lLST/
+joaGf2GrDuuRi3D953V2GbCds5PuNrh22/fnsTDfZ2mZJBybM9kSDKuW3z9N
+9gXH2ur07zAjrrNlmJxL2j+P/QlXtyl+8CT2fzt2iczHez1AzknHmK1NpSRu
+J1H+Driqa9HmD2S9StOtPuN3Lnd3ibsS4mUNGXQmwGx6boAz3C+U2rWReITT
+kgy77dmXpAzPyOxnk/pZBJr5TeNcEdzf/00b+9jNyW52FPYKXmjkS343N3vG
+hNE+3jPmWRF8+Mkdy8Xq5B5wSP9G3kuxv7rCBa5qNwxxblXX/JeeDPdHiBt5
+wiM70l3aYf4N0xeRcPiQNI+O+PvHn8dnwu3chTcOw0ap6/+7C5eLeZy4BTf2
+9VwvJ+dkwyuxTzCts3V9MUyZtCXJoz4MrZ3R2eQeKpupNYaFzVNvxME8/b5p
+c9isQmK1DzlHbVdvM4Tb87br2cD0X4IqcdhGayh2Ppl/hbEkuQc49SGZX5HP
+yJev38g9oHjr9cMnMGdMmtIh70089DNgVbPl5+8gn7wNzbOhsF129y0GHHsj
+2pCcw26LXMZyUL+07ErnbbDcD49QBdhv8WSJI9y/jroYSu5ZCV0TZ3JOpxnd
+/Ix7OP7sbcZeMr7JH0q7YYuKHXkhcLlk23An7nGbE+kq2eSckT3WfQh2YXef
+e0XGS98vJwLX+kiWSJF7ekvJx3v4bpiQMexwhFnVyT+DYU71c9oFHXK+Ji91
+g1mbRZU64LSLCbvsiT/cKtUm95r+5XPOcBDvcoY3LKfQN+oLlzzdlFwA82zs
+hVJhde/C0AFyr2XEHG+CHV/7xmrg3kxsOxkhj3i8luUZ25Pvmo3Jku5wo0PS
+RvIdEysaezOTfMe0LlA/A1vs+iDohWekj7LPLib7zTpTB/nbpJZviYOd9BeU
+uMJsa/szYeReHv0r73dYykhJwpuMx9BOiYMdZ2s9HWDuy5c2MXDPu4H1emQ8
+M+sd/jDNuuHJT8Q7cVrKlglXcRPUWsl3wxlDnynMT9tw52w+HNu7VIjE5+Z6
+8tAZOE2yVnkFHM4Peu9JvqsUHwVUIN+8jVbjLFIPz9woE1LvwbP+RqS/xX2T
+TGXEez39thb5DrJQKpOC1VUuVxPTFWzDgpRwrnzVWGVM2i9eO9SvyKJSHCyt
+bGDVwKOW++CRDVOnDpLxh5LX9s/D70u2ZlEyHHTNwyMMjr9srNAAO9VqsvRg
+fS3LYlHky9I2+NijgHpLmi8h9R9hVuwvh11obTuTYLsj/qJZcLXFdVoH7FVU
+tCQTNuoR79HSw+/KStW5hPS/y7txEOZEZS5/C+d4cgxuwHb6Uq+kMN+E7dyw
+dzBtzam/HWCG38IpaX2cDy1TfybBtabFzsvh8qddVh1w4x52xm+w3aLLu7SQ
+H6so298DDl+jEUHypV3wrN4DV79yT7lM6pE8LOEGy7W6vqkh7Ye8V2yAnb5a
+aXXCOV5eCYaw6mCh4D3MTox6IA7zDppfaYJDtKrKPiK+cq+X5vlwecWKzHLY
+4nHpMz/Sv/nYo3Mknz3uqxfA+vSZg2yY5W1kWzqP3IPtvDVw4toxHxZMSz+r
+oknqs2txVxWp3/YiFTE4b8LOZRncc+jL7gnUkzf7QXBFHudWpay6AOb4mC0Q
+g63uTCtMk/X4cH35STmMK8NLkSb1PS+l1iaL9XUsDDEk8z2e5/JaBr/rNGMT
+F7j6AcdyVBr78EDUzWiYOzXwYCU80y4V+gimKxsczpLCPWZd1zcH+bPWBWlb
+wH51jr12ML2kTWtKEvPoB9gmwYmDd9r64ALRuoq3+uT+LR7+Cbswxsc0l6B9
+m9up1ehv9ob9dC/sFXhmPBVWL8jXTofD61eXSmN+fV32Oh7MyeIKUuDEh+4l
+kzDPcnKtLuLniq/xVjXA+hWLNt+Du65GPzSEGSKTzdbIlxb731/L4ZHu0MYS
+OHL/iBwDtqvTCxZHffSv/SWnDXMaDj3Sh+lZ8kUSMD2QFbAC5m2rPTWI+bi0
+l/HGcKPNPKs6mPX439eycIFYqyKJl2VoOVlG6vtiyvo4LJcSo6wLl5yrFLGD
+EyP82r0RX7mPoJhO2lcc+ycO+egs7Tv+E/XhLtwSeA75s0ylV3WT/Rj2zeZ3
+1MttvuQ9HtmP1GpFVwmMlx1iVU/28xyvYCNxrFfKlgfPSPt92ltFaPi9nrKo
+aIcpS78dA6L4fmjJMv9Oxt/V+4Yvgt91ndMzZczPV1no/kMY37GthZdsSTxX
+Uh31YO7NvO2hcJFA8OLMXMxjU3GgiuSz5o6/KFygldBBoT5eJ/Lly+aQfx/e
+S7SDEw+8epMMu/UFr08i/jSscQWunaOW005sYH2hAeaObTqmbohxBRcc52O8
+qzW7EnbC1MrDEjFw4/lHqkkwn9vjTUM8qoIdwQ9gLtvd/BKc1pQY9gHmKepU
+6SEfncKPLpMw/QFXqwR2q5rJEjFCe+Vrj0yRf+Md3whRuDqlLOIKHL83LmqG
+zP9LZlkfrPOlPrcfZnSplsiK4fvkY+RvjWS83+J85IhlOxj5ZD77EVYv2gfl
+zzidIfHuk+g6D09oNf/nStrX5eVIw1dnkrSMYFbfH4/3Ih7H6UPec2FOzQLJ
+RMQf1No99A71oMJf8dKRb8DgpqpqUs8sh9Ik1KdqeVrmTdip8u6BE0I4X16r
+q14j7Tl+6x0o7N9Zd4urcPXXiwybn0xKx6+58Drp3x19VGiGSU1cNSiqhFns
+gw7vJ5lUT/wk1Un6X8oMGxpnUq1TVsMiiMerN7pt1RiTqvr7tLslceCyzCYB
+k6IfYzw+Rept+nR92Q+MZ754ZwWxSGvH6HcmJfVTSIZCPamcAYlzMFuwN8eO
+1LueP3wajvXJbkqE+YusDSthlqH/htdweNKUzjqMV3J0XqeyMfo3nHcXw3z6
+qc1JTsSz3NZpuHyJ2r0zxmS9Cx/IIr5EHeG+PJhfOveXCeKvWvXbsifG5P6J
++uw0gfgCLUReEytZTexEvilWtO2dcPWxpADmFJPi1taFt5H3iZOGX+F4Nw8P
+0t+LYS/qOc2khEXn6xaQ9mEx8WFwo5XsybNkPt+WbY7w1Uu3TA+QeGrNNtWg
+v8enbaGrSX+WbSepb0BTUaocTB+d/JWLeJwSUni9pD4LjihrId72zv2+1TDr
+5dPrLqNob/gjNoPUx/7z9GbUQ7iqVj6avM+/e1vjG5MqkIzOOkn2a/Uzlbwh
+JqW4KSX4KHm/1KWZGsD744yAAFLP3giBTw+s3fstkrRfpWIhzke+CqE9XDI/
+Z03IxBsmVdt9re4p8YE78TU87JcEg+wJ4qKDUjZPkN/3nxqmpP5jdr2CUszn
+2h59nLgx+71/Jtan/S6/jJj8Cbf+//8fGbP+ByrUpRc=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.851144620506076, 7.907943040036291}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl2Hk8VPsbB/ATCUWNpFzLNeRSlqiQ1pmUcJOlxdI6SHS52VpUqhHViKJQ
+IjWyhmqKauxTKlOoKbLLXOVS2bIlit/ne3/+8Xr3Pef7PM/nnBnnpOnut9lT
+gqIo2SkURX5TXZP40WD+//ciJqVWVsyWoDMpk7YAGg+mr6ik9WJde/YiKxbx
+xwlxIZxVEZCoCHPs1M76wv46yY1VhkyKpXDPSwrmTCievwjz5PlaEb8zKZe7
+hRXb4a7pYTt/qjOp4mPX9JbC3qHxnL2w9cr+B8qw8Y+otAo1JvXpRl7xDNh6
+3toefTgqnDZOHOzwNuaqKpMSswxDyPEJAb5uNNj61Fi+EUy7cyUqSYVJCWee
+iLOHzQOPbV8NG/imJh8i51/wGR39DXP67Zl2ExZqmDuK4KGy0CYhPBpmNlwO
+7z1+i95Pjm9ZoVgD06X/nFTAvCypqtPjcNqU82J9mB+j3LYc+zf02FxeCWf9
+teN+BOx7LN+NAXP1b2Z1wBw9P2Mzsq6yoMUK/dYmxJ7WIHm+sFLKJvN0FoWP
+o17/ckp9GuZ1KKuTrST9D+TKOsHeha3saDKfVCcnDv7p09v+JyxTKKNVokb2
+T0+cNEB+xbQDVXALvceTBwuKFloIYOMjpUtZ8Kjt01dXYVbQ4UkFWPzpn/gt
+cPH12ByhPuaIXR41TPorz2w9C7OZVo1sWNBk0WoHc8celv/APFXHDx7RgmVW
+fT3iCZtnW3dJwP4luypekjyPulb262G+nA9tBrDvXbM53cRe7hNxykzqmYnE
+rCFYKDlTUwa+nrp8vzQ538O5OHIeco1eY6ENM03aDmvDaZmvLazJerpz3/u5
+TEquzrLQHx6lNkXfgll/rRIkwqLdU/+OhAVjLS7lcNemrtUxML1PP7ETtn5q
+sP0enDbHTzQV88e8CnnbAcfd672pDLvI8aKNSD3BX1qacP/3kuhz8Pr22gk1
+mNMUqNIFN+TqHJsBC+Ua5Deif2P2aXY39u+/UbMwG1bLNcgQEHtZ7J6ETW45
+0CNgzqXiuZbIg2nY/dAKpnEc2Yfh4qzrtyeQh4xdzfNo+OdvHsk82GWylHER
+zj9fFsCC2Uo+8f4wzatUUwFmarZUm8HhY/zk5wvxebP5274d9ValJ2aw4ZgX
+Dq8PwTsVD+eshxPsy/WGyXyTyjmKMN3vGtMTFs1XVe1bgH0/h2dXIo+hQO77
+elimXjZkESzz7sHM17DYJ3o4VgnznOQ7voV5iWvNJOCDd3XOieH+tti+k3OY
+lPK3BRJjxOn032fBDUaX41VRj39sV+UjRVyvJQr3LGBRoWFzMNy9YusRX9h/
+TNjpBDPrIobjyXr0Y0NHeK9WmEkxHPzhA2cfHJWR6dUCe//x9HQcnLaxR34I
+5gxbBtTDJsMaClOQDxV0OE0P9W13DLQRCxcppXDgrM7LocPk/EJFz69wvqko
+pRl2kEp7YIt5dt4wjc+HaVNNd2fAwq3dW0Nhrv2FpAG41iYucB1Zn8ncYIB8
++lfnTv2FeY3XDGjawwbbT0Tx4IYo21kuMLfgTR0LZttKLrWE+Vd7G2hwgqac
+/FzYVvt+ZLkuPkd1H05WYn+1oW0vjsM82SCBF/zs4BTVVTAnKHx9L8nzWNKj
+aTC/MviCB7xqMNmyVQd9ZkoMV2F+mfEFbQKY42Ox3xjmzHf/fh/OyritFTcb
+95vzS1ce7BLCcJpQYFILDF/pF8EyyQpdB+Faq/3fRWT9daLmLxrO+3mupA+O
+WfbILwnuD2mcqYT6QmkX/S2wi4mj3hq4waPETwcOKbqg4Q3H2KtTc+F89cuD
+0bB1idYaTfh6vMSLB7BDWMbiDbDgvuJwNUwXWqeEwvx1PmvayP59j1a8gYdK
+XZo/EZ/JFC5Ef4J/pl5thdnuX4Ii4Z2isFYh7F/DkuuFlcPkyzNg71g7p42Y
+l24nIRkMi0tWuyTD2tEVI6thkUdW+ge4wbY3fAzzBXs+vTUdeWnXHZIl+VjX
+KpaqwxRns7kbTFkqJivBtTeyxmkwbejS8m84P6uWZf/0D9y3wRG9PLiqpVU1
+GBbxs4OcYJcvaQqmMD+no+IT+rMtKjs3ro16F0dmsODwxyG7q7XJ90K1XTXm
+9VUd78yBR8u32C2BxWlZ9VfJeozLHr1ZmH/jqeWXYG7Lq72j8vj3UP8Ass7l
+vX7WJIf7SF5q3W2YRr1JaJmBvD++FT+D2bN1A6ThT9spyS6yn/PtVvfpyDX/
+jSQN/dEL9GYNySK/PTnUCpireOdKCUw3M59whx1SHC3L4CzmFXkOmU89ddEI
+vJUtFZABs/pUqndiv/V22qVFsH/mb1Zf4bQ61Z/P4Zi1I6KrqF+ra1FcTo7f
+sVPXGf1qB07o55N1KQk1dcyTtoSmcZWcv7rBsBUWfOUr/A0bm9r8ETkTOTLv
+aC0j/S3+lKuKPIzfKkt9xzziRxJt4bA33ePrXZJH+/EnpXDa5lIfN9iYt/12
+OcxeVrdHgeQT9zg0Bo7TWfrkyXzM83jNgDbcf0U+/BBMXWN7hKHeekWPQCOY
+11Un5qEfcz0V2QEtrHs6Neaj/+uen13KYHpJ+9MEkvees90JME+zL9UL8wvG
+9zw8BYvLHkQYIq+QL7WTQTDXPerbiDSTym0+6ncIFun2G4im4XuhPlkyDGaW
+nqh4JoXP/2TN/CTYePDJyIepyOt6R14R2a89V0UXXlC4ZFE76ad3aGuqJOZy
+WFY+A/0KpNirnOHgvOwQU5hZf5G3DpbZc9p9J9w/tbF6H2ySIss9AYsXaU0r
+hoUUI/MKOf6opusq7G/dWuKQDtMjh3NIfa5kxkgmzC78Z0UC+vNnL45IJnm9
+EWrsQv97q74nnYH9g+r+pWM+erm5D4vUez5Xrx7OX9zTsIjkvXKvwUEZzOP1
+xI3k2R+n6tsDr58VNv0OTBP56KxAXiY9nze4wazK+mdbyP03Y6RJgeSREW1k
+Bs8RufGfaCLvzUmUGOcvOFvfGKRJ7sdt8ZvhnwseqevDDiO7f11C/a1iM60v
+eM7tv19XkYZ+07h52nkwb6Hb/VjMY2Kf1XEOptjfzPZjXpOiqsv7YWZ/3uzF
+yMfY15XvAtMnTtz+PgXf11FGK7YRu/T4vaRwfQ8s37Yb5l4+n7x3kkEZbBjI
+CoTF0RvUjv1i4HOfbB1DrJ6Y3DHOoJhRTjX55Ph3W4wfjjGo8CevLrXCgpZu
+auAHg5IL0U+QRv9M66F/b8LdGne/GMHcQ4qmJbDvnJpbW2DxdInXFjh/a2GK
+oj9Mf+dxQhv7s+WUvp4mvrUyxvEng+IUzrM/T6x0Jv0h+qmSzxgKJ855mbsc
+/Xb3DRkFwsYP54e5U+R5tvanI8nTb9MODcyba9cxoU3q5Ry0r4AdPicf7SZ5
+Oetus5dArlZhzGzYweZr/x14NMaVyyLz6pXnNsPK6/dbzIZjZgQcqoG9lU7N
+Dcd7A/1eZ+NlCfL3QKGnA+8NomuihSowJR370R5mZmQF+KKe6GyUXwXeG3jl
+qVuj0Z8wtGqnIyzw3x+lhP77mwIvfSPPuUe3bXqLeWmBJq3ZMLuSHe2NfBzo
+y+pOwvRuq9LB7wyK1bX6+d8wd92z5shhBsVfq37rMCzYtcnaZpBBCU6m0slz
+M7ft30sW3xiUjOuW6kqYOtKXP7ePQSkXcMxpqM9MmP18XzeDasj8ariH9OMh
+HRH5Bdc7/fjwA+KmXzUxnxkUNW9akhTmYd94H3YEZqWcN3ck86VsOmyK4wU6
+3YwYsv76mvSjrwxKvNRJUELWDy+d09zDoPyzh1Lfw9yU2+aMflxf3/H2Wpjl
+2fqpAP0xrUNvFxCvrPCwRP/GhdsOhBH/9TtfOIT9vfJ/LIEp1sk/9Ucwr+vp
+Ha/QH0siX80JeYg3X3xrS+bZpfzZZJRBCVWUbpaSPN71aTyGva+frtcm+T72
+fSSCRWtlNM6Q9xjvZSXHYPom+l7y3kMf1nich/0c7hyI3wizjIpzTqEe/WGy
+cwl5r2qSGe5EP1lp70sZMMsm/NXYAPqzWTurHs+tLJ2j0a8wX0JXwbmzMFNm
+c1Mj8pURmC53IH41nzPYSTzUbQJTJgqScz6in6C7Kv857Au3sQX7563sI8/p
+FHOJj2stro+jt8dRYtnAkuGXuH4vX7vxibVdNsgXI9/Wjz8k0Q9lUM41SUe/
+vnnJTsSUlnPGYgZlbvGnVzYxNy2CHllG8W32u//4b724ulkL+Zt/riPvnRRr
+X15WKvovMIwJJG63dNMtwP7KBr/HEv+WM/3gCwbFa2qUuw6zF84z+CZiUF2J
+9rMiiRMvaivUo/77M2p7yPGV3llmrZh3cH2IMiyYxlc69Q/2b8oo56M+e7Bk
+x9RPmGfJticWsED3qhX1L+5/r2PbC0leJs/v2iEv60sq27VhdoFUWw1sbLjU
+9Ow8cv7Z0RMkT9ULL8h7EXuGa7Ulzufui5OygalQo5VG2N97irDoIZ5L2W9m
+jlujvjjWc9ViYs6Zd87NuJ9/NGoK8FxKfTBPHnyH/Wcvm7OPeHVK14Fy3G8d
+J5P+ICY/7JL///+DIvN/nXAewg==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.5990515496243272, 9.421161979599258}, \
+{1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.999999999996362`, 17.}, {14.999999999995453`, 
+          15.499999999996362`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.126447748763752, 16.890374170787496}, \
+{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]& ], {17.81512204377634, 8.004985304149105}, \
+{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]& ], {18.88748581947994, 4.835942983375933}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwd1Qk41GkcB/B/ji2PclTuaFzlyBBJizzvJmUljX1sKGVcTVJLRUutTIex
+SjkqUWmHlKOSatcVGylylKGY3bGtWbIlcobayuz3zfN45vk8v/f4/b6veRgG
+R34XJscwTCR+6Scjoz82hPnyo0kYQws59xew2sR5QY4GYbw7hr4ug4XlpoN+
+GqT2b9trghSYn1+TvFKD8K/oN84OhtMcVUtXwYMHTa+sgjnJU3GBWL9EN89q
+Pj3/TVtbIeqs7qkcqTVhbB4UCNQ0Cb/YukRUCAsfbxam4X71MwtnDsPSqVsF
+hlqE/7L2qX8oHMW3N76nRZijcxXY/nDak0gtH23CZIiGuwLo/u3q6X2wMqui
+dQ9MZi6wg3QIP3ZE8V4ydadT7iM44IAo/yY8am2jr6xL+O5OvvO7YE5nzx0r
+XcIEq+9fJ6Pn7ww+aYn6y6451V/6f9uooKhLSN+gncAIlj7Zd6NahzClK9k8
+K7jWRKLlq0PIX4IhVVual67qZQn6GfdTTLeGbfzIlJc2IQZFC8JN6f4yjbpq
+zHdZfDhlARzVK69gBYuZwNZ3uJ+5n3q5EPksy92Q9xvNw1hc5wDHNFzT3E37
+m5ex7x+8z6hEwU2PztNgoH8d+Q780FPRwMZ532iuyUL9tIqKwz5YLWE3KUa9
+Y2PLMUOYcdtCpDDz/IHZH1ao5/oQnM98vJ/vkg3XZnq4FsMJvOOreXCpflCO
+LfJvO9nT5QqLAtO2PEa/M3KZ3dawUHu6Ilib8Mtzg6wtYb7iiVvvMb+byenm
+FTC3cHbcEeQv29vZ5EHX/yTWnYTv2kSc3AVzPlf1eCLvYXasOI3uTxz//Rje
+4+aTTPUqanF+USZcUO4b1UvPE/dVHod9++McvsI8tZ8PkU3Yn/XId4zOR1yr
+Sj/gfe6maOXbwkKnwIhk3Kd7dY/MHubuH45QRD1PtpxvAXOqOC9i0O/Skfwk
+VXqewOlSH+b9qPQ5tJ/Oa/e6xBfz5msWc27SfIo9qiR4j8mCs/7hMEveID4a
+ea2sjHNbRPMKeOhnifqYg/uOpmV4n9dGI/Kohyuq8aLh2lhuN/2+JbicXWAI
+i9a2JRvBJ4736z+zxPqxXct52J+bntR/inrEa6QZzso65eoDp4UelnNHP01e
+rdvNYNaeMBMx7FVUf0IZjjpT9z4S8zgPOtvNWCCPWIfTSpi3pryzU0ad1P3q
+AvLY5CtRUsV6YcCuJD3kqe8wec6c7o/uG0H+fAeDsAxPeh+nRPsp3MO9fi4a
+Jmu5zZNY3zIkN5BD+2On97yH1Xvj6h7S9aOSMDHscpEc7IelKXNyzmD/rOyS
+1k8wP+bI8+Wot44J5eZgftZqBfMK9NMevoylCHPfFy9ho98qOyO5CaznXnzh
+cwl/XxpF6ZHt9D5Li7vKmG9x7yr9XGr7PnYi5ncxKMkLofMkPtdRx/vdj30V
+pEfvm95YXIZ8Uz2zglswf5RsRcoh5KnpfN74R5g12JgcAode1Qkzgrnx3t5R
+WC+vw4yIzPF9sfHamos6b92NzQKYPy99fAJ1VS1poxvMvf1mWwjuH+6eeqYO
+qzm2mw3g/q3+PI8hM7y3pFgQj/4vWQwv6oKl8vXNWphXqD7Xuw3mxPz6tgTz
+Vm4tk9G6zaSrtiPyUnnnHDIIixx9LG/Dix1Tx5VoP9WPnefpEf7HEKefrWFO
+jnjWt/CffqIMP1hYsZMVpEeYCXbVhiOwdMMvwT6oVwd5jV2FSfCBJmP4nGkK
+U0/P+887vgPvIXqjE9EJl47uzQmDuffWNEjo+YU2Y33o14trGNUO16Y2JnwP
+LyysKayg+xO7F9ZjPt6s7Jw0OK3FsdIe7ng0vWMLvY8ztLQMeXyoVJ3Wovmo
+DKz3RF5FnvqfWjAf1zL9zgzy5A1ZlMfBrNcWXh3IO8xcodmE5rM7UY7+/cfX
+bJaJluK+HetT/sX6+MxtakdhtW3Ze5fgvAOGWRFOsNRCoi2Av/yTo3X6qU3+
+B+U8lqE=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.109669593634097, 4.811165529975059}, \
+{0, 1}], LineBox[CompressedData["
+1:eJw9lAtMU2cUx6+PkoIb4mOmcO+1Frz3U0CFoRVnlAMR6cLYEJS3KFWMjLBW
+wQRDytpp9vKxymAOAQkiWkAIlTfy0kxQExQVlBHETthiEbExLoBT2ddozk1u
+Tn757v2+75zz/x+FWhORPJthmBD62uP7h8CSefboAUy4ekHSGgJdCSM73W+6
+A6M/y8t3EPjzVLHE8jNlaYdnsYbA9J0nvo4hlGM6yjt1BDRM6WjFjAIY45dt
+1mwCMQ4241QDZUvh9Y/TCaR2lyjWaijbBq1VcQTq2kLUeZ6UVxjz7yvp+e/S
+H/g+WwZMZ2WgxJGAj6XX4Z/LlPV7atbdF6FxOGVj4BHKvX8NVZ8W4XeLkz5j
+J+Xdr6enYkSIkRZVBgdR3n9opN1VhJLNuZMOn1L+UbXQPCRA+9OG7371pmx0
+3r7/vADvvn48Gu5LeSrv6OfpAoh1PtfWBdjXI3WpoQJsvXv3k/7tlJmUKP1q
+AS4VS5rTtJSbrtuu8QJEu2Xq3v5C2bI5x+oqQERVr1O0mbIqVFjqIYCXvurU
+hnuUbfXaN/4ClDcFR6TYKEsr436LE2Bk0dzxbkea/9RVafb3AgzOaU9L5Shn
+Dn/T30K/n1XuVStSVpWWqv8VoGZPbGYsoewCvMlPhDqu71sDT1nWd3vmoAiP
+u6qrOqWUm4JmGmtEyEotW+9htedvKPYZE+HiwYEzXh2U/cctkxyBnsK/XXqO
+2eu9pW90K4EMpcU/KZyyVv1i9T4CRT2GvfnO9vxUhw2HCTxULYgcMMopz3Z0
+0hPI87frRY7rfoMTl4hmKf7f+8MbZc8THvdXNASc3LSLx/O11rXDyU85vF/r
+pq9umQwc3n/xF/XG5lUc5head+589gSL+Z+zRjNv/2CxPqb4sPlhZhbr9yCt
+2pR/mcX6RrFHl6/sZrH+Qf9NEu04i/1pNGfEr5Jz2L9a97Kh4/Ec9nffjcSx
+bUUc9j9hYr5EYuFQH+aRVyeWy3nUT7Y+oW9HFI/6am85m5Vr4FF/3gWBysQi
+HvV5fFvO64ELPOq3u+yhy8sCHvUdu7DLlJHFo/4Hk8ZmlgTz6I+CZO+fdNMc
++qdcnfjS7wyH/nokyiILV3Lov5KL2o39FSz60y+3tfW0gkX/Zu1dNuyc44b+
+9nRvUVYwbuh/2ZHPCp8fcMX5kBl29VXAmAznhy5lw5YraZQ/zJdHH9mjDP4H
+xxO6LA==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.4452, 7.75}, {-1, 0}], 
+        LineBox[{{7.9999999999976925`, 15.5}, {14.99999999999251, 15.5}}], 
+        PolygonBox[{{10.9, 15.5}, {12.1, 15.1}, {12.1, 15.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.5, 16.4452}, {0, -1}], 
+        LineBox[{{7.999999999996362, 15.500000000005457`}, {11.5, 
+         9.500000000003638}}], 
+        PolygonBox[{{10.052322615314452`, 11.98173265946094}, {
+         9.102165824326175, 12.816718930329426`}, {9.793188945044921, 
+         13.219815750748694`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.015942703607429, 12.323799910437668}, \
+{1, 1}], LineBox[{{15.000000000007276`, 15.500000000005457`}, {
+         11.500000000003638`, 9.500000000001819}}], 
+        PolygonBox[{{13.552322615314452`, 13.01826734053906}, {
+         12.602165824326175`, 12.183281069670574`}, {13.293188945044921`, 
+         11.780184249251306`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.984057296392571, 12.323799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{11.5, 6.}], PointBox[{8., 15.5}], 
+         PointBox[{15., 15.5}], PointBox[{17., 5.5}], PointBox[{11.5, 9.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T18", " ", "P1", " ", "N35"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdiei/fifjghgjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdiei/fifjghgjhj.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:eJwl2HlcjNsfB/AnWqZ90UpqSiktTEmSMoMi1aVIiiKMpUUGUVfLzW29SUpR
+LmlaqKgrSpsuSVJEU4pUl6G0SAnTXvw+5/Xzz/N6e87y/X7PmXMetPYd3Xpg
+DkVRukIURZ7UzC/8WcyiJshThUWFVNm+uAfHhuUYE/eLxGX7wv0HrmkrqbIo
+etHa0kUw1fF16Tp4RE1cm6/Lotxq4kuj4MhPUm+yYGr/pZXvYP4/FlFHYC/l
+J+6b1NDu7FjcWrj88D7RWrh8cFmfJszXfBdjPx/j62ouE4dpY5W322F+i3vs
+rA7imdws5LMAfy/mnDsD91tkvZ+EpeJdW0TQnpt/qSpCnUVZmNIGVGB9k8CN
+cxeyKEf1tqMmcLiwwuUAuIuml+FE5m+6sqsV1mennDwB222q/aKpwaICfng1
+ppL3TG7QdljHJ/jIffLez1UqgLxfoGLQBVsE8zKC4cj2qZFx0t5bWvkI3Kqe
+2S1F6jcrb2YP85udvdXgNN6rBCWYdvM4Ux2u/vMNpwXz58UfilaEwz3Ol0fC
+Ltl/PBOC6+83FzHgku5kWg/GZ0lM93QgvxG+3j8kHrpL8PcYmBEqefEvkp/y
+TXcrmDWeP7UZrubUbJlBfXSGdp+QJvGufpf8HGZf2tpRh/oVCeXZFcKq386s
+CYXrmx1as2GjKyUvTGH+5PDTIrhny8oHA4swX2d+UytsU7zGIgeu/pR7Sxbz
+2RS+ZbLheoMSUy944qsL1xCmTqjuroXLL3x8O62N+V22716FfHRi1iq8hlWX
+vi+7D9tNC4nfh8MHKw5uRH08at7J3oLLNWLE2mGe+GmxG6T/qX3C3prYP7ev
+eZH39cWPHo/CkbaTWpUwl1M1aEVnUQIVme882GOB0MUgOEBDVHcYnolaqFgA
+f0l+8kIW8bEfjX5vgyPt05uXwxYTzQtHYTmnF7M74KALe4ZpWljH7zMLT8O1
+IS6m8rDwnzUKacRvOcYycGOuS99tmJ/77BIFf3ka8+kh7DERljSA8Zy2O+TW
+kfdO8zKfwS7JAp3HcNrL2cvX4fJ3tQ9LSD3HvyWEEMuy7K7Aefp37jvDBeYK
+VCAcQK3014N11h5LtVtE9rPru1/IX1hPabE8sbNcWyVctEGG3oJ8g5a33I2A
+u54PbjgHe8mVd3rCtH8aUm1ghoPaXEdYP3LWfApxuykMyjqR9o0mO4vgoAZH
+cV/Y42iTiTecaCIilQ4LDl9tWQxzJ3Zt+gSrJwbQB0mc1YViWnjy9ccqy/Ck
+G8874oYnTa7/yzk62advzFPxTDsyN8Of1IV5ILgTT7cleZt34mk3oau2CON6
+re2kkbxtphwafWEzsxrvraT/+UnbYtiomMv1JOt6r339OFmf/GVBx+DEdaa5
+K5DXVY2JffEkjlNpcX5w4+HlZ8m65xRt3P43HGKa8KkJVnQPfP4vXLRTZoOA
+vA8WzCf7Mm/a9pQKxg1gR3V/hCdujzisJOt+s9qyh+zDuYoPneH+3xm3OmBh
++Uc/2XDe+LOlT2Gd/dkRR+E0zQkdsk+7LmdocuAS4bM2sWTfcj6KHyT9L1rH
+ecGRop96nWDB47065rBUnGIjg9TfN9VDkuzj4fE1ojDnnk/4R7JOzK5lLST/
+joaGf2GrDuuRi3D953V2GbCds5PuNrh22/fnsTDfZ2mZJBybM9kSDKuW3z9N
+9gXH2ur07zAjrrNlmJxL2j+P/QlXtyl+8CT2fzt2iczHez1AzknHmK1NpSRu
+J1H+Driqa9HmD2S9StOtPuN3Lnd3ibsS4mUNGXQmwGx6boAz3C+U2rWReITT
+kgy77dmXpAzPyOxnk/pZBJr5TeNcEdzf/00b+9jNyW52FPYKXmjkS343N3vG
+hNE+3jPmWRF8+Mkdy8Xq5B5wSP9G3kuxv7rCBa5qNwxxblXX/JeeDPdHiBt5
+wiM70l3aYf4N0xeRcPiQNI+O+PvHn8dnwu3chTcOw0ap6/+7C5eLeZy4BTf2
+9VwvJ+dkwyuxTzCts3V9MUyZtCXJoz4MrZ3R2eQeKpupNYaFzVNvxME8/b5p
+c9isQmK1DzlHbVdvM4Tb87br2cD0X4IqcdhGayh2Ppl/hbEkuQc49SGZX5HP
+yJev38g9oHjr9cMnMGdMmtIh70089DNgVbPl5+8gn7wNzbOhsF129y0GHHsj
+2pCcw26LXMZyUL+07ErnbbDcD49QBdhv8WSJI9y/jroYSu5ZCV0TZ3JOpxnd
+/Ix7OP7sbcZeMr7JH0q7YYuKHXkhcLlk23An7nGbE+kq2eSckT3WfQh2YXef
+e0XGS98vJwLX+kiWSJF7ekvJx3v4bpiQMexwhFnVyT+DYU71c9oFHXK+Ji91
+g1mbRZU64LSLCbvsiT/cKtUm95r+5XPOcBDvcoY3LKfQN+oLlzzdlFwA82zs
+hVJhde/C0AFyr2XEHG+CHV/7xmrg3kxsOxkhj3i8luUZ25Pvmo3Jku5wo0PS
+RvIdEysaezOTfMe0LlA/A1vs+iDohWekj7LPLib7zTpTB/nbpJZviYOd9BeU
+uMJsa/szYeReHv0r73dYykhJwpuMx9BOiYMdZ2s9HWDuy5c2MXDPu4H1emQ8
+M+sd/jDNuuHJT8Q7cVrKlglXcRPUWsl3wxlDnynMT9tw52w+HNu7VIjE5+Z6
+8tAZOE2yVnkFHM4Peu9JvqsUHwVUIN+8jVbjLFIPz9woE1LvwbP+RqS/xX2T
+TGXEez39thb5DrJQKpOC1VUuVxPTFWzDgpRwrnzVWGVM2i9eO9SvyKJSHCyt
+bGDVwKOW++CRDVOnDpLxh5LX9s/D70u2ZlEyHHTNwyMMjr9srNAAO9VqsvRg
+fS3LYlHky9I2+NijgHpLmi8h9R9hVuwvh11obTuTYLsj/qJZcLXFdVoH7FVU
+tCQTNuoR79HSw+/KStW5hPS/y7txEOZEZS5/C+d4cgxuwHb6Uq+kMN+E7dyw
+dzBtzam/HWCG38IpaX2cDy1TfybBtabFzsvh8qddVh1w4x52xm+w3aLLu7SQ
+H6so298DDl+jEUHypV3wrN4DV79yT7lM6pE8LOEGy7W6vqkh7Ye8V2yAnb5a
+aXXCOV5eCYaw6mCh4D3MTox6IA7zDppfaYJDtKrKPiK+cq+X5vlwecWKzHLY
+4nHpMz/Sv/nYo3Mknz3uqxfA+vSZg2yY5W1kWzqP3IPtvDVw4toxHxZMSz+r
+oknqs2txVxWp3/YiFTE4b8LOZRncc+jL7gnUkzf7QXBFHudWpay6AOb4mC0Q
+g63uTCtMk/X4cH35STmMK8NLkSb1PS+l1iaL9XUsDDEk8z2e5/JaBr/rNGMT
+F7j6AcdyVBr78EDUzWiYOzXwYCU80y4V+gimKxsczpLCPWZd1zcH+bPWBWlb
+wH51jr12ML2kTWtKEvPoB9gmwYmDd9r64ALRuoq3+uT+LR7+Cbswxsc0l6B9
+m9up1ehv9ob9dC/sFXhmPBVWL8jXTofD61eXSmN+fV32Oh7MyeIKUuDEh+4l
+kzDPcnKtLuLniq/xVjXA+hWLNt+Du65GPzSEGSKTzdbIlxb731/L4ZHu0MYS
+OHL/iBwDtqvTCxZHffSv/SWnDXMaDj3Sh+lZ8kUSMD2QFbAC5m2rPTWI+bi0
+l/HGcKPNPKs6mPX439eycIFYqyKJl2VoOVlG6vtiyvo4LJcSo6wLl5yrFLGD
+EyP82r0RX7mPoJhO2lcc+ycO+egs7Tv+E/XhLtwSeA75s0ylV3WT/Rj2zeZ3
+1MttvuQ9HtmP1GpFVwmMlx1iVU/28xyvYCNxrFfKlgfPSPt92ltFaPi9nrKo
+aIcpS78dA6L4fmjJMv9Oxt/V+4Yvgt91ndMzZczPV1no/kMY37GthZdsSTxX
+Uh31YO7NvO2hcJFA8OLMXMxjU3GgiuSz5o6/KFygldBBoT5eJ/Lly+aQfx/e
+S7SDEw+8epMMu/UFr08i/jSscQWunaOW005sYH2hAeaObTqmbohxBRcc52O8
+qzW7EnbC1MrDEjFw4/lHqkkwn9vjTUM8qoIdwQ9gLtvd/BKc1pQY9gHmKepU
+6SEfncKPLpMw/QFXqwR2q5rJEjFCe+Vrj0yRf+Md3whRuDqlLOIKHL83LmqG
+zP9LZlkfrPOlPrcfZnSplsiK4fvkY+RvjWS83+J85IhlOxj5ZD77EVYv2gfl
+zzidIfHuk+g6D09oNf/nStrX5eVIw1dnkrSMYFbfH4/3Ih7H6UPec2FOzQLJ
+RMQf1No99A71oMJf8dKRb8DgpqpqUs8sh9Ik1KdqeVrmTdip8u6BE0I4X16r
+q14j7Tl+6x0o7N9Zd4urcPXXiwybn0xKx6+58Drp3x19VGiGSU1cNSiqhFns
+gw7vJ5lUT/wk1Un6X8oMGxpnUq1TVsMiiMerN7pt1RiTqvr7tLslceCyzCYB
+k6IfYzw+Rept+nR92Q+MZ754ZwWxSGvH6HcmJfVTSIZCPamcAYlzMFuwN8eO
+1LueP3wajvXJbkqE+YusDSthlqH/htdweNKUzjqMV3J0XqeyMfo3nHcXw3z6
+qc1JTsSz3NZpuHyJ2r0zxmS9Cx/IIr5EHeG+PJhfOveXCeKvWvXbsifG5P6J
++uw0gfgCLUReEytZTexEvilWtO2dcPWxpADmFJPi1taFt5H3iZOGX+F4Nw8P
+0t+LYS/qOc2khEXn6xaQ9mEx8WFwo5XsybNkPt+WbY7w1Uu3TA+QeGrNNtWg
+v8enbaGrSX+WbSepb0BTUaocTB+d/JWLeJwSUni9pD4LjihrId72zv2+1TDr
+5dPrLqNob/gjNoPUx/7z9GbUQ7iqVj6avM+/e1vjG5MqkIzOOkn2a/Uzlbwh
+JqW4KSX4KHm/1KWZGsD744yAAFLP3giBTw+s3fstkrRfpWIhzke+CqE9XDI/
+Z03IxBsmVdt9re4p8YE78TU87JcEg+wJ4qKDUjZPkN/3nxqmpP5jdr2CUszn
+2h59nLgx+71/Jtan/S6/jJj8Cbf+//8fGbP+ByrUpRc=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.851144620506076, 7.907943040036291}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl2Hk8VPsbB/ATCUWNpFzLNeRSlqiQ1pmUcJOlxdI6SHS52VpUqhHViKJQ
+IjWyhmqKauxTKlOoKbLLXOVS2bIlit/ne3/+8Xr3Pef7PM/nnBnnpOnut9lT
+gqIo2SkURX5TXZP40WD+//ciJqVWVsyWoDMpk7YAGg+mr6ik9WJde/YiKxbx
+xwlxIZxVEZCoCHPs1M76wv46yY1VhkyKpXDPSwrmTCievwjz5PlaEb8zKZe7
+hRXb4a7pYTt/qjOp4mPX9JbC3qHxnL2w9cr+B8qw8Y+otAo1JvXpRl7xDNh6
+3toefTgqnDZOHOzwNuaqKpMSswxDyPEJAb5uNNj61Fi+EUy7cyUqSYVJCWee
+iLOHzQOPbV8NG/imJh8i51/wGR39DXP67Zl2ExZqmDuK4KGy0CYhPBpmNlwO
+7z1+i95Pjm9ZoVgD06X/nFTAvCypqtPjcNqU82J9mB+j3LYc+zf02FxeCWf9
+teN+BOx7LN+NAXP1b2Z1wBw9P2Mzsq6yoMUK/dYmxJ7WIHm+sFLKJvN0FoWP
+o17/ckp9GuZ1KKuTrST9D+TKOsHeha3saDKfVCcnDv7p09v+JyxTKKNVokb2
+T0+cNEB+xbQDVXALvceTBwuKFloIYOMjpUtZ8Kjt01dXYVbQ4UkFWPzpn/gt
+cPH12ByhPuaIXR41TPorz2w9C7OZVo1sWNBk0WoHc8celv/APFXHDx7RgmVW
+fT3iCZtnW3dJwP4luypekjyPulb262G+nA9tBrDvXbM53cRe7hNxykzqmYnE
+rCFYKDlTUwa+nrp8vzQ538O5OHIeco1eY6ENM03aDmvDaZmvLazJerpz3/u5
+TEquzrLQHx6lNkXfgll/rRIkwqLdU/+OhAVjLS7lcNemrtUxML1PP7ETtn5q
+sP0enDbHTzQV88e8CnnbAcfd672pDLvI8aKNSD3BX1qacP/3kuhz8Pr22gk1
+mNMUqNIFN+TqHJsBC+Ua5Deif2P2aXY39u+/UbMwG1bLNcgQEHtZ7J6ETW45
+0CNgzqXiuZbIg2nY/dAKpnEc2Yfh4qzrtyeQh4xdzfNo+OdvHsk82GWylHER
+zj9fFsCC2Uo+8f4wzatUUwFmarZUm8HhY/zk5wvxebP5274d9ValJ2aw4ZgX
+Dq8PwTsVD+eshxPsy/WGyXyTyjmKMN3vGtMTFs1XVe1bgH0/h2dXIo+hQO77
+elimXjZkESzz7sHM17DYJ3o4VgnznOQ7voV5iWvNJOCDd3XOieH+tti+k3OY
+lPK3BRJjxOn032fBDUaX41VRj39sV+UjRVyvJQr3LGBRoWFzMNy9YusRX9h/
+TNjpBDPrIobjyXr0Y0NHeK9WmEkxHPzhA2cfHJWR6dUCe//x9HQcnLaxR34I
+5gxbBtTDJsMaClOQDxV0OE0P9W13DLQRCxcppXDgrM7LocPk/EJFz69wvqko
+pRl2kEp7YIt5dt4wjc+HaVNNd2fAwq3dW0Nhrv2FpAG41iYucB1Zn8ncYIB8
++lfnTv2FeY3XDGjawwbbT0Tx4IYo21kuMLfgTR0LZttKLrWE+Vd7G2hwgqac
+/FzYVvt+ZLkuPkd1H05WYn+1oW0vjsM82SCBF/zs4BTVVTAnKHx9L8nzWNKj
+aTC/MviCB7xqMNmyVQd9ZkoMV2F+mfEFbQKY42Ox3xjmzHf/fh/OyritFTcb
+95vzS1ce7BLCcJpQYFILDF/pF8EyyQpdB+Faq/3fRWT9daLmLxrO+3mupA+O
+WfbILwnuD2mcqYT6QmkX/S2wi4mj3hq4waPETwcOKbqg4Q3H2KtTc+F89cuD
+0bB1idYaTfh6vMSLB7BDWMbiDbDgvuJwNUwXWqeEwvx1PmvayP59j1a8gYdK
+XZo/EZ/JFC5Ef4J/pl5thdnuX4Ii4Z2isFYh7F/DkuuFlcPkyzNg71g7p42Y
+l24nIRkMi0tWuyTD2tEVI6thkUdW+ge4wbY3fAzzBXs+vTUdeWnXHZIl+VjX
+KpaqwxRns7kbTFkqJivBtTeyxmkwbejS8m84P6uWZf/0D9y3wRG9PLiqpVU1
+GBbxs4OcYJcvaQqmMD+no+IT+rMtKjs3ro16F0dmsODwxyG7q7XJ90K1XTXm
+9VUd78yBR8u32C2BxWlZ9VfJeozLHr1ZmH/jqeWXYG7Lq72j8vj3UP8Ass7l
+vX7WJIf7SF5q3W2YRr1JaJmBvD++FT+D2bN1A6ThT9spyS6yn/PtVvfpyDX/
+jSQN/dEL9GYNySK/PTnUCpireOdKCUw3M59whx1SHC3L4CzmFXkOmU89ddEI
+vJUtFZABs/pUqndiv/V22qVFsH/mb1Zf4bQ61Z/P4Zi1I6KrqF+ra1FcTo7f
+sVPXGf1qB07o55N1KQk1dcyTtoSmcZWcv7rBsBUWfOUr/A0bm9r8ETkTOTLv
+aC0j/S3+lKuKPIzfKkt9xzziRxJt4bA33ePrXZJH+/EnpXDa5lIfN9iYt/12
+OcxeVrdHgeQT9zg0Bo7TWfrkyXzM83jNgDbcf0U+/BBMXWN7hKHeekWPQCOY
+11Un5qEfcz0V2QEtrHs6Neaj/+uen13KYHpJ+9MEkvees90JME+zL9UL8wvG
+9zw8BYvLHkQYIq+QL7WTQTDXPerbiDSTym0+6ncIFun2G4im4XuhPlkyDGaW
+nqh4JoXP/2TN/CTYePDJyIepyOt6R14R2a89V0UXXlC4ZFE76ad3aGuqJOZy
+WFY+A/0KpNirnOHgvOwQU5hZf5G3DpbZc9p9J9w/tbF6H2ySIss9AYsXaU0r
+hoUUI/MKOf6opusq7G/dWuKQDtMjh3NIfa5kxkgmzC78Z0UC+vNnL45IJnm9
+EWrsQv97q74nnYH9g+r+pWM+erm5D4vUez5Xrx7OX9zTsIjkvXKvwUEZzOP1
+xI3k2R+n6tsDr58VNv0OTBP56KxAXiY9nze4wazK+mdbyP03Y6RJgeSREW1k
+Bs8RufGfaCLvzUmUGOcvOFvfGKRJ7sdt8ZvhnwseqevDDiO7f11C/a1iM60v
+eM7tv19XkYZ+07h52nkwb6Hb/VjMY2Kf1XEOptjfzPZjXpOiqsv7YWZ/3uzF
+yMfY15XvAtMnTtz+PgXf11FGK7YRu/T4vaRwfQ8s37Yb5l4+n7x3kkEZbBjI
+CoTF0RvUjv1i4HOfbB1DrJ6Y3DHOoJhRTjX55Ph3W4wfjjGo8CevLrXCgpZu
+auAHg5IL0U+QRv9M66F/b8LdGne/GMHcQ4qmJbDvnJpbW2DxdInXFjh/a2GK
+oj9Mf+dxQhv7s+WUvp4mvrUyxvEng+IUzrM/T6x0Jv0h+qmSzxgKJ855mbsc
+/Xb3DRkFwsYP54e5U+R5tvanI8nTb9MODcyba9cxoU3q5Ry0r4AdPicf7SZ5
+Oetus5dArlZhzGzYweZr/x14NMaVyyLz6pXnNsPK6/dbzIZjZgQcqoG9lU7N
+Dcd7A/1eZ+NlCfL3QKGnA+8NomuihSowJR370R5mZmQF+KKe6GyUXwXeG3jl
+qVuj0Z8wtGqnIyzw3x+lhP77mwIvfSPPuUe3bXqLeWmBJq3ZMLuSHe2NfBzo
+y+pOwvRuq9LB7wyK1bX6+d8wd92z5shhBsVfq37rMCzYtcnaZpBBCU6m0slz
+M7ft30sW3xiUjOuW6kqYOtKXP7ePQSkXcMxpqM9MmP18XzeDasj8ariH9OMh
+HRH5Bdc7/fjwA+KmXzUxnxkUNW9akhTmYd94H3YEZqWcN3ck86VsOmyK4wU6
+3YwYsv76mvSjrwxKvNRJUELWDy+d09zDoPyzh1Lfw9yU2+aMflxf3/H2Wpjl
+2fqpAP0xrUNvFxCvrPCwRP/GhdsOhBH/9TtfOIT9vfJ/LIEp1sk/9Ucwr+vp
+Ha/QH0siX80JeYg3X3xrS+bZpfzZZJRBCVWUbpaSPN71aTyGva+frtcm+T72
+fSSCRWtlNM6Q9xjvZSXHYPom+l7y3kMf1nich/0c7hyI3wizjIpzTqEe/WGy
+cwl5r2qSGe5EP1lp70sZMMsm/NXYAPqzWTurHs+tLJ2j0a8wX0JXwbmzMFNm
+c1Mj8pURmC53IH41nzPYSTzUbQJTJgqScz6in6C7Kv857Au3sQX7563sI8/p
+FHOJj2stro+jt8dRYtnAkuGXuH4vX7vxibVdNsgXI9/Wjz8k0Q9lUM41SUe/
+vnnJTsSUlnPGYgZlbvGnVzYxNy2CHllG8W32u//4b724ulkL+Zt/riPvnRRr
+X15WKvovMIwJJG63dNMtwP7KBr/HEv+WM/3gCwbFa2qUuw6zF84z+CZiUF2J
+9rMiiRMvaivUo/77M2p7yPGV3llmrZh3cH2IMiyYxlc69Q/2b8oo56M+e7Bk
+x9RPmGfJticWsED3qhX1L+5/r2PbC0leJs/v2iEv60sq27VhdoFUWw1sbLjU
+9Ow8cv7Z0RMkT9ULL8h7EXuGa7Ulzufui5OygalQo5VG2N97irDoIZ5L2W9m
+jlujvjjWc9ViYs6Zd87NuJ9/NGoK8FxKfTBPHnyH/Wcvm7OPeHVK14Fy3G8d
+J5P+ICY/7JL///+DIvN/nXAewg==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.5990515496243272, 9.421161979599258}, \
+{1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.999999999996362`, 17.}, {14.999999999995453`, 
+          15.499999999996362`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.126447748763752, 16.890374170787496}, \
+{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]& ], {17.81512204377634, 8.004985304149105}, \
+{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]& ], {18.88748581947994, 4.835942983375933}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwd1Qk41GkcB/B/ji2PclTuaFzlyBBJizzvJmUljX1sKGVcTVJLRUutTIex
+SjkqUWmHlKOSatcVGylylKGY3bGtWbIlcobayuz3zfN45vk8v/f4/b6veRgG
+R34XJscwTCR+6Scjoz82hPnyo0kYQws59xew2sR5QY4GYbw7hr4ug4XlpoN+
+GqT2b9trghSYn1+TvFKD8K/oN84OhtMcVUtXwYMHTa+sgjnJU3GBWL9EN89q
+Pj3/TVtbIeqs7qkcqTVhbB4UCNQ0Cb/YukRUCAsfbxam4X71MwtnDsPSqVsF
+hlqE/7L2qX8oHMW3N76nRZijcxXY/nDak0gtH23CZIiGuwLo/u3q6X2wMqui
+dQ9MZi6wg3QIP3ZE8V4ydadT7iM44IAo/yY8am2jr6xL+O5OvvO7YE5nzx0r
+XcIEq+9fJ6Pn7ww+aYn6y6451V/6f9uooKhLSN+gncAIlj7Zd6NahzClK9k8
+K7jWRKLlq0PIX4IhVVual67qZQn6GfdTTLeGbfzIlJc2IQZFC8JN6f4yjbpq
+zHdZfDhlARzVK69gBYuZwNZ3uJ+5n3q5EPksy92Q9xvNw1hc5wDHNFzT3E37
+m5ex7x+8z6hEwU2PztNgoH8d+Q780FPRwMZ532iuyUL9tIqKwz5YLWE3KUa9
+Y2PLMUOYcdtCpDDz/IHZH1ao5/oQnM98vJ/vkg3XZnq4FsMJvOOreXCpflCO
+LfJvO9nT5QqLAtO2PEa/M3KZ3dawUHu6Ilib8Mtzg6wtYb7iiVvvMb+byenm
+FTC3cHbcEeQv29vZ5EHX/yTWnYTv2kSc3AVzPlf1eCLvYXasOI3uTxz//Rje
+4+aTTPUqanF+USZcUO4b1UvPE/dVHod9++McvsI8tZ8PkU3Yn/XId4zOR1yr
+Sj/gfe6maOXbwkKnwIhk3Kd7dY/MHubuH45QRD1PtpxvAXOqOC9i0O/Skfwk
+VXqewOlSH+b9qPQ5tJ/Oa/e6xBfz5msWc27SfIo9qiR4j8mCs/7hMEveID4a
+ea2sjHNbRPMKeOhnifqYg/uOpmV4n9dGI/Kohyuq8aLh2lhuN/2+JbicXWAI
+i9a2JRvBJ4736z+zxPqxXct52J+bntR/inrEa6QZzso65eoDp4UelnNHP01e
+rdvNYNaeMBMx7FVUf0IZjjpT9z4S8zgPOtvNWCCPWIfTSpi3pryzU0ad1P3q
+AvLY5CtRUsV6YcCuJD3kqe8wec6c7o/uG0H+fAeDsAxPeh+nRPsp3MO9fi4a
+Jmu5zZNY3zIkN5BD+2On97yH1Xvj6h7S9aOSMDHscpEc7IelKXNyzmD/rOyS
+1k8wP+bI8+Wot44J5eZgftZqBfMK9NMevoylCHPfFy9ho98qOyO5CaznXnzh
+cwl/XxpF6ZHt9D5Li7vKmG9x7yr9XGr7PnYi5ncxKMkLofMkPtdRx/vdj30V
+pEfvm95YXIZ8Uz2zglswf5RsRcoh5KnpfN74R5g12JgcAode1Qkzgrnx3t5R
+WC+vw4yIzPF9sfHamos6b92NzQKYPy99fAJ1VS1poxvMvf1mWwjuH+6eeqYO
+qzm2mw3g/q3+PI8hM7y3pFgQj/4vWQwv6oKl8vXNWphXqD7Xuw3mxPz6tgTz
+Vm4tk9G6zaSrtiPyUnnnHDIIixx9LG/Dix1Tx5VoP9WPnefpEf7HEKefrWFO
+jnjWt/CffqIMP1hYsZMVpEeYCXbVhiOwdMMvwT6oVwd5jV2FSfCBJmP4nGkK
+U0/P+887vgPvIXqjE9EJl47uzQmDuffWNEjo+YU2Y33o14trGNUO16Y2JnwP
+LyysKayg+xO7F9ZjPt6s7Jw0OK3FsdIe7ng0vWMLvY8ztLQMeXyoVJ3Wovmo
+DKz3RF5FnvqfWjAf1zL9zgzy5A1ZlMfBrNcWXh3IO8xcodmE5rM7UY7+/cfX
+bJaJluK+HetT/sX6+MxtakdhtW3Ze5fgvAOGWRFOsNRCoi2Av/yTo3X6qU3+
+B+U8lqE=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.109669593634097, 4.811165529975059}, \
+{0, 1}], LineBox[CompressedData["
+1:eJw9lAtMU2cUx6+PkoIb4mOmcO+1Frz3U0CFoRVnlAMR6cLYEJS3KFWMjLBW
+wQRDytpp9vKxymAOAQkiWkAIlTfy0kxQExQVlBHETthiEbExLoBT2ddozk1u
+Tn757v2+75zz/x+FWhORPJthmBD62uP7h8CSefboAUy4ekHSGgJdCSM73W+6
+A6M/y8t3EPjzVLHE8jNlaYdnsYbA9J0nvo4hlGM6yjt1BDRM6WjFjAIY45dt
+1mwCMQ4241QDZUvh9Y/TCaR2lyjWaijbBq1VcQTq2kLUeZ6UVxjz7yvp+e/S
+H/g+WwZMZ2WgxJGAj6XX4Z/LlPV7atbdF6FxOGVj4BHKvX8NVZ8W4XeLkz5j
+J+Xdr6enYkSIkRZVBgdR3n9opN1VhJLNuZMOn1L+UbXQPCRA+9OG7371pmx0
+3r7/vADvvn48Gu5LeSrv6OfpAoh1PtfWBdjXI3WpoQJsvXv3k/7tlJmUKP1q
+AS4VS5rTtJSbrtuu8QJEu2Xq3v5C2bI5x+oqQERVr1O0mbIqVFjqIYCXvurU
+hnuUbfXaN/4ClDcFR6TYKEsr436LE2Bk0dzxbkea/9RVafb3AgzOaU9L5Shn
+Dn/T30K/n1XuVStSVpWWqv8VoGZPbGYsoewCvMlPhDqu71sDT1nWd3vmoAiP
+u6qrOqWUm4JmGmtEyEotW+9htedvKPYZE+HiwYEzXh2U/cctkxyBnsK/XXqO
+2eu9pW90K4EMpcU/KZyyVv1i9T4CRT2GvfnO9vxUhw2HCTxULYgcMMopz3Z0
+0hPI87frRY7rfoMTl4hmKf7f+8MbZc8THvdXNASc3LSLx/O11rXDyU85vF/r
+pq9umQwc3n/xF/XG5lUc5head+589gSL+Z+zRjNv/2CxPqb4sPlhZhbr9yCt
+2pR/mcX6RrFHl6/sZrH+Qf9NEu04i/1pNGfEr5Jz2L9a97Kh4/Ec9nffjcSx
+bUUc9j9hYr5EYuFQH+aRVyeWy3nUT7Y+oW9HFI/6am85m5Vr4FF/3gWBysQi
+HvV5fFvO64ELPOq3u+yhy8sCHvUdu7DLlJHFo/4Hk8ZmlgTz6I+CZO+fdNMc
++qdcnfjS7wyH/nokyiILV3Lov5KL2o39FSz60y+3tfW0gkX/Zu1dNuyc44b+
+9nRvUVYwbuh/2ZHPCp8fcMX5kBl29VXAmAznhy5lw5YraZQ/zJdHH9mjDP4H
+xxO6LA==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.4452, 7.75}, {-1, 0}], 
+        LineBox[{{7.9999999999976925`, 15.5}, {14.99999999999251, 15.5}}], 
+        PolygonBox[{{12.1, 15.5}, {10.9, 15.1}, {10.9, 15.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.5, 16.4452}, {0, -1}], 
+        LineBox[{{7.999999999996362, 15.500000000005457`}, {11.5, 
+         9.500000000003638}}], 
+        PolygonBox[{{9.447677384685548, 13.01826734053906}, {
+         9.706811054955079, 11.780184249251306`}, {10.397834175673825`, 
+         12.183281069670574`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.015942703607429, 12.323799910437668}, \
+{1, 1}], LineBox[{{15.000000000007276`, 15.500000000005457`}, {
+         11.500000000003638`, 9.500000000001819}}], 
+        PolygonBox[{{12.947677384685548`, 11.98173265946094}, {
+         13.206811054955079`, 13.219815750748694`}, {13.897834175673825`, 
+         12.816718930329426`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.984057296392571, 12.323799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{11.5, 6.}], PointBox[{8., 15.5}], 
+         PointBox[{15., 15.5}], PointBox[{17., 5.5}], PointBox[{11.5, 9.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T18", " ", "P2", " ", "N36"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdiei/fifjghgjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdiei/fifjghgjhj.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.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489721941058*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ImageCache->GraphicsData["CompressedBitmap", "\<\
+eJyE3QeYZVlVNuCyq7u6Ok1PjswwDDPDDBkEBBEwAWIWMaAioCKKARUVVII5
+R0wYMQcwBwwoiphQUTGiYs4Bc073X+8+6zt335rG/zzPTHXdOnfvtVf4Vtjp
+7Z78kR/wlA958kd+4Ps++cZHf8STP+wDPvB9n3Hjo57+EfXR/hvs7b3Bjf67
+cc+/N3t7+d9bburZO7n53//9383d7373zS/+4i/6ZPODP/iDmzd90zfd/Pu/
+//ver4939h45fhxsHv/4x2+e+9znjtf+7M/+bHOf+9xn8yd/8if91p3Hj/3N
+3/3d323+7d/+bfy2fHZ689///d+bf/zHf9zkedWrXrW55z3vufmKr/iKzSd8
+wiegaPOyl73sjbqJ6nvzL//yL+O3y/ozTfzTP/3T+O1Yf9bdjN8ecoHvXt6E
+/8M//MNmfrT1H//xH3dfCL++OaG1D/mQD9m81Vu91eat3/qtNy94wQs2n/Ip
+n7L52Z/92WrXOyc2z3rWszZ/8Ad/MFr5uZ/7OcT33/Y3f/RHf7T52I/92M2/
+/uu/NoWHmz/+4z/ePPaxj92893u/9+Y93/M9N5/8yZ88vvvrv/7rm0/6pE9a
+Xju3+aiP+qjNl33Zl21+7dd+bfNO7/ROm3d5l3fZPOc5zxmEeoqEzZ3udKfN
+05/+9M0XfdEXbV75ylfu3bu7/ZZv+ZbNV3/1V0+MObP5wi/8ws0rXvGK8d3v
++q7v2jzmMY/ZvN3bvd3m677u68ZnNfjNh33Yh21e97rX7R3v7/zWb/3W5nnP
+e95QCA95feRHfmSYufmCL/iCzcd//Mdvfv7nf776edzjHleMRaO/f8ZnfMbm
+Pd7jPcZQf/VXf/W+TZruvvmbv3mHtK//+q/ffNu3fdto8ju+4zs2b/M2b7N5
++7d/+80LX/jC8Rkp4GJxs79zBY5unvKUp4wu3uu93mtIiS5QNRL553/+5/Hd
+L/3SL9189Ed/9OYv/uIvxnvv/u7vvnn/93//MZRf+IVfGKx927d9W/3u3b4r
+/D/90z/dvM/7vA/qN6997WsHx6666irm0AI+2DzykY8cgvMQ9lu8xVts/vZv
+/zba+JrXvGbozX/+53+uo0X5Qx/60M1nfuZnDr1hNp6f+qmfGkL2/NAP/dDm
+8PCwvlNjKZ352q/92s3f/M3fbB7xiEdsvvzLv3wYyed+7udu7ne/+22+//u/
+P8z91E/91MGombkf9EEftPn2b//2zf/8z/9sHvCAB2x+4id+YvObv/mb46uY
+wDje5E3eBNUt98uHGr/jO77jKvfSidG1d333yiuvHIyke4SEtDd7szcbwn3m
+M5+5+fM///PNl3zJlwyGVxv3afIABeuZyWPqn/d5n7f5r//6r83DH/7wzUtf
++tKh8g984AM3f//3fz9UifX9/u//fn/nykGWpsnxt3/7t4dFGR4ZP+pRjxoc
+/p3f+Z3NtddeO/QIKR/3cR832kM2c6E33/qt38psBumlN7ct4r+hRatV8njX
+d33XoZEA6Ud+5EcieR/9xm/8xgogH/ABH7B50YtetNB47VCYN37jNx4m/E3f
+9E1jTB4mpUVsCgb99E//9OYJT3jCoI+SMUN//8u//Muhz9/93d89aPz0T//0
+zYMe9KAhfaIsLYnkKVPj8F4QhHS+8zu/c7Dr3d7t3Ya1ftVXfdWwepJk8ST/
+/Oc/f/MN3/ANyOjvXj7Q2OCjAaUdg7VMDPkf8REfMdgfEvVDQ5iU7/oMAr3D
+O7wD0UQDPvETP3EAw5bMuw6NQAIJkupnf/Zn75BJmszM977xG79xcCskfeAH
+fuDmyU9+8jA9Dw3wPYqNo8gk6b/+678e3Kb8tInSkg6ymS97LCXe21GBM5sP
+/dAPHXZgVE996lOHCvzoj/7o6ApnkNx60MO5YfMrv/Irg3NI91AEysw2KSEP
+iUPUq2BhgBMg8/zMz/zMGA4AwxZgaAjA7Pd+7/eGy9CftrX1lV/5lWN4ZSSL
+ItxtVoTxIDGK4PniL/7izb3uda/N/e9//wHVwVccAOXlgTZv+IZvuOIxKDiq
+CDj8OZ/zOYPUgv7xE3eh2ZOe9KShw8h9ozd6oxEgwNdyPXtR1jtqwU3DC1JQ
+j5+h8dnPfvb4DA4AV3aBNfe9730HrJG8MdIYWkKpKWU5o9EOjXr1q1+9eed3
+fufRBqgCkeyIWGkDF0Wpv+Zrvub2WQEuG+AJoTyEcMMNN2x++Id/eNU17uHq
+q68eaMMxE2qFP8OCCTwWX2awohdEIjieh3948YtfvHnLtxyx11CMu971rps3
+f/M3H9TylEZsdGwE9biqDyaGeiMpfb9vN/9Zn/VZw2d7kES/rrnmms33fd/3
+jc8wBCAZxqMf/ejBPAogwEs8RrfEH4QLlEugC/XnB0aRjVCtMHlQzDToA6wT
+Ylx00UWj6Tvf+c5DhX/3d393xI4LibcNHaOneeCxdyN/smDpP/7jPz7ICvfp
+kZF7cIX+AqHv/d7vHVZMJ3CFu4KP6MR9f9Mm32JYsPi6664b4EeivOsv//Iv
+j/5Lz3dA4B6Dkoc97GGDae/3fu83QgC/YyQtp4Go+MM//MOhee/7vu874JZ8
+GScj97eHPOQh4zsoYUHeBbu0T4wQAQk3UPWSl7xk/E4/WKZ+WCKLolva9eC4
+NotDe6cGzSfXIDEPXSIhcesyrtvH97TF8umUWBTH/+qv/mpYSAXf47vl8wbn
+AU9HbgOAuAPjNEaWyZPq1/sf/uEfviIGl3G3u91tBKAeVgdYeW7fpcOkyZ4+
+5mM+Znht46m4pgPahVb0PfjBDx647e8+gzq8Ihl5KDXezrRSbvRHHjzpL/3S
+L21+8id/coA7e6SBQTdaFO0kC+jGMIA0OUE4WsgrkxM+lObv7UDHlavCap7S
+HRwcDFDiH5KkCHrYH1b5jKvDWp/n7/yH7yCl2lzs8GBQlDA8EiktW/58YvyZ
+IIMCJYSO7vbX0Hj5bTNiBco1N+e7zIH5RpCUA+R+/ud/PhjoOPnUYBqIFQ35
+z7+ZoMfoahR7IVsfc9an7UF2DbHIhm/zAzWCPJqCOGEOhtGZaYgjMuIF6Eqw
+uv7WenRwB1JZ/RqunxjOYzaZUq+9/K0pHbLwn3Bh+dvpwXzAmAc53o2J+nuF
++WECSvlXqA8t7nKXu4hIOve8c3eIhYDcG/LO0ue9m8ffLt38wA/8wOBFHijH
+5thY+APt2AiPnxyDzouBiLV81SOaIGzkI77ne75nJPtcWkn/fKsISroWsJev
+wNl73OMeg+NaZOFlxfmKIXINZH/1Mq6Hjx8XxiZqtQ0/Lxu9wSs+L+oCjyS9
+onZ+1gPZjcX3pWse6i1C4B22qrc/5C4O9NsbTwO/6aabVuFxnk984hMvGn8+
+HHJDArZy2ZGn18tiHtqtaJUXTiKIwkKZtEJzOHBpCBfZJYtBaAlxqUh0seKq
+kV9hbh7M54+5gYhWCCzHR25ESwggWKDH4XqoCCsGhWXRzYqzI6gCaxEFUxKA
+gXM6gNXGK3kuTHpoSy4JA6/lER4IbVnpuR4sCKNxHt0iy8NHl/alKcYMHQO0
+Qsd73/veWLl3Ub8DZzw/9mM/NoScUVZTXcbZe3DrC2PjI30l4Er3BeuS0ugL
+vZJbG6SYzQNz5By+CyaDN34XcBMAcvl6NiYelNqIB4wUSRQDluizmN+6fjBG
+LQrxvliREyhAPzP+fHrwWddcplc1CZakJ2RJ92o4b9KtSQ/EXXoV1klHiqdp
+zZ+F1Vp6+ctfPrTDIIEHh6enArsd1l00IIE+0S8w4vGTkLm46BLhCzt0XAIP
+l0QK4n3WhUMQFxHQBzYYguGQkAcCczYqYku98cR4F6ehnbEV0XvLoE5tPu3T
+Pm3Yl7bom+jBZ96nFCT28G5HroLLaCK9cplrO5hByQyJQom8VVAkqNiu7HXF
+wpkHtv6pYsTiWRkSqHQ5/1aSi8dnwt8Z6YGPQE2VjWSVtwQolE9XIaFIf48W
+HXdLbDhYWchwtXDPVxkpYyxgeLt+XdjjdbpSYdLAAipK0jG80oarlvHcdfzY
+HzjUFt/03zICGRKO0UAeGoHuSF7kAdJe9KIXjTKbUF0gFB8PHWUJ+IUK36Nr
+WA73jFmAxWlBMN5THwJAGsVhS8+ITaHsPVtkRmOUEMx3jErxSyAGN8q4996+
+OQL1uFR9Uie8JxsBLjH7vcbfHDn/ejlylzEKVpMoiRiU5nCE0nhgNG4Ymd7I
+Q/hulBSe2CgqtCdO76Lc77QDBLE5I5JScHW4AT6Wsp96/NnBRX3jME6AEe3j
+ampP7YtI8ETbgVIUVKK07OS5z31uM/Vw2CIt43U14yEYTC7hv0O/FgyJfD2c
+r9S95H7NwscF9K8b2g9qeThv64SxMkKdwBbjB8UM3PiNi1aBVN/DWzBN9aUk
+kjLOxIM3ErqS4o47V0spwFmLiQycQSeVIkOOGVCePXt2aAfMFddd1KDqHTLg
+jfwnFSrm3K+7kaV1WLh3awMDluOXYfA6uiMWWHS3/h6LzpRHvqcd4qessA5b
+YGX1sXftzNGTAy6JJTG53yUmpWErB0CphEjp+thE7gd/8Acjaf0MmkPt0tZ1
+EoIsSYkGi/jYL653ySVfZTZcRylefbXMpT4jJKOvJvcuaSYyVeQRCtM8d+4c
+P3dlN8M+ugi6d2UrKQaxeqmaFFB4e0uPHoqwQ/LHBfIht2Joc2iZ1GFX5j2u
+bDJEVhRee/6jc0X0zd2sryRj4F51TxZK39fN/L/7mvPk4dxTeE/URFOpgM+S
+OUBjboilRnbcFO2GBAlmUS6z4xdoJQvw2TOe8YyhscFWf4cKSiZUzHvUBgIV
+yoT/PlZHyCOzqNeual7BB98uitvJHQxEfdrTnjZAgmeiSeUzFj08v8MAAxHb
+ItjDzETczFevMi1NYVA1UW5x6ZYIuSYTJumWw5FBU2hMEU++5CUvWbo9vtNt
+ocox75Qr8LH4HixRW1UhbggcgX09LOloq+StwygVeuhdh/1D2HBJbBMOkxiw
+RHwK8iyCtOB5PCNpM3as9sA21qKsc8kll4xsx4NMEjXRwMt78BdWldeLxLiH
+22+/fdVHFZCCwqubdSAGVJS+NOtOjK/wlYoY0LB0pVHsypVBfvLhGQmLgOP0
+FOzzzXSTweIC8Yjy6ShximXoIO9SQcf+cET7Q8X7Wec2gX5TXw54+YzhYgxE
+C9lUlZGr2QDXct8r2dpI3sY0QJoH04WzjN/39cMhINtP8btZIyaDdNxDOoGX
+ThxrsoXbPb+5Vj+CLQsBk8qcGyYBvbjpuH8plNZFYDH8CKc0bwVZACDQoP8L
+hxaQRTkAlmWKjVX1pNc1kswkkauvsmtds/lqeqFqAUNhlyibyG655ZZRb6vP
+96IuU6Des+PLLD6+Eyf48u987+x45+YRjpknuf7660fNmSowBAEJD8WpG4Xk
+UN2MIyYzn1FoKBo1E76ZuEiudMUVVwzHi17GhhOG2KHYkK06KoetMFZtR43Y
+IxT1WybsqQ8/wMUgWfGhuspI9IBDsAiuYyStFY4Io5g5jWK+RsIkyQymmbjK
+XDOOyC+MBu4J0yokGyPxnr8zMJoHA2ktSPG3VBPr904lLu0B6Tm2Eo2BgFm9
+kGAEysqoA06d6RxvU4LVIud4EdHApf1VgxFb4Q0xwq/6bHa3eJAqUUloR1NI
+IVVU+oq9/OKZppbvRA3DWszr+FBc3xVvVjSwDOy60bOKBUo9hI7dREJ5sCvJ
+uX97KBSxkS72UkDG7CdlMiIeLKkgBycaONnDY5LMS2WDspqRi+ZoNwXerFFZ
+k/Bbh0SR28tgNhdffPE6n6iGJN1IIMrXMFV+yMMpgFckgVyc43hwhhPxCFw4
+A7LVl9jJcAGT73JK3DuZ0yo2UcPsNP22lhHxmpejc2lVwLatkB4MK+d6yBFS
+Avqi+F7dBKAFbzrlOFkYVZBHXdZN+By/8vBwpbyLYV49+ICVeoAZ+GUmRdPG
+zs0QK2fIeiRClDXWRUFpEjQlyvBJMlDOMjPXtEU3Si1Mhx9lxBEDFwOuTKcw
+eKB70KPUne/SMOIzSt2LiDNKIJApN4+2SgwZJV77Cl6ayzLK2267bVir+IUW
+QD6j9VBOkk3di4zESBSS1CEz50qh628ZJcdGp40MgBMf/ickoCBgRbhklOX0
+Uve6vQeiJ2Uz+qfmLcmpnqMQlABrPQgGxQVoi0Icrl6UR0WMJ0t3yoMHWdiM
+SReTM17f39+nxOEW+cXUeVD20bO7o3TAHqBokjLCk1PQAQ/h4hxT1zv9kDSy
+idKRxUueHRGJqR3uicsnZ2hCvhwqtUOKtSkl34Meo2FjKhCibR6YRUUKBDJG
++ME5crS0Q+RQX8sYMTHzcf4NyvjHzEnQCByc9TxK7PFvPDFXRe9pC+GAq4K3
+jBGnTVNhoSa9qguaocCuXoDV5FhfbWVY5g2WMtoTn/jEobb0qlpboYGBBkMx
+F9dKvxLL0cyuh64ZLG0nG9W4vOdrrVDteE6MfNAEF9bRQ7H4Yf+NteC6wBmf
+iuNFkhmZ00PrSEK/N99884BliBZT4G0qJsgI2PM85SEYKzYuNY8zo+ckXFRF
+YQnYWSIX2BCzVQjRULHEbNSmJLeOEDX85DxCvhOUiDBhqgL0MsJLRijJaWmb
+BognsvSDhEna7+ICayqhu9gCLlinUdxZIwKoqa3NFCVMk3JN45kRtCdq9pNm
+EboYM0U74PHoRz86gPGG48fxoU0ePrWw/1h/DK3oJo5Ny9d03sxrtTg+TJwW
+YXCBxPXNB+ZI6zl/Hg1gSMUpG5Nlg7yehxZZ1sJj+LdkhsM+32Yg/DNGlXlK
+KxYnfp45/s/vEuXi7+mmLDm2ILSCq1BmALQD3kBsRR7lWdLxGZyJr9aTBY6Q
+G2f57eLsShnNAoE0AmV+0lWTZ0F/WkCXK4y5bGb+MoNJ9t4W5SnWeOgbRORV
+k6rKhEgEKqqVpzQC8lANaRR1RAzEwYlf12Kjc1BWuh/zoR/ep3MATiJZDMvs
+JkOHf3JLalrGtw6akQK/LFtLFY9LMww8V2c9c2ZU4A6bUgYKqGkAnEMxyivu
+XynFEdpRGrNSinKTU8pY3kdWSTt/htT8vnSGP6A81dX5tg0RmVU79IsOsUvE
+e43EtXrs2LGxZLXFc/sEBz2b1nHl5QNxEgL4L4sKxFAJhFKzoDTQGbB1hjlM
+X8Bn8NX+jaPZw6H5ghv6GL3JGo3q8tqmiLq1wjd7LlqXm2ARW6QwJIIKggcw
+Bg1IJDr8Sf1tqcmcHoTQmXkGFa7hD8RlKasQDwc/xNOZT/JkPrMUP4QiqrOH
+lVBhPG7L7Vi+8ZFAsmhhj+pPr3se62oKvUKoejvxB/OZI8uWmKAI24qNLcPb
+Wo+JWkVGKiaOVT5a4P7UcGi4Q45UgCGLLskHKGxn+08NX6otuh2COT6BP+df
+1KwQ7b0GkFbs42Owqa3W9/NqYoXNWnw4GBadOXk+lISKxVmZAViTDiqLcEDk
+jCqm0c5qrTFZBnRxS49+sFJPon0oSdDVRYCTkooFRWjVRYgFbkzIb1c1f/GL
+RsIBhmq+JpSyn6w58bCPuEK6Q2M9jF5cW45+pRRjEhAqMmibkXAbxcsrZikf
+DAmQPwdBpSw2q7cWQi4egmaozIKQYR48kGwSLLMyXi5MZ5ohLCt5ypyiA9hh
+vAAqIUQCV4BWNr7qQNaIzzpAcrS4SwnLGM6PPJHH5iV9BVygELWZRtSdOMg7
+BMs/l32tGGl9oWKIhyKYFS5hL9xcoJes6QoOCsNoriYuburokrCcUygGXNFi
+Tp4vcxML0UqBP61MTQyVFBt1GETocCPBBWu/9dZb12qeDNquiAgbgIjHIYbI
+UD8cEIWpNlrYt7fKwQlAJprgOSF3SmeUm/kxEIrd0xzZv+AjgkW812iV8pNB
+IoISCAVMFEfq/s5uIFxWagiq4oy3KLGEyImPUuBmZ0IDZIN4zrb4fHlLv6dm
+VyMRAxg3JeO7PAxMpY+e+jpsXiLnpQuVI5/JQEA9QFsnA7bstZqDcmUejz4W
+xee6FSpLSViIqhC1ftnLXhZC8UGJLg+1JeTMZnvwFOEIRbA5hLKQlVB6aIk2
+dKWLFjo95jGPubTV1Ne5ceLJqlrsVPTeKX8cjB6Et+yJCVOE4nL0wHCzLoiV
+iwAKuk/1n40DXsANzFawqsA7YsQgH20nzU4Nc6EGrDLwCyfgCDVQfLq8GY6x
+AEEkSJ+zrYJs6rNLuhv4yFEWJV2NPj1Ezph15aGx/BEOE4hMsEK77DUCk+q5
+8i3CqHCjs5TDQWU283gIUFNi+ur2TL/G7rlb8QEATCJBCMWIEMvG2XXp30qs
+LBEWRE9hpx6YGBjG4sKLpFJYgNuF+8XWaj+UYkTA3qM97XDrhXY7Lv2ONVHY
++YQnPCGiVy1R85T58jDsrxo/3TTDpOAWPEIjo8AdTomRVMsJWsAQ0jjpxHWg
+jsn6WvwbLpJNg/YSfR4fI2P8rLZkFQVDIztZ+ljohh1U1qtEBIeql8P+M5pT
+COLuiafGEvTmEPDWEIplJ5qzRqtBmkjAwpdUO8qEzvS3NZjEodg7wxkyrZrL
+IixC5AO0Cj7lsQxwmQteeHx0shRzBI7xB75bTArt4QZELQVO4Y7KC2YMDS7R
+wJ7+3NtRiSUJAoDM3qMYKuGci6HwCFp4RONi5pLW+aaZIcrUwFoCDuPiEumI
+RKikGTgAT+IBKDbP/4Iwhrid8FqmPbnQ+vq6LA5LyEramtW+rI/+1KBPNWtw
+jL63tM/3WHysQC/LIkplkgKoE80OukJpyUaDXBfCyCj2TLbMvqLylShshGXc
+YAbFG9Dg8lMhilITCrasYjwxjM2MC1BVQK1e90IRFDcGFOEs0yEQ4eJO1nUw
+DFEJk5JIt5UwV9M5GBrB5QBIMC7wrJaXRs6s65WIjji9QkZCCpkRIlR6t6t1
+j4/ASohCB0tjUhTWlJHDF6iAoHISZ5uBQvTWp7UlNkTSJFvMzmSE0RuKUqQU
+la8435whfFEfRWBXjKDnlZp7yyS40AGUlTJlylhOQdf0piYMMksHQyCb300W
+jw/WQGbIWhIOgSwQV9RNZfUKchd3L4hLlE/XeiNeamagqqsjWS+X+iPstFg5
+KjTXH2kwnlM1Jib4KH26usVI59l6AjVNgGDo46siTYSqEl3W2ktj6Z74GJDx
++zwvjr7yla+M9oocaIdNUKVXmQY2xJ7lWSeRGHQSff9ZkRy2QFPhCxix+E1R
+oJoLWyh4+/C9TNwajJyRSWo6RqFUE+pAD77JEUrZQp2aaVfkV+p0Ecouu+yy
+sSMy1DFPMxScoIRfKaZ4EOoyxbJZ49S9BzQB4hZqYG6p1OK67hLTyYoRsBOa
+IJkvZq/Rb3YubFavtgCY8dLNsrO8CmXbC3Q6fmbIlqlygtn4Ruuphif1owpK
+ml0nRuSbeWUhIC082X2IzrC3WNp9HAxzgUEe8YO1uNXmQVPLSakpYPfqXA/H
+gJk1DYwPy8xdGWEGgEChj/GaZpC8g6eUOX0V5xW8MgA9WRyViXHZegYAorVV
+hrwOQHka0R44zBpL6TMAkMBWgFP9eafYu0SLaqbRmooG1k0biE9tGWd4XBrG
+7BEhBj9swqSPHUM1Ri1773uRyVo79/2O0tblFt4jFYM61srFXSf/lv/4Dtgv
+X7QyCoCzZN+lFfZ+h1FyqEsvvXTYZxiFA7Y0p+AgQq6sOl8R+sF968szLNLP
+EGIp096UVc+xo5cv72W6gdznNA7QcrtiQsZIluRbidU6pGxwMiTstuUl9MHE
+EydG/WodElBUi03Myf9W0j+rC/uwHLkFn6kb0QWzEjqldwKUlFMEGmjiIU3h
+BFOsUa5LSqRSshE7fQJBBCUOAYAKyLY9pX0CYG4WYDN1OXWUgDB3N/0vRyvg
+GCEbIcHR7nJ6e3MJGbSnUA6wQb4lLJEYKYgFt9Byct1izzRYjVKJGpGAKDGV
+d0yZKvr4m3y9+svMFa9CUF7RDLKOT+yi6/NwkC/aptOUhfGrWsgpk4ZiMcD3
+iDbgSX0vI8FtKixWOZg4oJapsGEkqjnwgMe+flfocJNfKPRahcIlUTWUcTEz
+XooLvE8Nb2oKs49IUsj/YGIFPctXzg3XTAsFAJgDGAAl34I6aCfMU/CRpqqV
+JE8j76RwHuWc4nmMkQH0qorV8BhZLxBZcQffGIXC7slu2iiFM6gVS1HN6i6S
+FgdK79ml/4ilIrcMKgusuWjKxUwNTrCX/YwgAArJ/kFIBkXKmbHxiA6e97zn
+ZVBEsqso+6Pkn2pxBgWI5S8FjOugUKpuYlD+M6hSvCNCZzm9nmW1GpKgWim/
+metjmbQ/ugYLVY/p0V0nlbewUsGeRRXPmpqL1hXsguOsLczcBsakCCesFVJg
+aNGW7nzNpM1mglr4JTfgAuNBNO0zM16zp8kC4VgnhgnstNH7c/aSl7AwBs1s
+el/rOgyZBIUVDye7FsJQavbh7z4nOJUc4FOsDckMuMOJdRiSqF6ZtLM0Eme2
+lry/bkjfTCEdSRkGpTavBcNawLf11yhrp7mr5c4qFLVidorTs1rx/1KrgvIW
+8sHgioITsJGjULvqNlSSKRCgF1FyyJhTDzwsuRh2jESSshiJVIdnKWGnOcld
+HzqzoqemMsN+vP+vsmQ9rwi7wuE7dc/qOsJCxCrpqQBOgMn6pCvyq6y5xOK5
+CuYd+G0io6w79ArneIXTp0+LANMiW9+lbcmr6MVML+BTcxc5V25y+67MzCBD
+illNaCnaFAWiJgy0fcAqsxzTAgoiM5lPl4+GCzQFVnnh6RY270ozhfBe25aK
+tyu/JQshBVyabFNIT7cAn83CiHyWkLcMYh04OTNQhlVaG0EBc47cQ5ktGysb
+CoViCf5fmUARwoKLUAg+ZRfbmbrFE0pn7PeYgT/MynuKHr1nrZm6SFYQe+ON
+N6K8RZPVC8QA46zYLgeYhmbridxnK8vwhfnyDqHdq171qrhNCgai8ohjSs0z
+iQqlJO1K4WZ6rHYBml3czRJLTifzz1GRzLVKamL+4sJ4lRALtLo2tRehUFqe
+I+U5FNZAQ1XW8knZzSRgmKiZClXKEqo44SwNSm9k2YupVlnQIDCKgrwH08gI
+nB8RBD1nbThZmhIpA+/4qnxG5/rwi1UQqWKbQC4HEkEQLyWTquK4kLoisoVz
+yz5tLh60G6YqhYhcZU/gphhWXiv7FxiKyGnh19IxdnB2kvYi8i7dMYfEM6jL
+oBWuVC6YjiklkZkRYCeYgu9aSmW1zDb70rKzpCTYodz+CPWTwy/H6ax4g0GU
+xHrdME2rfVbGKqI7Itn+mNoyJgxPIMAksQiGsYwiZS8jUZNCmj4hO7FTSE6C
++JFYCXBGIp/CYdsr47x9VUBw6tSpMWOk9HVT/y0HOhAgsoTP6Zpu5CQr2YYw
+G/xz6MpSlk+V4l7UTVF7QZPV29b3lojW1E8y1GdOhJk5O00QitcysfCeuDK7
+e/9unkjlHt4XMpuKyTptlEpwiZVemSnOviU4xlPavXFqakv1IMuPVZPv2WIy
+Kn0wzXJi6YJv56kYS59A110spyhwlZqjkMwvQ0m90ciXIe/dq78GpoAAH85K
+yCUMI2YM09SyNe7kGAmxK85x4AyOTeLcnBaxNGrk+wIC9vHSl750L7MROMto
+kVt/z6oEYmYvx48f9/pSZbx4wBa8VS7UK0XHGzKbizWKN3oFuDSJgZR2nO3W
+2YKWKee0hky6gQ4IXuZ/r10O+RJ1snqEXIWdYSxGC6iEsznuCj1QeVs1Ozfi
+PbQD/xwKJtWS2cGhOHoIZ5w8d/REKOzoFBSiQ1Ek5V/Yhft+W7D2khH05Mw/
+Dz+MD1kK5xEhYLMaqf48TIdimcuNH2BhObztTNOTcyPQY8KEb77nzLL9MVSG
+Xs5tFbj4zFfM/RZJeZXUUGMiIeEcDpIkKErqTAOMrEKkuEkolig5pVXMtTtN
+Lb+YGfsTQ/Rxjb0xc0kxZFLFl7bhw8EPWXeOG6PJDE7uO3ambVbHS722PS/1
+Aazc7rQ5ProQylqUVCLZUaz9Edz2Qp2VS1TRUmucqmjhHuPj5eBKHKEnatry
+irKg4HlWkCwCWloSZyKbly9ADg4jSRFAdaVXRKwoBVtTabm5e4bbWf/EPQhL
+X/3qV6fn6fCUtees3GQshUphEJtIeftcv0rfIYqQpJpqNbpnf0Nw1ourV5Zy
+9tIZbC0FuHsLDowxpq6JDujKQowi93SPJsu42QwQEAsUhs8FuazUSjwg7Ek9
+4qbuDb81QTUoppBHdomx5cbTm2iJ5rFSWsUC18LKsv46IV16m+PPRfj9Yzci
+SuXdZ1lFVZK8vekDKTnJyRPTxsxyT6f6NZznJHkbzDKUnPhQOJioYs7ZM7M4
+5+w39WeYuzMXNeb/6w9ebJRuv344YieqCV25p1T7INXLX/7y9J1E20Em8yqF
+JNpHeDSzLyzlD/SyWW3/+KiOEDah1VCCKBhA/iB2nghldjSpcCsQwNwzux9j
+mBPfbAIjht4E0Yf8HB92JqRiTxUlpPdMv1Rys/ZurDCOgVRAnt5FWL2s8oIp
+dnqfg78+aeju/ac5N73kyGcgPfunKQlc65hwZH0UWlXx8v4eF0PIc56b5BKY
+zGf3JrnMgavQIscHZDKRQjhRJe2zL8GjsnTaR1ef/LK2T887PcxwE5Pm1C2/
+pdqd8zlmjs0aFMUmBF0pB2eSVYqgntbTQ5muRRUKhEgm7kXH9bXIrbO68VsG
+N2d2R5dIbxcnHR9aJN4R21Swnh7xj2/VI2BkLWVA6XHO2tJjsjbY3xnaAsin
+hl3n4AaIYWo9AZa/WUkQbksQk7bls9k2wz6zqEHVDIb5eK+Pp8n6X1ISUUJ+
+SuerkEIcghQjKX2+ahIC8GLO9dVrukOePilcOqRCjAj31un1U+vMNgEAhKxS
+ygmGNb69bKhnm9RDcHbbzLaTI/jm2/gzPdEgcZOv748ZkxPrJg3EGhcWxfOS
+RhK3SGm23bv0Z6A4B0zMBaXsbQ4fGZoh0dqs5/M9641kqYrpZYQJIwVg7S/W
+hI2SKMeYeRXmQfoYDpzMLtaQAZJCRrjL1bJlnGObQF4hRmxoUbbFAgkPeG6s
+8VtCTRqmOmhNhfoauFsgfIWsVNG351wsO6py8iobZzngm72KeaiMJFxhp36f
+K6fkqwAVDRO0CN779JSHNGEGM52o10eDL/vPqY9S8jLT5/8HY7EhZghNlQ8V
+gyqoWP68TBmwuO0+2/31aAEd3q+pmQ/rqwHnVeyE/Gbf0iPtMa9EfDJPGlbw
+eth/1iP3O+9/LRQ/wlxJHqbNe97JXjDjjOpF9heNxnOaJdNFDExniIYOhDhH
+EzJkKeEs2SbPBBoYTx3ONodF5upY6HdOCZeRI7GE345RQLgNqVxTdXmy92jp
+XWAnVJ33q7LponAc0LV3al1kZLOYV5R25fZm8kEdWHvD7lFRyLSZ95Q5wdna
+1BJv0XHb9bJKwYoMPKi/newe6RwMyvS8WUgsovpc77Ycs0qA/iHqRS960bpK
+lZfk7HnMRP4p26oKbM+dX5bQKpfhPh1WfTt58mQ0BxrSFDnfwfj/MlGP6waB
+hfQZhSbzD/tNGQGti/rgY1H/JpMl+YgfTuAOIn0N4pZHOdVIpZLrVTER5MRK
+TiWzhgC5zD4n8wBO4lZcycEBxi3uFCOe7WZZT3ZW0VgYL2DKHm/8Kt7duMtt
+3FFW2C5iOjXkSlXoeDyhUnU+V6TNkZCyOYWp7KtFvGpULIxWlqIfjGrJ4UBm
+OW32GlEfeQ13Xh5krJUuF+E18lPq9xoL8pnXZKHZ1WNMQEkJ591b/qFYrqF3
+EigUeacjf+4VykOvi/PLcaZ7WbKdt/IIcqQ/yw0AC5soGtHS78xBchEUWKxb
+SrtCCNtGeAlpDXSzBbkPQVvkuOy0JMfeITm65khzWCJDFVQhPoiZ/aVgwuTa
+OF2/2E29tJPlHuxhMvacgoWF7D0ayGnRfwpcr/UpWInUeFowSdWPTWOhlMZT
+xGYBq4/jNNAI8sjEUqGwRoAjDrG+43H9PexMkShnpbZZ7L1jv6NdOq696DjS
+jL8PPEkMQV36HLF2LKcGu6ATknLepMiYdvZRh3tHdUYbUanq/uifhTOkIpos
+VvZilfdoFpGFwLdd8OOaNh/jvTUE+WySR5a8fEH/iYI1Aq6v40zu/VgO9dv7
+/P5TjiyFxo+bmjBH8tSnPnXvQcvrVzaNUjkAyaJLvNn2pvHEYI/vz/CAt1WM
+zwbio1YjEXrYNE5HZ9ndP8Dn2Lr7a/yrDTDbSwQ0FoAwMIrFMZYHTzhGkbVW
+wfS6Hnlepzev3etnpUTTeMK/BgYpnCno7Qn3y343Lg24BOZzqPlms822cwKy
+VUj5Lk2yVINUr98dGWmxZ75ZlCC7rCghI6NjqDN3mJGBQn5pPuZVcNiniq4j
+o/6CTcgz78Yw0WqOJd8F1mIyE+YZmejR4VbzyHBTxbr62TnOxdHtkPD6WXuW
+YxjMc4mVqIawobq/aqKEzJxklpExBiX8eY8ZSsQJ25EdH6BoFMLy1772tVl6
+mrsP8jBkXfAiD+2v+sxSDYvCXvrSl4YvImU8nbVFVJ0s6k67YzOJ3mXnIVzj
+LEIiNULsQxDWbIadCeW3B/4uM16WKkjrMzZph9VmorLyGyFQ+K6XZz7zmfV1
+p9DtjzPDe3tqn+17fJ35P3/+PNaFNRy12W/hEYFY9oHTT3/604/KTUaqvJoH
+8wt9kxBwHrIoQdV65M/J9UA7RUVTHhbEmVKhuA+fzMB6GLgdwvgsqyApsBIc
+rurx8Y9//KqMxkS23GW+Z/pEHNC77EbtU827yDo6IOYl34NRfJo49znPeU4G
+RDCmF8QnhdUZEOCzOANB6QDHKvhaB8QiINm85QB2UK55zTCvggKlmgxKtzli
+MRYmUGMqs0OE/CyMTbQWZluqJJsYbP1lmCbXooI5aNACnZgXT2QJw6zkdkGb
+offbO038BhyFtOt7vJmAuHzW6nMlc2Sdh282dEu9m9SrJ62h2cyvRp5Chcgj
+R5HGUMSWshb1r/TOzRolzXls926qIse8ePhB7lrt8h37e6Kb3mO3tjUd+Zvz
+D9+2/4Q6QSVfMK8lEdYq7S1VpL3R3V3+73//Y8vI6MQujK73pKXk9I+tn/AX
+MqhXQDuep7D4tt235O1YI/gXEDKSMv5+65+6O+sPISP7Jooyy72dVw6GZHuD
+83BqEskSz91235KpygQ8uSij4KjfSmXL6Had7MH82XhEoaUZ4ed8+uzx/gqF
+mw9I73eyuCV/YryVWXWUUF+63/qv/dfTuTC5PHxqNAnttvSeXOMljtvPfH27
+GGxLAeNet+kc3/lqMSkTplSmKznjEfhsiV7+mZMLdpaMh5XzOpjdk3ovvsNB
+8hkSOiBdJqTkHPCKiWQDQXmzIwK0KC6Fr4xKBpZjwisTPSZ0qVEJOzxGxv9Z
+WbAQf+mokeT6FQ9UN03XfByuVTIgAIVU/AsPka3GpoUr+kmSq1Lkoy1Vy5VZ
+8+FimrHgMeelsw8z0dsT368cn3FK4rR0SZnBDkeUZITzMRmpfemqdzkWMAGP
++Ttgh4aS4N1bc4zMKCGTLqyD5TaWoueikMKAvpRuhC1dSZzPmlHwdzDdwsxL
+hpVnm7tHCj8zS6xi3p2MjE6ZXcRA7eBH2X9xoIKFat9qVwVxLXdtKwFYskSZ
+VgpRmtpdj3xmdIEkTFOIomQyAx4fBzBJgW2rzJcOgMLQPJSQd/b4m+gERNGZ
+7IG2PgOme0RopQRZ70vlMnudyUNl1b4maSXVapKcmW8qgN/llCAi06UPhiBL
+WQR0+SADt3mnbKPwLv1iS5JR0TF94exSTaYnicQBO/bU9+/RRGa5j3yWL4al
+4pxS11U3hBZZfMB7Ibk4Fd2gnZis3L4w9oqRvvssD3C1HRHlLF6Zj9sXfOcY
+LpqMcuqJShFFOKJU1pAwHycs0ZGwMDCeq4wmy6nwIfN5Wd2BIrM6ZKSy6+8i
+Z0aRs9H1aL4PUyytOtaqIukhtzz4LX4mDzz2HcwzQrLEMOunMptAhcrgbmnq
+aSTjIGZpmEEf2ci3e2PcTQMDA27SBQkmhVVuwi+izElwtI7zDOqaP9VNDlnD
+U0xjswrC5kCQgHp/M3EoZEM92xd+GW35+3v2CASUmmQPfqp41aCjNCw8V0Z5
+gEslPSlD5cYwi7NCbFyCmneJZHUllIeIEEv3NA0BEAsmc7gBlaefvk9UYLbE
+etuu3tByGs1YIV3fQbhw/sqhNzm1Bfc4c5wCHzhDYDQV0mWPEXjK1RuKPyJ3
+IR3i/F5he7aw+4ocQRN9ttLIBVGC2aACSvVJC0OlKnWP2mCRw84AnXoXH1i/
+L8Tfdof75YQVIqSojZaBiK/l8kFEIl6BQFDp3xxbqnRwz1lemTIja2YqhDOH
+gBGJJJDWh/Wsp8+SLtWpvrJKhsXjoxGoL1otVX503unOeWzj+nOjdxCWRVn0
+R2iZA/3lC32o6vDeW/05P/SHq8RbSxcVK/xOn1CeKxKIETRYRaIvp6J0DJxU
+RgzMxnRN5RzitmDe1UP1iM1Xlbmz0d7gL7/88oE8GE78BMIDdPQw5AmdDB00
+wEp/t7NDfDxpEBOWIuNzNjnmDGROQlMWyCkfshTvvvCFL7y1eQ+vGJ7/iLp3
+5s8RpEGwkGr12MgFbx7CNq+SYyKhHYyA5b1Ib4wXG43ZOH0HKEtalX5VEVgG
+0RlnjhUkBiyHP5J6SMnaFGL8BPBwjqhFN2XSiyJdO5rlAzzYLyVBmhHkmB1O
+McEXl0IvsZ0tJJYGgfiGbJGSJJqldsYaRUKpEaDaKAGNmMskTy6cw1fhARMT
+p1FOFwzuKNLBejcm3UQxZpTb2G9dosoEzPB4F7CXiyEQl9IxfcQ3VCTJlALj
+WS7PZaCQK6XsUpToEkugK9kUK6ZSqfG6uCiTHH1R2CCrBnVRGyps7GuV1kIh
+xYGXbBuMWMtfFC0Du33MiUHcXGkgIMSunM2RQWA1XGRMOdbNOwbq+75ngDCT
+5Oyt9m5u0iRZqp0DtgQkrAO/KaSR5YxLfsNOQj5FOSST/drIspM7tX0wYrPt
+pr6qz2My4orO2K6hUTqBYybS6bKuxM5ITG1BeE3pDINsc7cPbpbRRuHgtwCv
+l50McaMeJzQtgiAvTdrkClqog2JlRoEMUKLacc2uEsonUhhhvVShvhoXbvy8
+JW0g6j4bNbsf5/yVgnAOXrFeIvvk8GOef2ek1dNcqjWtKUdLWqcpRoOw+lv0
+yjAJKQ8ErnQutIoFdI5O9Pr3Gg2euEM2ulwlpeh0Yk62M5a1SIDA5DOe3pid
+IhoA6Em0nb1eoM8i6qydgsPCNAx3WDBG97bavSxu1g2qd7j8eimYyxT9dHZ0
+el0eODOdQ6KYYcSoDhQ87u2vurfZrGfuR0EEQgq/EaEcq4w6q/GhUPZehyAG
+TNvLmHdECkZ65dt8GBdbynGMNPdZz3pWWoewKYClJb+rDXN2xaR06lcY5gi1
+G/pVWMY1qR2Vu83lfCAv074eiJrTw3LRHFChgtxLAAn65ki1CjCu3mVUdqzB
+W9k31KsQL3tAGJdYSQF2nnwUdnu9dCEf85KQRLw8rWTmIAXh2/PV9kdtuecZ
+17MmWI0amJbVQfui8GSo6ETI9srzpTqkbM/xlUTzcU6Hhj0Vz811Xs5re8/6
+QkgO0H/jSTH7SL/14sCcHc9HxIP5LngypR9e8x30RfqeK+ooLgeRjdLzEu/k
+3H14zSKbE+vJTCJirthlRLluixqEd2lKDsJCbRYJF5geNaBNxZG8SlOEk46f
+zWp4nwkrsxRJOMnsxDRlQFkHyBiEdXSTffE+NbhUuuher7FdCeNN2FS1thKW
+Azr6gO98nMsCsbhEcKxp8zH9hKIA18IPHXMiBTjLtpmrhp3PYIPWXLUSROHC
+dCy5S46gOcbBBlMbkb30OorhjzIYKJSKf2qbPhMNGAwF8x124ciDnkqOXtGh
+XcxZ9qgYsP8mVMhpflAhqmo0AiKbeHKwt1yD70c9VfITJOTcbYst6Aa8quYf
+0E2B2awRDSXAGxXMby2fHR8KjpJefjPP1ZLr9hDvs0NhfcadG6dwXy1BvYHN
+yBywq2f779+KD010LJbMnneSkmOKgZKNZUcE08wmk2y8w5uKk9alIqBIjCWT
+oAkG7D0VMu+++MUvrnedW3JivYWUnSCVR985zGapHItvZuzRrCCdsEvzZ+yh
+TwY61eR9W8HAbHwO3fOZgDA3a9qpemyUNheiqJRmaLvI5IFTW1kaOa/6FXRu
+59OXOVxTMeRSDM2reMKCC6ZW0RGPsIR105tc1Gh1hSiB+/M7VK1mc8ejpvRA
+oqnaZXkyVuacNIiaoyJWXp0f6/ZMveM+CNIzkM1WIl9hh0ndgAvK1FN7Xik7
+omhzloZmoIhmINuFbcdXYFXfXpcwL5Ak0gEq67G6ZwdwKEIoTjBuWk31/M7H
+03Cmim0llQgIN3Nrzux8EFP522rRNJx2U4pZrUAdj7ma4XJRlShcCA26UILr
+KMG2RfnL1Pf2467HNx/cKJoLirOYL2d+0bFqZ4Zr6SD0ipR81sfqjqaxlS0B
+YzYTSSU0MQJKwFh68VtOwtZrl0HWAdN0sK9qWcA7U0KFnBMZflEnuZ0Z0mgu
+ZwuTAzJ0CVMEItJJ+AW7+qCsWDQ+8HRHwxrugtebwhqYSgP1NM0rQDkutzz/
+SgyJCFs4EhIyVs6GhYMvg0IMHSoLXpT3jjcXQysc3B47eOfhpwg+99SrU+GH
+GEdJ1clccqoIWO1LrE45goDARErHB1LZF/bJ6aIJ0uTTBS7ZMMNc6eatu1Lk
+UFR03Y4yYw2A4HDKRMMkH9NkR5POWKMARWeYLUvxNUxCSa425S4KYOI9/Soc
+2u4CPb5eAYPwEvy8dQXtFiulV/gidVW2l3XnzlZE47Vx+zc4K4ru8npEkyqz
+2tLS3XWjKWqXE8XpEXzBYmrnO3TNoFCrGzF5LigRwYI5o8B24oGm3uWN6SP1
+LoDqpdvnhrihj759P5NggcyUTTEUk0FmrvHko+WjjFcpqSyvrwFY92iADyRm
+wV5CXtrFR1tOk/0YhgPJHbs9oxjNUlWtdyMELp7mRJGNCuTyaGwFllJSLr6a
+uLnBSzSACgzKtCnBGNx6G8Kil74pfwtk4AO/aLltqOBimArozcG+KEMV9yLo
+MCjU1YCzS0nPPiaWXnk84PP5z39+jRtOXbluA8hJmcQB2IiRuOk6/BTHWfxF
+ZVhyDuXBr1iwwFcMUwzK7Js/AbvUXpFgPsoEhhUstAAgbFeKLlFnVsHkwCiM
+Q4a6JGcDQEqsN89KcNngjQHQbQEk0KeLfjIjA2W4BsV4AaTfGT0FQp3vClgH
+Ncd695Zh9K3pK5mYb2ahIHQVFBJFbOCUBjKiXN4rFvDTcBlLcfH2ptuI0S1s
+BWVeMUruNrN2BIjpVArdbLVzsaH4yLFa71jbjLgBF6UZnKBj7EI6++pzBVbS
+DU8FNIvicycnBUJ6FlcbQvma2/trubMeS+kFIxEicvvZmZFNNuV8lt7uNKaM
+hC8zSqlf86tZkaloo5gMcTSlZ2ULaicyzUn0OEatUZcTmfgyDgUX1/MMl1O9
+LODSFb9iMqTkt6NGJ+9QpGLsyqzbG2ruPDrjE0TP1AcYsBktM8fYFW+e0wng
+C2cLCp1ck+lKobFYNpcS5MrbnM0E6akEkTOUG1qMvIbB23920euhnRaaZi0f
+tdJOO32mBIB2fSp0o52a6Tv7vWCCfxuLGq+NUurJWWtOxcybgSMRI/nDVkkG
+9QT51EgeZLNEaCdk1iFuW2i/xx1OT87twkw469MFsZn6y7lVcI7agtPcrk4u
+EHi+uB0tMI2y4AEZoFOyrvKWKcbET6BB/3jv3/oGJVxpNMpYcyylx2RAKW1r
+1PLWuXUPJoBO1TxV+L6+Y3wGZ4QMVu2lLEqiaoG4wAwY7/nz5xe/empYUS6J
+Qrg/U8BcqgfAbmpMIHBzKionAmR5xkLi4kAxlo/J4hQuy2cGvd3nuT9y5A7d
+Vgcq6/AZZa5Ic7/Jo0+xDbrEM+IluCOD7V7p5egYI81BhCq79feFwltHuE6k
+RtVTBUPlMJRY+9ii8R7VpRI5QhW6oZq/zukJfmI2dOU5uDbRDGCAhFxbzJNL
+NMWdC1F9F6llFqk1AUzr5qKBPGplJjuacO26YV2HfVrC0F/ghshUdIjBv+lh
+CDZwvMvVy9pCRHZXIZK+F1znyHjQwXT5T8rHb67H61w7dEtrUCC37wgWDZO2
+Z00ghyDOFByGzTnSjySxBCJkN45VyX0GPgQKNdC5jzAdXULy8m8Lb64fboYa
+A/3YrM/UWeft8Km7eTfV8pwrRMAJgak0HubINsVsgoV1JnoLx/ZStNMOPWVl
+FIe1CvR6Q3nuE9EkLRcOCStBpsGyhLvOkr5qvOrb4vqooUEbHbeUiw4E3qlW
+ZIWgUUBShpgaIX3yuQJWpsj1Qf2FqNRVMSWn/+E/ZOKNzYPYcHt+oo0mQe4U
+fXGAiWRrW2Sc21dCbxCVbgSB6QBaFYuzvDezgFLO0uIApmYy02rWGXnrrUzL
+dhQwtk1zl6vcsxF4G5ad6QZN7eUOBSpOHOtticvSJR8nVmINU4VYMk+gMk+Y
+I06pURzZcUij+nqIdaWMdJpnT7iipV7pt3NhAoDu69fHZ6LxQrWrmwCwQUzw
+mrpwsuWQczmCIMfOUMCHB2D7iU98Ytil890K7cUjEmR4MYPsFad0KSxzhUqY
+1D0r3ChXDSKEoZejEKopA/TJ9jlLVG3H3ARkAe6i+nXJ8MHQLMGaB5H8Yml6
+itC+BQYxy3+AhTPkrS5rBfIOh+i/GkuLJOdyT8e7jCc3YEr04jqBp5aJBnj2
+ZvZch+srmJeb+SQqlXrNoZQV+gE8ab5FD4oc1yxquK4yPj0AOwDloR5MhVnx
+uxS7dDHzcdm/Bg1gmXisZB2x42yvZBxwZ3FEmUW4KyI1m9c778e6i/USw+WW
+l6z0Q5N1EvXnZb/LeooN1VI6MxcFJsFnaWEohH4WX6DOT3vTSwyhkHDlEB54
+DlDLqcWXUz54a5ac3xcDlhKmcSZuQb+wUZFDWFnglcZxhqs6Mheau82YHUPA
+FasBHJcdzZI15KBfQs2lxNtYZQmcYzUP3GVKrqLNZUnYWMYSusUAcZQkrhhc
+jjJ0w2/ghqVGfvLkSWoTpuSKSsxAn5bKKNI4CFDeiDobXsVPaTzznkasMGvB
+bKVZt7e5pAbnKSXPVTUUTb+CbcqWpCwFZEFWYVBYw1azke++M2tODAeVskpf
+T7su9KMsBpyHspTGn++viiUMXFzBjGQxCUpzaFpUXUSYZoV5TDBpHXUpf5Jm
+cQRVVJQblYov68XPD0oF9TSr112NJpIseD8TNYl9jcI+j52BL/vNczx60JGe
+oIymci22ZhXAPqi/kuNzt19Z8IS34xBZJX6hzBqI1AyJnYfcHvJ+/g7XHSTA
+ZPiBrsym+wyOMzl13ohVHMhJmiq6x65YKWOiLc0oFCS+gC9muGmiYK2Afi9D
+BG45ROUY/mR+Xmhrig+kKQeB1fWYiMXjUg9qDJjAXOnrUus7NZjJhTuSDlMh
+k89E+ExrO7257K+mPgSUhQ10nb3jzHZyeVl50SuFUh6OzWsenHFAbN7PYlg2
+g2UxZhvWg/pbgEb4x6iCFNVBwp8+jHl43Oozo6cU3CVyCZJXXe9pOz8YKnvT
+qACLZqOadqpnEIiU1FeBowANI7fp/amhP95VlklASX3BGkieJ4gBRi7/6F1K
+d+o/oZT9Wb5zoqnHBqCvmVwjV6r+mP6KMYs+FCRyAQ67M3mnVNY37+XYgN6E
+fmL4Si4GzMtPyyutC+LlthiW2QnYXiqTi+2IlbgZQQ7RJ42YO9nqelvrPTUi
+01RnE5kTsnwCqRbXz3jYbWX/2nVNNRcB/xX8GIlLZrN7iVb2YqvRnX+XSzx6
+dpNNfffr5oiMT7eyjnNzE+xo7tjYrbsce4UD4pE1ilkOqlYg9v4juntehIsA
+/mTFOa8LXE6OWAQUo06UhWlU2fam2OE8j0BujMKIMRpyOZY5SxsFprCTCSQu
+Y5vAkf1m6UKWOEjAynx2+LnwrI+sGD9hYw0ghXFG3ma47ldRCAeJTqe5XzeT
+U0A0I/ijWAVJaYYlBZnTDPfETzhYPSyEYKJjDzbCnuJ+WGgovLwaIBQjvWbp
+Xo7x4JHZee5yz6WB3mUGDHdd57KcNyAEQHzKXT6DB1R1rsD4XbbAWV412+2y
+3U9iBXrxhlrO95JkwUsGj08SEFo/nyaHUg41XSIlZ+te031RHN+lb8DaRtj0
+Bb56gmntCydkWttdu8viJb5k7iuVNhtcs5gax3A7KYw1LMWaCARy5opCPoDs
+pMR0+qIWCHLkCH5CRmaT29SFJVhWn89AijKal6tHOLfcl00gV+3qsMCcsYEV
+ZRsFoWJSwExn8m64ypi46iI2m3E5g96rtF4RSllYBttiqxSPLfqs6E88Asil
+YAJrNOLU0572tP2JLtwxJIJhBRX1pWN5nsR42/GpYVsdta9XI+b0M7LB2GyV
+gJ4m6DBQeMOY1lmgk6OwqhmqhyviTqmyJpaTIc4Mje+Tngdm8PcYbTByeCgq
+ktiqyfHBRu8qTRXQH5EFCTOEHAWD+Mc+9rHztlAxDbzVELkUDy7vtv3ZhBcj
+L+Ndzl45O2waZ7Lux7eoD6aCQZaDO+SxXuu1HHPCV6TQC1GVObcbSk+MCioo
+yQZlN4+HGkaCsWZCi9kLNedGLxQ6eRIlTkk0VUNMZBSGbz/erd0dO8pEkyRp
+Ozm+lLnoKrBXE2IFOdnyqhaYCDiel4XAAjMU8bxiSswz/X31LJmT66kRvQtx
+wLQ9lctK4UU8YgLD4DvADlWsv4chVAkC9BHNZ5ohOqfMEi/RP6THENaTLSse
+GsMexE3zztp+9nIVnv0k2fJsmqS3DoRIZqVZ5o4HCK1wKkRSFjGNaaZiYypW
+zJh9ItKfSW8sBjUle2It+EECMLNdgbV7WklumzNG3DOtpNm1PnHEi/PGlAEn
+CU0Nc3YO8/gXq1wP0Jcoycexgs04nKnYEbjGgriVHDag1tKut4+uu2SoqhOj
+k81QP0ZjQomERKlwQMRrv0yHnwN8WYzaTpJl6s2VKH3mBL/qMyRxmjk5bz4S
+Ri3NtRAhSVfzTXdCI0PJ/IOIAwksBAdYhd9ZHiM1TX/PFsScqFmUrFKbW8YA
+AEFRCWh5NBaYVl9e381xuCJfECPY3u5ivlBKur+eSsyKEoLIOSEpI5bEvcEb
+vMGouwg+tSGeLAQ9RjHKMBkcLqEsk+bgSLB+ZZNFYDDDaDVtm/K83jSL2kIW
+lRWuOKooZFE17Yq4uUhKQVkkBjgjXB4LbReygCsUBy8hS/4OPXOCE0G1k16P
+a6QjDkTRPE9g4i57hZFAINLd5GyJD/rozJZH0kT2CPqJjzdi/NXKjd1lbpGm
+UUQBdji5XtGZ4+qPTnIaw43dA3aCcF/XOjbUv9OD4XD9dJs+eUW+Ijydeji6
+Amh7s9ESgEkuZFg5Sz37nHhfzLcyL1wyCKcEOLN4pyqy5PFyQRQI1wml9CZb
+AoRwcAEklkHNaXh2k9+9W8rkv3VXCU4KCtOS4QmUdFBmMseIOSn8XtPwQKBs
+L0tHQH32XOXqlGLqfBWEiM3SjiMjlDuqOOlYtIb3FWZmexJTNhQNlvBzaAM3
+kSAuI4T4dJ1+ZEVO5SnX9p+74DaCB+kLay1NS4ssri8aXy9nkHT2PvFVWBJ5
+Udx2U82FL9kiOXs47W84UuPTTWoG+O50quS7ublUIIDKbbZ4oUGfGIbQZ0wP
+65Q4ZMRIlTQIJrNgdi0CXXjEeGfSYR5xX/IzfsuIcxkXvImQld3w3W99y0Us
+gj1CQjhwbTfO/gR4YhCQJOrqrGzt+o4j3l/XyvgtXDNyswacghzS2qK0MQ/z
+Xq1VrFdJDEoX3mUEwqCcrh+9UAjIqHIdDNmKi3RZ8r3Prni9nfJhH1Cy1voE
+0rbOKrwdHByM801zDu2FBstXdPWkeD/NaFF2stWQiUfeucj6vwZNCHyOfLVc
+U9SAXfT9basoIVRu4clGWp5QdCwsKQ3dGfRSqqU8oAUiMefye1f0uLlIZmzv
+Lkdhlfnp1zvukyMXspwNrvCBHFLuAb+832Eqkp4cbiCQEdh45/ACfMiicHjK
+Ac1SZiI5r+joFUPaOz59pjAjRj/CAaI2jQdkUx4pTlzeHIjn0ovRmk45839w
+gIpaoqi3pGx9DMo6eXfEV539PwZNADnRJrFoDl03a5MLh3KAP8bmYMCuVWTx
++L13x+0bAjewL8cwD1evX9oNHnFR2WmbGYLtkJc7EjKbBxV46oqz0hJyJxd1
+0QVGm6X2OcF7s9lepYSJzuWxNK1w5wHzKPbXBRZ+C3uP+J7z08cGLG0oowkk
+UiGqKDK8pT8DJp3Erq1ipfij/c/F0zCCPWkSA8AUtxlBClbNxm+HdmK9wRv8
+uYPKUXdHxpcFkVb8HtuuqF+SZqJL0qMtTmm7g/XUsKqkDRSDFcDK2Uld3MND
+s0kzh/SO/fZL/4oW9gYznFuabEBJ7XGou9hxMAS+PWtxScTnzVzkBfmz7sb7
+YikZr2CYXqcABpB70/zah7wThHNiAUltSsCwskAlFkoF3I7ittPm7E3NQDVY
+WmKtBTQWC/eNX9WTounFQ2W50Rf2heNgJetOAQJL8G/GLE8jRIfsoXiyADLI
+TUvF94yDilgK6rfF414zHDZbko8gXF1EJU6v1Ey4AlT9TpHpRgoNPpcPGZXf
+UWEaDlXa8Xc7j7LC2ohQPZ+LqRLVZymtvNVOUrf1bqRlrytR+G059rqzs8N1
+9qWXBQ/Ks0fw3Llzy/K8iweR9FeUzCkm1KMUJg2y5pCuS8hV64Gh6snZs2dz
+JnW7+dF3bmWwRkA6O6/sxRvSBsU3tBboUqoQSulfb4HZW5bpnR8IxLw4Ngl+
+JpJhoTo8PnoghIxb0cy/FY1yxjvgOUqjzS9kXP52Z9eyuUEyCf+Zrbl1C8hK
+P7Kfvq9eGr8tu++6snHTAAL5G2s0Mm5WfijqJLIcPYb5WqYh8FU0IEbLFd+Z
+AILTkD2c5rKFOEjgKMSETsRgRxTd6pkCmiga9LeOaGvEy4VlprP6MJJr2grw
+VpIMrKUY0JabRDm9zDw6PDFRqkelB9ktretrCVd+ozLzu0Yrts4KcbamP0mR
+diTZknfqR0cuaVJhFV2i/5WoZASgyWQsGdTruYkNMioJ9QkqkVZu8bSIp6W1
+hBind+4GoI9Z1Z4L5q3nXpH/+uGRs4XNE7+W2FWMZMgEn7PCQIjhZ3kG4CJs
+f08awsoEAjyaIYtcCFj1JXBsrDnAN3yQVSkwKVrW95bQ8dQYkZH5jz4JorLn
+IBtfMyQKYj4iUiMV0UwmFgyN7rHQXNuKDDzujVyD55yY4eQqI0z3bx4mt53D
+aksscvNFLgJWJTSjnBqE4XOIrK4sMBcGzXlkYgCw1ntYe6ZtrZHSJZRCPz9F
+mutOxcOhhsSbSUDolqs9yukssf65dc6GHWc5CG+pxb7vavTk7zTHOo2DFo/x
++Yxelhblehu1hl5tvbOdEhxQumLDMoYzQ5EyBr3l1LhwSoAv+XSwR5oSl6G6
+l4ge74FkuTDiAYonuULfhTbMPkcrqJ9lIDifakO5sdxohYrEkuuW5iVVlJoK
+69eDenaT4ogPSiJIPNHiu6iHThGjNBTNTzRQLBBP4XBsu5zkcCgzD9VDH2Ok
+vMZYbeXUEvGHilm4GPOboylmnDQyt0GnPMgrp84XkJkTkqQAzLyhYh0WW/Ae
+EkmUmaty9QH44zuC1e01HqfWvUHEkhnYXNuReyCzrkGVpDOR8R7/gFWij4zN
+2HNT6WFbC9slCblJ5sqL1YnmKFRi7QyPE44XTPadjbybydlS4oaO1HWypUUR
+0jJqRghhxANi3u2pe+eGeQNW+pMFV/w+vwTWE7r4yf+IO65rVYRORmRkNcLE
+T7OwLmtSAJUJQMxDiqKraS9XDoYUwqcohJc1xhiZunRm39gSUpTGM+2XJMZ3
+Aa4oq4SSlH7OyS5ruWsGLvuK/4wkG2k0J2+Ko09NwhqXLMGYb1++z8z406O7
+LE3yYDyGYnJ2xtYIjo2DE7b3IeUiWyd/JJrXjBTLsgGaTDPJlXVcqCp1WSsH
+D5N2PaIf2EVVMh/pe/rLuhUPDlDFPrxuKbQvhwDwhUKFpE2pE92RueeHapAn
+MqRDZlgSrOFCNoD29QtD9QRcJnti9IbaW/NXpnsn1yw303PFEn+AcjKNv4WA
+4ImGmiHLWtJkVGZGqIrM7ELcvKrbNgzyT27lAYEglP9CdpYs+L6iNv+KZabI
+S28uVAFaimcXj6CeZ+g7S4bQWYuV9JkGZQEswd8Jk9GC0OlEzqyv3l51sews
+bYeUQknCv8RNIKICkRxabFwWxuEP76dg/Pp5s/gpVTbFocLX4Nc0IbGXFczE
+kUA1V5wUFaF/Zk1aN0RITorrYqbLxkfSkcw7GwvCfJZdRrmCuHecDVb4DIrS
+R0bvVPrglrYgrtsdU6TJRdtgsnS67y29dBpjTqfKXRk+g8nkMy07p+DCq5x2
+gfEFghcqpedM9Nxw4rcrJplxYnCx6EynzE12Tfo13AtV1KPKuBDAD/dS6+HN
+56N/RNE46nbluEu65/BEIaVx6vbSSy8dqZaExbunRisHo12unLn5m/1K5QHG
+VunSNM5AdUKuaP5+uj/3Hq2MFFBlW3pk1ny7D+b4GougvNxSFG9mZZbZWRaH
+APG5CotD6NJMttxQqXULyYV4t2QJlodso6JTI2zNKQXBfCEPuxXmbJfMnRh8
+R0oS6+XIjyWRxj9QwiWcHGuqDtcl4xLqXLoloesLoA/Ga2fHa0LC+QozgC1U
+ABk58qIPI711ZvGyAJ2VCUKyMr/eXMZ8uBOWdW1tNNZLa+/freRwIq3Qc5lH
+QVWWwtCUBEBZjtFzea3v59bLkvKIqQVhEvYEXOIIzQNe97dFCrTZMHOSIXu3
+09OchgVEaua5WZhdURARdLV32N0LSaS9vmKHRCp+ufQuMAP/keXunN6YtBwj
+Pd893DdPxJS1DezEidlLQ1msd+B/qLhVJuVnrmmOJbjidowMB5U3rD24czeL
+g8JPK+bSLK6xT0UEi43YZtlkmp1nG6kz9aWSPNhdmkGYbZSCrOkwJXwHW9sD
+x5ZdWsSuOpsMbF5ScnKitA/sXeczkCIP2QbPp4bFCNpZVPSEx6DO4j/ZaZ+x
+mEPI2C658Vn4aRo4uyfEaCpZYBzkW6BR+XSWJBGBr1smYBaICKSbwryMkEJD
+mu1NaIsG+YyWlT1c0pTgmfMN1HPUH82fh5LciyTDIEpVqRpkKMn+SxOAKOl7
+jaazB06NmFivwr/wOLeAyS1VYHI1k4CFmxEKLG7/7GBCvuf9nLqVsl98pASm
+5Hn5zOaDgeP8AX7Qy57WPNd/1hlNzmM/baluYjkcEyBAvLP9FQjC2AJb0u8K
+QzNcLhy0U/CQnSWUnA5VyoY+NRKkI45rVPEqmw1xRI/eWKi46hnPeEaIy0WO
+FWOsxAk85yVCYvDqJcTpBCHzXsBALmyhQe/c2pJTTplTcewIXw3NWnXFUbVi
+pZkaekjnhiyWycl9SK/EPKTnrGI2mQsjDUfREm+t01WQuqH/piLtM+mE75X2
+r+ki5MC4HMqiuAJBYGdiJHZs9Z3laemPXeKu/rxPD5+5O8hsXeszXkZsXNlM
+jCOnA1kMyYCY8br8cikxItoSrgyciyV1SeAN3UyWw8plKJzth8Xa9IL/xofb
+LF5PNeb0gm0WSMxHu+oZbMkFn7U7JBbEoHOcTh9DnF1KBCPBQWOHgmurOcLM
+b/dq5uudnFOZZmroZ8AXdZu5Z44uAErxUtq0NIRX8ts9WvGou9zfCOrdYAMc
+yc7ah86DWtZoqo/klA5Gr5itdnPnblUCImEhrOLLvZsf4LcvChv+SmG5NC/f
+YiRm61XpCwMzxSqaENvxVv4kxis8yzIyUTPDqLhtvbzIqI4eCTsdq9h0tpc4
+GA7OkkGRpEpuB0ehC1CKCF3JUEFERsPnoEnyhiaLDIrl+RYolQZT+QqMMhqs
+EZkQIpRWiah+M5osVLIBJKNhGdasbk9x2R+GZ/HKNJprWwWy0YkL56lEHjf2
+12AMvRZcz754d9pyWTLIVNh1nChzEWlyU9oxLZt29cnBqllmSzw3Nh87nFla
+6pqUB1YwKFznDvm2Emi4IbHIDGjSe02Y2ZtDDLk8x7zVwd6usagCbJ+jD4oG
+P+abepUJMVmc9LDpPYmxwCejymHSeciTsbokL6NiZIJb4SHzkMCUJDIqf86U
+UG4Q00TfyTceDDVvKbPuEeUuKzZgqi0PlTHxZMlu7rLiX8AhSMkIUd0bc9cS
+Pf+E0jwC+4rhkvcYnFla24grTgqxUgCXUBGPpCxn1zg2aIfY/RHQE+5mskQu
+TJndb+/Qnwks4PJ8kZeA3ZrE7fKRxdeRdHZooq7ymrnQIBfgtwoGQzAXbLUi
+ABbOQFYBcH37KHfpimlsYzI2i5QEYsWZlbtMG+Qs50TUG/WZaEyv24s3D0a+
+x9oEe5YSMuwaTPRAPNE1tVW7eT+GNG81Y3S5iu2GXfaySRlzOcp6XeS0P/w3
+X0vjc/saScEoIVgOgaEzZTh7We/EDWC5n5kGHKSOSzYDRpwQ12xX2XziFaLF
+v03gO3fHALLvRRwPOTNyQBF28iTYPesIv5ZljI/ptgSd2WfsIQZ+Tr35SLf2
+F0jk81DkjlvWbiVbpKKWk26t7I5pfujc5P5w5j1Vtb4OBrNfPJqMKni0PfJw
+fz3OcWr2hc11SMvY5+rmY/tvuQWelCE0bLpl/voSclungjpBGT9VzeR+Wa2K
+80TjPK6YrnTg5t1GcAf+mY1j23zhC17wgjSCDM7A/LAAHWMf+chHHmmEmxYX
+cNUkzkrLMh/bf6ZZghdxHG2EiTW2u86NLAssqQzZeATxqIFjIQeFuS8qV8PW
++93S1/RbkMz6Ig+EhO1lVGmEE6PGCcwJvbDqSCPAn68xyakgowBTJKUR4YQZ
+CgG3wIuGVeDdjXxtSxH4gPdcAyH5jISJTdRhzF3hzXExN7XuMNXdk0aXKw53
+z4hdajSZM869D6WDmZnzuvqxOhshZjZcbFoyybl8Ul1MB6JeE48xCsMTVHA+
+isGCivs2NfKgvq1nL+34fq6hZrdwWlCd85m4Zb6Bx14mSC8bVqIkNs8KIjPz
+S2QGUjmt0NYV5VHf0r5SiMJ/V112r9DTTY7+JNLMHIRoFdxonoAcisxE005s
+3U7fX7HuDw4xJmASaqo8hnhtq44YlNX/NIFBMRsyyJYyKw7mFYz9HNUKbomc
+ZvKpIjnpgubKjvkNJVt6rurJ2W9P/Lxi2LWsyyYtWEJWHt8HHB41IFuSOBZD
+YJCGI8CUzAql1GkN4dnPfvaqF/JhKrel8eTICBQV0KOCZgwgoXBrb7nnZn+4
+yezY2G/dIA5xw1zk0y935F2xA1ghCq4YfcRrilTew4Kw107e0GcNmhL1zEPh
+nQUjuRpMIIU+vCVKorWOSpE5PPQuvkpv+jTmITpJFD/mOxJgIRMnHDuiVqIQ
+uitEEOnib/EoN9VE3He8SO2SgeWGR/0lYOYg/DQkiG6qX+iVI9ByVIG0EVBb
+5rW0dX74e3kMsqmWeX2olgXCSse8FOtAssxFSbDYtbLzjtelnRsszyV7CqTx
+aOquOc5T3A9cOdftZaqXjfQYLRG5wL9rBwP/idUkGhpZH4vKOiDwI9Y1joqV
+VxpZp1mlLY13HWqaS9JYItXkiUVuVIvYjVnQiMYc5sPUuF7fj6USOZwX+UMD
+/eMr09Omv/tMyCN949mNS/2Z8t/2/xP7TcMK+rzn4eBYN03NjK1SH2fHGmkZ
+KzEsbBM9c4w5wY7VEq2MhJgNEdmGTKvFylyTqJTWE5uV+5WRvn6p3zQcRk4z
+JCEjpXE0JucmWORJ6RkNQMnJYuKQo1LHUaQIEr1H0gyflgMgRUUazPAZPW2o
+d1+/0I+P3yP0au6YPvauHxDn0bpQCgONgC50OWXktd7DSEyiDzIFsIZSpZTc
+iU035V0EwgaNwPfJHWTQ9x2Znx/hQA77o34GI1TPtl0hHbKgNrXy+FlN9+iu
+HHUHzodsdQepU3llVpIXeoH0XINBj7LvFmmcE6FBWkKq/O++3bzAPDeae/wb
+OTndHgIBM7JMgBWOpiIAfA0tXCm1DhgBKj5AYMcfeYXfoKVG5QF+KARwOZN/
+a+i3DT+Qs4U94hrhWUZIZf1bGSYkIo11ZVM73wUEhcVoYLzaSDguN8VJigGE
+ARL8p1dUk//kh5wYATj4IN8pS2yZL+WTUyN6wgz2RXVEWEJDys6DbL3NDYNi
+70Uf2Dv1lE2i1FwGt0AI4AnTewv/yDatN8ixeDyPvkAz+xa744C+YQqowuH6
+XoqI1C/Lspak6/YxOHGlrtigJjlsTGPLmcsUuGmOis9X8SJZgGgIvk+PcnNJ
+TzWOd30mx/aeRxEAhiiQQWjvIl+sq0JCrwzLqRKhH7TBDMW0mX40gzpjAIE+
+40FZb5SOiRAH+qNc9NqYoAS64BrzZVbMCPbBw1TZ1DxzhSlxCFrQi34sJ7Js
+a2Z+EMUUbuiHOLJ4C6ev2dUi5qZbX5ULAqQ4fTq7HFm9GekABz6v20Ky9znr
+9aSLSwew9JLBFXwS3nj4tEwd8+ckPp/ubIQ1mixsYWmsxSlW89Ej/JhDMxaB
+XD7cuEGKDi3HyGEKUYLsqNCFd9lAloPpQ1VACOB7lYUsXV0yXokuMdBecrhS
+n4TFv1EerMqKCpWC7KoCnb0UcE3L+DyudZsfHF9XkQCv4tr1TUom14zOKBVl
+ErwYVSbcmId3j47Qdpljo4B5yUq2x7twZl59iONpD8lJZ/xbJDEXCQk0OxUj
+IbHr0RtJ4DKTsTgmQ6V/0nzSLLr7bIe36W9gqJGu2Vl/A8OEQ9M9WzmyXj3r
+Lfuz2O0822lQYC45l8fAATvMWe7G2cqB5lK30tC36GapAU3ZLl9Zbs8AT8x5
+uvhG6tkp6PqqQeUUw3q1h/zI/gb6FOq3xbzj6zkgfGYxcW5I4z3Zmj45a2Rs
+z5JftsBlIuPB/XWjZjAirOmeMCigs+Vg/+VVWB+NWy19KTIKE9YlC3vLcYhw
+eb65xJii9w/pz2QUqNzOfy+znzCSbOJgKTAZitEqSlr7QQ7ML/BZPyNviZiE
+Mn2Tce4L62vGsrqJnYhmNV2Yd0t/rOfccrDehrO/7iSq4HXlC2ClHH2S9DwT
+Iggozq7giQfwWrECOxUuaIEkuv72kG6Ra+jN79sWTw2U4LmapsEZKkdrjXhe
+KKxlPfFgqeTgAu/Wt6QNfDYgvZeZ5sRAGoyp651BxwBBpeAGnnUT1J/J6rsC
+irVfqMjzbCVyON5VjhEMQk79yi1JuDT88lkgJ0aIypfzi3yqM94zu0i2rRNr
+jzgiDOUaIhKxv2HIMQqo5pXhRmZiOqoh3JBEbSOl5XD13FhJtUVF1FJsCAOF
+DayA8fq7BasP6sHyj9QSHs6MEqlN2gEWeXfLAqId5Co8zak/tAXEALpCg2PD
+nZ9cF+1gdc4qwlZl+xylmLMJ58UmdNTo678dcSmLbi+nuWSIxuSzUbMO71AT
+ZBAjMo0eHbg33/XCivR5xSzTZQEXZ8MZSaCkGSXHrIDGo/YzqwhBBcXsGlQI
+zq04VrLlVVrBojCiGDMbIE/jbpfcSSE4E1iKa5kAywe0vso8gL1/s+WCy1u7
+B38yRApUvWVVMH+nymsNR+J7j6GaRNv6houGSgoJhbvAmRFktRcVVoUVXefs
+Ys/wbCa29teQS2M3N1UYj2ACWw+gXhYNmndDFQjIQkyQQL2WCGB5V7MSKv/h
+Bar6pKhBlYm55T62Ze8z2Ml2EzpW7uS6XVFTbDmY0FamKOsvm4ioyY7eb6fr
+jo9QgkKRYZlN5JcThJcbvZbPcqnd9uSas8PSQAk91gxB4SbO0iIUYRFLLR5k
+aWIqSOJsmCP+L8tbpmsvHYY3r9HRajZ4cZY0iMbDAOALE4Tf7NznVKW6mL1S
+kCsz+mxcqiczkHDLOApLQwG4Te+qqNnyn2ARBayD5+cw+6zqobv40DvKQwE1
+6C0IuZMsMjMGE38IpLumMWu82YkLDvlCAimVjdjgAh4TWwVXs9lJXBfVWURk
+9MyMmnFsSCZa+EyNdOynCkj5xftNIvIqJOIuTXSUAzvfMJ17zqiaJRbSfsaN
+GdknxUa0DHmEq9m+NK8gv2mSB+iWpTIE3rsytnQnb/aRnNkyJcqjzqaMl1v+
+NOGruoTH86nq6e7qXebz/wwm20PkeNVkdvzDRUi+jZeXKMTATcIGtaXIlCkL
+XVHCWiz7FaLRFthCYjTDIxg0KhmSRRxv1CTlkGToganmu0p9lkzycN2VKUzx
+H5Xxkx2Xq8shEF6DdhJVrt9VAnftHogDYlJ5zt5Eeel2eoC3IgsAS6VJJHsX
+SrrpwWssn9Bhq9VVR7grBdFRKkzK9GXxS0fnh2IKV9gYrU9GZDhK4rJaveT+
+MrLG/WVrkfD2YNhaMJa0BKvV7sOaglT8cmqVE1EqYUtazgdkdjgpIgXO7p9L
+uxmorCwA3clTyaHYEd0lZlULvfAJpjWKHekFtmemLb0wwOzeSC/Gr6iSvcoU
+szSvz0FMa5hKJ/m33BXOcOiKSpCSnnLGekzHqeF8GE0ATXSmXCabAZdLULI4
+GhCbIxbZKaApgWSjGgzsxaKrmCGwKloeAUbluGdaUYA3mIJLNGC7untRRUU+
+5TNujxMuIJ8v/FWcyPn5rL/IzP4kEAUXLR8MMeg3XZNHMazsIsSIJFli1rlt
+T08+GAqPGLiimOS9ss6ZGAZrdkSRkYOtPHZHPEtKQ4BMvYApeyBzoSkZy5+t
+MzjTBpfL6tgjKOW1aSHPUKMP8ACVnF2cFVwzkp5tCnxGqWllgVRO2KO7lnuk
+8ENihRCn2xj7vMy1VqSKZwxSXGCiNW7AZ4xSM8J0U8q5DASFptxkDyDRYoKn
+POUpp5owrgwV4tjSoRBG2xCWsxPM3RZkhbCciyK+A0WUN7f4cjAIQhjixQDw
+lIeWkmT9NvWChNJYePqoRz0qR72enzipiVmXdMEFQr9wtISVU0WkChwGBOzL
+9PbiObCIQisqZaAopcEACUSQQPHksKUnrKNyeTRh4DnGQ4iBQp9NRyOq6eRA
+oWUwyxkRkD2OWOAnxuBnsnOS1iWBDIWMB4VyLyIx+zBRCHroRR580QQ4orAU
+WyBIRAVJoZDuUy+/RVUgaCabFI1MtZQqLZxfPTclEwv6baZxXqDYW9tzSGeO
+xKBNRV9WW4O5zMH5Rm/9j7hIt+ey1pVVEgVajIguzq27HqAnTLPhNifQshwm
+nutvWdGa/y4nh/FovLERy1uztYMm8KUeCIsb5aayi1hQg8czdUyBGRhQ97hS
+x1MbsD04oQ5yEAK+ZIVkaVSoY0m0SDAuVpdHhjplC1jpYeJkV8HilbMBnRhA
+oaxnmg9risB1/Z+xM2sGhHBEF/HzelIOX4WeqfZS4qzYT23YpIHo36ulO+e6
+Y5jMk/kzOVLyHJaiY+KmNL03YFi0cuZhv8MH0V6yM0fGX/mpLpYV5roXlAEj
+XLSxrbzm6SZBDRiCSyS8Ct3n81pysRb+cB/+beV5SOB5ckcAb0p18ErUFhLw
+DAmELsuQlVRi0FLILTfyRjiTlAFrAYadx5f0O76N1SZwMURkg+2wKiJhRlBD
+9I/BfHqZekTC84rsxFcG57Twaups95CbAdQQUi/nLJTil/MWD9czDHIfT26S
+FTeXuA77NcQjIj895jf67IWsoDcmEy+icFhsJfappkaL8jmt44sInMC5roWa
+Zc+4SlEQk7chCfGmd7fmdbgeY+P9HEUJEIy2GBOSGLl0GVlMSE62I63DEdGK
+3ehFZkeAKkpf97rXne/XCFJgAolMgQrz4CzBlbEGEsiLy4VzViFXqL0XidBC
+2yIyH2MMObH6dHfDWAQ2tlOo7Se46AuRc5MEA86Zn4H4FFNU1DJtpJTTC5TW
+EgJW9hRo1xWXMgjwg79YnmqLUKlv3+rTAJblnNlgkVTYsLVLD0uMJyeS5GmW
+vKZ7MJATHG6bRbGctgCemWVe56ByvNe8PcVIt+vuT4zvppBF0bZnBx6M4ICY
+KZh3mHCB65mWC0ch08vCPgM0O23C5HQPkByQwpLKgkIdEOkZvXW1P7MF38IS
+TTK4vI/vef9w4n0eIMYgmRB50Ljt7QDHV5/GsEs50ywR5Ty7kMGHsTLTCwZv
+eWzeN8JMRYSMZHAeQ2CllNzMODJM+y5bzddkKXLgTqEQvpfxzicT5rCY5FwG
+QASzeCxJ4hg8QA3vK4wJzjGF3rYwzN0Ovgq44vMQkZsGxJaW+l7VkhWuSXcg
+hDFwUSJCYznf4xavoogLwnoYwNmDC7rKBeUiCDyC7pC7M5O1L+GJmBd6UeLM
+zpluzmGCmZoHoi94wQuODWL311tiOfxepXxJyyanVogwsbrPVx6sfsUrXnG6
+O0c8u5VpCdagM6uxaO/YmEHYz37r8Y0EBeJarjwrswSepdNx65qSyDEgemAy
+LV4OOvMnbNwAQC1/aTPFFU29agDdyxyqJIZJUOHi9cKW0yNs4bpTUPdwmpIw
+uXJfTR2g0xPCLVHNPoUE6socWUSB0xVP7eVsKZqCSZktVuMgRZXKvtV4vdcC
+A83GarNXiw5/k43iHEoZbkiCPpil5HXnWYLLXJaW6F95yDmTROD2OM4zw9Eh
+UOfU1mCUdXKfLURQK120ZrOmEJFqgkWfJTsWVCjsVJqZQ69zeTBkDrunXCkb
+KhhVyiPzXh/eT0n6RA+QcImDi1/PyzhYj98T3aTeVuNfjrY7WDtWNgY1lLvM
+KZrD2Ok9gM1sQOC7WBEaGfauH1xOfEIjhhfM5BhfDGe74qBSrpAJ2Jk6AOI7
+AFQZ13JwwMkh7+yckCSLCoCQ+4Na0DmvIld8z7TIRxgADCvlXzq9dLRowPOV
+Sn4ndFUPDIEhBN9Jx4hJSMxcnTJOmXdUjALzwLxL6U4KE4hhVov5L58pizQ/
+18zc7+xAVExapkwvdNBI0phsZJExQULIWyp5onUQgDIbnDQA5kYZJMNi9t54
+OdoE2PIFkeR8hBW+ZbYgiWiOcXMFWciDe1nMneEQsmELQXmm5UDFTe/GOdFv
+8VeiZ4NmJ4LzXNSEcqw2eErIuuGRlNAJEfYtRcI8PSvR4zR3gwkZwBJkrRUN
+dkUnrA8wfipdn+VYEZq/vQTO/y8arWETzkdnEqMilv6oXMFVyqCCWf9+SI+V
+u2HcsjMKIOA8v3DENOLhaJ+HYTJEJj7jFwFzjSJ3lekaytEzbSrSrXfSXDLY
+JXHrg2fWGeLMOoMwwSiWybTkC6CO/6d3TskP/8CDd0vL14lxVoPCrnSPDC8u
+JNepWOIhRCeOnHzKU8Hu4thigFcPEjShe54Xw+Z1MP7mq5jsJ/3MeeGYzbFL
+1XUpxNEOzJFgr3Wh44OSHFJfzbYiBOPkAVxAzsny5CysElOO4s5iCEBQGHKy
+lTQHDOW0RAoKO4CZiv6TnvSkXuSy7OIzTByV3+JWcsHF158ZZhoqPMkNCdxw
+WbnCIq4vbLxq4Losx6yqlZUMKdM4FEQfyM4+NiOFcdgE47JeVJST22nEaDbA
+J7A3fNEOXjakr4eC+w40xkUSp2lEZSthYhjS9/04yiVpsBTp+JCL2MZej4KX
+DEuAxZwsOfXTKR/xVyKlSD9nDzIdLl5TyMmCcmLxN+w2678cEryQ5W/IBtIE
+LvjY0Y/jg4NcviZXaDk9sDHXyXtUkwwEs2FeMyIVdWqNAFDDCvqYu/yZyijE
+EbNktC/1SNmLTef2zNtabxEgxoJUhnUkR034n01JQrBcyIQYCogrkovi4Hop
+p8KNINPD+VmvmjN/cL034A9XlYUGAk4z6QdNGuUjnZyMyWewUUY43a4jVidA
+wVfyAPpOiFJg4E/vPHMKHK7kInfhdYbGcmWHMNNQbCzN0ESsMn9uz3fVdbOS
+GPYiL9/PynS2Z2XnydZ1w6Dffc7QUBrcn5eDAWaBgH2dXea4snWaB55ixdEE
+8xFKJHrjlbIRLm4AZGT5ZGJ03SiXqH1sV2weDGAWv3qAm6yt9Dtcw0l7icvh
+tS4teTVhKygcyat7pdVaoBNn9hlOA0TgLYoAUtJLss8u1ER4ypUpnXpo+Tgf
+cPkz2cC9pNuMsjxTDpfM3n2ulphAYI0/CA/BDNmfa3xJ9JKn9/GzGVZOn52H
+Rc8wO/mpsoF/z0tm6V/2+WZYAmfbQrMMFxVPfepTj01/VpHRNJnxXGXjGRZ1
+oMHoplkgYC1FH1+vIPen4lXrUo45MoRMp0tzxRT0aHsqwJnxjj65nfn+Mt+D
+CtS0F2St+kPlFWLyiBQruo/+wEOrihyfkDqqiiz1jdeZL7tPTQ6HqTd4ToUg
+dUSkYVFOaBTj97Th9hLZ/RHW8AZbAZwbQGoXdFZ58xS52U/ow9CFI3SvD7Zd
+T8mCgwSHE4VVYTs/DRoxac3Elp3O/A/NxvPttPOpdeIyR9goIFIjv4uW132c
+DXtiWJ9lFBhglWG29HDLgnugLx9idVlmgFHbm76W9Vfk3Mt9MgoWJcAy6DKV
+WXmODde+TCB1kDtGpOXyF5nkisLAy8Q4Hm7AHBo2k7TsrBK3KAheoN2ykFz2
+6CvsIOcWAiFc57trjIkkCIoFZXkW9nGoqhk5UuuORdfjQ/foS0fiidk0ZbZf
+Fr7ejHR6tIh+mqi4IZdjwyoKBKP3gozzE1EwRwTKLZCrvMUJeSE88IEw61op
+P2J43RAutMu9TiHc+6hkcwXCIZwwHOJCacuLHLQ1kxXCTeCaslBRcNwXwnkB
+MQgQZXYpEGUTskGJiGgp/46yq2ZAORxWTCA0h7OBTOJNr9fn83RpLjpOHKVl
+eYgylfGXMNbzlMyBY/miVMtIMi/HhwmH6AQ1o/dCVUVLgpYPXt7kJZFhIzk+
+YyqYJALgOuGG7ZN9995qekAiFdrwGuaQPgdVIjjZH+M1l0hqRVXuAtBZSsep
+feaIFq9zfUr/yS7E5lhO2bM6KwwspoVoKMRY2bf/hM4hGhjmMKAQLQwHwgZZ
+MUSIzsmbIKbMLecuypZxbXsOzIn1Jh9E0z6LiHZuszxcl8kSEr0AUGY81Rmr
+h1wJDXt6LeyI+MizVCd3rwj+rFEzH1OZxZnWA9G9fI/uWgJAA/hpUpemZjE8
+064WAy7zwXsxLFIVnTvxcr8VDBE5Sd6DMHFl1rimqiiiziIaptNbvdZL1rgR
+sQhzc0SMKYHCxZQJ5h3u0XckUgP4kM/m+mC+y7sjZbs34sxcSRkPQcIaMaLq
+FT8PLww1ZAtTchhoyOYvSBXTkS25X8su++vy+c1wPstnNFIXfmtnsWRCp8co
+wSuvhiLKoGKjriMyxfxRVFw6p+t4mQAVhpQWRCG4Fa2ZKS2cPNO2xCUoTGVp
+FjaAWpDCpqmZ9SKmxDUBclkXpU40hvV616MiPMurz063fHAXEqnA6I4EeKUE
+b6wsS46LyznYm6oCK3qgidwsvg15l4kvAKjQK/e3Mji5L7YJsnCYAzSjldVQ
+MJZOqeL1vsue7To3QND7Ag4OBXmEmuO1SRH58hFhou9e2jTP55YLQo1BqD7T
+LDlQG0YzT+NMm9DMbYjS0CxvZyeXz1pxZpCRc/SQwT8SGECV1wgGwcd2P8jB
+ep4twSgzwPT63nx9vJzWFMzpVj4hF3WxQJoqW9XHvLiK3KYzZnEshjw+Wm/P
+C86jGXjFRSKYrAS49YVMjHs7pRk0gQF5lALzPGvY6d86rSBxooQ+n1Yi4bbm
+tteYHQxWMMN5b+s6R77UWvsa7FWd2R2VZ+GE6CvF6RBNJ4w+wTwfxNlWgrE6
+ily8AECKmtBNw9EMdUtOoZu0491izcZhFRSUJQeJ27ReyFBBvGpmK0gSFArA
+mXNoynXZr0IhwlTy6FPp1xw+6ISSzFIua0gORzukLqmhLWIW70CH9bSYRdzz
+VCp9rOYCj5gteQVgUiZjKgoSzRuTmFG6Aut4ZkjNUAWNlkpmAEl5NmtAsOwk
+wCqDm9JpvbJnIo5WcAxeU4axShlgV+6RExiNgeIoZTBRG2JqHCHUMHkySS6b
+oIrkRXWtfdgej3V8rSziXIUXyanQmRw/wMBxIggPFBaVf3tGNKco0ivGYjxU
+1E8BwDYoXLJbqksnja0nptNzJpKIN1ePYlHu7ChDiV7SnMT8mfb2iklT3APo
+spBC3ZMNGylpKOYAX2AGFGVUABVXi13zRXdEzI4K2OIoLyQyuYwjwJidITnN
+tH5GZOIvlSV0iZwdq1jh2slGzdQkcnA12nhrgQb7BtiGiiuJ1Xh9Y2FMerVJ
+LMHPLL+YLMMwq0I1CMUJa6XuLcIl6r9yaDntzkSsZAvxsLwXaa9zL6AGZahM
+3QGVTHeO+2pUOZRy3qichWTVTKRPpLmMMCKlwn0T6tB8VdCSUaxWTpKSK4Nm
+lhWXHQOnWRsGMxAJ76yT5hfLIWUpzIXkyY852iYrQMRbT3nKUyJPIs6abmOy
+ErSGeWrCiqxV1bnCgRqEmUxyI8fgAhYIbcijiM/yoAuJ0FjFnPNl9xUJ7Yhw
+OTeyZ3XXbY6yN14hV4lgZCZi14Lbcki2Yhb9A+1WUYEMwUmGrnPGywVzDUKy
+MuoYx4VEKAggtoBvbyM5bKsE34jLCQk4Ig5Q/yYXSVihbhadKN6I/xShc1dD
+ERDG3VGay/Iu1YdosDzChIgi81XdrEqZmlEOF4BzFXaEyFxVIx3JkVlMD5Ew
+gk5VwJDVbdkgJThRXhb3v37RLm5RoS+lZ9zHMoHszbvyne5xW5e0CqF65fp6
+KhVWyspEoMwXe5my9DnX4ObEKaSK+KyoSZsXkiQJUggxCyYqI5cDTMVKc3QC
+o+CMsI2u5B6PLAfkBLp6vZetBwJP+BRSBKXJZmaZZsYTpyxH4o/J6vDwkAPK
+mh8M5a6MXremuI2U6eUWLtCvGeoO+qUvuXok987FwoHba17zmr2sTMtib8Oj
+E8AOx5F4IUEHWOiMJF0wSSqym4KHlnFWcSe74MNQJSOoSP904wvzFi7apoEv
+kgQBf0BhW2Jdsj7Yk21EYpXi7YWknKVHnJkpcEVePhpvip/Hu3coofdIU4EB
+GwE6LzovUhBW50S6w2lwPHBYDEhLc1JKmoV90MoBp8Rj+JETGq6eBkgBmI+/
+geqJ2lRhU2gJNueYqDmaZ0ZhRm5CSdJEmBUnJDOeZZuFC0ArR57I95xz24JN
+vQqxskm8UsNhBfjYS1yz4o/7xZ4U7zzYDmW86oiyrK8CxOw8t9r34fw7S95n
+KV8/fbZ7Ydz+0E7SttkpkTfDlBZgFnFub0JfUh3+xt8L4tLMHP/GhpXYcl9X
+brCf7xrJd+l2H8q3kgB8GSmox5LtRPc2ayHf6jcpyCyfe+/KgO5lztiTG3TF
+MkVllnxRBrzuxe7jVcoQY1JkxT+ZS1KoZCICubLXVHpm9ueqdOUL4jJW+rhd
+BHpmsDxXsnmybZjmMA3dqvhsD79Zqn+5FrBGEUdEFLniEDzTitxZz9Ky5IXU
+1SdCAtF4f2ZSpgN0g3Q83i4IXkZPW3v0WR3k9QuKYn/e0LNzQEfqsYnyfDan
+bnT84osvPtYr1lQ8NZUjxjrxy2QIly6BQFs51qjILJVr25gMkyHRD46WAvBk
+ouu4Da0zOIqfYxU9NFloQ3Hm1MGS1ot7OD5X4XRSbK6V9XAn2fZyS9MiYzTh
+kWMv0YWXdgiGFt9XX+EFBXRZKcN58A450SelKnNEKQfRpqnoN9QBDYrji4qs
+d2UjhTeVDtSflxbOrnej2zdqU2Vmo8ExAMykLU6ua8+XE7hzF0uBX/REJ7vH
+fy47ieDj9nz1ZSF+X8g8eoOpeKM6X5+faA3WC2MQjORV7DCbw36VGvsyp71k
+fJwFBPf36dJsLlj6Znbv5pYkKIAYWQdBEuqI8MjAttcnnl7P6Al/5mMQBAMC
+gRplDiIADarj2zMalq0BUgTCb+FkotXgmCUV567/X3V30yJnEcQBfHRZlxUx
+gjnGJHrzIIjk4iEaRciCiB5ylbgJ5BPkFMjFc676aXLPx9L69VP/np5xDHj0
+gbzM7LPd1dX13tVVqbkiuXAb8uawJ4ME2ZBoGs7sIMjRF2ufPmbOMNlTgpYP
+5//Y3f7UytM+Fj10bv6EVFyIl0Kghc+F0jryPt8DBlCFunNTCNutlQ0EGTIG
+uerQYt+E6my4Bt18YXZYB25C3zlSI83M1Z19Lns6gmqdTsJGpoMBbfL2tQLO
+BjdL4PKpNyGHmcme77axgyghDPWVkt+U9UezeW6OJ9a+NDwU3j9gaUH+J6jE
+Eojo4oVQCElGfKz4xO7w8de0188H3nPzCp4sMMbOemoSOYuoxb7ETaRTHBGm
+LWNzE/qZlk/l/B29f9bTIgvbxdlmsgk55eQUC3qfzGCcQ5rVMiuSrysAbeX7
+8o/btmJdcx/gfsv56Ty2+TpWo+hlJGzI38QV1mQq20oPrUJEASHqg2FWSM9J
+WZ/PLojdShVjR2dymZIGSvuK8CZCFJTGe2Lg1DBj3klrMEJQCQDjQ7LNz4Ek
+9B5GS7r+vtDYJiYEvsGQfpWoFhyOBVgR5RnU+2qGHW54Lj7xxJIlYfNZFnak
+dOPUWWC3LhLLcV/MArCS+q4yHu0I/zTH2pvBc2OoMRyRNCbT8keJ9xjn6c0g
+F4kzKJtAElnkM9aQ8oc4CtRggu+uHAC7MAxJc6y5eDRdTuNr2FyIRdIp+1FI
+zn1nujA5GhEicMPoE/Et8rrT6PFqX2saE/kXzxEuFAIj7eMFfpRHBBQehiUy
+cp8L4FisGQe+4KFLr3Tx5MS0YArrsduS3FgK8HZPBCiuLNtg1k7b7lPBu21n
+FSZqvr+mvqVNizgLZxbJZfWoyvV74fGiiBhRsXjXe2R4iqJg+KSWGbXITbXT
+Rehr5c04e5mJcUf48Atrptv9KnjBqsTzKsNIXP2/k8QtmJuWe0s1yA+aLhbH
+YDzIUbCa+1iU3WhOtQ8igxBkP+GPXHo0SkmkU0e+6UDq9S4buVsTCGABzPU7
+a8vrWKNLy2s7JbWDUVkgh2fxn0HoZvubawlsx7VFMWcOnGXgxBFZ0R0ceg09
++nSrp/DrmAcLWD5jjkhaWw+jQBKTuIAScaHahxzKrw5Y+BSrd43R3RGiGd6L
+oB2LxEUMmplxfT5eMRGSFxnGXJF9yA5LwE0XS6mZawcD0mrwZ/W4NLfvU3HC
+bpI8CakgETLCWVph5JNGEsvP4h2s4A5SiHZbm+quCN/g/GdEApFgX1ZiSv3n
+WlsSJQg8qdA2IIGSEy5u2GqNEWali0M5U3TY9EiH+vH/ly9fzjo4NCjQYUiY
+gn0xz80PkRktRUcfZzN5h+ZCPvXraciWsDcTS6aNOgv/jrStk2SL8zk0cuLE
+EOtFjbcacL/OCFVgWqMqwfnalwQi3oI2wqzjvzNa5VVClq1ip1lp9U4KnbEo
+ddCwljKo34YdGqkD8HNT1hnv9JB42nB0e/ljb8OKw+EuRzOH9DkFJdMhzt6T
+PWkT3gZXhj6BkkTXqEvlfcUrOZiXl5eY61hysVvfvHmTODF3lJsriccWoJ+C
+O4HRFTtf96+QtOzFlLmlVAo7pw7dfuzJMU4MlnIeT51+Ha2Glqda8ogpFv1/
+uIDNLeS/svMJn4Ir1jSGpx0TFWKZnIqw3W/4yG9kT3nUJp868v2pXz0yDE4d
+xB4tBXtjnCR+EFilm7MUhEXAEIT4BNnW8nLwi50W5X/q9Obb8ffFCLhxt/lv
+CezBvPtJv/RwdG73hl3vXiK3jo4cgr9ZIjySlL9P3XHCL7Er0VynuYQ947Po
+b3YvPtKkZycW8KCnAqzvAChXk5x2zYXISS+pKDNDUkUcUdFGJkz3W88ZpuGw
+qMwRhEICzfpgF2O9YgXJ+mXOepWRF+CZJTQVM6U2KOjiZCfX7PuejdCgMoXu
+CYVuSZVuPdQk5kqPeql4BUwj+4t+y+FHsnJgwOeSRMnJIOkRHgKkwIAupCaA
+cG9hdGJQbHuG1j4eOmv1oFMggkIhrjFcIiSMCiehaVPpMayYFT2eAqGwwgnl
+1yQzkHzJHMQtgvNQzcAWs0jxhlHasFRRc2we+8ZBuHuIG8jty1PDxBSZq1/e
+rJz3R1DKK/Bucp5xdy4ai7A/Beh6qzQ9MYq/P++vqXynKSi6/r+t6uZYuURj
+R5n0Sy62MEBsBOckEb2UoCEbc4sphZ4JwHmMezmCeGya3PYLomw97cBVT8Uy
+Yo5m16gjWXcWgB/xXIvAMYZ/jQOsHJOSToiAoysBMbRML2I4RXYCF8YDF0mS
+pRoH3ZNXdufm4e5YNT60QxBIOteQUdiwD4FFAu3S3hijRSP7w8f0gCip5sEK
+cvSdd5jPwQqT2l5txLd9B9lWTkJlfuTr+325i63yKuG8NoqwYbSAefhamUcY
+rtt+zXlgBjZ8ets8WJ+4I+Hj51AG5iDW3aVobG7i4HxW4CPSEYLz17WjrsR3
+eUzpcIsOgYcQyDBHHff6fd4HS9ynR/2djeWH+/TNNvWD/hELhCx3hrr6jinZ
+FjlDg+A14BS46SVMroiHtRLaNOzuux4IHCSATz/0b4i0yPOnPIpIMxA5J4ue
+5i9///4K5SaY0yOicJma59JL4yJlreJaaTx7NIqdETDhLhd1ZRSb0wdJcxSf
+05P2aFESLZj+ki9+7e+IF6pLQ61wmg11HIEu06+P0BC0Xu/tkmQ4HZ3fPZwK
+YxMOGDCbg1Y4nrURc4hcCXaJ7eFCri6Y7uvSb/XCKCzeys/LeDwYtwDyHi2B
+5gS1G6Q0OxT16D5W44GoroK5u+p3REA74jkesggoSuqkIaJsq1w7y7R8aorJ
+pzvrtGcjAVDG1fo6Udh5Gb3qixHYYa6gCn84UfI8FKWPTYER0SzdRcigUBHM
+EizHqxUtQfUxAfndGEnXrKyWVpbkIPwkYMHFcXjw9OnTOaUNEi7GrHmHHV6i
+83DKLZYrmnV1dVUrrRfrOwkS4iDETPaXx8KTEuULRugclT94utnfFGZbW9gy
+PGGFJj9CNGnm9bU0P/0g8kQsPVzeg4myow9ODkTGHGZl5TKCumXTeGh+YDtd
+6Kkf9auYm1WWR3yTXpEJEGTbiBTg8xBTjD6JB5mSylvbgKJwxuDS3jZszqrr
+0oAHJzodYdhtpTx2Y5hP/7//39hsu0NHkCPjsqTjLNLWogk0YWnEr/proh7/
+CCKVcky2OVnMuscPLBpE+WSb53HvALWIxKVTIgD+kIScvTHz3jBY5KtiLxaE
+HK/yS77sH2NSteIEtoknJ1dF6kk2E/gixo1OtKCdEsLXh3DkHNQKPKL1iPvV
+q1czYYhtCbacAVoSvUq+JupM36b+VyIJBB8+WkN2TIvUM0mdIYhNCzRP+g7h
+0eDCiV8Hu2YRzBcvXvRqrvsthCquT7zSrARIIT+DMMnoFlxJF0FL+UFZg02G
+Yw0BsgbyApIxbNbAbOtGVxM+AkDBAhLXFBR1fZfNIEABkzbGZi6Z/9tKfBeD
+p8QchAcRoDCKgfbJZhcjIEVO9unc2GIyE5KzkFgKItuJHaVU8BrtdvHZRlKK
+2QzIdX7hLJlsJ4vZouzUwEAfi6ZIAEnlVUhS1fBoSX5MmMXMwzEyCym6DOeI
+Lx3aPCLVTqgcwwZ8+4BfyqIuvvP32Vi6scjtxGcoUjwjzSjLFMD3ruyuLBOd
+OyZYC+FgomfPnk24WGyEdYp/0/lQzzE4WObZMPIcC679shn+6WeZae2e5Mj4
+JWS9pWKlLBUr0v3Pnz+vsfx9PnwZ31mGHVN+Ju9jbOzgqPLdrl7OZeZYu7sX
+UqYIJNzvu6yczbtg+2qBm/VGvaoTkPfQrYuQPj0+XDorqi8cztdZrt2udC4d
+hyDAFF6yUzxW6jGEa+eh0Z2UFC+kbJL0IJynqDnbBAGW5MpmsaZwVdpd2Vjn
+bfJCszJCinhgmwRU1xDYqsvKrntIxzCg4U5hFQjFki7RZ1XkODYAHejZnaC9
+vr6e9ih/hc2hpmwC+rCAdl+/fl2gsDa3q4U8RkZebUimoAYYbLhcWIr0MoVs
+2Kwe/XHFxT4EgnKVlsfWq3rSokgA1XbSC+IVVleclpEwgiMBWkVcXfwsdTLX
+pmfpSpUFiSiYUWwtjMcU8Z3lRVCmGRyKFTTtmG4EpegV6Y15QEcXFP56DX8s
+AMBoaaXdmq8pyQJGf99e/7N/RHHEyVpbR5CfIkX9+qCb/2Az7N75G3i8ZjA=
+\
+\>"],ExpressionUUID->"44b86e37-6b82-4b3e-90a7-933c9b9fbe25"],
+
+Cell[BoxData[
+ GraphicsBox[{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:eJwl1wk4lWkbB/A3awgn+1YOxlKok0GROoeIQrRMtlH2ofgcNYpK3yFkpOzN
+TGbMQSOVsZQGUY5lKFRnxpqlTtpE5WTJNsP3f+ZzXa7H7zzvcz/3fb/v+5yL
+TkDkvmARiqIe4peMnDfL+NFjUf/+qLEommS3bStMn33Ov6DKooxpprEJsHt3
+zJypKovTsJ03awkLFR11x1VY1JeuAyfe6LIoTsj59FYVFmesrHsyG6YVpI03
+Yj4mWeKcHcwf8LYYhh2inBkzOiwqI6SqQQXxi/VcO8tgSvwHx6Pw+eRbHVEw
+N0CE3ov9FF9t1GfBfinX2HvVWByv2U2bNWH2196JvciXWZt4R5TM/yOud0id
+RfVGj/8yT0d+NfGTAngm29Dub1hw3eSphwbqmAnfJo3redEGvvUaLM7PKS1X
+dGDOQaPFlZosTrdOyGsm7K5/jG0FW5qUOAeQfFPfT+3WZFEHn3S0JBGXJvjY
+YN7P+KbVNbL/2/vGcnD6n0ZlzaSe0KcZTdhP6bhFWD/Mqs+19cV+JVn71V+S
+/f6Idn2J/GR55VMvyPWRw/3e6pjfZdLZBfNvVLW3o77QM2v0a2DGo75Ia9R/
+um3EIp3sb7tRvRL9yk4QHfWC6d+l11qgX1zfmXZ1Ev9GUspj9Fv+1cZlPp3U
+O1nGwf2Jj/tVPQHmX+9a4Y756kL6Cgbpz8Tg4+2wIK70Up02rr934Z4rfEWM
+vawFc0WOtJ6GNUMPm6SuRb5Jf7Fwv6nVIYNuK2FuEVdiHfIxzKvk5a1Bfrf6
+bubDmZ3j1Y4wZ8S3jY56yiau6MvBrMvzTiVw1inB5Qkt5GMv32+KfkgOZmwY
+h9n9RpY34BJffsUSzJjS4qqgn2b+sgUGWM9nNRhFwLPjLexDMHvaa+V1uE8x
+v54LV+i0DbXCHirXc97CglePe1tgacOFDhPky4k48lch7FAV7XwEZj0r9gyA
+mbqxgVdIfW1yFyTgEZqGWg1M1y6bz0Y+mh5LgQ2wu//LYBr82NPlP7/BwoZN
+0QmoR6fpeQWHrP+41vMT6pc1bFxlReJHtIUFwfEXOjv6kA99h+WjEfTPeHNk
++mHSD/ubssfheuVA027SD9XuVg147DXzjDXMvZfp9UwZ+0rmKPyA59Dd1KaS
+B+9fGl+cRJ6CmBitZjjVu/qbvTDbsnzra/ijq8vBWuTJvSknoY94Rf8JcmKo
+k+e559VZ8n6WOM/cRd7CVydffoA7pLgyvuQcUFObJO/j71WTy2owP7HPchJe
+E/p8fAIj/WldWCw+l2ja998XcMWEh+UCqd+uWew97GetkR+BfdQmdWNW4XOe
+s8bBR/CY4ED5dpjVeFpTCXlu3SmZFQfT9y7Ob4PFfMUPNcNU8DTHCb4bHjEt
+RfKvU3tlBsf8wTN2Jvnf1pNYwvhzYoJuPEbB6Hx4KUZHtsKlYoz8A93adhiH
+vIpWVGNk7LaJakFc5+u568phnllptRX8vkV9Lo3Eu5o5V4K8kzqbeG5whd4X
+qerwrbOXbedIvquWK7LQHxFr7R9TYIFN8XZNePqt6Hqxf/u12rIW/V43UhAR
+iXW8UYnTUfB5X6maJ7iO1pmc4QiHXo8XrifvWcrNsG0we/6A3XmMGfXn3PZj
+VAuRaR9TwvrUbcPk88X28B0+MNvuqUI/3Jp0uX5YEfUtfxPHRJzCJNN9J2C6
+wt1jNWQfT+s5Q9hP5WtfG+TxpXXWvmkF7DfzRqkFjjN8nj8IV3Ss2O6EvN2V
+wyuHYEal7G+N8O2uZ2IzMF/cvXUd+uB1SGaIjnjCkszeU3Ccsca3PjAllX64
+Ar7P87P/hfjklgNtcFlHjtMbmOGSZ3sfHq08uXc98nevdAvIhcdVmzyCYX5D
+SN4eWKpurjMTZhiJBH7A/pplE69vED99l3kCXtyjPFgK029e1BUi/9BCA81c
+sn7NgMAP7gq6GhEA05oU5Pmo3+iYlagyzN0dI+YAy2pZHC8j+Vd0tbeif/EN
+VsWbYNqCHM8Hto2yKS9EvX7Kj1lScJC5IEcCFj6M9+tCHCmelFzgauwvdfdW
+PfxoyNziPg33Iy/XqBX+PJRhuRbOYGiLTcDhS4cXVsvj/p2zHTEn71/njjZJ
+OfTnn86BbPgH0539BrKIPyuokkB+ns67V55Yhedrw7zJefjsn1Wl8zK4PwpT
+TnKo76qbl89tmJdfdCeHeNChpwCmFpXXKaI/GzyTVRthgYlrCzl/LvEWM6QR
+j/8kLHIYTjxw/FQ07OfjZ7yWvAcnD7vMwhUFcwdsyfflsKRLIvJh5Ob02JPn
+3uOREQ35CusYTCN4IH9nwSVYoGP413vEY9zJMpyGGUXfhOfCZnmOZyxRr4At
+EWhA9tvyYrOrPKlPz+lX5JtWF7fVDKbXb+GqwWb5SyIjWM8/WpZK6uXd3d7t
+A7OHvQLm0Z+YmBcPCpBPxh+93tGweZT5rRrkK5AXaovACTpX+q+hXnbuF2d+
+Rb89jZ79GCON+bY56SA47V7GuIUU7v8Tw0UWLJKw3DYuiXxqP73cBp/oib9Y
+LIHnUdBc7k2es9fJnsfEMa/i/TN5rj4aaPh7i8HndnmMw8mLgUGhorheq5bu
+gf17g6V1r4rAsRNKXXDy1K5pBZgl6n/CE/V81NucUr0C9XHUpQTkfLUdrc2E
+OR+ajwegfqfA4Mv5sPCjdWE/LJdve64fzlg4+YUN+uf3ue27zYgntBhNPA+n
+cNobK2HBnYLM30m/t53u3Yp8eCNFOa1w537v/Icw33RTDJk/5r/z/h7kz1vp
+05NM7leXgVsDzLD9Z5ycdyYOSXE01Muwyknswv5vLtRpWImT8zDhnie8b4+W
+mhlMTzjaSs6tW+qFrz+T9T/ZXiTnTVmUaXkS7C7ylX856i95rh79HPuzlpwz
+DWANt+ElSZjeT5ci7y33q4ASceRPo++ecYCbUptWvaDQj/yxyHm8hyXXyvV3
+LTMpzpd+Nu2wSWJAc/XfTIpt/SDnLmzfE5tisMCkKujaqzpgc8eqlWWzTIrn
+kpa8AKdkf74QPMOkWJ22TjsRv3R5vsd/CusNjDTIOWKe3ipf9QlefSSBjvyE
+jzJfhAqZFCX3TrYIpj9cmyU/QeYbi8m5HFNrcET/I+J57Jsqh53Skvpk4Az3
+3hpj8r3Gdo2tgGlhX9l8T9w3P/sZ67lB734i33s5Pp2sYcTP2JKla4h+p1W3
+Db7F/vTbZ+J2wFqatFOiyI/2/sgkE/42jxukOs2k3I+NR2nBVYqlzjKoJ8PY
+6McBEl/u+7QHsEDb7qc4OPH+Wf+tn5mU0OxrTWnYZUvY2H6YF5vzKgn5KjVY
+i0gSRxoXz6K+B8UO3XuwXnj2fU4I3B99Zb0x9qN9SpEZQH/UlmfZBZPwphlD
+L9iGsSG8Hvm7208dHSPnJjN2v+oH9J/WEZwNO7379pDDKJPiX2wO9oRjWsdG
+N75kUgxFB3sbWHBUul9uCP08+9tWFsze5MBb+BPzxb19gTAngZ0j0Yh4biZ/
+X1X8//8dHO49ikb+UGL9D/eEi/g=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.1542307644825485, 4.562492355174517}, \
+{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:eJwd1Qk41GkcB/B/OtZapMORnJNKyA5JKukvcuTI5ljs7CRyjiuxqwhZocmu
+u0PZDjxNjqKLzfF4HCVUZlLKljMhV5GMY9nv6/8888zzmXnn/f1+33nnP6ru
+QYc8RSiKOo4HeV68Ypg0JVzAJU1T8jcldaPgYBFZpzwZmrrtn+oXB19b4hdn
+KUtTB1Q7itPglJCDVn1w4L6hizz4DSe095gcTZUtY1nWw4m+s+xBWNiVn9AP
+h/OD583W0VSuat1TCR2sfyIITYD9ptZY68PFCe9kbsEf3jZpHIY/L4yOF8CS
+M18j4+EWVbolFR7obArKJ+9v/VWaDVuz3rs9hX3sAy9Iw9/GAye7YZ7xlEMV
+6teV926dIOtXfVM+DLPNREPn4IuCHw0X0P+3FSdy/iP17zCm8uDHugU/TJH9
+5oP2usI90yc5g3CM4wVjBtxxL+rjK9h5V/LKpXDG7dKvlbBQXMuZgj8NnbXJ
+gd1yPXQV4KiKzS8S4OolbgtO8DDF9wggDpPwvAOfl/f86EhcFHKEgf5o/5bv
+TOBwXlVYASyiIdAn+cR45H00xXzD1WHnmKT+SIjkAByzxatUl9RPMqr4Ux55
+zs7OGsINjKEs7fU0FTqesekgHMzRyaqFc719033I/B8E9mYKNGW6vlQ/kdSL
+PuBdArP5lQWFJG+jN48pRZqybXpo0Uryyz//RQc+1MjTJ3mpL3eRNYXjqNpz
+G3Xx+bmDagbwsGG9lxXMc3t+T4qsvzf8fQBcbTH8iY/9r7T0TiTCFmaqe07D
+ws12k9lwMaWhtBHOkGg0LiDrHS/l1aFfcU2riGLiDuMt3rBtenBpEdlffXPr
+GrhZc39UDkz1vd7Lx/z5FXk1abC6Sb90Hrw2qqA1Ela51FOVDosEddp6kHpb
+1DdcgwXeJgvmcOKIxekmeDThxDMtMo+yHksa+xtNR1xdA7dM6sZGwO5lHKN5
+zK9ia6c1A/82Nms4SvJp5Oglof+46IGuD3AXZ4KtifnZrx5J9cJy8hvvt8AV
+MT1m5DzR5e29oUr4ngrbueS8CR9Z3ZZSpin/l1XBEqhHb++3yoYPPXBQ1oBF
+5XZ7i6nQlK5Qj2UNt6aI7d4Jty49mh0CJy27ftIFZlWylS+TeU7I2vnBotPs
++VqSF8OlhgOLhQX8NARf6a+6z4bfnarcv3IbvMeh3RQuPNpooA07mEdmq8Cf
+e6tfmMHUg1szg+hn3KNPzBku+5xcz4VjM7vtj8B20V6dGrCrQCveHVb/qyaT
+j/m8xGW//AK7zUS0nYFZii72trAPy5NvAxuN+Lbsgi9KdmVqEy/V6WIQq+xp
+1VQidRd2isIpM9M55jCv+b/yYfQvF9HkFQv7HfG1E8DOrmq17fCnbnXBI5hZ
+cqbUBv3sYhqM34R9ZOLrX8Mz6QGL+Qj3rl1ngPnc2r4cy4TjQicLzpK8JlMv
+XyB5Os3GvoNdTZveXyd5jidPaKnifjCmsuI+qWcUHvY7LHAcC34GN7wNfFUG
+Sz3PWD0Ch3Ln3UfhruP+8avQv1q3mKwMA6/L1jF2wkzHjmJtOEv+jhTJy19B
+sWEHPFDo5sWFDXwuC3SIq9L3FcPFybWKSjAlFd7Phxs0hsrnsX9u7Y2XI3Dr
+jhyv1zA3OrtNRA+/C5uin3mwwvnOTVJwypN6+XC4+biRhzSx8VtXSzj+H50b
+q2GL5aeKlGGVqqscUXgtN+vwPOZvv2Vydwr7J5VomQ3AzL51j7tJv2N3Mzth
+J/FM4wY42O/vmj6Yu483XkjO08NI/1m4ImSsOnUbuZ+IOapgfyHHOy0cNrUo
+9LAn/cUZMj3gCg3VB2mwvt32rfawXnH8w39hSTn1F5Ywz1bvgCbJj1k1Zw5b
+K7h+PQXHP+UyyXmy7u0Tb4GTfLRDWLB4e++E4gaamvtj0DGEnOdM//1H4Ujf
+XJFkOLdrh9g1ePWItFEJ3LxEoec5/CbTNaoNluuX3TQGL/5JIo/FS43+H88X
+pNI=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.631304063066693, 8.096807950948126}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwd1AlQU1cUBuBbFwiEfROF1kCC2FEEZUeWJ0SlaAXLIiBbUaDDCMYFiIA0
+rImIEqhSZNMqiwvSFIGiUxVbEZFKAdEShyrYmKJQRQsMQ0vof81M5s037957
+/nPeSyxi938Rt4gQsgtfeiWqhYWFr+0Y8uFjwhCjgf3+l2A9j7ibunBhb825
+AdhU+Y+jypghHSuttObgkaM6rB54gNd+7+P1DLl/gHSmwa83dm50h1ltt+Tq
+8NrsUV4QPMKsiBAZMSSqqrlqL3VVyO2/DBmipXRemwRfnMw9vBnmtzT1Uwuf
+W2d+Z8CQHTVXSAI9n1vxdjG892BCZRhMnKckh/UZ0nL8wsstcPlvYrs5PYYM
+7hg7YAeHxh8tq4CHfR00TWHZZvGzMDjvdcrpBdpv8rFYNzjTJezfMVia/HOx
+O1wTyWY9gceGhCNRdH9S2c778OrHhe+r4TJFNOcOLJKXXJ+CX7ywiqAW8lu6
+I5BHdfZUVjfsq9ff1gsXtboVyem8uHk53sivbOUbvYNdvqwzkMES+yXOusgn
+2BZ/SRf9V/SPNm+g/RxYHhoOr1POzdB+WZ7zcYWwhLvLLRcO0DCuq4RTC6LK
+GmEXSyvZcVgYp84dpP2WuerQ/aldKwxn6TwdLrqy4ION470mG7C+warwDK3/
+cIptC4uW2S82hKV81XMv2NfzrkYG8rsPN/X6wuekSUvl6Nfg0u2+z+DymjPv
+Hag5CUE+sN4j/pCNLkNm6qednOA+/eB4bR2GbGla1M6FZcIQoYk28ijG4rXh
+joibxUFaDOHtq2VPI99kx5xZH5shTiGJRcPUBenzJ+DQxdn9nXDfN9EexXD5
+T3MXm2HRoTUqul4ZNn2llvYrcqjfjvNaLMdXVdP7MymbZmHLkkNqH/y3vnEX
+6ue8knbT9ZNe87svI195anB6CyzljVuUIr9T4udXe+DVtcplzuhP4N0mfkXn
+e8ss61t4idL6Vy3kb8/5w/dPeMx1asIeJvmTTUaYV6OHDTeSzqMyNtkaHv7+
+P0kBPCtvYi+HOfJ7jk1wzLOTM2PYv84/LXyAnicLKS2H458FRryj8zWNtlgD
+t4m7JjTsGWI3Ff3pNuSr33PX3AxmagX55shfcLUqkQdLbRoM5Og3Iim/24qa
+/8kdKeYjiQo8vxIW2LO6AzXxHvonPDSAOxQbb6zXYMiNfbwCAstqxKddWPh9
+dVwOfY36Uhl3/pA6Q1b5vNSk+QTirZIJNYZkvfHKuU6fb/BTnwbYr/14w3na
+/0dVCXXwE7Mf/IphztIVfAWsEA2qZ8MBXhmJkTjvyaZ02yMwk/GYrY56D0rZ
+14T0ftqxwkFq2bCJCLaz9XD8Efma/XIT6Xl9uy9wziL/SdmbrfV0vzLFMBP9
+zcT6y3+h9W3mUj3Rf8VA6kslfb/CLTyH4BcBs6Pa6E80MdLqgedvOqrScIYD
+fGQb4un72J4vjIFjEs1LtsMPhpP5Erreez77LfYrv/q9qhHm5I5U74TzXJcq
+euj6lYWeR1D/6Z6oLgVdX9nJESBf3zW1wBk631OqR97IT/9fF+BJelVn/gcL
+PvkH
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.547014064132036, 3.0238996897848462}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt1gk0lGsYB/CPI0m2iLGUOxhTjGXaFBVfK1Ky3lRTJhlUipSkVF/lilvu
+SEmWsaVFRzVdUcnIpUVaTFe3yJK4ipLRIpUb9/92mnOcOb/zfO/y/J8xZ8yC
+InxEyhRFHcQfeWdG8NrHp6kfLwO6at5MP/d1MPuavLlIn6bFIt9ZLnCe4EZA
+mD5NdUts7xmTeqtBhDOc4BrEeWOP9cuGde30aYZ9PiMiB263uW06C/Wl497d
+9IOFB8XuApj7lfLQhumj0dYZcHtwA0tuh/cdOm69WF/1e2D3SViHe2uajwHN
+rHSdzd0Ey7dnXLpjQFNTHVQaXGFhhmrrQhbNWFu47bGHmc78qLssmvqmCHIy
+h/N8tnx2M6SpowvSTv8CV6m5fKsxpBmj4jX/cuFIafqKaUY0Y9jZeckB5pdF
+h6XCr0dprV9GzgtKcWo1oqkxCws1NsD06OZyHWOa6f5QHn+InH9/wzNrY5qK
+p2Liz8DSiwtOEGf3c2/WkOd9uWw8T+0fyRpqgamBW5Ut2N/frdimn+zflvaI
+nOehKT80BKdU1hXOgNeovTz5neSRmbrxHu4/arK5zwDpx9lJ4QMnKtpYHeS8
+LM62Z+h3paX5XXJef17nZgH8crfj1UyyXq7wfo28kswGSkPJ827pXnvgLw4P
+hnkkj9PlbAvk+2q/q22PLfYPq69rQf7t71x5+TAdLoq7gPl8dOw1+ZXUZxqL
+0lE3yhteoA4LP8blZKHul9nXf9MG+bHe/VIOK2ltCoyFq4q/Vr7H87nLSgtm
+we2j586hcb4sVJY8woNVJgkKcP6SzSq59XDklEL18ZhnebF5fxGss8kwMQX9
+zEk8ayUm9XMVEl3MLzCmcfc+YifTZ8eRh6QrJ3sX2c93UeU45NcYfKOO1Omk
+t6x4eO5h46fJsDzUeuJruGqhwuYULPTiSh0wn/wupXcymJq4NSkC9laL/tJM
+9o/mC8TwOjcTzSG4an+s4ji8tEbQaoh+2JI6HgOb8jKtpsFUitYEH1izbaDR
+FZZyTTs0yOdFL0rHn7jSObcEnyeX/SLXlXDkjTzvJbjPDk1RgC9Zr73q3D/o
+75Zpd/J84r6/6lfBBp9MznPJ+oaQWS+Qj9YucQ/Jj5+ttzoM9qzLoEh+jFJs
+3BDyTMhJ10sj/XSO3yaBa/v8zvuSPDmNW8n/U4+7ba4GyafsWdNEWNSarV5t
+jfxqRusrw4uPWNjsgPku2bvxfUDlc2O9eaReOH2REeoT9nJknVY4L3NHggec
+1ZOcnA+zn06ZnQaXxuSdDiEOlAg+wq7yofTpsPzyNeUgzFOyNjtNA/YSCcUt
+cOeY60LFZOQ76PRyDfqNtwtd2AqnvPU40o75nq0RjnsKs+1k+oHIq69Dm90E
+e2314D+BL9+qXdEF68y78dkJeR+c1OH0lTy/8W8zzI9RYbiDujhP+vjAzIeY
+j8uh7lg+ud+A8+UPcFdNa8Jy0o/sMWsYVqJr5JutSH4JegqsP/tfhW4SLGx7
+H3EHtq0IsMqF2+9a6SXAR8vZ1hdJP5eed/PhoCvlO6+QflX1qutwv+DE841S
+sr7RnheA+UuKP+0qgOnNVx3b0F/Z8JjRP/bX8PALgrf5ZeYEk/uWGA32IJ+d
+7hYtM0h9bXDMLjj18ZIH39Ef/fBirSHmz4vz7JBNJt+flovvIe/EItXuGFIf
+TD0ghme02r6xJXWNQfYW+FjhbbOOSdhPNepqCOZ7PTG1+QRM/XFbFgs7F8nW
+esL9vbzEM3DphCsN6jBdUun5Fus1D6+0ecRFXctk3iKc3/DwuFYmXKW66bQU
+rvW2qI6AI3X3KFlhniWlu829iHM4S4vg+VNWp80m669Vc2yQj36ZSHUqzPZK
+1SpGPs6X1LqJdcZaX7Ag+TudcJwL0yknR5Lh8Mn+qcvJ+uPi9FeYV0Hc2Clh
+cN6ZuXVWJjQV3rdC+zdi34pGPxOa8VMb9eUULJzprxWC+t3XgbnVpL7Rq0EA
+px9IqGgj51nuKXHE83trT5h/JvVjNgH4PDDsZUWNquhfav8y+gLOU4SK7bVh
+JiDu4hLU3y4QPdEkeV2fuuE5ub8d74USzL9JFaxDf0tZt1veYD+pRtmfXZiv
+2cP3DbWkH9kAKxx5KDUpL8qGU56UTv+G+WpUrOCEwHL1JoM0uEa5qX4SsXaU
+yzx4xqtXIx2WuK8pa6sy8u6NWnclA2bebEhoxnzqBVmmnnDKIYnPI9jlvnWS
+MszP8k9GnVLTPeV8nYP7qsvqsJ4aWe8ZuR1mwnnMfPhJ+vBEB7i911L/JOvn
+7wLOz3dD+n9/iwB3
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.131120426728657, 4.809365547472548}, \
+{0, 1}], LineBox[CompressedData["
+1:eJw9lAtME1kUhmd1SwrrIj7WFGbG2pkRFFBBtKJGORCRGkQRkLfsUsWIBNsV
+TDCk2KrxibsVQUVAwkvLM1QREBHQrLBrguIKigSxChrLIjbGDeALb6M5k0xO
+vtyZe+855/+PTKkKSZhCUVQAea3x2yPAnJ+skQcqWDkjfokA7bGD27h/OKC0
+F1npVgGenC4UmU4QFre6FqoEmLj/wtM2gHBka3mbRgAVVTJUMSkDSr/ppjlD
+gEgbi368nrAp/87PKQIkdRTJlqkIW/rM1dEC1N0MUOa4El6gz30oJ+d/SXnk
++d88oNoqfUW2AniYumxeXSGs3V67/CEPDQOJq30PEe563l9zjofzJjtt6jbC
+v32YGI/kIVJcUOnvR3jXvsEWRx6K1maP2SwlfEwx09jPQcvr+oNn3Anr7cN2
+lXLwZfezoWBPwuM5hzekcOBc53F7uY91PVSTFMjB+gcPfukJI0wlhmsXc1BV
+KLqerCbceMdym+UgwilN8/lPwqa1WWZHDkKqu+wijIQVgfPn8hy4aatPr/yX
+sOWa+pM3B+WN/iGJFsLiyuiz0RwMzvpxpMOW5D9+S5xxhIO+qS3JSQzhtIE9
+PU3k+x/K3a46E1aUlCj/56B2e1RalAthB2ANXjzUMd0HdCxhSfe9yb08PGuv
+qW4TE270m2yo5SE9qWwFb7bmryv0GObh8t7eC26thL1HTGOMAJ35Lx06T1rr
+va57aL0AqXKTd3wwYbXy7eKdAhR06nbk2lvzU+zX7RfgsWJGaK9eSniKrZ1W
+gBxvq16kuO7VN1rlopqL/3cd/STvfMHi/rJ6nz/W/Mri+WrzsoGE1wzer3nN
+5rsGHYP3n73xmv76IgbzC8wpLs0YpTH/YnME9fkvGutjiAmaHmSksX6PkmsM
+uVdorG84fVhY2EFj/f0+jrmoR2jsT4MxNWaRlMH+XeXK+jNjGOzvzr/jhrcU
+MNj/2NHpIpGJQX0YB9+fEqQs6idDG9u9NZxFfbU0XUzP1rGoP/c8X3lcAYv6
+zNyS9aH3Eov67Sh77PAuj0V9R81sN6Sms6j/vvjhyTn+LPojL8H9uGaCQf+U
+K+PeeV1g0F9PnSWh+QsZ9F/RZfXqngoa/emV3dx8Tkajf9N3zBuwz3JCf7ty
+TfIKygn9Lzm0Kv/N7444H9KCbr33GZbg/NAkrlx3I5nw9/nydJo1SuAr7LO5
+Vw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.354800000000001, 7.75}, {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.499999999996362, 15.500000000005457`}, {10., 
+         9.500000000003638}}], 
+        PolygonBox[{{8.552322615314452, 11.98173265946094}, {
+         7.602165824326175, 12.816718930329426`}, {8.293188945044921, 
+         13.219815750748694`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 12.323799910437668}, \
+{1, 1}], LineBox[{{13.500000000007276`, 15.500000000005457`}, {
+         10.000000000003638`, 9.500000000001819}}], 
+        PolygonBox[{{12.052322615314452`, 13.01826734053906}, {
+         11.102165824326175`, 12.183281069670574`}, {11.793188945044921`, 
+         11.780184249251306`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.484057296392571, 12.323799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 15.5}], PointBox[{10., 6.}], 
+         PointBox[{13.5, 15.5}], PointBox[{16.5, 5.5}], PointBox[{10., 9.5}]},
+         InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T19", " ", "P1", " ", "N37"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdiei/gigjfhfjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdiei/gigjfhfjhj.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: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:eJwl1wk4lWkbB/A3awgn+1YOxlKok0GROoeIQrRMtlH2ofgcNYpK3yFkpOzN
+TGbMQSOVsZQGUY5lKFRnxpqlTtpE5WTJNsP3f+ZzXa7H7zzvcz/3fb/v+5yL
+TkDkvmARiqIe4peMnDfL+NFjUf/+qLEommS3bStMn33Ov6DKooxpprEJsHt3
+zJypKovTsJ03awkLFR11x1VY1JeuAyfe6LIoTsj59FYVFmesrHsyG6YVpI03
+Yj4mWeKcHcwf8LYYhh2inBkzOiwqI6SqQQXxi/VcO8tgSvwHx6Pw+eRbHVEw
+N0CE3ov9FF9t1GfBfinX2HvVWByv2U2bNWH2196JvciXWZt4R5TM/yOud0id
+RfVGj/8yT0d+NfGTAngm29Dub1hw3eSphwbqmAnfJo3redEGvvUaLM7PKS1X
+dGDOQaPFlZosTrdOyGsm7K5/jG0FW5qUOAeQfFPfT+3WZFEHn3S0JBGXJvjY
+YN7P+KbVNbL/2/vGcnD6n0ZlzaSe0KcZTdhP6bhFWD/Mqs+19cV+JVn71V+S
+/f6Idn2J/GR55VMvyPWRw/3e6pjfZdLZBfNvVLW3o77QM2v0a2DGo75Ia9R/
+um3EIp3sb7tRvRL9yk4QHfWC6d+l11qgX1zfmXZ1Ev9GUspj9Fv+1cZlPp3U
+O1nGwf2Jj/tVPQHmX+9a4Y756kL6Cgbpz8Tg4+2wIK70Up02rr934Z4rfEWM
+vawFc0WOtJ6GNUMPm6SuRb5Jf7Fwv6nVIYNuK2FuEVdiHfIxzKvk5a1Bfrf6
+bubDmZ3j1Y4wZ8S3jY56yiau6MvBrMvzTiVw1inB5Qkt5GMv32+KfkgOZmwY
+h9n9RpY34BJffsUSzJjS4qqgn2b+sgUGWM9nNRhFwLPjLexDMHvaa+V1uE8x
+v54LV+i0DbXCHirXc97CglePe1tgacOFDhPky4k48lch7FAV7XwEZj0r9gyA
+mbqxgVdIfW1yFyTgEZqGWg1M1y6bz0Y+mh5LgQ2wu//LYBr82NPlP7/BwoZN
+0QmoR6fpeQWHrP+41vMT6pc1bFxlReJHtIUFwfEXOjv6kA99h+WjEfTPeHNk
++mHSD/ubssfheuVA027SD9XuVg147DXzjDXMvZfp9UwZ+0rmKPyA59Dd1KaS
+B+9fGl+cRJ6CmBitZjjVu/qbvTDbsnzra/ijq8vBWuTJvSknoY94Rf8JcmKo
+k+e559VZ8n6WOM/cRd7CVydffoA7pLgyvuQcUFObJO/j71WTy2owP7HPchJe
+E/p8fAIj/WldWCw+l2ja998XcMWEh+UCqd+uWew97GetkR+BfdQmdWNW4XOe
+s8bBR/CY4ED5dpjVeFpTCXlu3SmZFQfT9y7Ob4PFfMUPNcNU8DTHCb4bHjEt
+RfKvU3tlBsf8wTN2Jvnf1pNYwvhzYoJuPEbB6Hx4KUZHtsKlYoz8A93adhiH
+vIpWVGNk7LaJakFc5+u568phnllptRX8vkV9Lo3Eu5o5V4K8kzqbeG5whd4X
+qerwrbOXbedIvquWK7LQHxFr7R9TYIFN8XZNePqt6Hqxf/u12rIW/V43UhAR
+iXW8UYnTUfB5X6maJ7iO1pmc4QiHXo8XrifvWcrNsG0we/6A3XmMGfXn3PZj
+VAuRaR9TwvrUbcPk88X28B0+MNvuqUI/3Jp0uX5YEfUtfxPHRJzCJNN9J2C6
+wt1jNWQfT+s5Q9hP5WtfG+TxpXXWvmkF7DfzRqkFjjN8nj8IV3Ss2O6EvN2V
+wyuHYEal7G+N8O2uZ2IzMF/cvXUd+uB1SGaIjnjCkszeU3Ccsca3PjAllX64
+Ar7P87P/hfjklgNtcFlHjtMbmOGSZ3sfHq08uXc98nevdAvIhcdVmzyCYX5D
+SN4eWKpurjMTZhiJBH7A/pplE69vED99l3kCXtyjPFgK029e1BUi/9BCA81c
+sn7NgMAP7gq6GhEA05oU5Pmo3+iYlagyzN0dI+YAy2pZHC8j+Vd0tbeif/EN
+VsWbYNqCHM8Hto2yKS9EvX7Kj1lScJC5IEcCFj6M9+tCHCmelFzgauwvdfdW
+PfxoyNziPg33Iy/XqBX+PJRhuRbOYGiLTcDhS4cXVsvj/p2zHTEn71/njjZJ
+OfTnn86BbPgH0539BrKIPyuokkB+ns67V55Yhedrw7zJefjsn1Wl8zK4PwpT
+TnKo76qbl89tmJdfdCeHeNChpwCmFpXXKaI/GzyTVRthgYlrCzl/LvEWM6QR
+j/8kLHIYTjxw/FQ07OfjZ7yWvAcnD7vMwhUFcwdsyfflsKRLIvJh5Ob02JPn
+3uOREQ35CusYTCN4IH9nwSVYoGP413vEY9zJMpyGGUXfhOfCZnmOZyxRr4At
+EWhA9tvyYrOrPKlPz+lX5JtWF7fVDKbXb+GqwWb5SyIjWM8/WpZK6uXd3d7t
+A7OHvQLm0Z+YmBcPCpBPxh+93tGweZT5rRrkK5AXaovACTpX+q+hXnbuF2d+
+Rb89jZ79GCON+bY56SA47V7GuIUU7v8Tw0UWLJKw3DYuiXxqP73cBp/oib9Y
+LIHnUdBc7k2es9fJnsfEMa/i/TN5rj4aaPh7i8HndnmMw8mLgUGhorheq5bu
+gf17g6V1r4rAsRNKXXDy1K5pBZgl6n/CE/V81NucUr0C9XHUpQTkfLUdrc2E
+OR+ajwegfqfA4Mv5sPCjdWE/LJdve64fzlg4+YUN+uf3ue27zYgntBhNPA+n
+cNobK2HBnYLM30m/t53u3Yp8eCNFOa1w537v/Icw33RTDJk/5r/z/h7kz1vp
+05NM7leXgVsDzLD9Z5ycdyYOSXE01Muwyknswv5vLtRpWImT8zDhnie8b4+W
+mhlMTzjaSs6tW+qFrz+T9T/ZXiTnTVmUaXkS7C7ylX856i95rh79HPuzlpwz
+DWANt+ElSZjeT5ci7y33q4ASceRPo++ecYCbUptWvaDQj/yxyHm8hyXXyvV3
+LTMpzpd+Nu2wSWJAc/XfTIpt/SDnLmzfE5tisMCkKujaqzpgc8eqlWWzTIrn
+kpa8AKdkf74QPMOkWJ22TjsRv3R5vsd/CusNjDTIOWKe3ipf9QlefSSBjvyE
+jzJfhAqZFCX3TrYIpj9cmyU/QeYbi8m5HFNrcET/I+J57Jsqh53Skvpk4Az3
+3hpj8r3Gdo2tgGlhX9l8T9w3P/sZ67lB734i33s5Pp2sYcTP2JKla4h+p1W3
+Db7F/vTbZ+J2wFqatFOiyI/2/sgkE/42jxukOs2k3I+NR2nBVYqlzjKoJ8PY
+6McBEl/u+7QHsEDb7qc4OPH+Wf+tn5mU0OxrTWnYZUvY2H6YF5vzKgn5KjVY
+i0gSRxoXz6K+B8UO3XuwXnj2fU4I3B99Zb0x9qN9SpEZQH/UlmfZBZPwphlD
+L9iGsSG8Hvm7208dHSPnJjN2v+oH9J/WEZwNO7379pDDKJPiX2wO9oRjWsdG
+N75kUgxFB3sbWHBUul9uCP08+9tWFsze5MBb+BPzxb19gTAngZ0j0Yh4biZ/
+X1X8//8dHO49ikb+UGL9D/eEi/g=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.1542307644825485, 4.562492355174517}, \
+{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:eJwd1Qk41GkcB/B/OtZapMORnJNKyA5JKukvcuTI5ljs7CRyjiuxqwhZocmu
+u0PZDjxNjqKLzfF4HCVUZlLKljMhV5GMY9nv6/8888zzmXnn/f1+33nnP6ru
+QYc8RSiKOo4HeV68Ypg0JVzAJU1T8jcldaPgYBFZpzwZmrrtn+oXB19b4hdn
+KUtTB1Q7itPglJCDVn1w4L6hizz4DSe095gcTZUtY1nWw4m+s+xBWNiVn9AP
+h/OD583W0VSuat1TCR2sfyIITYD9ptZY68PFCe9kbsEf3jZpHIY/L4yOF8CS
+M18j4+EWVbolFR7obArKJ+9v/VWaDVuz3rs9hX3sAy9Iw9/GAye7YZ7xlEMV
+6teV926dIOtXfVM+DLPNREPn4IuCHw0X0P+3FSdy/iP17zCm8uDHugU/TJH9
+5oP2usI90yc5g3CM4wVjBtxxL+rjK9h5V/LKpXDG7dKvlbBQXMuZgj8NnbXJ
+gd1yPXQV4KiKzS8S4OolbgtO8DDF9wggDpPwvAOfl/f86EhcFHKEgf5o/5bv
+TOBwXlVYASyiIdAn+cR45H00xXzD1WHnmKT+SIjkAByzxatUl9RPMqr4Ux55
+zs7OGsINjKEs7fU0FTqesekgHMzRyaqFc719033I/B8E9mYKNGW6vlQ/kdSL
+PuBdArP5lQWFJG+jN48pRZqybXpo0Uryyz//RQc+1MjTJ3mpL3eRNYXjqNpz
+G3Xx+bmDagbwsGG9lxXMc3t+T4qsvzf8fQBcbTH8iY/9r7T0TiTCFmaqe07D
+ws12k9lwMaWhtBHOkGg0LiDrHS/l1aFfcU2riGLiDuMt3rBtenBpEdlffXPr
+GrhZc39UDkz1vd7Lx/z5FXk1abC6Sb90Hrw2qqA1Ela51FOVDosEddp6kHpb
+1DdcgwXeJgvmcOKIxekmeDThxDMtMo+yHksa+xtNR1xdA7dM6sZGwO5lHKN5
+zK9ia6c1A/82Nms4SvJp5Oglof+46IGuD3AXZ4KtifnZrx5J9cJy8hvvt8AV
+MT1m5DzR5e29oUr4ngrbueS8CR9Z3ZZSpin/l1XBEqhHb++3yoYPPXBQ1oBF
+5XZ7i6nQlK5Qj2UNt6aI7d4Jty49mh0CJy27ftIFZlWylS+TeU7I2vnBotPs
++VqSF8OlhgOLhQX8NARf6a+6z4bfnarcv3IbvMeh3RQuPNpooA07mEdmq8Cf
+e6tfmMHUg1szg+hn3KNPzBku+5xcz4VjM7vtj8B20V6dGrCrQCveHVb/qyaT
+j/m8xGW//AK7zUS0nYFZii72trAPy5NvAxuN+Lbsgi9KdmVqEy/V6WIQq+xp
+1VQidRd2isIpM9M55jCv+b/yYfQvF9HkFQv7HfG1E8DOrmq17fCnbnXBI5hZ
+cqbUBv3sYhqM34R9ZOLrX8Mz6QGL+Qj3rl1ngPnc2r4cy4TjQicLzpK8JlMv
+XyB5Os3GvoNdTZveXyd5jidPaKnifjCmsuI+qWcUHvY7LHAcC34GN7wNfFUG
+Sz3PWD0Ch3Ln3UfhruP+8avQv1q3mKwMA6/L1jF2wkzHjmJtOEv+jhTJy19B
+sWEHPFDo5sWFDXwuC3SIq9L3FcPFybWKSjAlFd7Phxs0hsrnsX9u7Y2XI3Dr
+jhyv1zA3OrtNRA+/C5uin3mwwvnOTVJwypN6+XC4+biRhzSx8VtXSzj+H50b
+q2GL5aeKlGGVqqscUXgtN+vwPOZvv2Vydwr7J5VomQ3AzL51j7tJv2N3Mzth
+J/FM4wY42O/vmj6Yu483XkjO08NI/1m4ImSsOnUbuZ+IOapgfyHHOy0cNrUo
+9LAn/cUZMj3gCg3VB2mwvt32rfawXnH8w39hSTn1F5Ywz1bvgCbJj1k1Zw5b
+K7h+PQXHP+UyyXmy7u0Tb4GTfLRDWLB4e++E4gaamvtj0DGEnOdM//1H4Ujf
+XJFkOLdrh9g1ePWItFEJ3LxEoec5/CbTNaoNluuX3TQGL/5JIo/FS43+H88X
+pNI=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.631304063066693, 8.096807950948126}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwd1AlQU1cUBuBbFwiEfROF1kCC2FEEZUeWJ0SlaAXLIiBbUaDDCMYFiIA0
+rImIEqhSZNMqiwvSFIGiUxVbEZFKAdEShyrYmKJQRQsMQ0vof81M5s037957
+/nPeSyxi938Rt4gQsgtfeiWqhYWFr+0Y8uFjwhCjgf3+l2A9j7ibunBhb825
+AdhU+Y+jypghHSuttObgkaM6rB54gNd+7+P1DLl/gHSmwa83dm50h1ltt+Tq
+8NrsUV4QPMKsiBAZMSSqqrlqL3VVyO2/DBmipXRemwRfnMw9vBnmtzT1Uwuf
+W2d+Z8CQHTVXSAI9n1vxdjG892BCZRhMnKckh/UZ0nL8wsstcPlvYrs5PYYM
+7hg7YAeHxh8tq4CHfR00TWHZZvGzMDjvdcrpBdpv8rFYNzjTJezfMVia/HOx
+O1wTyWY9gceGhCNRdH9S2c778OrHhe+r4TJFNOcOLJKXXJ+CX7ywiqAW8lu6
+I5BHdfZUVjfsq9ff1gsXtboVyem8uHk53sivbOUbvYNdvqwzkMES+yXOusgn
+2BZ/SRf9V/SPNm+g/RxYHhoOr1POzdB+WZ7zcYWwhLvLLRcO0DCuq4RTC6LK
+GmEXSyvZcVgYp84dpP2WuerQ/aldKwxn6TwdLrqy4ION470mG7C+warwDK3/
+cIptC4uW2S82hKV81XMv2NfzrkYG8rsPN/X6wuekSUvl6Nfg0u2+z+DymjPv
+Hag5CUE+sN4j/pCNLkNm6qednOA+/eB4bR2GbGla1M6FZcIQoYk28ijG4rXh
+joibxUFaDOHtq2VPI99kx5xZH5shTiGJRcPUBenzJ+DQxdn9nXDfN9EexXD5
+T3MXm2HRoTUqul4ZNn2llvYrcqjfjvNaLMdXVdP7MymbZmHLkkNqH/y3vnEX
+6ue8knbT9ZNe87svI195anB6CyzljVuUIr9T4udXe+DVtcplzuhP4N0mfkXn
+e8ss61t4idL6Vy3kb8/5w/dPeMx1asIeJvmTTUaYV6OHDTeSzqMyNtkaHv7+
+P0kBPCtvYi+HOfJ7jk1wzLOTM2PYv84/LXyAnicLKS2H458FRryj8zWNtlgD
+t4m7JjTsGWI3Ff3pNuSr33PX3AxmagX55shfcLUqkQdLbRoM5Og3Iim/24qa
+/8kdKeYjiQo8vxIW2LO6AzXxHvonPDSAOxQbb6zXYMiNfbwCAstqxKddWPh9
+dVwOfY36Uhl3/pA6Q1b5vNSk+QTirZIJNYZkvfHKuU6fb/BTnwbYr/14w3na
+/0dVCXXwE7Mf/IphztIVfAWsEA2qZ8MBXhmJkTjvyaZ02yMwk/GYrY56D0rZ
+14T0ftqxwkFq2bCJCLaz9XD8Efma/XIT6Xl9uy9wziL/SdmbrfV0vzLFMBP9
+zcT6y3+h9W3mUj3Rf8VA6kslfb/CLTyH4BcBs6Pa6E80MdLqgedvOqrScIYD
+fGQb4un72J4vjIFjEs1LtsMPhpP5Erreez77LfYrv/q9qhHm5I5U74TzXJcq
+euj6lYWeR1D/6Z6oLgVdX9nJESBf3zW1wBk631OqR97IT/9fF+BJelVn/gcL
+PvkH
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.547014064132036, 3.0238996897848462}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt1gk0lGsYB/CPI0m2iLGUOxhTjGXaFBVfK1Ky3lRTJhlUipSkVF/lilvu
+SEmWsaVFRzVdUcnIpUVaTFe3yJK4ipLRIpUb9/92mnOcOb/zfO/y/J8xZ8yC
+InxEyhRFHcQfeWdG8NrHp6kfLwO6at5MP/d1MPuavLlIn6bFIt9ZLnCe4EZA
+mD5NdUts7xmTeqtBhDOc4BrEeWOP9cuGde30aYZ9PiMiB263uW06C/Wl497d
+9IOFB8XuApj7lfLQhumj0dYZcHtwA0tuh/cdOm69WF/1e2D3SViHe2uajwHN
+rHSdzd0Ey7dnXLpjQFNTHVQaXGFhhmrrQhbNWFu47bGHmc78qLssmvqmCHIy
+h/N8tnx2M6SpowvSTv8CV6m5fKsxpBmj4jX/cuFIafqKaUY0Y9jZeckB5pdF
+h6XCr0dprV9GzgtKcWo1oqkxCws1NsD06OZyHWOa6f5QHn+InH9/wzNrY5qK
+p2Liz8DSiwtOEGf3c2/WkOd9uWw8T+0fyRpqgamBW5Ut2N/frdimn+zflvaI
+nOehKT80BKdU1hXOgNeovTz5neSRmbrxHu4/arK5zwDpx9lJ4QMnKtpYHeS8
+LM62Z+h3paX5XXJef17nZgH8crfj1UyyXq7wfo28kswGSkPJ827pXnvgLw4P
+hnkkj9PlbAvk+2q/q22PLfYPq69rQf7t71x5+TAdLoq7gPl8dOw1+ZXUZxqL
+0lE3yhteoA4LP8blZKHul9nXf9MG+bHe/VIOK2ltCoyFq4q/Vr7H87nLSgtm
+we2j586hcb4sVJY8woNVJgkKcP6SzSq59XDklEL18ZhnebF5fxGss8kwMQX9
+zEk8ayUm9XMVEl3MLzCmcfc+YifTZ8eRh6QrJ3sX2c93UeU45NcYfKOO1Omk
+t6x4eO5h46fJsDzUeuJruGqhwuYULPTiSh0wn/wupXcymJq4NSkC9laL/tJM
+9o/mC8TwOjcTzSG4an+s4ji8tEbQaoh+2JI6HgOb8jKtpsFUitYEH1izbaDR
+FZZyTTs0yOdFL0rHn7jSObcEnyeX/SLXlXDkjTzvJbjPDk1RgC9Zr73q3D/o
+75Zpd/J84r6/6lfBBp9MznPJ+oaQWS+Qj9YucQ/Jj5+ttzoM9qzLoEh+jFJs
+3BDyTMhJ10sj/XSO3yaBa/v8zvuSPDmNW8n/U4+7ba4GyafsWdNEWNSarV5t
+jfxqRusrw4uPWNjsgPku2bvxfUDlc2O9eaReOH2REeoT9nJknVY4L3NHggec
+1ZOcnA+zn06ZnQaXxuSdDiEOlAg+wq7yofTpsPzyNeUgzFOyNjtNA/YSCcUt
+cOeY60LFZOQ76PRyDfqNtwtd2AqnvPU40o75nq0RjnsKs+1k+oHIq69Dm90E
+e2314D+BL9+qXdEF68y78dkJeR+c1OH0lTy/8W8zzI9RYbiDujhP+vjAzIeY
+j8uh7lg+ud+A8+UPcFdNa8Jy0o/sMWsYVqJr5JutSH4JegqsP/tfhW4SLGx7
+H3EHtq0IsMqF2+9a6SXAR8vZ1hdJP5eed/PhoCvlO6+QflX1qutwv+DE841S
+sr7RnheA+UuKP+0qgOnNVx3b0F/Z8JjRP/bX8PALgrf5ZeYEk/uWGA32IJ+d
+7hYtM0h9bXDMLjj18ZIH39Ef/fBirSHmz4vz7JBNJt+flovvIe/EItXuGFIf
+TD0ghme02r6xJXWNQfYW+FjhbbOOSdhPNepqCOZ7PTG1+QRM/XFbFgs7F8nW
+esL9vbzEM3DphCsN6jBdUun5Fus1D6+0ecRFXctk3iKc3/DwuFYmXKW66bQU
+rvW2qI6AI3X3KFlhniWlu829iHM4S4vg+VNWp80m669Vc2yQj36ZSHUqzPZK
+1SpGPs6X1LqJdcZaX7Ag+TudcJwL0yknR5Lh8Mn+qcvJ+uPi9FeYV0Hc2Clh
+cN6ZuXVWJjQV3rdC+zdi34pGPxOa8VMb9eUULJzprxWC+t3XgbnVpL7Rq0EA
+px9IqGgj51nuKXHE83trT5h/JvVjNgH4PDDsZUWNquhfav8y+gLOU4SK7bVh
+JiDu4hLU3y4QPdEkeV2fuuE5ub8d74USzL9JFaxDf0tZt1veYD+pRtmfXZiv
+2cP3DbWkH9kAKxx5KDUpL8qGU56UTv+G+WpUrOCEwHL1JoM0uEa5qX4SsXaU
+yzx4xqtXIx2WuK8pa6sy8u6NWnclA2bebEhoxnzqBVmmnnDKIYnPI9jlvnWS
+MszP8k9GnVLTPeV8nYP7qsvqsJ4aWe8ZuR1mwnnMfPhJ+vBEB7i911L/JOvn
+7wLOz3dD+n9/iwB3
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.131120426728657, 4.809365547472548}, \
+{0, 1}], LineBox[CompressedData["
+1:eJw9lAtME1kUhmd1SwrrIj7WFGbG2pkRFFBBtKJGORCRGkQRkLfsUsWIBNsV
+TDCk2KrxibsVQUVAwkvLM1QREBHQrLBrguIKigSxChrLIjbGDeALb6M5k0xO
+vtyZe+855/+PTKkKSZhCUVQAea3x2yPAnJ+skQcqWDkjfokA7bGD27h/OKC0
+F1npVgGenC4UmU4QFre6FqoEmLj/wtM2gHBka3mbRgAVVTJUMSkDSr/ppjlD
+gEgbi368nrAp/87PKQIkdRTJlqkIW/rM1dEC1N0MUOa4El6gz30oJ+d/SXnk
++d88oNoqfUW2AniYumxeXSGs3V67/CEPDQOJq30PEe563l9zjofzJjtt6jbC
+v32YGI/kIVJcUOnvR3jXvsEWRx6K1maP2SwlfEwx09jPQcvr+oNn3Anr7cN2
+lXLwZfezoWBPwuM5hzekcOBc53F7uY91PVSTFMjB+gcPfukJI0wlhmsXc1BV
+KLqerCbceMdym+UgwilN8/lPwqa1WWZHDkKqu+wijIQVgfPn8hy4aatPr/yX
+sOWa+pM3B+WN/iGJFsLiyuiz0RwMzvpxpMOW5D9+S5xxhIO+qS3JSQzhtIE9
+PU3k+x/K3a46E1aUlCj/56B2e1RalAthB2ANXjzUMd0HdCxhSfe9yb08PGuv
+qW4TE270m2yo5SE9qWwFb7bmryv0GObh8t7eC26thL1HTGOMAJ35Lx06T1rr
+va57aL0AqXKTd3wwYbXy7eKdAhR06nbk2lvzU+zX7RfgsWJGaK9eSniKrZ1W
+gBxvq16kuO7VN1rlopqL/3cd/STvfMHi/rJ6nz/W/Mri+WrzsoGE1wzer3nN
+5rsGHYP3n73xmv76IgbzC8wpLs0YpTH/YnME9fkvGutjiAmaHmSksX6PkmsM
+uVdorG84fVhY2EFj/f0+jrmoR2jsT4MxNWaRlMH+XeXK+jNjGOzvzr/jhrcU
+MNj/2NHpIpGJQX0YB9+fEqQs6idDG9u9NZxFfbU0XUzP1rGoP/c8X3lcAYv6
+zNyS9aH3Eov67Sh77PAuj0V9R81sN6Sms6j/vvjhyTn+LPojL8H9uGaCQf+U
+K+PeeV1g0F9PnSWh+QsZ9F/RZfXqngoa/emV3dx8Tkajf9N3zBuwz3JCf7ty
+TfIKygn9Lzm0Kv/N7444H9KCbr33GZbg/NAkrlx3I5nw9/nydJo1SuAr7LO5
+Vw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.354800000000001, 7.75}, {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.499999999996362, 15.500000000005457`}, {10., 
+         9.500000000003638}}], 
+        PolygonBox[{{7.947677384685548, 13.01826734053906}, {
+         8.206811054955079, 11.780184249251306`}, {8.897834175673825, 
+         12.183281069670574`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 12.323799910437668}, \
+{1, 1}], LineBox[{{13.500000000007276`, 15.500000000005457`}, {
+         10.000000000003638`, 9.500000000001819}}], 
+        PolygonBox[{{11.447677384685548`, 11.98173265946094}, {
+         11.706811054955079`, 13.219815750748694`}, {12.397834175673825`, 
+         12.816718930329426`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.484057296392571, 12.323799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 15.5}], PointBox[{10., 6.}], 
+         PointBox[{13.5, 15.5}], PointBox[{16.5, 5.5}], PointBox[{10., 9.5}]},
+         InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T19", " ", "P2", " ", "N38"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdiei/gigjfhfjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdiei/gigjfhfjhj.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.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489722191975*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"0eb43952-0016-4696-bef9-7b319c25a78f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgeg/igfhfihi.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 1, " ", "afbg/chdgeg/igfhfihi.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489722205552*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"766fb175-9f43-40a7-a5e5-7ae88f42ca9e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdfef/ifghgihi.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 2, " ", "afbg/chdfef/ifghgihi.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489722213566*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"ec0fb198-e97b-4d93-badd-f6f811bfb205"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "3", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbf/cgdhef/ifghgihi.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 3, " ", "afbf/cgdhef/ifghgihi.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489722221236*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"673a7784-fcd3-4fb3-92f8-09c499f0c71a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "4", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbf/cgdfeh/ifghgihi.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 4, " ", "afbf/cgdfeh/ifghgihi.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489722229526*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"68382b7f-5248-4c77-9adb-5891b620572f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "5", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbf/cgdheh/fihjgigjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 5, " ", "afbf/cgdheh/fihjgigjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897222359533`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"c39cb91c-e010-4491-8ab6-96f908294232"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "6", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbf/cgdhei/fhhjgigjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 6, " ", "afbf/cgdhei/fhhjgigjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489722244279*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"70c97ea7-6872-494c-9439-0c17e4ba8bee"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "7", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbf/cgdhei/fiijghgjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 7, " ", "afbf/cgdhei/fiijghgjhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489722252239*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"d706ff73-2406-4c4a-9b0a-56c0010a9d52"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "8", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdfeg/figjhihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 8, " ", "afbg/chdfeg/figjhihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489722259893*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"ba57c76e-baf2-493d-9c2f-c4f85d55f7bc"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "9", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdfei/fggjhihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 9, " ", "afbg/chdfei/fggjhihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.77548972226777*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"01fed162-eccc-4fa8-a388-c381955985df"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "10", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdfei/fiijghgjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 10, " ", "afbg/chdfei/fiijghgjhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489722275985*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"cdf96293-a47a-4694-9cf7-7c3eee562208"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "11", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgef/figjhihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 11, " ", "afbg/chdgef/figjhihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489722283701*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"6e7bbe49-623f-4b6c-a034-a39d6aa7ba23"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "12", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgei/fgfjhihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 12, " ", "afbg/chdgei/fgfjhihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897222908707`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"13429c38-2497-43f2-b673-70aa019a9f5d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "13", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgei/giijfhfjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 13, " ", "afbg/chdgei/giijfhfjhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489722295754*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"6c327368-c9b9-4ae3-949a-593fb2b77007"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "14", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdief/fggjhihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 14, " ", "afbg/chdief/fggjhihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489722301079*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"47e85b11-c505-4659-89e4-33b60d35abca"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "15", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdief/fiijghgjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 15, " ", "afbg/chdief/fiijghgjhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.77548972230553*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"f3fde698-e9e2-4581-812a-b0bde8dcf250"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "16", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdieg/fgfjhihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 16, " ", "afbg/chdieg/fgfjhihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489722311154*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"415d3b58-6c3b-419e-a420-fd69f60e69a2"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "17", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdieg/giijfhfjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 17, " ", "afbg/chdieg/giijfhfjhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897223163233`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"f9ef4194-ebb3-4cb6-a5f8-07187185012c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "18", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdiei/fifjghgjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 18, " ", "afbg/chdiei/fifjghgjhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897223209248`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"4c972635-8329-42e5-9eee-204cdd18f466"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "19", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdiei/gigjfhfjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 19, " ", "afbg/chdiei/gigjfhfjhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489722325973*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"1aebfe8a-7e86-4a40-8242-1b5cd17fc43d"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489725482459*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"ce56c22a-c969-4120-8ab3-76908cd7cb8f"],
+
+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.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489725499104*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"b2ad0c55-c228-4dd8-afe1-596ac3e8de27"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 1, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489725506414*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"3f8774c5-285b-44f4-88e8-0185fa11c1a4"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"in total: \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["in total: ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489725514233*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"e93aab79-e7b3-4dbd-8e2b-1c90b2aa247c"],
+
+Cell[BoxData["\<\"\\npreparing FORM code in \
+/Users/josegabrielreyes/Documents/Higgs/Mathematica \
+Scripts/ggHgg/FinalSetUp/fc-amp-2.frm\"\>"], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489725541204*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"5a36d2f5-f14d-44c6-9613-e31cb7d50f4f"],
+
+Cell[BoxData["\<\"running FORM... \"\>"], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489725568915*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"b6a2c1c9-b900-4fe8-a272-adf23b8f05ac"],
+
+Cell[BoxData["\<\"ok\\n\"\>"], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489725730196*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"9c92fc32-0f89-45c0-afd7-d26c1b8ab947"]
+}, Open  ]]
+}, Open  ]],
+
+Cell[BoxData[""], "Input",
+ CellChangeTimes->{{3.7754901336565437`*^9, 
+  3.7754901394427156`*^9}},ExpressionUUID->"e983dc9e-7c02-4e79-995f-\
+db0add5406de"]
+},
+WindowSize->{908, 679},
+WindowMargins->{{Automatic, 153}, {Automatic, 0}},
+FrontEndVersion->"11.3 for Mac OS X x86 (32-bit, 64-bit Kernel) (March 5, \
+2018)",
+StyleDefinitions->"Default.nb"
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{}
+*)
+(*CellTagsIndex
+CellTagsIndex->{}
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[558, 20, 549, 11, 84, "Input",ExpressionUUID->"5ed94a23-f6b7-4858-b120-72e0fcc40a50"],
+Cell[1110, 33, 804, 14, 94, "Input",ExpressionUUID->"62f164f9-a9f7-4648-a8a9-d72d44fdf7a9"],
+Cell[1917, 49, 2074, 52, 178, "Input",ExpressionUUID->"6c1a13cd-8d6a-4aec-be74-43041223224c"],
+Cell[CellGroupData[{
+Cell[4016, 105, 2477, 61, 304, "Input",ExpressionUUID->"a2cef43b-ff41-41b9-b41f-7c91f647357c"],
+Cell[CellGroupData[{
+Cell[6518, 170, 349, 6, 24, "Print",ExpressionUUID->"95be2bdc-98fb-4c01-924c-ea01198ee41b"],
+Cell[6870, 178, 342, 6, 24, "Print",ExpressionUUID->"17cab7fc-b6ba-408e-aecb-ebaf93897053"],
+Cell[7215, 186, 784, 17, 24, "Print",ExpressionUUID->"eb19a6d8-7700-4e54-96ee-7332537315f8"],
+Cell[8002, 205, 365, 6, 24, "Print",ExpressionUUID->"08716a53-d1a2-4287-a12b-7c2cc8366651"],
+Cell[8370, 213, 583, 12, 24, "Print",ExpressionUUID->"79041dd7-30e3-460c-b096-101d2fe6c2a1"],
+Cell[8956, 227, 342, 6, 24, "Print",ExpressionUUID->"a5fc149b-1939-45dd-9a92-6e6df4b4c4e0"],
+Cell[9301, 235, 780, 17, 24, "Print",ExpressionUUID->"d360cb81-67dd-4acd-b071-c1f757c38c1f"],
+Cell[10084, 254, 776, 17, 24, "Print",ExpressionUUID->"9e58d0f9-7d30-4c82-903d-a612d33fd86f"],
+Cell[10863, 273, 340, 6, 24, "Print",ExpressionUUID->"72db1fe2-2d37-4a0c-872b-3cc441237082"],
+Cell[11206, 281, 979, 25, 24, "Print",ExpressionUUID->"5a609188-42ff-4b27-be41-fd6ff76b1515"],
+Cell[12188, 308, 342, 6, 24, "Print",ExpressionUUID->"a0ef6b9a-d2b7-479e-8137-1c407834661a"],
+Cell[12533, 316, 652, 13, 24, "Print",ExpressionUUID->"395f68bb-da38-45e3-8e4c-7524d4a51f64"],
+Cell[13188, 331, 362, 6, 24, "Print",ExpressionUUID->"104e0f63-359b-4f00-9f36-f293c8583cf6"],
+Cell[13553, 339, 509, 11, 24, "Print",ExpressionUUID->"d13e738b-3631-426d-8bd1-24a66c457cbb"],
+Cell[14065, 352, 539, 11, 24, "Print",ExpressionUUID->"439c6887-602a-4183-b232-e3a67fb8e791"],
+Cell[14607, 365, 537, 11, 24, "Print",ExpressionUUID->"48ada3e2-6b47-48a0-892b-cc88328d16cf"],
+Cell[15147, 378, 579, 12, 24, "Print",ExpressionUUID->"927779f6-d08f-4d39-a6d0-830a34216070"],
+Cell[15729, 392, 340, 6, 24, "Print",ExpressionUUID->"6583a4e9-8f50-4e53-8dc5-040d440c732a"],
+Cell[16072, 400, 602, 13, 24, "Print",ExpressionUUID->"c4684f77-a5af-498d-831a-f0ff3c4e1201"],
+Cell[16677, 415, 340, 6, 24, "Print",ExpressionUUID->"6a429f81-07ca-4ccf-80bb-9a75f25f1846"],
+Cell[17020, 423, 537, 11, 24, "Print",ExpressionUUID->"389ba7bd-4cc4-43db-b5f2-79bd9caadb5d"],
+Cell[17560, 436, 586, 12, 24, "Print",ExpressionUUID->"61464dd7-6a02-413d-a317-aad1778ec51f"],
+Cell[18149, 450, 585, 12, 24, "Print",ExpressionUUID->"fb0f2e26-5c6b-4dd8-b109-5041729eaa3a"],
+Cell[18737, 464, 586, 12, 24, "Print",ExpressionUUID->"196a4738-ac75-4913-809d-c38dc4f95dc2"],
+Cell[19326, 478, 588, 12, 24, "Print",ExpressionUUID->"cdd6ea88-0d66-457d-9308-f6a096862ed3"],
+Cell[19917, 492, 586, 12, 24, "Print",ExpressionUUID->"80fff600-a977-44ed-859e-766002e860a1"],
+Cell[20506, 506, 588, 12, 24, "Print",ExpressionUUID->"a3fef4f5-5b1d-46f5-a0c2-b5ab178429e9"],
+Cell[21097, 520, 586, 12, 24, "Print",ExpressionUUID->"e0abfbbf-d83e-443b-b002-febe2931f7f6"],
+Cell[21686, 534, 585, 12, 24, "Print",ExpressionUUID->"9409c4df-2bdc-4cd1-aea0-e86608e6c22c"],
+Cell[22274, 548, 586, 12, 24, "Print",ExpressionUUID->"37f8b566-f4a5-427d-a780-b172e0e9ed0d"],
+Cell[22863, 562, 588, 12, 24, "Print",ExpressionUUID->"95cef3b7-252b-473d-8be6-83ab00891d73"],
+Cell[23454, 576, 588, 12, 24, "Print",ExpressionUUID->"2c83028a-01a8-491c-913d-ebe3b9b372b9"],
+Cell[24045, 590, 588, 12, 24, "Print",ExpressionUUID->"017df86f-f278-4438-abc4-8b8c6678129c"],
+Cell[24636, 604, 588, 12, 24, "Print",ExpressionUUID->"41c0f1a2-034d-447f-ad92-6d0cae8393d0"],
+Cell[25227, 618, 588, 12, 24, "Print",ExpressionUUID->"8f567853-5358-4ce8-b9d9-add48f5cfe7c"],
+Cell[25818, 632, 590, 12, 24, "Print",ExpressionUUID->"d94aefd7-5ad6-41e8-94bf-82f1a5da8e87"],
+Cell[26411, 646, 588, 12, 24, "Print",ExpressionUUID->"a1667e62-53f2-4568-b952-d91a76d0b6fb"],
+Cell[27002, 660, 588, 12, 24, "Print",ExpressionUUID->"fd2d9ffa-0c9f-4edc-9ad4-3963eea69b87"],
+Cell[27593, 674, 588, 12, 24, "Print",ExpressionUUID->"0cda6289-833d-401f-9877-358fff7212cd"],
+Cell[28184, 688, 588, 12, 24, "Print",ExpressionUUID->"1957d743-de80-48f5-a636-21f1f1aa7501"],
+Cell[28775, 702, 590, 12, 24, "Print",ExpressionUUID->"44b3f181-2e51-482e-affe-db86b44602ac"],
+Cell[29368, 716, 588, 12, 24, "Print",ExpressionUUID->"ff3d11c0-d301-4777-a1f2-a610d7d9a675"],
+Cell[29959, 730, 590, 12, 24, "Print",ExpressionUUID->"ba2acc4a-b13c-40bf-b0b9-bd894d26274e"],
+Cell[30552, 744, 588, 12, 24, "Print",ExpressionUUID->"3b804754-f313-430b-8cb0-31b5aaa5f215"],
+Cell[31143, 758, 588, 12, 24, "Print",ExpressionUUID->"f1228fa4-8234-472f-bad1-73814621aeaf"],
+Cell[31734, 772, 588, 12, 24, "Print",ExpressionUUID->"74498276-21e0-4a9b-a0aa-ad268e15c133"],
+Cell[32325, 786, 588, 12, 24, "Print",ExpressionUUID->"a439ca59-412f-45c9-ae09-c5ef0adc59fa"],
+Cell[32916, 800, 590, 12, 24, "Print",ExpressionUUID->"2b52cb8a-5a2f-4c20-8a6b-559e2885c512"],
+Cell[33509, 814, 588, 12, 24, "Print",ExpressionUUID->"0caad15d-e43a-49c7-acf4-a07620c1df9d"],
+Cell[34100, 828, 588, 12, 24, "Print",ExpressionUUID->"0dde48d4-1c15-4904-b19e-6d02a168b3c3"],
+Cell[34691, 842, 588, 12, 24, "Print",ExpressionUUID->"f7321913-10b3-4f6f-869a-662bf0274289"],
+Cell[35282, 856, 588, 12, 24, "Print",ExpressionUUID->"88821906-7f24-4e37-aed6-ef83b5c08ec5"],
+Cell[35873, 870, 588, 12, 24, "Print",ExpressionUUID->"db365a78-952e-424d-a8c5-1c60cbbac3b6"],
+Cell[36464, 884, 590, 12, 24, "Print",ExpressionUUID->"95aa9915-8995-46bd-b083-d8e235103da7"],
+Cell[37057, 898, 590, 12, 24, "Print",ExpressionUUID->"8ce667a7-d620-46c8-9048-19164c2fe9fb"],
+Cell[37650, 912, 586, 12, 24, "Print",ExpressionUUID->"047f977e-13ab-4375-b19b-fc301e804f04"],
+Cell[38239, 926, 588, 12, 24, "Print",ExpressionUUID->"1be3ed47-0bb8-43d6-94fe-f97fe2bb5ba7"],
+Cell[38830, 940, 588, 12, 24, "Print",ExpressionUUID->"94eb4d28-ed47-4ba2-a1cf-599a36a6cafc"],
+Cell[39421, 954, 588, 12, 24, "Print",ExpressionUUID->"a3db7988-d6b5-4f5d-972d-952a01edbb0f"],
+Cell[40012, 968, 588, 12, 24, "Print",ExpressionUUID->"e7aca9d7-b34e-470f-a88f-b624d7e0e958"],
+Cell[40603, 982, 588, 12, 24, "Print",ExpressionUUID->"291a47af-4dc7-4de6-b36f-8d881b917536"],
+Cell[41194, 996, 588, 12, 24, "Print",ExpressionUUID->"9872fa25-a27c-41a0-b138-6214eff0560b"],
+Cell[41785, 1010, 588, 12, 24, "Print",ExpressionUUID->"0ed85b66-aeb2-4a23-860e-f055e412c19f"],
+Cell[42376, 1024, 588, 12, 24, "Print",ExpressionUUID->"4c61a78a-0e05-41f7-a835-002d535416d4"],
+Cell[42967, 1038, 587, 12, 24, "Print",ExpressionUUID->"3c180812-a089-4b46-be4b-38556662b73b"],
+Cell[43557, 1052, 588, 12, 24, "Print",ExpressionUUID->"22ea50da-a3f1-4d7b-aa85-0b749fbc73bd"],
+Cell[44148, 1066, 590, 12, 24, "Print",ExpressionUUID->"3fd81227-d5ba-480a-886c-3882ce6b38a6"],
+Cell[44741, 1080, 588, 12, 24, "Print",ExpressionUUID->"956e5828-589f-40db-83b8-f309955de8d0"],
+Cell[45332, 1094, 590, 12, 24, "Print",ExpressionUUID->"33dfe8b5-d0e8-4b38-b3b1-27debdbc6e62"],
+Cell[45925, 1108, 588, 12, 24, "Print",ExpressionUUID->"c8d217fa-58f9-4618-8910-f102c2b8e99d"],
+Cell[46516, 1122, 588, 12, 24, "Print",ExpressionUUID->"08b7c85f-5b2b-4689-bedf-181e4692099f"],
+Cell[47107, 1136, 587, 12, 24, "Print",ExpressionUUID->"ef12fc61-9bce-41da-a8e3-c99e218aaeff"],
+Cell[47697, 1150, 588, 12, 24, "Print",ExpressionUUID->"ee7502bf-f9d9-4ead-8a35-caf262094785"],
+Cell[48288, 1164, 590, 12, 24, "Print",ExpressionUUID->"2ff486b6-da1d-46c6-bace-b35ed8fb0a0a"],
+Cell[48881, 1178, 590, 12, 24, "Print",ExpressionUUID->"20b0e1f7-d69f-4196-a238-5db1d7b3d5ef"],
+Cell[49474, 1192, 588, 12, 24, "Print",ExpressionUUID->"807a10f5-c9a7-43ce-9e16-d429e391910d"],
+Cell[50065, 1206, 588, 12, 24, "Print",ExpressionUUID->"69cb4ac9-1b1a-4d6a-bf1f-f9b7fa878a12"],
+Cell[50656, 1220, 590, 12, 24, "Print",ExpressionUUID->"f8f509e1-588b-4ed1-a98a-8ee71cd1cf2c"],
+Cell[51249, 1234, 590, 12, 24, "Print",ExpressionUUID->"69a96cae-392e-492c-bd26-075f6c5a193a"],
+Cell[51842, 1248, 590, 12, 24, "Print",ExpressionUUID->"77fee6db-15a5-4a26-9672-1e7d9aadbcd0"],
+Cell[52435, 1262, 588, 12, 24, "Print",ExpressionUUID->"64834d2c-1e4d-4442-8bec-675be74e7dda"],
+Cell[53026, 1276, 590, 12, 24, "Print",ExpressionUUID->"59971e47-1616-4a22-a721-c533bdd96860"],
+Cell[53619, 1290, 590, 12, 24, "Print",ExpressionUUID->"daa6c0b9-88af-4140-84da-b05c30c5c32b"],
+Cell[54212, 1304, 590, 12, 24, "Print",ExpressionUUID->"66621e56-80bf-4370-a9f5-b1e47c485242"],
+Cell[54805, 1318, 587, 12, 24, "Print",ExpressionUUID->"5a491c83-6c7a-4929-82a4-1a5a5645762e"],
+Cell[55395, 1332, 588, 12, 24, "Print",ExpressionUUID->"2b0c227a-7d7c-42ee-a180-4c2a2a146ac2"],
+Cell[55986, 1346, 588, 12, 24, "Print",ExpressionUUID->"ccd6cff8-1b8a-4d01-b010-ead3e010e3fc"],
+Cell[56577, 1360, 590, 12, 24, "Print",ExpressionUUID->"a7a10e1f-072f-4c41-8ee4-241f3ad842b5"],
+Cell[57170, 1374, 588, 12, 24, "Print",ExpressionUUID->"7fafeb15-f4e7-4947-b398-febc44282cd1"],
+Cell[57761, 1388, 588, 12, 24, "Print",ExpressionUUID->"1332cbbf-fb62-4dd6-a3cb-cef8d1e70dc5"],
+Cell[58352, 1402, 588, 12, 24, "Print",ExpressionUUID->"310bd995-8600-4e80-97b1-81840494d0f7"],
+Cell[58943, 1416, 590, 12, 24, "Print",ExpressionUUID->"f6b1e272-4cf4-4247-a1de-432525a6e121"],
+Cell[59536, 1430, 588, 12, 24, "Print",ExpressionUUID->"79c37aac-8c86-4c0e-abdb-183d9fb1748b"],
+Cell[60127, 1444, 588, 12, 24, "Print",ExpressionUUID->"7507a970-75c5-44e9-ab07-38d61c1ccb9e"],
+Cell[60718, 1458, 588, 12, 24, "Print",ExpressionUUID->"e09d7b62-45f9-497b-a6e1-806796c1ffa8"],
+Cell[61309, 1472, 588, 12, 24, "Print",ExpressionUUID->"29257eb8-2ebe-42f4-bd66-df00a57bb73d"],
+Cell[61900, 1486, 590, 12, 24, "Print",ExpressionUUID->"b6a82730-c91c-4d73-b34c-8c6ce612fdde"],
+Cell[62493, 1500, 587, 12, 24, "Print",ExpressionUUID->"c524cf2f-3e9a-46b4-be86-f9444ba98e88"],
+Cell[63083, 1514, 588, 12, 24, "Print",ExpressionUUID->"c10b4522-2c7b-4642-82d5-c6e8a6d01dba"],
+Cell[63674, 1528, 590, 12, 24, "Print",ExpressionUUID->"68081a7b-576f-4936-a3c8-1c9c4d7d25c3"],
+Cell[64267, 1542, 590, 12, 24, "Print",ExpressionUUID->"b6894ac0-5f23-4353-abbf-a94d55e615f7"],
+Cell[64860, 1556, 588, 12, 24, "Print",ExpressionUUID->"9488c342-c8ed-449f-950b-ed0982efef33"],
+Cell[65451, 1570, 588, 12, 24, "Print",ExpressionUUID->"32ea0167-2716-4f66-a451-150d2ceda811"],
+Cell[66042, 1584, 588, 12, 24, "Print",ExpressionUUID->"08d33716-31b1-4e5f-85b6-bc539ceaa0cf"],
+Cell[66633, 1598, 590, 12, 24, "Print",ExpressionUUID->"ddcc7769-8e24-4e3f-b2af-2af53a5bdc11"],
+Cell[67226, 1612, 588, 12, 24, "Print",ExpressionUUID->"f994c345-6b06-4ec0-9d0b-63703d71adb1"],
+Cell[67817, 1626, 590, 12, 24, "Print",ExpressionUUID->"64721b11-69e7-42a8-9ed4-2fb8488cdff6"],
+Cell[68410, 1640, 590, 12, 24, "Print",ExpressionUUID->"03689c0b-6996-4dbd-81a8-1cad70f362c1"],
+Cell[69003, 1654, 588, 12, 24, "Print",ExpressionUUID->"808878f6-7af9-4107-8aa9-978f16ef4b35"],
+Cell[69594, 1668, 588, 12, 24, "Print",ExpressionUUID->"aefbf6f4-2a0f-4015-8c5e-607e24212b32"],
+Cell[70185, 1682, 588, 12, 24, "Print",ExpressionUUID->"c486abb2-c049-400e-bdbb-9ecfaede817d"],
+Cell[70776, 1696, 588, 12, 24, "Print",ExpressionUUID->"da0741dd-0830-4119-9805-31582a2367b0"],
+Cell[71367, 1710, 588, 12, 24, "Print",ExpressionUUID->"1cb27c93-7715-4dc7-a6d6-cfae5c74839c"],
+Cell[71958, 1724, 587, 12, 24, "Print",ExpressionUUID->"ddc5cee1-b4e7-458f-b4ba-89d60a849bc4"],
+Cell[72548, 1738, 588, 12, 24, "Print",ExpressionUUID->"be030525-a4fc-4e6b-be42-d477d055de13"],
+Cell[73139, 1752, 588, 12, 24, "Print",ExpressionUUID->"339456c2-a58e-4741-b4dc-96df6abdc7c1"],
+Cell[73730, 1766, 590, 12, 24, "Print",ExpressionUUID->"89cc81e1-b55e-449a-a3d5-f07c46b2c5cc"],
+Cell[74323, 1780, 590, 12, 24, "Print",ExpressionUUID->"6de19c82-34c9-4ba7-9b48-226b86e19b1e"],
+Cell[74916, 1794, 588, 12, 24, "Print",ExpressionUUID->"899465f8-5f47-405a-9c5c-e10dc8e90f10"],
+Cell[75507, 1808, 588, 12, 24, "Print",ExpressionUUID->"9e4f3248-4f2e-4577-8a3f-d5b2860efa80"],
+Cell[76098, 1822, 590, 12, 24, "Print",ExpressionUUID->"2a9ba662-3fea-4229-abd4-39f05b296228"],
+Cell[76691, 1836, 590, 12, 24, "Print",ExpressionUUID->"0531799e-f502-45d8-9e0b-c29dc4b1ce02"],
+Cell[77284, 1850, 590, 12, 24, "Print",ExpressionUUID->"91b0a278-0a06-4500-808d-22396119acfa"],
+Cell[77877, 1864, 592, 12, 24, "Print",ExpressionUUID->"605fefa7-a214-4a78-b7d0-790e17d495d9"],
+Cell[78472, 1878, 590, 12, 24, "Print",ExpressionUUID->"2443812c-7ab0-41ea-b494-512b76e3e44b"],
+Cell[79065, 1892, 590, 12, 24, "Print",ExpressionUUID->"aee94a92-c972-4419-9c21-64f87a8cff0e"],
+Cell[79658, 1906, 590, 12, 24, "Print",ExpressionUUID->"4c579a5b-81b4-4170-b71b-5c94acdfbcf7"],
+Cell[80251, 1920, 592, 12, 24, "Print",ExpressionUUID->"1e982064-f679-41a3-866e-cef41c13f58a"],
+Cell[80846, 1934, 592, 12, 24, "Print",ExpressionUUID->"89af9e07-74d9-4f4d-afec-8066c5f45c01"],
+Cell[81441, 1948, 590, 12, 24, "Print",ExpressionUUID->"36993d8d-616d-4d86-9f6c-858eb5133544"],
+Cell[82034, 1962, 590, 12, 24, "Print",ExpressionUUID->"0ed4f5d7-298f-4112-a687-d7ae34364518"],
+Cell[82627, 1976, 592, 12, 24, "Print",ExpressionUUID->"3c56fdcb-54a0-42f0-8fdd-22993d28b1c4"],
+Cell[83222, 1990, 590, 12, 24, "Print",ExpressionUUID->"af574732-863b-4bf1-ba16-cc81168c3f4b"],
+Cell[83815, 2004, 592, 12, 24, "Print",ExpressionUUID->"e2000529-e736-4802-98c9-b5248025406b"],
+Cell[84410, 2018, 592, 12, 24, "Print",ExpressionUUID->"9bf2fd19-4359-42ab-a02f-08ef0f78ed75"],
+Cell[85005, 2032, 590, 12, 24, "Print",ExpressionUUID->"a76e94e5-2295-4f2a-9002-293e7cbd3393"],
+Cell[85598, 2046, 590, 12, 24, "Print",ExpressionUUID->"95d2486d-e076-4d22-bfb7-9b81ed7bcd17"],
+Cell[86191, 2060, 592, 12, 24, "Print",ExpressionUUID->"32a278bb-960a-461d-848d-3ff674c51c0d"],
+Cell[86786, 2074, 590, 12, 24, "Print",ExpressionUUID->"2cce181e-b2fd-442b-b6fb-6788c5d3f819"],
+Cell[87379, 2088, 592, 12, 24, "Print",ExpressionUUID->"9f19765b-5e37-4a08-a19d-0f77a87ea7ad"],
+Cell[87974, 2102, 592, 12, 24, "Print",ExpressionUUID->"021a5bc9-a07f-41b0-978c-00b32d99d8d2"],
+Cell[88569, 2116, 590, 12, 24, "Print",ExpressionUUID->"1b5b7e7d-0ca2-4f6f-9b7e-4e0ff4c00ffc"],
+Cell[89162, 2130, 590, 12, 24, "Print",ExpressionUUID->"9fbc67c5-9eab-4cc8-a3db-d13e16b9f9ae"],
+Cell[89755, 2144, 592, 12, 24, "Print",ExpressionUUID->"b8d15074-3bd2-4255-a41e-00fb85ec4123"],
+Cell[90350, 2158, 590, 12, 24, "Print",ExpressionUUID->"a47967bf-9a66-429b-b544-46557b2de0a2"],
+Cell[90943, 2172, 590, 12, 24, "Print",ExpressionUUID->"090ebba9-cc4a-4511-9768-a733b7a777c5"],
+Cell[91536, 2186, 590, 12, 24, "Print",ExpressionUUID->"84ae8ec3-7115-488d-b483-04729cee5d6d"],
+Cell[92129, 2200, 592, 12, 24, "Print",ExpressionUUID->"24ab1ede-3197-4bc8-862a-0b94e96991e7"],
+Cell[92724, 2214, 590, 12, 24, "Print",ExpressionUUID->"ced0c2c9-1571-4682-9592-559792ab4bf4"],
+Cell[93317, 2228, 590, 12, 24, "Print",ExpressionUUID->"be07c732-6e96-4da3-a616-3ad93d10fd62"],
+Cell[93910, 2242, 590, 12, 24, "Print",ExpressionUUID->"6831d176-931b-46c0-b567-e713e97875b0"],
+Cell[94503, 2256, 592, 12, 24, "Print",ExpressionUUID->"7fb81ab2-416d-4c75-a415-964b1d7d0163"],
+Cell[95098, 2270, 590, 12, 24, "Print",ExpressionUUID->"8a93f0dd-659f-4fd3-87dc-dd119ea79669"],
+Cell[95691, 2284, 590, 12, 24, "Print",ExpressionUUID->"abde7d00-2771-4d96-a125-f3d7c67acbed"],
+Cell[96284, 2298, 592, 12, 24, "Print",ExpressionUUID->"6984bedf-553b-49cf-9011-d5ef08ecf363"],
+Cell[96879, 2312, 592, 12, 24, "Print",ExpressionUUID->"3f432ed5-3b6a-481a-996c-82534394b528"],
+Cell[97474, 2326, 590, 12, 24, "Print",ExpressionUUID->"ffafb3bd-9f6e-4112-99a5-c126e2f337d6"],
+Cell[98067, 2340, 590, 12, 24, "Print",ExpressionUUID->"954f9671-78c7-424d-9918-3ebdd3c28d18"],
+Cell[98660, 2354, 592, 12, 24, "Print",ExpressionUUID->"e3822845-ba7d-4cf9-980c-f50dbe4cb81a"],
+Cell[99255, 2368, 589, 12, 24, "Print",ExpressionUUID->"6bb844ed-20f0-4ebc-bc72-72b5bea41a46"],
+Cell[99847, 2382, 590, 12, 24, "Print",ExpressionUUID->"bb38afd2-c413-458f-9160-aefbd0d27927"],
+Cell[100440, 2396, 589, 12, 24, "Print",ExpressionUUID->"6cb9f6d4-6d01-4a77-accb-65e87470338d"],
+Cell[101032, 2410, 592, 12, 24, "Print",ExpressionUUID->"f3fa80e3-6cc5-45fe-a17d-46970ef94b0c"],
+Cell[101627, 2424, 590, 12, 24, "Print",ExpressionUUID->"09d65ed1-715d-41df-8c94-a39bbb3280a3"],
+Cell[102220, 2438, 590, 12, 24, "Print",ExpressionUUID->"a0d3ab8e-de70-494e-9f5a-07eda236d43d"],
+Cell[102813, 2452, 590, 12, 24, "Print",ExpressionUUID->"155ec573-fa0f-4f08-aef8-e6cc269556b1"],
+Cell[103406, 2466, 592, 12, 24, "Print",ExpressionUUID->"95024ab4-7fb7-4ea3-a213-40a63fd51d4c"],
+Cell[104001, 2480, 590, 12, 24, "Print",ExpressionUUID->"90a53c5b-8c35-4055-998c-5ba3df1e4595"],
+Cell[104594, 2494, 592, 12, 24, "Print",ExpressionUUID->"f8e33bf4-1816-41d8-99d7-edbf10cd5b8c"],
+Cell[105189, 2508, 592, 12, 24, "Print",ExpressionUUID->"62d77045-93f2-456c-afbb-f57e51e00cda"],
+Cell[105784, 2522, 592, 12, 24, "Print",ExpressionUUID->"33fb272c-39d5-4195-a5f0-03ee79c2d273"],
+Cell[106379, 2536, 590, 12, 24, "Print",ExpressionUUID->"cea3e22b-616d-4e17-94cb-73db0a940ddb"],
+Cell[106972, 2550, 590, 12, 24, "Print",ExpressionUUID->"d1d62de9-2394-48d9-9cd1-1c560ab9737d"],
+Cell[107565, 2564, 590, 12, 24, "Print",ExpressionUUID->"30a06b84-dbda-4151-9e85-77ae4f184488"],
+Cell[108158, 2578, 592, 12, 24, "Print",ExpressionUUID->"2c6607bb-6df2-4411-ac6b-aba394a7fac2"],
+Cell[108753, 2592, 592, 12, 24, "Print",ExpressionUUID->"e9935d4c-9424-473a-bdf3-c0d3396da9c8"],
+Cell[109348, 2606, 590, 12, 24, "Print",ExpressionUUID->"d7e337b8-b3da-4537-8114-35051760aa0e"],
+Cell[109941, 2620, 590, 12, 24, "Print",ExpressionUUID->"44245045-7776-4e4c-bc3c-9fbe9a8c8638"],
+Cell[110534, 2634, 590, 12, 24, "Print",ExpressionUUID->"8329a41f-5e59-42d6-b164-4077b17d3c7d"],
+Cell[111127, 2648, 592, 12, 24, "Print",ExpressionUUID->"c835d743-48ec-4a7e-a931-ed53a089baf1"],
+Cell[111722, 2662, 590, 12, 24, "Print",ExpressionUUID->"e0c5b3db-7b63-4519-9049-33e98a77bf63"],
+Cell[112315, 2676, 590, 12, 24, "Print",ExpressionUUID->"f4064934-b056-4b88-8ce6-ea4a63fd1832"],
+Cell[112908, 2690, 590, 12, 24, "Print",ExpressionUUID->"c60ae536-341c-4231-9d7f-28ed6fc010d0"],
+Cell[113501, 2704, 590, 12, 24, "Print",ExpressionUUID->"e1e5312b-95d7-4fea-9a9b-f750ec126cb3"],
+Cell[114094, 2718, 590, 12, 24, "Print",ExpressionUUID->"4d16f65d-d7c1-4206-bb12-ff0837d15035"],
+Cell[114687, 2732, 592, 12, 24, "Print",ExpressionUUID->"b1399836-b8d5-4db2-b11b-46c5231dfb9b"],
+Cell[115282, 2746, 592, 12, 24, "Print",ExpressionUUID->"4cbd66d0-9cb8-49ef-a05e-7b1fba13693d"],
+Cell[115877, 2760, 590, 12, 24, "Print",ExpressionUUID->"4664d10a-2aaf-41a3-b1d7-406a84cb92da"],
+Cell[116470, 2774, 590, 12, 24, "Print",ExpressionUUID->"dd2827c1-ec77-4ed3-ab85-e1f6d405724a"],
+Cell[117063, 2788, 590, 12, 24, "Print",ExpressionUUID->"493bad0e-e393-43d4-89d2-aa227afa1bc9"],
+Cell[117656, 2802, 590, 12, 24, "Print",ExpressionUUID->"975eef16-8958-44ef-8f6d-309b76e6fcb6"],
+Cell[118249, 2816, 592, 12, 24, "Print",ExpressionUUID->"c71191a4-2459-420c-a874-0dac3fe7d4de"],
+Cell[118844, 2830, 592, 12, 24, "Print",ExpressionUUID->"a6f5e445-32f2-4aea-83e9-93ca8df8d6db"],
+Cell[119439, 2844, 590, 12, 24, "Print",ExpressionUUID->"b4a75642-2447-4ced-82d1-86db37d81517"],
+Cell[120032, 2858, 592, 12, 24, "Print",ExpressionUUID->"4c0ca0ea-884a-4e8d-bef1-f9a7e1e00b01"],
+Cell[120627, 2872, 592, 12, 24, "Print",ExpressionUUID->"c6ac1b97-da77-41a9-9a18-d87e11a03c9c"],
+Cell[121222, 2886, 592, 12, 24, "Print",ExpressionUUID->"cf11aea8-37d2-4e13-ab17-38ac36631409"],
+Cell[121817, 2900, 590, 12, 24, "Print",ExpressionUUID->"1d1f0596-37d2-4424-bae3-f9d8723fbb21"],
+Cell[122410, 2914, 590, 12, 24, "Print",ExpressionUUID->"d41e0ca3-ae48-4ca1-b913-aadf4832f1a1"],
+Cell[123003, 2928, 589, 12, 24, "Print",ExpressionUUID->"ebb75367-3c3b-4676-ab05-d1d33225bee4"],
+Cell[123595, 2942, 590, 12, 24, "Print",ExpressionUUID->"d3a6e521-3690-45a5-be34-d4231aa5eb9a"],
+Cell[124188, 2956, 589, 12, 24, "Print",ExpressionUUID->"8aef0c43-d5e4-4cc9-9ff3-cd86cafbf836"],
+Cell[124780, 2970, 592, 12, 24, "Print",ExpressionUUID->"a9649bc8-ba1f-436c-96d7-4716a68f04ed"],
+Cell[125375, 2984, 592, 12, 24, "Print",ExpressionUUID->"647d230d-aa92-4fc6-819c-15a1a8f7ff74"],
+Cell[125970, 2998, 589, 12, 24, "Print",ExpressionUUID->"f0751fee-ff53-4e18-b36d-7f75c709e7a8"],
+Cell[126562, 3012, 590, 12, 24, "Print",ExpressionUUID->"ddcc4f61-0f11-4432-8853-080322aa71cd"],
+Cell[127155, 3026, 589, 12, 24, "Print",ExpressionUUID->"1bd8f96f-76e9-4bd0-8d64-71e88ca761cf"],
+Cell[127747, 3040, 592, 12, 24, "Print",ExpressionUUID->"a5769f72-16ca-4d1b-9e68-10da2ee9401a"],
+Cell[128342, 3054, 592, 12, 24, "Print",ExpressionUUID->"23e19ad8-482f-4e50-ac7d-39b8232d54d1"],
+Cell[128937, 3068, 590, 12, 24, "Print",ExpressionUUID->"b396acfc-b6dd-4e10-84d3-91e0b4c17af2"],
+Cell[129530, 3082, 590, 12, 24, "Print",ExpressionUUID->"d1c39757-fcd3-4738-9147-a54c82f2dc93"],
+Cell[130123, 3096, 590, 12, 24, "Print",ExpressionUUID->"2cc5187b-ef54-4224-8ec7-2cc447464207"],
+Cell[130716, 3110, 588, 12, 24, "Print",ExpressionUUID->"aeb24872-3606-402d-bbda-f6c728b9bb4e"],
+Cell[131307, 3124, 590, 12, 24, "Print",ExpressionUUID->"4bd78b51-7c87-404a-b69b-7459e440f961"],
+Cell[131900, 3138, 590, 12, 24, "Print",ExpressionUUID->"8ccee7c5-67af-4cda-8aa6-c2d372a73e4b"],
+Cell[132493, 3152, 592, 12, 24, "Print",ExpressionUUID->"769dea9d-4765-4d2c-a9d6-c4a7cece7d7e"],
+Cell[133088, 3166, 590, 12, 24, "Print",ExpressionUUID->"58dfd25c-872b-4c1b-bf35-7f0696ec3833"],
+Cell[133681, 3180, 590, 12, 24, "Print",ExpressionUUID->"7364e8b2-3b44-4871-bf2e-1dfb4fac6b94"],
+Cell[134274, 3194, 590, 12, 24, "Print",ExpressionUUID->"0fa19433-e542-4831-b249-2050001498d7"],
+Cell[134867, 3208, 590, 12, 24, "Print",ExpressionUUID->"401c4d7f-9f77-4706-b2fc-cf7dc6e60182"],
+Cell[135460, 3222, 590, 12, 24, "Print",ExpressionUUID->"2dd4dd1d-2832-49ce-b177-772408048ce2"],
+Cell[136053, 3236, 590, 12, 24, "Print",ExpressionUUID->"9c299cbb-1953-4763-a4d8-1a1ddf1b74c7"],
+Cell[136646, 3250, 590, 12, 24, "Print",ExpressionUUID->"92ebb414-1db2-41fe-9fb3-b8051b930d5a"],
+Cell[137239, 3264, 589, 12, 24, "Print",ExpressionUUID->"3968ce77-2300-4fc9-96da-7bef7eb6671f"],
+Cell[137831, 3278, 590, 12, 24, "Print",ExpressionUUID->"7a4465fd-45c5-4d98-a323-6049149a8e54"],
+Cell[138424, 3292, 590, 12, 24, "Print",ExpressionUUID->"69b9eb90-1ea7-4481-a9ef-9e8c36143262"],
+Cell[139017, 3306, 590, 12, 24, "Print",ExpressionUUID->"b0ce2cdf-180d-4fdf-9972-9ce1b75a530c"],
+Cell[139610, 3320, 592, 12, 24, "Print",ExpressionUUID->"07166acb-20fe-4ede-8c32-81341c882703"],
+Cell[140205, 3334, 590, 12, 24, "Print",ExpressionUUID->"05a04342-318c-4657-98d8-6aca8a9570f7"],
+Cell[140798, 3348, 590, 12, 24, "Print",ExpressionUUID->"39f94024-72cc-4937-a438-898c257f9156"],
+Cell[141391, 3362, 590, 12, 24, "Print",ExpressionUUID->"bb0adb22-a3cf-4d8a-910a-8f56400743ff"],
+Cell[141984, 3376, 592, 12, 24, "Print",ExpressionUUID->"7173c062-f1e7-436d-8179-73401ea1ad4f"],
+Cell[142579, 3390, 590, 12, 24, "Print",ExpressionUUID->"44f71b4e-a2e0-4cc3-8299-a02bbfa171c5"],
+Cell[143172, 3404, 590, 12, 24, "Print",ExpressionUUID->"1d350dc6-1c0c-4c30-8619-e7d194714733"],
+Cell[143765, 3418, 592, 12, 24, "Print",ExpressionUUID->"176b288c-d940-4433-a10e-451843ae7b98"],
+Cell[144360, 3432, 590, 12, 24, "Print",ExpressionUUID->"675db820-1b9d-46ed-b802-1795d97d1f0b"],
+Cell[144953, 3446, 590, 12, 24, "Print",ExpressionUUID->"e3a16c03-09c4-42fa-acf2-fea690c9104f"],
+Cell[145546, 3460, 590, 12, 24, "Print",ExpressionUUID->"f61ba134-5255-4ab9-978d-dc2089383c82"],
+Cell[146139, 3474, 590, 12, 24, "Print",ExpressionUUID->"ee96329c-ac9c-47bd-af53-6fc826925d8f"],
+Cell[146732, 3488, 590, 12, 24, "Print",ExpressionUUID->"95c79809-e754-4130-ab17-dceb7573247b"],
+Cell[147325, 3502, 592, 12, 24, "Print",ExpressionUUID->"1d355b9d-2eae-4454-8082-4376c420bb52"],
+Cell[147920, 3516, 340, 6, 24, "Print",ExpressionUUID->"b39ca931-375d-4b2d-aa49-91576fa9bb33"],
+Cell[148263, 3524, 535, 11, 24, "Print",ExpressionUUID->"6eb627fc-fa88-452c-9d88-c3f31c1c84f5"],
+Cell[148801, 3537, 522, 11, 24, "Print",ExpressionUUID->"718a1971-cda3-4d74-ba2a-27db0d2f64c6"],
+Cell[149326, 3550, 693, 15, 24, "Print",ExpressionUUID->"bcc765e6-b684-41d4-b9f8-923331f59a3d"],
+Cell[150022, 3567, 693, 15, 24, "Print",ExpressionUUID->"f0cbd9cd-a4a0-4e56-a52b-2eb7516c790f"],
+Cell[150718, 3584, 693, 15, 24, "Print",ExpressionUUID->"e4d778a7-9906-40b2-b654-bce0089e11ec"],
+Cell[151414, 3601, 693, 15, 24, "Print",ExpressionUUID->"39b2a992-ddd6-4ea7-9374-1b16f1397123"],
+Cell[152110, 3618, 697, 15, 24, "Print",ExpressionUUID->"52384a5c-f1c8-42d0-bcd6-8e8cd626659f"],
+Cell[152810, 3635, 697, 15, 24, "Print",ExpressionUUID->"178cfaf5-bf53-4494-92a1-a5bdab70dbf0"],
+Cell[153510, 3652, 697, 15, 24, "Print",ExpressionUUID->"97b5cfe9-e4b2-4e92-b61c-106983bfe7bc"],
+Cell[154210, 3669, 697, 15, 24, "Print",ExpressionUUID->"d3789ac3-2228-457f-8442-9773a5a43aa9"],
+Cell[154910, 3686, 697, 15, 24, "Print",ExpressionUUID->"ed577c22-5047-4a2d-8548-4bf0212ca75c"],
+Cell[155610, 3703, 701, 15, 24, "Print",ExpressionUUID->"fda0b7e8-d98a-4d92-8a41-bbc92a48a775"],
+Cell[156314, 3720, 701, 15, 24, "Print",ExpressionUUID->"07023e78-bec9-412e-adff-24ae67e50a70"],
+Cell[157018, 3737, 699, 15, 24, "Print",ExpressionUUID->"eae624ab-9dd9-46a4-bcdc-976378a6e5e9"],
+Cell[157720, 3754, 699, 15, 24, "Print",ExpressionUUID->"a85ef80c-90c0-4f4e-aadd-1aa9f433e969"],
+Cell[158422, 3771, 698, 15, 24, "Print",ExpressionUUID->"cbf1a0e4-3403-49af-825e-450c3f6f8381"],
+Cell[159123, 3788, 699, 15, 24, "Print",ExpressionUUID->"138bdf87-1a59-4b02-9eaf-70b0ff56842d"],
+Cell[159825, 3805, 701, 15, 24, "Print",ExpressionUUID->"3261f4eb-fa53-4023-9f9d-bbca25c6af57"],
+Cell[160529, 3822, 699, 15, 24, "Print",ExpressionUUID->"da794422-3495-4a87-a565-cae13288169e"],
+Cell[161231, 3839, 699, 15, 24, "Print",ExpressionUUID->"25b9f2f3-ee95-4804-99b9-9bab630b9780"],
+Cell[161933, 3856, 698, 15, 24, "Print",ExpressionUUID->"97cb7568-d31f-47ea-a799-30bf15fa2357"],
+Cell[162634, 3873, 187323, 3574, 296, "Print",ExpressionUUID->"6751841f-76ff-4ad2-97b9-dda1369270a5"],
+Cell[349960, 7449, 183386, 3561, 296, "Print",ExpressionUUID->"306cbd09-abac-41ee-9f6d-4b5ec83cf29c"],
+Cell[533349, 11012, 199686, 3827, 296, "Print",ExpressionUUID->"64b95aea-e735-45fc-9e2a-fb6bedc22350"],
+Cell[733038, 14841, 192070, 3702, 296, "Print",ExpressionUUID->"0aac61b9-b707-4352-b484-ba5a8ea791ae"],
+Cell[925111, 18545, 38705, 779, 296, "Print",ExpressionUUID->"c482892d-792f-4e01-b976-eeed43c2c366"],
+Cell[963819, 19326, 693, 15, 24, "Print",ExpressionUUID->"cbf5c2a7-3746-451c-8624-4dcc1ba0f98a"],
+Cell[964515, 19343, 695, 15, 24, "Print",ExpressionUUID->"02a3bd31-6e06-4496-88e2-ef8766bb9783"],
+Cell[965213, 19360, 695, 15, 24, "Print",ExpressionUUID->"292815c1-45f3-475a-af82-00590959c16e"],
+Cell[965911, 19377, 693, 15, 24, "Print",ExpressionUUID->"b7fee54b-6209-40f6-9f9f-10e497c197b6"],
+Cell[966607, 19394, 697, 15, 24, "Print",ExpressionUUID->"3209f1ad-6ea9-4357-8176-10429fe11391"],
+Cell[967307, 19411, 697, 15, 24, "Print",ExpressionUUID->"ca352abb-fe11-410e-8322-2ce39234b094"],
+Cell[968007, 19428, 699, 15, 24, "Print",ExpressionUUID->"82a695c0-088f-4d5c-a5cb-a74ed23247f0"],
+Cell[968709, 19445, 699, 15, 24, "Print",ExpressionUUID->"236565b3-b8de-4303-a786-5a1eba9e724c"],
+Cell[969411, 19462, 696, 15, 24, "Print",ExpressionUUID->"bd1bea21-d72e-4cdb-9908-2050fcfe40c6"],
+Cell[970110, 19479, 699, 15, 24, "Print",ExpressionUUID->"68f1074d-bfb0-4efb-999b-0e7171b699b7"],
+Cell[970812, 19496, 699, 15, 24, "Print",ExpressionUUID->"8a199273-bda5-4d42-8036-88f37eb9501a"],
+Cell[971514, 19513, 699, 15, 24, "Print",ExpressionUUID->"358e2294-9ad6-4cba-a0e6-1abe99c3a81d"],
+Cell[972216, 19530, 699, 15, 24, "Print",ExpressionUUID->"b9e4bcd6-09db-4bc8-b80b-aa538dcb9b0a"],
+Cell[972918, 19547, 699, 15, 24, "Print",ExpressionUUID->"eb0c65aa-ec7b-4af6-9ab9-7fa32a82700f"],
+Cell[973620, 19564, 699, 15, 24, "Print",ExpressionUUID->"cc147248-5fca-42ca-9d42-9a980b81cec1"],
+Cell[974322, 19581, 699, 15, 24, "Print",ExpressionUUID->"ef08089c-f83c-4e58-8d38-e68e658256b1"],
+Cell[975024, 19598, 701, 15, 24, "Print",ExpressionUUID->"cf5dd067-e0f0-407d-b633-37054a8867c6"],
+Cell[975728, 19615, 699, 15, 24, "Print",ExpressionUUID->"cd06af1e-5509-4375-a93a-10e11a0dc383"],
+Cell[976430, 19632, 699, 15, 24, "Print",ExpressionUUID->"f70a5eee-b194-4c18-9fcc-167674d51a44"]
+}, Open  ]],
+Cell[977144, 19650, 315, 4, 34, "Output",ExpressionUUID->"d79637b0-08aa-4536-8506-f77a2a16d880"],
+Cell[CellGroupData[{
+Cell[977484, 19658, 340, 6, 24, "Print",ExpressionUUID->"ffc82ff7-24b1-486f-8187-c620cc49f0a2"],
+Cell[977827, 19666, 559, 11, 24, "Print",ExpressionUUID->"3879e29b-3cbf-499a-acff-3e595c73e21f"],
+Cell[978389, 19679, 588, 12, 24, "Print",ExpressionUUID->"d14582c8-ff1f-4330-b15b-1b0b4c6b2338"],
+Cell[978980, 19693, 586, 12, 24, "Print",ExpressionUUID->"7a2e3214-e4b7-4bdb-aaac-88fe2f119c09"],
+Cell[979569, 19707, 586, 12, 24, "Print",ExpressionUUID->"14cee031-2ab7-4213-b8fe-7cd4db9f8e50"],
+Cell[980158, 19721, 586, 12, 24, "Print",ExpressionUUID->"a6c38bb8-17f6-49ee-995f-2490e32591c4"],
+Cell[980747, 19735, 586, 12, 24, "Print",ExpressionUUID->"c9a29be3-1aa2-4ec5-a895-fc4d0bb48a02"],
+Cell[981336, 19749, 586, 12, 24, "Print",ExpressionUUID->"b45fecbe-c3a4-47cd-9b84-68df6f7a7d43"],
+Cell[981925, 19763, 588, 12, 24, "Print",ExpressionUUID->"9fb38ea0-c59c-4024-9276-0feec3269214"],
+Cell[982516, 19777, 586, 12, 24, "Print",ExpressionUUID->"c133bf4e-7342-4327-af7c-6ebd1c82cbb7"],
+Cell[983105, 19791, 586, 12, 24, "Print",ExpressionUUID->"42e40ad8-c10a-499a-8e9b-084087384d9e"],
+Cell[983694, 19805, 587, 12, 24, "Print",ExpressionUUID->"aa04af00-2f0d-4e9b-9a69-98d7d903733e"],
+Cell[984284, 19819, 590, 12, 24, "Print",ExpressionUUID->"53a06575-6e80-458a-8d62-e74f9e799a3f"],
+Cell[984877, 19833, 590, 12, 24, "Print",ExpressionUUID->"5e24b5ad-ca75-4b07-81a9-d95671dfdf70"],
+Cell[985470, 19847, 588, 12, 24, "Print",ExpressionUUID->"9fc90ed5-3cbe-4e65-ad36-e39efb75c512"],
+Cell[986061, 19861, 588, 12, 24, "Print",ExpressionUUID->"7f04687e-cb41-45fd-b3cf-75433702c44d"],
+Cell[986652, 19875, 588, 12, 24, "Print",ExpressionUUID->"43fee89e-d6b1-431c-9b0e-3d45e037713a"],
+Cell[987243, 19889, 590, 12, 24, "Print",ExpressionUUID->"6af18cf1-9e62-45cd-924d-71e32334ce4b"],
+Cell[987836, 19903, 588, 12, 24, "Print",ExpressionUUID->"6bcbb518-d9d0-48cd-b271-3652bf782e86"],
+Cell[988427, 19917, 590, 12, 24, "Print",ExpressionUUID->"06df76bd-e0a2-4f71-8bc0-605fffff985c"],
+Cell[989020, 19931, 588, 12, 24, "Print",ExpressionUUID->"1efec01c-2547-4c04-ae9e-3ed797ff56c7"],
+Cell[989611, 19945, 520, 11, 24, "Print",ExpressionUUID->"d7db2bea-f18c-4745-a892-ad163359c203"],
+Cell[990134, 19958, 461, 8, 63, "Print",ExpressionUUID->"f7d40fa0-2e81-44cb-b977-19fca6fe9eb3"],
+Cell[990598, 19968, 358, 6, 24, "Print",ExpressionUUID->"32e1d87b-fe20-40c4-895a-065869fb386b"],
+Cell[990959, 19976, 344, 6, 44, "Print",ExpressionUUID->"86e8c25e-d826-44d9-84d0-dec075063487"]
+}, Open  ]]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[991352, 19988, 4861, 125, 451, "Input",ExpressionUUID->"6db5e1ce-d298-4829-9b87-57793191d1ff"],
+Cell[CellGroupData[{
+Cell[996238, 20117, 186, 4, 24, "Print",ExpressionUUID->"d7665995-5b38-4120-864a-216b5be8a360"],
+Cell[996427, 20123, 183, 4, 24, "Print",ExpressionUUID->"67c9fb12-783d-4c5a-86dc-486c8bf67ee8"],
+Cell[996613, 20129, 443, 11, 24, "Print",ExpressionUUID->"7119e816-c5e9-4981-9e2d-f65be7c0e570"],
+Cell[997059, 20142, 181, 4, 24, "Print",ExpressionUUID->"1c682e20-40d1-4dec-9202-a3530a13ffaa"],
+Cell[997243, 20148, 380, 9, 24, "Print",ExpressionUUID->"357774aa-48ca-497b-a2b0-d9e0e0411f61"],
+Cell[997626, 20159, 429, 10, 24, "Print",ExpressionUUID->"b3ed0818-0a18-48a5-bd83-961ac488432d"],
+Cell[998058, 20171, 427, 10, 24, "Print",ExpressionUUID->"a8cd2652-f78d-4dda-98a0-1a4f36fb6be7"],
+Cell[998488, 20183, 429, 10, 24, "Print",ExpressionUUID->"0d57b7aa-3abc-4b65-9bbc-f278967af523"],
+Cell[998920, 20195, 429, 10, 24, "Print",ExpressionUUID->"67624f7f-4342-4ae2-a7ca-011b41653683"],
+Cell[999352, 20207, 427, 10, 24, "Print",ExpressionUUID->"06403b8a-f28c-4d35-8662-5be9cd241ac1"],
+Cell[999782, 20219, 427, 10, 24, "Print",ExpressionUUID->"8d069dbc-972a-4606-b916-420e9649f4a1"],
+Cell[1000212, 20231, 427, 10, 24, "Print",ExpressionUUID->"b7bdb7e3-2cab-4534-bcb4-2f6b75ffcc9e"],
+Cell[1000642, 20243, 429, 10, 24, "Print",ExpressionUUID->"9c046f14-91b4-4a0d-a90e-e2cbd55888a4"],
+Cell[1001074, 20255, 427, 10, 24, "Print",ExpressionUUID->"dbc52e95-3dbd-48f5-8519-d6d2e9bb9c0e"],
+Cell[1001504, 20267, 429, 10, 24, "Print",ExpressionUUID->"bb636163-f263-4c9c-87f0-711e80330b4b"],
+Cell[1001936, 20279, 431, 10, 24, "Print",ExpressionUUID->"a0686b78-ee49-4f11-baca-9b5848c0ad03"],
+Cell[1002370, 20291, 431, 10, 24, "Print",ExpressionUUID->"ba894d17-c186-4106-8d12-7666f4860452"],
+Cell[1002804, 20303, 429, 10, 24, "Print",ExpressionUUID->"d83ab526-a801-47a1-9900-89a8118f30ff"],
+Cell[1003236, 20315, 429, 10, 24, "Print",ExpressionUUID->"38549d4b-1beb-4050-aa0f-07f0fd654af3"],
+Cell[1003668, 20327, 429, 10, 24, "Print",ExpressionUUID->"6ece42c0-706e-442e-92c2-737b95ae7a52"],
+Cell[1004100, 20339, 429, 10, 24, "Print",ExpressionUUID->"2559847a-4207-4de3-942a-c10316ee3c14"],
+Cell[1004532, 20351, 429, 10, 24, "Print",ExpressionUUID->"2ff8cda3-b3d4-4a45-a687-5020b59824e5"],
+Cell[1004964, 20363, 429, 10, 24, "Print",ExpressionUUID->"28d8203b-6a33-49e5-8a4c-10be6dd4b472"],
+Cell[1005396, 20375, 429, 10, 24, "Print",ExpressionUUID->"bc05dcd6-f8fa-4722-bd47-3a3c0d8d5b1b"],
+Cell[1005828, 20387, 429, 10, 24, "Print",ExpressionUUID->"bf2e2165-1a49-445d-af8a-841f01b52c3f"],
+Cell[1006260, 20399, 428, 10, 24, "Print",ExpressionUUID->"3ed27a96-2350-4395-98b5-4918682bc638"],
+Cell[1006691, 20411, 431, 10, 24, "Print",ExpressionUUID->"1a598280-c3c8-495d-be24-9d11966bc96f"],
+Cell[1007125, 20423, 429, 10, 24, "Print",ExpressionUUID->"8a78dd65-5af2-4e1b-973a-6576f9de479c"],
+Cell[1007557, 20435, 429, 10, 24, "Print",ExpressionUUID->"b4e28a3e-fb4f-40ed-bc81-1a254c57368a"],
+Cell[1007989, 20447, 429, 10, 24, "Print",ExpressionUUID->"97aeba55-6dd0-46ea-886b-51055bf92eab"],
+Cell[1008421, 20459, 429, 10, 24, "Print",ExpressionUUID->"eecaa652-f260-49fe-bf45-4ba9ba10398d"],
+Cell[1008853, 20471, 429, 10, 24, "Print",ExpressionUUID->"ad542275-ffa7-47cf-8fc2-adc45c19d68c"],
+Cell[1009285, 20483, 429, 10, 24, "Print",ExpressionUUID->"a5137e25-aa17-4ab8-a7cd-42f746873514"],
+Cell[1009717, 20495, 429, 10, 24, "Print",ExpressionUUID->"160f3722-c0d4-40c5-88d0-0116fec82483"],
+Cell[1010149, 20507, 431, 10, 24, "Print",ExpressionUUID->"69acbb0d-07e1-4e21-9f3a-8a861cc7cb0a"],
+Cell[1010583, 20519, 429, 10, 24, "Print",ExpressionUUID->"32062fb6-7d5a-4431-86ed-d4145f64b283"],
+Cell[1011015, 20531, 429, 10, 24, "Print",ExpressionUUID->"4a5dd41b-30a2-4d33-b8ae-b714067bfad5"],
+Cell[1011447, 20543, 429, 10, 24, "Print",ExpressionUUID->"7dcb4b17-950e-45da-93c6-f6461f82a320"],
+Cell[1011879, 20555, 429, 10, 24, "Print",ExpressionUUID->"a44c2779-0733-40b0-9bf1-e4c603a6ea81"],
+Cell[1012311, 20567, 429, 10, 24, "Print",ExpressionUUID->"6791ef6b-c94d-424f-824d-9cf43afcd817"],
+Cell[1012743, 20579, 431, 10, 24, "Print",ExpressionUUID->"bae5aeba-ba1c-4fae-8077-33f4aef558b2"],
+Cell[1013177, 20591, 429, 10, 24, "Print",ExpressionUUID->"cd833297-8239-403c-8ad9-a1c5860aca35"],
+Cell[1013609, 20603, 431, 10, 24, "Print",ExpressionUUID->"98db6214-067b-4c9e-8017-6ac3ad09a81d"],
+Cell[1014043, 20615, 428, 10, 24, "Print",ExpressionUUID->"3bdf4e83-bd51-4fed-ab7b-075118a2aa06"],
+Cell[1014474, 20627, 429, 10, 24, "Print",ExpressionUUID->"fcf1a58b-4031-420a-8f1b-df4b6112e548"],
+Cell[1014906, 20639, 431, 10, 24, "Print",ExpressionUUID->"b34baa65-3299-4305-b15b-ebc9cc8f9554"],
+Cell[1015340, 20651, 429, 10, 24, "Print",ExpressionUUID->"1f3e0b9e-8944-4952-9a41-b5d487a7b7b8"],
+Cell[1015772, 20663, 431, 10, 24, "Print",ExpressionUUID->"5df6cea2-df7e-4395-90dd-95dc73a4845e"],
+Cell[1016206, 20675, 429, 10, 24, "Print",ExpressionUUID->"63756f13-8f17-4af9-adbd-295261c9312f"],
+Cell[1016638, 20687, 429, 10, 24, "Print",ExpressionUUID->"635e32cf-a783-4e2e-a5d6-75d616e9d537"],
+Cell[1017070, 20699, 429, 10, 24, "Print",ExpressionUUID->"5a19dbbf-8457-4a41-b7a2-4e44c1bdd2b8"],
+Cell[1017502, 20711, 429, 10, 24, "Print",ExpressionUUID->"cd07cf2e-46ec-42f4-8eb9-47b3a1fe4603"],
+Cell[1017934, 20723, 429, 10, 24, "Print",ExpressionUUID->"d2df5218-4f23-4c0e-8100-9147a518998c"],
+Cell[1018366, 20735, 429, 10, 24, "Print",ExpressionUUID->"d5ce00ca-5692-41db-ba2e-60c0f5b93227"],
+Cell[1018798, 20747, 429, 10, 24, "Print",ExpressionUUID->"478fa217-805d-41a6-8dcb-30e4e26bdfcb"],
+Cell[1019230, 20759, 431, 10, 24, "Print",ExpressionUUID->"4ecce0b5-2ed6-48e1-b377-c1fd9d735c92"],
+Cell[1019664, 20771, 429, 10, 24, "Print",ExpressionUUID->"c16fa650-2b43-4dca-99e1-5337341c0d9f"],
+Cell[1020096, 20783, 429, 10, 24, "Print",ExpressionUUID->"12de3db1-44f2-4303-b41c-26c8d0d1cbc2"],
+Cell[1020528, 20795, 429, 10, 24, "Print",ExpressionUUID->"6a84b3ff-5868-4a11-879b-834cc9e7a917"],
+Cell[1020960, 20807, 429, 10, 24, "Print",ExpressionUUID->"3fc90174-0d41-48bf-9c50-9e1da7082a38"],
+Cell[1021392, 20819, 429, 10, 24, "Print",ExpressionUUID->"fc1d47fc-1dcd-4fe5-9ec2-c4508e93a889"],
+Cell[1021824, 20831, 431, 10, 24, "Print",ExpressionUUID->"48347fc7-5023-4097-90f4-faaec3020269"],
+Cell[1022258, 20843, 429, 10, 24, "Print",ExpressionUUID->"e07e5d66-ab18-4047-97bf-4c6644046707"],
+Cell[1022690, 20855, 429, 10, 24, "Print",ExpressionUUID->"619dc925-96f5-414f-9f86-527e4f08adca"],
+Cell[1023122, 20867, 431, 10, 24, "Print",ExpressionUUID->"de4bd8c1-3a36-47cb-901c-e9c922c31b87"],
+Cell[1023556, 20879, 429, 10, 24, "Print",ExpressionUUID->"19beddf1-613e-4efe-b086-d97b97eda1be"],
+Cell[1023988, 20891, 429, 10, 24, "Print",ExpressionUUID->"a3629449-4ecd-4110-ae35-3950d64c1003"],
+Cell[1024420, 20903, 429, 10, 24, "Print",ExpressionUUID->"7ca4ccc9-a800-4a94-a2b6-5b119e12c156"],
+Cell[1024852, 20915, 429, 10, 24, "Print",ExpressionUUID->"d444d9de-70e7-4691-b1db-d71bdfcef946"],
+Cell[1025284, 20927, 429, 10, 24, "Print",ExpressionUUID->"94c93543-0587-4e98-9afa-ce44e151b889"],
+Cell[1025716, 20939, 431, 10, 24, "Print",ExpressionUUID->"e4532781-8059-42b6-bc04-ffa41119502a"],
+Cell[1026150, 20951, 429, 10, 24, "Print",ExpressionUUID->"7beaf51f-4c24-4952-8c78-4b480c656c58"],
+Cell[1026582, 20963, 429, 10, 24, "Print",ExpressionUUID->"4951bb34-c816-40f5-aeef-010adab576e3"],
+Cell[1027014, 20975, 429, 10, 24, "Print",ExpressionUUID->"d8facc23-89df-4b2a-a74e-7dfa3d234eca"],
+Cell[1027446, 20987, 429, 10, 24, "Print",ExpressionUUID->"6fb26224-367e-4f3e-a991-6d85a6124d0f"],
+Cell[1027878, 20999, 429, 10, 24, "Print",ExpressionUUID->"a5135887-51ee-4b81-9af6-6a9acc78eea0"],
+Cell[1028310, 21011, 429, 10, 24, "Print",ExpressionUUID->"704cca61-2b8a-4142-a74b-9f65295cdcc9"],
+Cell[1028742, 21023, 431, 10, 24, "Print",ExpressionUUID->"d890d246-9fee-449f-bddf-019c3c250f78"],
+Cell[1029176, 21035, 429, 10, 24, "Print",ExpressionUUID->"332180fd-80ec-4766-ae62-e8bfa48b554d"],
+Cell[1029608, 21047, 431, 10, 24, "Print",ExpressionUUID->"983d895e-8b21-442f-940a-7a0add8cf449"],
+Cell[1030042, 21059, 429, 10, 24, "Print",ExpressionUUID->"8d879242-0fab-439a-b678-a1092c3b0400"],
+Cell[1030474, 21071, 429, 10, 24, "Print",ExpressionUUID->"9949c074-3b76-4c60-8188-ad3f724c1594"],
+Cell[1030906, 21083, 431, 10, 24, "Print",ExpressionUUID->"5056b01c-7bea-4d14-b393-9756e5b57c78"],
+Cell[1031340, 21095, 429, 10, 24, "Print",ExpressionUUID->"45872de8-cad7-423b-93b4-18588bc83a2b"],
+Cell[1031772, 21107, 431, 10, 24, "Print",ExpressionUUID->"2c82be28-dfd2-42e1-a633-b4f3e502ec05"],
+Cell[1032206, 21119, 431, 10, 24, "Print",ExpressionUUID->"02b1d7a6-3f16-44ad-ac81-351b908c41f9"],
+Cell[1032640, 21131, 431, 10, 24, "Print",ExpressionUUID->"9e0068b8-515c-4c16-ac68-0808e51885d9"],
+Cell[1033074, 21143, 429, 10, 24, "Print",ExpressionUUID->"d5d53c86-b600-417f-ad78-14d06668024b"],
+Cell[1033506, 21155, 431, 10, 24, "Print",ExpressionUUID->"895877a0-6836-438c-a01d-0423117f6574"],
+Cell[1033940, 21167, 429, 10, 24, "Print",ExpressionUUID->"0ebc1075-914a-477c-9d7f-fcbec7b2d39a"],
+Cell[1034372, 21179, 431, 10, 24, "Print",ExpressionUUID->"e042d911-9291-47cc-975a-238003128fb7"],
+Cell[1034806, 21191, 429, 10, 24, "Print",ExpressionUUID->"50944f14-3ee9-42da-979a-5172021b8cb7"],
+Cell[1035238, 21203, 431, 10, 24, "Print",ExpressionUUID->"1b507f01-fd8a-46bb-9780-f763478ec943"],
+Cell[1035672, 21215, 429, 10, 24, "Print",ExpressionUUID->"a5a35299-81d0-4fbb-b0a1-d8f542dc6070"],
+Cell[1036104, 21227, 429, 10, 24, "Print",ExpressionUUID->"28983f92-0aee-4863-a944-050b4adde8f6"],
+Cell[1036536, 21239, 431, 10, 24, "Print",ExpressionUUID->"0893dc70-aa9f-4a03-b651-7f21ded2c37a"],
+Cell[1036970, 21251, 431, 10, 24, "Print",ExpressionUUID->"074366cb-c61a-4889-a983-a179b0621ba9"],
+Cell[1037404, 21263, 428, 10, 24, "Print",ExpressionUUID->"5a848af4-e0fb-42f5-8423-3472b969ed21"],
+Cell[1037835, 21275, 429, 10, 24, "Print",ExpressionUUID->"986ddbcb-d7c6-4df6-b4db-9b43f6cc21dd"],
+Cell[1038267, 21287, 429, 10, 24, "Print",ExpressionUUID->"3fa42382-223a-4bfb-8bc6-e279ad07fc8a"],
+Cell[1038699, 21299, 429, 10, 24, "Print",ExpressionUUID->"5f4b52f1-e247-476e-a54c-781493e8cb6f"],
+Cell[1039131, 21311, 429, 10, 24, "Print",ExpressionUUID->"9a91a84a-19eb-42a5-a7b0-9f37e72209c3"],
+Cell[1039563, 21323, 429, 10, 24, "Print",ExpressionUUID->"0c831a3a-d006-4b30-9ec8-281f948859fb"],
+Cell[1039995, 21335, 429, 10, 24, "Print",ExpressionUUID->"29f514fc-72cb-4d6d-a8fc-a490a60ee46e"],
+Cell[1040427, 21347, 430, 10, 24, "Print",ExpressionUUID->"9dc03715-efa6-454f-ba2a-24cdeb417e0b"],
+Cell[1040860, 21359, 431, 10, 24, "Print",ExpressionUUID->"5b3d912c-484e-41ce-8511-796aeb1f52c4"],
+Cell[1041294, 21371, 433, 10, 24, "Print",ExpressionUUID->"68d56b4e-f5a2-412f-98e7-46068d844ac2"],
+Cell[1041730, 21383, 431, 10, 24, "Print",ExpressionUUID->"7641702a-ceea-47fa-b168-d111beb3cd8b"],
+Cell[1042164, 21395, 431, 10, 24, "Print",ExpressionUUID->"796af381-fa0e-480b-b3dc-da3e547ac0e7"],
+Cell[1042598, 21407, 430, 10, 24, "Print",ExpressionUUID->"bfa7760a-852d-4046-b5da-a2ea841c2f56"],
+Cell[1043031, 21419, 433, 10, 24, "Print",ExpressionUUID->"8b33e52d-1f2f-4c3a-b046-b1b09abf4127"],
+Cell[1043467, 21431, 433, 10, 24, "Print",ExpressionUUID->"8ad33386-ec91-4e7b-bc54-9fb871896c31"],
+Cell[1043903, 21443, 433, 10, 24, "Print",ExpressionUUID->"5d266ec0-5529-4ea4-b8fe-49b14db1bd90"],
+Cell[1044339, 21455, 431, 10, 24, "Print",ExpressionUUID->"8775bc1b-23b9-4068-89f9-4c039a369567"],
+Cell[1044773, 21467, 433, 10, 24, "Print",ExpressionUUID->"7c69cb31-6e0c-4048-891e-f229a2b37c3e"],
+Cell[1045209, 21479, 430, 10, 24, "Print",ExpressionUUID->"38d4bc27-71d6-477b-b8b1-85c15ee8e247"],
+Cell[1045642, 21491, 433, 10, 24, "Print",ExpressionUUID->"929dfbd2-c745-43c7-a269-531beb85c2f7"],
+Cell[1046078, 21503, 431, 10, 24, "Print",ExpressionUUID->"2a4b661c-93e4-41c5-b6ed-30fc494f59f3"],
+Cell[1046512, 21515, 431, 10, 24, "Print",ExpressionUUID->"a2d64867-0f1b-4d5f-969c-28aefa5581d0"],
+Cell[1046946, 21527, 431, 10, 24, "Print",ExpressionUUID->"07253675-1d8c-4c3c-aa33-e88ff8eaef19"],
+Cell[1047380, 21539, 430, 10, 24, "Print",ExpressionUUID->"72db5043-c184-4464-88a0-11e92b63e50a"],
+Cell[1047813, 21551, 433, 10, 24, "Print",ExpressionUUID->"3a017fc0-8a53-4a29-9251-12ae21ebafbf"],
+Cell[1048249, 21563, 431, 10, 24, "Print",ExpressionUUID->"4845b75d-47ca-4bfa-8faa-c7fa8666bbbf"],
+Cell[1048683, 21575, 433, 10, 24, "Print",ExpressionUUID->"3fff6dc3-1cb7-423d-9c53-e5c4ef91f300"],
+Cell[1049119, 21587, 433, 10, 24, "Print",ExpressionUUID->"49fd2ce2-5024-40a2-9ec5-2363bbca7a13"],
+Cell[1049555, 21599, 181, 4, 24, "Print",ExpressionUUID->"6404ceef-d342-45ea-9662-82ae93a425c2"],
+Cell[1049739, 21605, 376, 9, 24, "Print",ExpressionUUID->"1bf236cc-5ac1-45ea-a75d-d7eccb1d0763"],
+Cell[1050118, 21616, 363, 9, 24, "Print",ExpressionUUID->"51fb3dec-4b3e-4c81-9c24-85b57bd4ff1b"],
+Cell[1050484, 21627, 537, 13, 24, "Print",ExpressionUUID->"d10fd181-1351-4d5d-a097-d55dcd4f9cd7"],
+Cell[1051024, 21642, 538, 13, 24, "Print",ExpressionUUID->"b8317f05-e1a0-4750-9f00-06c0b79e2292"],
+Cell[1051565, 21657, 538, 13, 24, "Print",ExpressionUUID->"a78601d9-d1c0-442a-b234-c8c46bec6200"],
+Cell[1052106, 21672, 538, 13, 24, "Print",ExpressionUUID->"c8e35b33-ebd2-47e6-8c1c-d7758727728e"],
+Cell[1052647, 21687, 540, 13, 24, "Print",ExpressionUUID->"3d2be911-6f81-4f0c-896d-56183aed70d9"],
+Cell[1053190, 21702, 538, 13, 24, "Print",ExpressionUUID->"39342352-8933-449d-ba88-dec7dd6882d5"],
+Cell[1053731, 21717, 538, 13, 24, "Print",ExpressionUUID->"3c27eb42-ad52-4225-be2d-66f31fa0e9ef"],
+Cell[1054272, 21732, 536, 13, 24, "Print",ExpressionUUID->"36a27991-21e8-4661-b5ff-e47e384bc63c"],
+Cell[1054811, 21747, 538, 13, 24, "Print",ExpressionUUID->"f40b6e5f-7daf-42c5-91df-70dfe1e4585c"],
+Cell[1055352, 21762, 540, 13, 24, "Print",ExpressionUUID->"dcb7564d-06ed-44d0-9e10-47793b600ad2"],
+Cell[1055895, 21777, 540, 13, 24, "Print",ExpressionUUID->"f7a25ea9-8723-4dce-ba66-04f741f73756"],
+Cell[1056438, 21792, 542, 13, 24, "Print",ExpressionUUID->"0e01dd7d-dfd6-44a9-88fc-124eed1955cf"],
+Cell[1056983, 21807, 539, 13, 24, "Print",ExpressionUUID->"d73394dc-51bb-407f-b290-6762e02597a3"],
+Cell[1057525, 21822, 540, 13, 24, "Print",ExpressionUUID->"2aa34850-4118-451e-9bbe-beffa4ca11d1"],
+Cell[1058068, 21837, 542, 13, 24, "Print",ExpressionUUID->"dba7da10-584e-4a36-9120-5fe8fd695e9d"],
+Cell[1058613, 21852, 542, 13, 24, "Print",ExpressionUUID->"87ac91e2-e101-43e7-a9a1-76c38598030e"],
+Cell[1059158, 21867, 542, 13, 24, "Print",ExpressionUUID->"61aec5f2-7a78-4dc4-a944-4cb69ee78fde"],
+Cell[1059703, 21882, 540, 13, 24, "Print",ExpressionUUID->"2b5675aa-44f7-492b-a6f2-e4e03aa81c82"],
+Cell[1060246, 21897, 168992, 3283, 296, "Print",ExpressionUUID->"70a06fb7-ad3a-4c53-a702-68cc4b24ca3c"],
+Cell[1229241, 25182, 186346, 3572, 296, "Print",ExpressionUUID->"80f68548-0b73-4548-b02e-48df91477fdf"],
+Cell[1415590, 28756, 193892, 3691, 296, "Print",ExpressionUUID->"4909787c-6f76-40ff-ab6e-5078194faf99"],
+Cell[1609485, 32449, 152209, 3004, 296, "Print",ExpressionUUID->"a1d695a8-6b7f-4c0c-b5a0-efde83f82c9d"],
+Cell[1761697, 35455, 538, 13, 24, "Print",ExpressionUUID->"8289f544-f4e9-49a0-afb4-d0518ee201dc"],
+Cell[1762238, 35470, 538, 13, 24, "Print",ExpressionUUID->"5dfb408f-578a-4763-bae2-57be854ace19"],
+Cell[1762779, 35485, 540, 13, 24, "Print",ExpressionUUID->"7997a7d7-02c3-4b7a-bb30-60f55297c0c4"],
+Cell[1763322, 35500, 540, 13, 24, "Print",ExpressionUUID->"815a1deb-5e75-4989-a9ce-dedb92a3c6fa"],
+Cell[1763865, 35515, 540, 13, 24, "Print",ExpressionUUID->"9a588a87-148a-45d7-b829-ee521fc8b534"],
+Cell[1764408, 35530, 538, 13, 24, "Print",ExpressionUUID->"a619c015-fc96-4bed-9e7c-47615ff8c958"],
+Cell[1764949, 35545, 538, 13, 24, "Print",ExpressionUUID->"943d135c-d0e8-458a-b10f-5896bb7dfc5a"],
+Cell[1765490, 35560, 540, 13, 24, "Print",ExpressionUUID->"906b9afa-4404-4b7a-9fbf-54b554fa3b3c"],
+Cell[1766033, 35575, 538, 13, 24, "Print",ExpressionUUID->"f96d0ac0-d312-45fb-b70e-6f30a2c318a1"],
+Cell[1766574, 35590, 540, 13, 24, "Print",ExpressionUUID->"bd269577-c1b8-4067-9282-d248754ce10f"],
+Cell[1767117, 35605, 542, 13, 24, "Print",ExpressionUUID->"7e2210b4-20c6-47cb-b765-6186e5f55ff0"],
+Cell[1767662, 35620, 539, 13, 24, "Print",ExpressionUUID->"3160068d-dbe9-48d1-96e7-eb84163e5c78"],
+Cell[1768204, 35635, 540, 13, 24, "Print",ExpressionUUID->"df6e3fcb-7ddc-42ca-be0b-6d95b9fd38f5"],
+Cell[1768747, 35650, 542, 13, 24, "Print",ExpressionUUID->"f8825dd2-2c0d-456a-b45b-af739b0ca4ab"],
+Cell[1769292, 35665, 540, 13, 24, "Print",ExpressionUUID->"f5437035-851f-445e-915f-3f5dea41ad12"],
+Cell[1769835, 35680, 542, 13, 24, "Print",ExpressionUUID->"fcc3444c-88de-4ae3-90fb-897d0944fba2"],
+Cell[1770380, 35695, 540, 13, 24, "Print",ExpressionUUID->"015c0356-7120-4005-9972-9c500e5040d7"],
+Cell[1770923, 35710, 539, 13, 24, "Print",ExpressionUUID->"986c3431-dc35-445a-b2ab-4041a3dd5e52"]
+}, Open  ]],
+Cell[1771477, 35726, 152, 2, 34, "Output",ExpressionUUID->"ff3afdd3-458e-4a26-a454-93ab7fe359f9"],
+Cell[CellGroupData[{
+Cell[1771654, 35732, 181, 4, 24, "Print",ExpressionUUID->"6cf863c8-4577-4392-9dde-2ad752a77806"],
+Cell[1771838, 35738, 398, 9, 24, "Print",ExpressionUUID->"1513ec06-85f4-4e9e-9a33-ca2cf384a552"],
+Cell[1772239, 35749, 429, 10, 24, "Print",ExpressionUUID->"81dcff6a-5b08-4a52-a0fb-8e2d5e543a72"],
+Cell[1772671, 35761, 427, 10, 24, "Print",ExpressionUUID->"1a9ed642-45c0-4e59-a831-a38cfb39daf9"],
+Cell[1773101, 35773, 427, 10, 24, "Print",ExpressionUUID->"0c955cdc-047d-4aa7-9736-b65399fcec78"],
+Cell[1773531, 35785, 427, 10, 24, "Print",ExpressionUUID->"900260b3-c99c-4adf-965e-4f55b8e6dc4c"],
+Cell[1773961, 35797, 425, 10, 24, "Print",ExpressionUUID->"27078933-f3a9-41d6-803f-89ee056ea1d4"],
+Cell[1774389, 35809, 359, 9, 24, "Print",ExpressionUUID->"0e2b189f-4e20-458b-a8fd-02cf4f4d9b77"],
+Cell[1774751, 35820, 300, 6, 63, "Print",ExpressionUUID->"469abe51-6516-4a0b-9037-7f4be311eee7"],
+Cell[1775054, 35828, 197, 4, 24, "Print",ExpressionUUID->"714c3095-a8df-44e8-ad5f-c168cb4bee85"],
+Cell[1775254, 35834, 188, 4, 44, "Print",ExpressionUUID->"82db79c3-91d2-4d15-8361-00b63715f011"],
+Cell[1775445, 35840, 363, 9, 24, "Print",ExpressionUUID->"18364dc7-e343-4295-9070-6190387cbb70"]
+}, Open  ]],
+Cell[1775823, 35852, 408, 10, 24, "Message",ExpressionUUID->"e0744e9d-e2ef-4a76-bd2f-fa7b3575d7ef"],
+Cell[1776234, 35864, 408, 10, 24, "Message",ExpressionUUID->"23b07601-e675-4ee5-8f25-8b0bdf7a5ad5"],
+Cell[1776645, 35876, 408, 10, 24, "Message",ExpressionUUID->"ac70579a-eda8-480d-92eb-abd167b49968"],
+Cell[1777056, 35888, 472, 10, 24, "Message",ExpressionUUID->"2479bce6-8bad-4ae2-89c6-44e875b32ef3"],
+Cell[CellGroupData[{
+Cell[1777553, 35902, 183, 4, 24, "Print",ExpressionUUID->"bf220334-165a-42a0-a103-0f1f677641c5"],
+Cell[1777739, 35908, 398, 9, 24, "Print",ExpressionUUID->"1a507720-2dd7-4c46-b79b-33d9b6e1b3a7"],
+Cell[1778140, 35919, 425, 10, 24, "Print",ExpressionUUID->"216509b2-4e52-4995-986f-23fb433e820c"],
+Cell[1778568, 35931, 429, 10, 24, "Print",ExpressionUUID->"2de11935-a6c3-4459-8353-525a400a8178"],
+Cell[1779000, 35943, 427, 10, 24, "Print",ExpressionUUID->"24add32f-f221-4043-9ba1-b50bc64ab4e9"],
+Cell[1779430, 35955, 429, 10, 24, "Print",ExpressionUUID->"a29ca9a1-308e-4cdd-b809-7c30d8140fd8"],
+Cell[1779862, 35967, 427, 10, 24, "Print",ExpressionUUID->"c3e78189-1864-4e59-aeac-543d34077095"],
+Cell[1780292, 35979, 361, 9, 24, "Print",ExpressionUUID->"fc8813f9-37c9-4faa-b480-3462c870c98e"],
+Cell[1780656, 35990, 300, 6, 63, "Print",ExpressionUUID->"9217e22f-3c3c-4953-b200-3c4a85426d3a"],
+Cell[1780959, 35998, 197, 4, 24, "Print",ExpressionUUID->"351c5b47-65a4-4e20-b498-26d08f7d90d7"],
+Cell[1781159, 36004, 186, 4, 44, "Print",ExpressionUUID->"aeeb27bc-4328-4853-8228-60cacec4bb3f"],
+Cell[1781348, 36010, 363, 9, 24, "Print",ExpressionUUID->"5269c6ed-3df5-4066-9bd6-3c08e140fa43"],
+Cell[1781714, 36021, 181, 4, 24, "Print",ExpressionUUID->"012e7324-2342-4b04-9c6e-e4803478b0fd"],
+Cell[1781898, 36027, 398, 9, 24, "Print",ExpressionUUID->"37772824-a3ef-4df4-a3fe-095b9db5eb3a"],
+Cell[1782299, 36038, 429, 10, 24, "Print",ExpressionUUID->"e41fe5f0-abca-4c39-97c7-b65021b6cbc0"],
+Cell[1782731, 36050, 429, 10, 24, "Print",ExpressionUUID->"481aa61d-33cf-4ab0-830e-394581885c18"],
+Cell[1783163, 36062, 427, 10, 24, "Print",ExpressionUUID->"2b52494c-de6d-4411-aa24-ae7abf19eb80"],
+Cell[1783593, 36074, 429, 10, 24, "Print",ExpressionUUID->"3e2644c3-b340-4924-9e27-7aa4c88e1d0e"],
+Cell[1784025, 36086, 425, 10, 24, "Print",ExpressionUUID->"7ea3683b-d2ef-41c2-81db-a798cbd96880"],
+Cell[1784453, 36098, 359, 9, 24, "Print",ExpressionUUID->"6268c551-ec3d-4a51-918d-d957323dae49"],
+Cell[1784815, 36109, 300, 6, 63, "Print",ExpressionUUID->"287c4d08-7c5a-4014-8c80-8a3b9f294681"],
+Cell[1785118, 36117, 199, 4, 24, "Print",ExpressionUUID->"6054ade0-a12f-4486-a7a3-3112838ef665"],
+Cell[1785320, 36123, 188, 4, 44, "Print",ExpressionUUID->"59bd80a3-15bc-4109-b529-32a6c770941d"],
+Cell[1785511, 36129, 363, 9, 24, "Print",ExpressionUUID->"c46d6c33-f2c4-4939-a37a-221437c48baf"],
+Cell[1785877, 36140, 183, 4, 24, "Print",ExpressionUUID->"64769fd3-9b86-4f6a-a5c8-cfb3b4d05e36"],
+Cell[1786063, 36146, 398, 9, 24, "Print",ExpressionUUID->"51968f08-7c0e-44c0-89d7-63e7acced7f7"],
+Cell[1786464, 36157, 427, 10, 24, "Print",ExpressionUUID->"bcf17787-5bbe-475f-8b8e-43b0e63f8fb7"],
+Cell[1786894, 36169, 427, 10, 24, "Print",ExpressionUUID->"51aa54ee-8217-42b7-abc5-3a62d1cc56cf"],
+Cell[1787324, 36181, 429, 10, 24, "Print",ExpressionUUID->"83fbe4e6-8bde-467d-bfc3-4eb8cccdea4c"],
+Cell[1787756, 36193, 427, 10, 24, "Print",ExpressionUUID->"c0845eda-e096-4b18-9a25-47c98d66758f"],
+Cell[1788186, 36205, 427, 10, 24, "Print",ExpressionUUID->"6f0ccfaa-b550-4a1d-9f04-376ab888f4a0"],
+Cell[1788616, 36217, 359, 9, 24, "Print",ExpressionUUID->"633e97f8-2861-4517-98a3-ca3924e2bfa5"],
+Cell[1788978, 36228, 302, 6, 63, "Print",ExpressionUUID->"a9a7575c-dcca-4d0f-adbc-fc54ab994943"],
+Cell[1789283, 36236, 196, 4, 24, "Print",ExpressionUUID->"aa22d876-477a-4f12-9023-89205c2d7246"],
+Cell[1789482, 36242, 188, 4, 44, "Print",ExpressionUUID->"0ef1e206-18e1-40aa-9988-1ecb055deeb3"],
+Cell[1789673, 36248, 363, 9, 24, "Print",ExpressionUUID->"b0637faf-f999-4bac-aca0-345cf1afd638"]
+}, Open  ]]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[1790085, 36263, 995, 24, 94, "Input",ExpressionUUID->"02aec05b-cb5c-48e4-bef3-28ea0e943234"],
+Cell[CellGroupData[{
+Cell[1791105, 36291, 553, 12, 24, "Print",ExpressionUUID->"ab1aed8a-ccf7-4a1c-91c7-8a08c7ebf458"],
+Cell[1791661, 36305, 560, 13, 24, "Print",ExpressionUUID->"f526f36d-a5f7-41a6-b836-cc63614c6630"]
+}, Open  ]]
+}, Open  ]],
+Cell[1792248, 36322, 304, 6, 157, "Input",ExpressionUUID->"3d70a43d-88f7-4edd-9914-fdec294abd06"],
+Cell[1792555, 36330, 1508, 43, 178, "Input",ExpressionUUID->"8a1b2c8b-00d6-46e3-89a1-77170c10da2a"],
+Cell[CellGroupData[{
+Cell[1794088, 36377, 1521, 41, 178, "Input",ExpressionUUID->"f40f6a8e-04da-4014-9f19-bcf1eb59b485"],
+Cell[CellGroupData[{
+Cell[1795634, 36422, 232, 5, 24, "Print",ExpressionUUID->"e86efd00-6823-4cd9-9daf-a89335a65f3e"],
+Cell[1795869, 36429, 492, 12, 24, "Print",ExpressionUUID->"c8555bd9-4bcb-4cff-9067-1d158370696e"],
+Cell[1796364, 36443, 232, 5, 24, "Print",ExpressionUUID->"2ff04487-325a-4813-864b-0a881fc6d69e"],
+Cell[1796599, 36450, 429, 10, 24, "Print",ExpressionUUID->"062f6f1e-ea19-451e-90bd-4a60a3d17abf"],
+Cell[1797031, 36462, 478, 11, 24, "Print",ExpressionUUID->"b370f17d-a61b-41c1-baf2-aae267a96506"],
+Cell[1797512, 36475, 478, 11, 24, "Print",ExpressionUUID->"44455adc-9860-4adc-bf43-c0802a41d8c0"],
+Cell[1797993, 36488, 480, 11, 24, "Print",ExpressionUUID->"4e379aec-32bc-49d2-8e78-b8b97b40991c"],
+Cell[1798476, 36501, 478, 11, 24, "Print",ExpressionUUID->"e4de9e92-d325-4aa2-9ee1-30abab4b31b7"],
+Cell[1798957, 36514, 232, 5, 24, "Print",ExpressionUUID->"baa47514-8f48-4385-ba7e-f0d1f32d15ce"],
+Cell[1799192, 36521, 427, 10, 24, "Print",ExpressionUUID->"97a4f371-d445-44d5-8099-3bc8f8da4051"],
+Cell[1799622, 36533, 410, 10, 24, "Print",ExpressionUUID->"6605c97c-6971-414b-9a6e-3e00d855a020"],
+Cell[1800035, 36545, 569, 13, 24, "Print",ExpressionUUID->"57924dd8-adab-41e2-b09b-0f4893d6c7a8"],
+Cell[1800607, 36560, 18683, 395, 296, "Print",ExpressionUUID->"abfd3b28-08fb-4ab2-b36b-1643831733fb"]
+}, Open  ]],
+Cell[1819305, 36958, 203, 3, 34, "Output",ExpressionUUID->"450770ee-1fbc-44c1-9c95-2cefa29d85a9"],
+Cell[CellGroupData[{
+Cell[1819533, 36965, 231, 5, 24, "Print",ExpressionUUID->"c2d54618-f2ab-488c-a248-dedc0fcfba78"],
+Cell[1819767, 36972, 449, 10, 24, "Print",ExpressionUUID->"0a69aef8-78a8-4cf8-b66d-a37014e7be9d"],
+Cell[1820219, 36984, 478, 11, 24, "Print",ExpressionUUID->"9a16ae74-376e-4d33-9575-b8580e1dda90"],
+Cell[1820700, 36997, 412, 10, 24, "Print",ExpressionUUID->"8e0c3466-f808-4bca-b876-18a2b1476dd5"],
+Cell[1821115, 37009, 350, 7, 63, "Print",ExpressionUUID->"35ee2603-e9bb-4b7e-a519-e78710c52746"],
+Cell[1821468, 37018, 250, 5, 24, "Print",ExpressionUUID->"2ee79172-4eea-4f37-b17b-c22e5621d3bb"],
+Cell[1821721, 37025, 236, 5, 44, "Print",ExpressionUUID->"611d5430-681d-49d4-b788-84164592a054"]
+}, Open  ]]
+}, Open  ]],
+Cell[1821984, 37034, 1591, 45, 178, "Input",ExpressionUUID->"e57cdab3-afd9-427f-89f7-863e6dfd567d"],
+Cell[CellGroupData[{
+Cell[1823600, 37083, 1447, 39, 157, "Input",ExpressionUUID->"25cf9944-5be2-40ab-999c-e1a6d72c9b57"],
+Cell[CellGroupData[{
+Cell[1825072, 37126, 181, 4, 24, "Print",ExpressionUUID->"f2cd56db-9151-48dc-a86e-a305e8a23ac8"],
+Cell[1825256, 37132, 623, 15, 24, "Print",ExpressionUUID->"97366807-d64a-4614-a114-c78895336738"],
+Cell[1825882, 37149, 204, 4, 24, "Print",ExpressionUUID->"591c4cb2-c53e-4379-b00f-15b18c85f807"],
+Cell[1826089, 37155, 423, 10, 24, "Print",ExpressionUUID->"5ac74ad6-1dcc-4352-9c5b-20885c358649"],
+Cell[1826515, 37167, 180, 4, 24, "Print",ExpressionUUID->"058cb2f3-6cb5-4bc1-b0ac-3ecaa2465aef"],
+Cell[1826698, 37173, 619, 15, 24, "Print",ExpressionUUID->"18d6278c-bfd9-4a02-853c-aea62833816a"],
+Cell[1827320, 37190, 616, 15, 24, "Print",ExpressionUUID->"322604d9-27bf-4686-837f-2e0ee3a20bc7"],
+Cell[1827939, 37207, 181, 4, 24, "Print",ExpressionUUID->"444bbc44-83b9-4831-a0f3-7a477ec669d5"],
+Cell[1828123, 37213, 820, 23, 24, "Print",ExpressionUUID->"0c1ace26-0d15-4f70-8b7e-791b9f20a92d"],
+Cell[1828946, 37238, 181, 4, 24, "Print",ExpressionUUID->"b6554e42-f28d-4abd-9e59-35185c0b9ab4"],
+Cell[1829130, 37244, 493, 11, 24, "Print",ExpressionUUID->"52b22c0d-1be7-45e1-b26f-62f56c686ad5"],
+Cell[1829626, 37257, 203, 4, 24, "Print",ExpressionUUID->"ae0fac83-3d76-4603-870c-b303847faecf"],
+Cell[1829832, 37263, 348, 9, 24, "Print",ExpressionUUID->"515c0d38-9447-4913-81fa-858854a1a8ad"],
+Cell[1830183, 37274, 380, 9, 24, "Print",ExpressionUUID->"ade41026-c5c4-4a87-a9d5-f1626f0db59b"],
+Cell[1830566, 37285, 376, 9, 24, "Print",ExpressionUUID->"1919b7af-dc1f-4958-b112-78516e8bb11d"],
+Cell[1830945, 37296, 420, 10, 24, "Print",ExpressionUUID->"56d8aaeb-9e82-4924-9b7f-f1007e7a6c7f"],
+Cell[1831368, 37308, 181, 4, 24, "Print",ExpressionUUID->"218173f8-e193-4643-bda7-22c3083dfd5d"],
+Cell[1831552, 37314, 441, 11, 24, "Print",ExpressionUUID->"ebc16c22-4a15-418d-9994-36b4211d3203"],
+Cell[1831996, 37327, 181, 4, 24, "Print",ExpressionUUID->"a99734f3-02af-46cd-8ecc-2d966df3a023"],
+Cell[1832180, 37333, 380, 9, 24, "Print",ExpressionUUID->"b0191d8f-94e2-456f-a6e0-8db9f1df6e93"],
+Cell[1832563, 37344, 427, 10, 24, "Print",ExpressionUUID->"b684a907-4f41-4c15-a472-b20c034f079d"],
+Cell[1832993, 37356, 427, 10, 24, "Print",ExpressionUUID->"406616fe-23e8-4694-bf2e-20f1f1b67dbc"],
+Cell[1833423, 37368, 429, 10, 24, "Print",ExpressionUUID->"d8cef9f3-3f74-42d8-811a-bce0f43cc9e3"],
+Cell[1833855, 37380, 429, 10, 24, "Print",ExpressionUUID->"521d1396-1d63-4409-9f36-5ac0d3e55cb8"],
+Cell[1834287, 37392, 427, 10, 24, "Print",ExpressionUUID->"3e5ad14a-0e0d-484f-a305-2fd4096b9b65"],
+Cell[1834717, 37404, 429, 10, 24, "Print",ExpressionUUID->"25104315-57c2-41f9-a314-a74813661958"],
+Cell[1835149, 37416, 427, 10, 24, "Print",ExpressionUUID->"368fc5f5-f94b-4e7d-9101-a74064024813"],
+Cell[1835579, 37428, 427, 10, 24, "Print",ExpressionUUID->"0e31a2e1-23f1-49b2-a288-8b5329eec172"],
+Cell[1836009, 37440, 427, 10, 24, "Print",ExpressionUUID->"21aa083d-9546-402b-af2c-d4b21724e2e0"],
+Cell[1836439, 37452, 429, 10, 24, "Print",ExpressionUUID->"2c68120c-9a00-402f-a9fc-f12eb5ecfcd5"],
+Cell[1836871, 37464, 431, 10, 24, "Print",ExpressionUUID->"c973d02d-6dae-41b9-b0b9-074885ba0203"],
+Cell[1837305, 37476, 429, 10, 24, "Print",ExpressionUUID->"b9cc82c2-c3a0-431c-9b12-55a74a2fd48d"],
+Cell[1837737, 37488, 429, 10, 24, "Print",ExpressionUUID->"ad1a85cd-ece0-4b7e-b4e4-4008725176c1"],
+Cell[1838169, 37500, 428, 10, 24, "Print",ExpressionUUID->"f0b9c82a-174d-4ab4-9c52-2b68fa304f92"],
+Cell[1838600, 37512, 429, 10, 24, "Print",ExpressionUUID->"e18e5077-47a7-4f5c-8a26-d7dc4748f769"],
+Cell[1839032, 37524, 429, 10, 24, "Print",ExpressionUUID->"b67cdebb-2aa1-4b69-b4e6-edfcc425accb"],
+Cell[1839464, 37536, 431, 10, 24, "Print",ExpressionUUID->"85a8efca-f6b4-43ea-9018-d1eda30136cd"],
+Cell[1839898, 37548, 429, 10, 24, "Print",ExpressionUUID->"51e6d271-ea79-4e14-9388-5d433aa4ea91"],
+Cell[1840330, 37560, 429, 10, 24, "Print",ExpressionUUID->"599d632e-30f4-4141-b230-cbbc57d098f6"],
+Cell[1840762, 37572, 429, 10, 24, "Print",ExpressionUUID->"efd668bc-7019-44b6-929d-cb0275ea466b"],
+Cell[1841194, 37584, 429, 10, 24, "Print",ExpressionUUID->"57935798-9fc4-4d1b-8f4b-51e3b78d497b"],
+Cell[1841626, 37596, 429, 10, 24, "Print",ExpressionUUID->"dca33d91-02ee-4ea3-8cfe-dd8d7ee51ac7"],
+Cell[1842058, 37608, 428, 10, 24, "Print",ExpressionUUID->"fb00eab7-4540-432c-bf2b-aabd8d52e80c"],
+Cell[1842489, 37620, 429, 10, 24, "Print",ExpressionUUID->"cb8cb0d0-43ad-4a8b-9a92-3917da9ea54f"],
+Cell[1842921, 37632, 181, 4, 24, "Print",ExpressionUUID->"2a91fd5c-e55f-4c43-a3b8-465708e93b22"],
+Cell[1843105, 37638, 378, 9, 24, "Print",ExpressionUUID->"560f3c5e-5408-4bbe-9b17-97e16eaa19ca"],
+Cell[1843486, 37649, 359, 9, 24, "Print",ExpressionUUID->"f4458dab-a0e9-44a7-a3c1-2ed4232044e1"],
+Cell[1843848, 37660, 530, 13, 24, "Print",ExpressionUUID->"b3135132-833f-4e4c-9589-e9c3503078f0"],
+Cell[1844381, 37675, 530, 13, 24, "Print",ExpressionUUID->"4f78b7ae-5549-42fc-9314-36c2c698fa96"],
+Cell[1844914, 37690, 530, 13, 24, "Print",ExpressionUUID->"71f57b0a-511e-41a4-ae1e-8b4f43f11a60"],
+Cell[1845447, 37705, 89100, 1767, 296, "Print",ExpressionUUID->"fb392009-4d65-47bd-85eb-5629d05d45e3"]
+}, Open  ]],
+Cell[1934562, 39475, 154, 2, 34, "Output",ExpressionUUID->"9cc9531b-8eb7-4ab5-818b-9de5d93d28ed"],
+Cell[CellGroupData[{
+Cell[1934741, 39481, 181, 4, 24, "Print",ExpressionUUID->"16617bf1-e485-4970-88b3-06adc5190045"],
+Cell[1934925, 39487, 398, 9, 24, "Print",ExpressionUUID->"394af361-158b-41d5-8cd7-253e4ec5f5e3"],
+Cell[1935326, 39498, 427, 10, 24, "Print",ExpressionUUID->"d486de6c-574d-4a9c-a677-357f07b8f393"],
+Cell[1935756, 39510, 427, 10, 24, "Print",ExpressionUUID->"bc32190a-6d1c-4aa4-b572-8d25596cf0e8"],
+Cell[1936186, 39522, 426, 10, 24, "Print",ExpressionUUID->"11dd4fac-4a90-4b87-acef-17bdc660ca09"],
+Cell[1936615, 39534, 361, 9, 24, "Print",ExpressionUUID->"6bcd2aae-e83c-4de2-b882-bcc1277d3ab4"],
+Cell[1936979, 39545, 302, 6, 63, "Print",ExpressionUUID->"519e3348-ebb1-4930-b680-2df877dc8d2b"],
+Cell[1937284, 39553, 197, 4, 24, "Print",ExpressionUUID->"c08d212b-cfe1-49af-ad05-d1c765cfd252"],
+Cell[1937484, 39559, 188, 4, 44, "Print",ExpressionUUID->"8bbcd19c-afb7-45e9-8ae8-52caa8b873eb"]
+}, Open  ]]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[1937721, 39569, 2114, 54, 283, "Input",ExpressionUUID->"00b2ebfa-faf2-401d-8f84-2e8996fb70f1"],
+Cell[CellGroupData[{
+Cell[1939860, 39627, 290, 5, 24, "Print",ExpressionUUID->"482b7b69-f6b4-45f1-9a2c-0ab150cda602"],
+Cell[1940153, 39634, 279, 5, 24, "Print",ExpressionUUID->"0c57c097-c2e6-40bd-9ede-f2c4dc3c9965"],
+Cell[1940435, 39641, 721, 16, 24, "Print",ExpressionUUID->"7b632676-1202-4f79-a69d-8d737bde6c17"],
+Cell[1941159, 39659, 302, 5, 24, "Print",ExpressionUUID->"efc9d648-68f3-4c34-96f0-b963370877bd"],
+Cell[1941464, 39666, 524, 11, 24, "Print",ExpressionUUID->"465fc068-514c-4e6f-8a5c-4d5fed7eff58"],
+Cell[1941991, 39679, 279, 5, 24, "Print",ExpressionUUID->"15604b7f-08c1-4262-927e-197c4eb46a1c"],
+Cell[1942273, 39686, 719, 16, 24, "Print",ExpressionUUID->"92ab9642-e7a8-40b2-a260-4fb5048c8e9f"],
+Cell[1942995, 39704, 715, 16, 24, "Print",ExpressionUUID->"6c7d441d-fe7c-4fc0-9501-ad4b5c30c80d"],
+Cell[1943713, 39722, 279, 5, 24, "Print",ExpressionUUID->"37f80417-15b7-48cf-8bf2-cf4f12f655ee"],
+Cell[1943995, 39729, 918, 24, 24, "Print",ExpressionUUID->"86eb6596-d624-463b-8591-7765cce1e4c8"],
+Cell[1944916, 39755, 279, 5, 24, "Print",ExpressionUUID->"20329460-4c5a-4694-95bf-5fce24890b13"],
+Cell[1945198, 39762, 593, 12, 24, "Print",ExpressionUUID->"45504770-301f-4888-a0e5-648d6f27e060"],
+Cell[1945794, 39776, 303, 5, 24, "Print",ExpressionUUID->"6f91bd5e-4a6b-4381-a2ae-1f4dc802e7c5"],
+Cell[1946100, 39783, 448, 10, 24, "Print",ExpressionUUID->"74c3926f-183a-4796-9f57-f03092638243"],
+Cell[1946551, 39795, 480, 10, 24, "Print",ExpressionUUID->"fc1dd8ec-c4f8-4f22-98fc-f8943764731a"],
+Cell[1947034, 39807, 474, 10, 24, "Print",ExpressionUUID->"e8020980-812a-45ef-99b7-7d58bed40356"],
+Cell[1947511, 39819, 518, 11, 24, "Print",ExpressionUUID->"4233b12a-ff83-4b7d-993d-36f01140b6c8"],
+Cell[1948032, 39832, 279, 5, 24, "Print",ExpressionUUID->"47869948-ecd1-4af9-b875-01df3bf192d7"],
+Cell[1948314, 39839, 539, 12, 24, "Print",ExpressionUUID->"1ac59348-d86e-46cf-81f6-7f07deec8e69"],
+Cell[1948856, 39853, 281, 5, 24, "Print",ExpressionUUID->"be4046f4-afc7-46ab-9b4c-a12a208d214d"],
+Cell[1949140, 39860, 476, 10, 24, "Print",ExpressionUUID->"590ed1f5-2d5e-4d52-aa2a-521524e47125"],
+Cell[1949619, 39872, 525, 11, 24, "Print",ExpressionUUID->"b00f9b05-f586-43f6-a3ac-47ee5596a4a4"],
+Cell[1950147, 39885, 525, 11, 24, "Print",ExpressionUUID->"4c16b8a2-7923-47bc-bf55-a401337b086e"],
+Cell[1950675, 39898, 527, 11, 24, "Print",ExpressionUUID->"9a4d1373-6745-46e2-bedf-084ceeeb3992"],
+Cell[1951205, 39911, 527, 11, 24, "Print",ExpressionUUID->"86eed2fa-2419-4af5-950e-468c5fc8760b"],
+Cell[1951735, 39924, 525, 11, 24, "Print",ExpressionUUID->"a2282fbf-8887-4e98-9477-9d5f6d1b2b9b"],
+Cell[1952263, 39937, 527, 11, 24, "Print",ExpressionUUID->"f91c9250-7da2-47b4-b52f-a65e91fecc0d"],
+Cell[1952793, 39950, 525, 11, 24, "Print",ExpressionUUID->"3fd83e52-022c-4dbd-84be-a23f1b8c12e9"],
+Cell[1953321, 39963, 525, 11, 24, "Print",ExpressionUUID->"ed764292-1653-4656-a2ea-b82e47346fda"],
+Cell[1953849, 39976, 527, 11, 24, "Print",ExpressionUUID->"d5b36eaf-2487-4de7-82f2-b741d9ff15c6"],
+Cell[1954379, 39989, 527, 11, 24, "Print",ExpressionUUID->"fa11260b-327f-4c3a-9b78-8fac30899110"],
+Cell[1954909, 40002, 527, 11, 24, "Print",ExpressionUUID->"cf4549a7-9aec-4ae6-b884-a3b47e57e099"],
+Cell[1955439, 40015, 527, 11, 24, "Print",ExpressionUUID->"a0755672-a28d-4254-9cac-c3e536d5488a"],
+Cell[1955969, 40028, 529, 11, 24, "Print",ExpressionUUID->"3d0c39fc-4140-4797-b15f-2a88b053444b"],
+Cell[1956501, 40041, 526, 11, 24, "Print",ExpressionUUID->"52f23fe7-2ec8-44d5-b8e2-6d9fefdbcf5f"],
+Cell[1957030, 40054, 525, 11, 24, "Print",ExpressionUUID->"f84fac8b-9b5b-42cd-991e-5c15019c3cd9"],
+Cell[1957558, 40067, 527, 11, 24, "Print",ExpressionUUID->"44871153-0c3e-4261-b73e-52b51d05fc29"],
+Cell[1958088, 40080, 527, 11, 24, "Print",ExpressionUUID->"fe1e6cc7-5408-44e7-8eeb-74c2eb17bd31"],
+Cell[1958618, 40093, 527, 11, 24, "Print",ExpressionUUID->"cd8ba6ab-b5cd-4451-aa7a-29b82c645660"],
+Cell[1959148, 40106, 526, 11, 24, "Print",ExpressionUUID->"86b6b92f-22a6-41ea-a987-474e9174f33c"],
+Cell[1959677, 40119, 527, 11, 24, "Print",ExpressionUUID->"442012e3-dd0e-4dd2-b282-d35c7ffd1a11"],
+Cell[1960207, 40132, 529, 11, 24, "Print",ExpressionUUID->"072923e0-44bc-4646-8b2b-8029d067181f"],
+Cell[1960739, 40145, 529, 11, 24, "Print",ExpressionUUID->"40d18e24-52a9-42ea-b976-6b2bac192ef3"],
+Cell[1961271, 40158, 527, 11, 24, "Print",ExpressionUUID->"f741ced5-cc41-4bba-87d3-6967a7ce4de3"],
+Cell[1961801, 40171, 527, 11, 24, "Print",ExpressionUUID->"4a12258b-acbc-40e4-85d5-b71956bf9f9f"],
+Cell[1962331, 40184, 529, 11, 24, "Print",ExpressionUUID->"26ee02c5-01be-4a5b-8e23-7b5740ecf00b"],
+Cell[1962863, 40197, 527, 11, 24, "Print",ExpressionUUID->"909aa5cc-4cf1-4134-a6db-623eceea8f95"],
+Cell[1963393, 40210, 527, 11, 24, "Print",ExpressionUUID->"ab74d7c3-3bca-48f9-bf90-91962ad793e3"],
+Cell[1963923, 40223, 527, 11, 24, "Print",ExpressionUUID->"2c6d20cb-61d0-477f-9eff-cd5b3c58115b"],
+Cell[1964453, 40236, 527, 11, 24, "Print",ExpressionUUID->"9e1d5d63-95ee-468c-a45a-47a173b62ea5"],
+Cell[1964983, 40249, 527, 11, 24, "Print",ExpressionUUID->"ea1b6e3c-1593-4687-9e7e-bca79b39d679"],
+Cell[1965513, 40262, 529, 11, 24, "Print",ExpressionUUID->"2a96830a-2747-4078-94d6-30d3e432c5ec"],
+Cell[1966045, 40275, 527, 11, 24, "Print",ExpressionUUID->"d8801fc7-5e71-4a0b-b0da-acd196653a94"],
+Cell[1966575, 40288, 527, 11, 24, "Print",ExpressionUUID->"49d5de5e-b904-4599-a241-7c89f29d1c18"],
+Cell[1967105, 40301, 527, 11, 24, "Print",ExpressionUUID->"c409cffb-eb72-4313-9ded-9e7646df22b8"],
+Cell[1967635, 40314, 527, 11, 24, "Print",ExpressionUUID->"a9c42256-77b6-4966-953f-996e7f4424fd"],
+Cell[1968165, 40327, 527, 11, 24, "Print",ExpressionUUID->"c971b94c-7055-46e8-8f42-92bf62b417a1"],
+Cell[1968695, 40340, 527, 11, 24, "Print",ExpressionUUID->"fde8093f-3013-4f73-a87e-3fee062234c5"],
+Cell[1969225, 40353, 527, 11, 24, "Print",ExpressionUUID->"0d001629-ce93-4b92-a44e-6adbc7bbc315"],
+Cell[1969755, 40366, 527, 11, 24, "Print",ExpressionUUID->"9de29004-3c47-42de-97d9-7e5021721326"],
+Cell[1970285, 40379, 526, 11, 24, "Print",ExpressionUUID->"9e2c960c-02fe-4d54-9bf0-10ade211cdc6"],
+Cell[1970814, 40392, 527, 11, 24, "Print",ExpressionUUID->"f4d5c5bd-c09b-404f-83f1-6121f361aa55"],
+Cell[1971344, 40405, 527, 11, 24, "Print",ExpressionUUID->"c2b1216d-3ba1-4577-b3dd-8eb87edd64b9"],
+Cell[1971874, 40418, 527, 11, 24, "Print",ExpressionUUID->"ddae031d-a3a3-4573-a96f-d2a32183f65b"],
+Cell[1972404, 40431, 529, 11, 24, "Print",ExpressionUUID->"83080bc6-77f6-41f9-a6f7-5d45b0a3f5ee"],
+Cell[1972936, 40444, 527, 11, 24, "Print",ExpressionUUID->"5940abce-ac3d-439e-a874-8677dc5b62f9"],
+Cell[1973466, 40457, 529, 11, 24, "Print",ExpressionUUID->"a2a7e806-c823-4891-89c9-0514dcb2ba9f"],
+Cell[1973998, 40470, 527, 11, 24, "Print",ExpressionUUID->"eeda71c5-85db-4b6f-b072-1530f5f1b204"],
+Cell[1974528, 40483, 527, 11, 24, "Print",ExpressionUUID->"e6bbf982-d710-4652-a41f-fe78241c97ff"],
+Cell[1975058, 40496, 529, 11, 24, "Print",ExpressionUUID->"c2a7cf39-1dde-4342-bfba-3560297d5bf6"],
+Cell[1975590, 40509, 527, 11, 24, "Print",ExpressionUUID->"4a20e63b-cbef-4cce-83e8-c2c3f33bc1fd"],
+Cell[1976120, 40522, 529, 11, 24, "Print",ExpressionUUID->"c28ef418-a99d-4b61-8bda-90e9cd0dbc5d"],
+Cell[1976652, 40535, 529, 11, 24, "Print",ExpressionUUID->"bfd191bf-55aa-4710-bfe9-d73cb6383e16"],
+Cell[1977184, 40548, 527, 11, 24, "Print",ExpressionUUID->"808f6012-a961-4e65-bd29-7a53e0ee4e62"],
+Cell[1977714, 40561, 527, 11, 24, "Print",ExpressionUUID->"e1e4a029-d8bb-42f1-8e4d-877284e9ddf5"],
+Cell[1978244, 40574, 527, 11, 24, "Print",ExpressionUUID->"2f798775-721b-43c9-835a-b5ca45d457ac"],
+Cell[1978774, 40587, 529, 11, 24, "Print",ExpressionUUID->"80804efd-1ff8-442a-9e90-4a1205f6bd84"],
+Cell[1979306, 40600, 527, 11, 24, "Print",ExpressionUUID->"fc10ef62-f7de-4da3-b483-c1d974b88f2b"],
+Cell[1979836, 40613, 527, 11, 24, "Print",ExpressionUUID->"b5069cbe-8912-484a-beff-19781e878655"],
+Cell[1980366, 40626, 529, 11, 24, "Print",ExpressionUUID->"0966a11d-4882-4b30-8b31-023a0b8dddaf"],
+Cell[1980898, 40639, 529, 11, 24, "Print",ExpressionUUID->"8cd6cb1b-0482-4344-8799-19acc4683bb7"],
+Cell[1981430, 40652, 526, 11, 24, "Print",ExpressionUUID->"2549f2b3-f306-4cd4-a6f8-81daf0343e2a"],
+Cell[1981959, 40665, 527, 11, 24, "Print",ExpressionUUID->"e992dbcc-c3eb-496c-9aac-5a1569a2a1ea"],
+Cell[1982489, 40678, 529, 11, 24, "Print",ExpressionUUID->"096a688f-5ef8-479f-82e9-f640aa79a4aa"],
+Cell[1983021, 40691, 527, 11, 24, "Print",ExpressionUUID->"22ac10c8-525d-4e43-8c86-670c84529870"],
+Cell[1983551, 40704, 529, 11, 24, "Print",ExpressionUUID->"a0290ced-13d0-4a1e-a400-7e3373d885a6"],
+Cell[1984083, 40717, 527, 11, 24, "Print",ExpressionUUID->"bcfae30e-7bcd-4dd3-8dc6-32b6a9fbba88"],
+Cell[1984613, 40730, 527, 11, 24, "Print",ExpressionUUID->"e0c9f492-f3f4-473f-b226-e2f4e1da03be"],
+Cell[1985143, 40743, 527, 11, 24, "Print",ExpressionUUID->"4a28e937-cbb7-4ff2-8b85-030bc207001b"],
+Cell[1985673, 40756, 527, 11, 24, "Print",ExpressionUUID->"d43e20fa-75e4-44dc-bf1a-9a3930b2102f"],
+Cell[1986203, 40769, 529, 11, 24, "Print",ExpressionUUID->"f3470329-cbfe-4aab-9a92-7fe3182802d3"],
+Cell[1986735, 40782, 527, 11, 24, "Print",ExpressionUUID->"33e6d154-8864-4961-84af-7b088d0c1d6d"],
+Cell[1987265, 40795, 529, 11, 24, "Print",ExpressionUUID->"0a1cc530-3504-4e6c-8ca2-108d9e0929dc"],
+Cell[1987797, 40808, 529, 11, 24, "Print",ExpressionUUID->"8859e214-8f28-458a-86f7-9845a83b59c6"],
+Cell[1988329, 40821, 527, 11, 24, "Print",ExpressionUUID->"3494269d-7ca8-4840-94b7-7df30938c5c5"],
+Cell[1988859, 40834, 527, 11, 24, "Print",ExpressionUUID->"64304681-dd46-4470-b392-15116814eed3"],
+Cell[1989389, 40847, 527, 11, 24, "Print",ExpressionUUID->"b8bb4c71-bd91-47e1-85e7-7cc74ae339ea"],
+Cell[1989919, 40860, 527, 11, 24, "Print",ExpressionUUID->"a9fc632b-ac2e-4d12-845f-6ba9bb0fb88a"],
+Cell[1990449, 40873, 527, 11, 24, "Print",ExpressionUUID->"14e5e342-04db-42f9-9dcd-e54b27381556"],
+Cell[1990979, 40886, 527, 11, 24, "Print",ExpressionUUID->"68cbb07b-ff1b-41d2-9408-97a139ca04b4"],
+Cell[1991509, 40899, 527, 11, 24, "Print",ExpressionUUID->"ade50005-dc22-4549-8c48-ca1c2f4f6179"],
+Cell[1992039, 40912, 527, 11, 24, "Print",ExpressionUUID->"f19201e5-fa6c-4df3-8177-4f4d85a0deb0"],
+Cell[1992569, 40925, 526, 11, 24, "Print",ExpressionUUID->"376cdf29-de05-4896-8cd1-d653f4329951"],
+Cell[1993098, 40938, 527, 11, 24, "Print",ExpressionUUID->"5d1726ba-e7c8-4ea5-8383-70a46e2dca56"],
+Cell[1993628, 40951, 527, 11, 24, "Print",ExpressionUUID->"6289e36d-04de-4e90-8bc7-fea404ee7ae6"],
+Cell[1994158, 40964, 527, 11, 24, "Print",ExpressionUUID->"1596e7c3-f4a0-4f54-b46b-5c85de8d227b"],
+Cell[1994688, 40977, 527, 11, 24, "Print",ExpressionUUID->"aa60764a-022f-4534-b590-7985930ab71d"],
+Cell[1995218, 40990, 527, 11, 24, "Print",ExpressionUUID->"a63d9a20-9fcd-42aa-8251-229ed14fcf0b"],
+Cell[1995748, 41003, 527, 11, 24, "Print",ExpressionUUID->"d5e47eff-33fd-4ab0-a3ec-3f56a6fef96b"],
+Cell[1996278, 41016, 529, 11, 24, "Print",ExpressionUUID->"237304f0-3673-4c2d-afe8-3d7a7ebe249b"],
+Cell[1996810, 41029, 527, 11, 24, "Print",ExpressionUUID->"c829a173-07f8-4df8-8e1f-eb918a3bc6b1"],
+Cell[1997340, 41042, 527, 11, 24, "Print",ExpressionUUID->"e4453bd4-d618-4b7a-b024-d657ef4957f5"],
+Cell[1997870, 41055, 527, 11, 24, "Print",ExpressionUUID->"933e4c6a-54c2-4415-a419-34b52bcef5e4"],
+Cell[1998400, 41068, 527, 11, 24, "Print",ExpressionUUID->"3754f430-9482-4b0e-8e5a-78228e95e7b7"],
+Cell[1998930, 41081, 527, 11, 24, "Print",ExpressionUUID->"e5e28447-4da0-428d-adeb-3d0f178dc854"],
+Cell[1999460, 41094, 526, 11, 24, "Print",ExpressionUUID->"9e930076-0112-457d-9050-59d77b2c3f51"],
+Cell[1999989, 41107, 527, 11, 24, "Print",ExpressionUUID->"83743332-28b4-4f4e-9a55-e7411e838cac"],
+Cell[2000519, 41120, 529, 11, 24, "Print",ExpressionUUID->"5a867892-be28-4a5c-913a-cd64118dc1aa"],
+Cell[2001051, 41133, 527, 11, 24, "Print",ExpressionUUID->"29b71846-a025-4f89-ac63-d818a7f3b614"],
+Cell[2001581, 41146, 529, 11, 24, "Print",ExpressionUUID->"2bd90177-8624-44ca-892b-190c3a5e0d65"],
+Cell[2002113, 41159, 529, 11, 24, "Print",ExpressionUUID->"989dc8a4-be6f-4994-baba-bfd5217241d3"],
+Cell[2002645, 41172, 531, 11, 24, "Print",ExpressionUUID->"1c9dc131-7797-4b61-86ac-5a0c1a0a4d7e"],
+Cell[2003179, 41185, 529, 11, 24, "Print",ExpressionUUID->"1d94d72f-145b-438f-8c3f-eff4ed502617"],
+Cell[2003711, 41198, 529, 11, 24, "Print",ExpressionUUID->"5d87cb98-4c45-4ac9-8d66-d3bacef1ff18"],
+Cell[2004243, 41211, 529, 11, 24, "Print",ExpressionUUID->"9a5bfff7-85c1-4ea1-ac44-b7fe9bc3fabd"],
+Cell[2004775, 41224, 529, 11, 24, "Print",ExpressionUUID->"5465c028-f2a0-4734-a77c-141afa5f82a0"],
+Cell[2005307, 41237, 529, 11, 24, "Print",ExpressionUUID->"c3ca4913-3ce5-4844-9e77-ce5def9e7fbc"],
+Cell[2005839, 41250, 529, 11, 24, "Print",ExpressionUUID->"ae7ec018-75eb-4d88-8e45-5e2518b17411"],
+Cell[2006371, 41263, 529, 11, 24, "Print",ExpressionUUID->"cd4cfb19-6da6-4b99-a609-cb200d0a907d"],
+Cell[2006903, 41276, 529, 11, 24, "Print",ExpressionUUID->"8751b8fd-1b76-40cd-a0f1-a95a97697501"],
+Cell[2007435, 41289, 529, 11, 24, "Print",ExpressionUUID->"1e8c121e-fe1b-4f53-a047-bd73813541da"],
+Cell[2007967, 41302, 528, 11, 24, "Print",ExpressionUUID->"e66c3f4d-4baf-43ee-ad7d-f1cdb877d6d2"],
+Cell[2008498, 41315, 529, 11, 24, "Print",ExpressionUUID->"307c1338-c863-48ee-ba46-8040507dbaf1"],
+Cell[2009030, 41328, 529, 11, 24, "Print",ExpressionUUID->"8428cf6f-dc5d-4ec1-bda1-2e9ec4425dc7"],
+Cell[2009562, 41341, 529, 11, 24, "Print",ExpressionUUID->"586bdfd8-dbe8-4cd4-ad63-16d68f420351"],
+Cell[2010094, 41354, 529, 11, 24, "Print",ExpressionUUID->"1ce4b55a-4462-4f08-beec-bfc80aeafc16"],
+Cell[2010626, 41367, 529, 11, 24, "Print",ExpressionUUID->"fbf84094-2be0-4b4e-b2a7-1f47a58f31a4"],
+Cell[2011158, 41380, 529, 11, 24, "Print",ExpressionUUID->"c7c1d120-76e4-4976-bf75-6d286d33f0af"],
+Cell[2011690, 41393, 529, 11, 24, "Print",ExpressionUUID->"40f00b9a-f076-4a98-b7fb-d2699bfe1e97"],
+Cell[2012222, 41406, 529, 11, 24, "Print",ExpressionUUID->"9aea03ae-78fb-46a4-959c-a632ddd3daaa"],
+Cell[2012754, 41419, 529, 11, 24, "Print",ExpressionUUID->"76d91400-d6dc-462b-b084-79572499fab2"],
+Cell[2013286, 41432, 529, 11, 24, "Print",ExpressionUUID->"97422370-545d-42ab-bc13-4ee2d682e759"],
+Cell[2013818, 41445, 529, 11, 24, "Print",ExpressionUUID->"b21763c2-bbe3-46ab-8865-385f591d934d"],
+Cell[2014350, 41458, 529, 11, 24, "Print",ExpressionUUID->"23d43de6-7477-4fc9-a2c8-82a3b7649e4c"],
+Cell[2014882, 41471, 529, 11, 24, "Print",ExpressionUUID->"996eb42f-d851-402a-836d-d4d08d0227e0"],
+Cell[2015414, 41484, 531, 11, 24, "Print",ExpressionUUID->"994f9d96-4be2-4fd5-956b-db163a49ff23"],
+Cell[2015948, 41497, 531, 11, 24, "Print",ExpressionUUID->"5f2069c4-cd84-4600-b781-1e0cf77be806"],
+Cell[2016482, 41510, 531, 11, 24, "Print",ExpressionUUID->"525bc282-fd37-467e-8572-423278fbcdd4"],
+Cell[2017016, 41523, 529, 11, 24, "Print",ExpressionUUID->"8dbd8c81-2f54-4c1e-86e3-4068bebc0392"],
+Cell[2017548, 41536, 529, 11, 24, "Print",ExpressionUUID->"de29cfe5-bd1d-4218-8f3c-2ad061965406"],
+Cell[2018080, 41549, 529, 11, 24, "Print",ExpressionUUID->"d7bd272b-523a-4d0d-bdb9-13a8ab9c0035"],
+Cell[2018612, 41562, 529, 11, 24, "Print",ExpressionUUID->"8b339b22-b856-40eb-bfaf-5abe17906184"],
+Cell[2019144, 41575, 528, 11, 24, "Print",ExpressionUUID->"c1418234-3828-4e6b-a7e3-10dc4d4fd069"],
+Cell[2019675, 41588, 531, 11, 24, "Print",ExpressionUUID->"19079ee2-5f3c-44db-ab1c-2276bd747d64"],
+Cell[2020209, 41601, 529, 11, 24, "Print",ExpressionUUID->"184b99b6-3396-4806-8cc1-a8c97c30271e"],
+Cell[2020741, 41614, 529, 11, 24, "Print",ExpressionUUID->"9abf7886-0435-4716-adae-2b40526a092b"],
+Cell[2021273, 41627, 531, 11, 24, "Print",ExpressionUUID->"4cdb8b07-6ea3-4251-aea9-de18730afe7d"],
+Cell[2021807, 41640, 529, 11, 24, "Print",ExpressionUUID->"362ddbbc-9592-4a4a-9415-8ae9c7f530ad"],
+Cell[2022339, 41653, 531, 11, 24, "Print",ExpressionUUID->"4b1a34ec-d25c-4125-9e16-fa0442261592"],
+Cell[2022873, 41666, 528, 11, 24, "Print",ExpressionUUID->"ae0838c5-1d04-4af1-8968-3e10ca495bbf"],
+Cell[2023404, 41679, 529, 11, 24, "Print",ExpressionUUID->"1d9d9f94-eb7d-40a4-8e3f-2f0185517645"],
+Cell[2023936, 41692, 531, 11, 24, "Print",ExpressionUUID->"98b19f6e-57f2-4b12-8e98-66a70b62cffe"],
+Cell[2024470, 41705, 531, 11, 24, "Print",ExpressionUUID->"f51fe13e-3dc0-4302-91af-6b45682d4dc1"],
+Cell[2025004, 41718, 529, 11, 24, "Print",ExpressionUUID->"b8da9f1f-ca1b-4c13-9da7-68d2d30d181c"],
+Cell[2025536, 41731, 531, 11, 24, "Print",ExpressionUUID->"d03f960d-a985-4724-b525-dd7047d7d869"],
+Cell[2026070, 41744, 529, 11, 24, "Print",ExpressionUUID->"5fae7711-eb05-48a7-8e45-39de243c9901"],
+Cell[2026602, 41757, 531, 11, 24, "Print",ExpressionUUID->"9058a6ec-2677-4390-b62a-f7f1aa0bb92a"],
+Cell[2027136, 41770, 529, 11, 24, "Print",ExpressionUUID->"b0d7f8aa-1f5d-4d67-9741-4fc437add9f7"],
+Cell[2027668, 41783, 531, 11, 24, "Print",ExpressionUUID->"e15ab415-af93-4c41-bc39-e22f0c3c38be"],
+Cell[2028202, 41796, 529, 11, 24, "Print",ExpressionUUID->"e7d661ab-9386-45ff-8a04-87e1c95ff8b4"],
+Cell[2028734, 41809, 529, 11, 24, "Print",ExpressionUUID->"9f9aa58f-3b1f-4808-b047-c967807c4e93"],
+Cell[2029266, 41822, 531, 11, 24, "Print",ExpressionUUID->"d959dcef-4e60-48c1-a7a6-aafa63b4148a"],
+Cell[2029800, 41835, 531, 11, 24, "Print",ExpressionUUID->"ac11dbe3-d591-4f32-ad94-f779d0c8400b"],
+Cell[2030334, 41848, 529, 11, 24, "Print",ExpressionUUID->"ce4a7715-19ce-46fb-b822-28d77a0fabf1"],
+Cell[2030866, 41861, 529, 11, 24, "Print",ExpressionUUID->"6bb08b23-3c72-4e5b-abc7-73003c3fc261"],
+Cell[2031398, 41874, 529, 11, 24, "Print",ExpressionUUID->"b20c75c7-1181-4a1b-b8ac-e72e92b50561"],
+Cell[2031930, 41887, 528, 11, 24, "Print",ExpressionUUID->"ebd998cf-24bb-4eb2-83c3-8ad397fb14cc"],
+Cell[2032461, 41900, 529, 11, 24, "Print",ExpressionUUID->"bc838b1a-6863-4410-bda0-39dc771ed636"],
+Cell[2032993, 41913, 528, 11, 24, "Print",ExpressionUUID->"d9e7c7db-572d-4067-861e-cbf3afe77521"],
+Cell[2033524, 41926, 529, 11, 24, "Print",ExpressionUUID->"ae8782cc-581e-4f76-a939-956fffe0ace6"],
+Cell[2034056, 41939, 529, 11, 24, "Print",ExpressionUUID->"4a0d7cc3-4eba-4f89-a344-fd6a32562e1b"],
+Cell[2034588, 41952, 531, 11, 24, "Print",ExpressionUUID->"35db92c4-0d44-4217-afab-d426be163229"],
+Cell[2035122, 41965, 531, 11, 24, "Print",ExpressionUUID->"2fdcf078-527a-4c0d-8e30-58706d244691"],
+Cell[2035656, 41978, 529, 11, 24, "Print",ExpressionUUID->"fc6a23a1-f2b2-47b5-987d-323a5a88fd8b"],
+Cell[2036188, 41991, 529, 11, 24, "Print",ExpressionUUID->"5776850a-a04a-49e6-ac40-400c4f896b2d"],
+Cell[2036720, 42004, 529, 11, 24, "Print",ExpressionUUID->"e96f9759-0bef-4290-bd3b-3503f0b0a411"],
+Cell[2037252, 42017, 529, 11, 24, "Print",ExpressionUUID->"5b70a5af-6e87-4b06-a20e-1410998f03dd"],
+Cell[2037784, 42030, 529, 11, 24, "Print",ExpressionUUID->"7d094c60-e2f8-44a0-af91-9cf9d4e2fe15"],
+Cell[2038316, 42043, 528, 11, 24, "Print",ExpressionUUID->"3bf08d18-0602-4a03-909c-894e3bf74dcf"],
+Cell[2038847, 42056, 529, 11, 24, "Print",ExpressionUUID->"ec417ae3-5f5e-4017-bd56-96061adde86f"],
+Cell[2039379, 42069, 529, 11, 24, "Print",ExpressionUUID->"02e9025d-b120-4019-95e1-46e1763691fa"],
+Cell[2039911, 42082, 531, 11, 24, "Print",ExpressionUUID->"b07ab67e-435a-4b6e-a82b-5f77a8e91d93"],
+Cell[2040445, 42095, 529, 11, 24, "Print",ExpressionUUID->"938cd681-f9d7-4a43-81f2-07913fa20f2a"],
+Cell[2040977, 42108, 529, 11, 24, "Print",ExpressionUUID->"39c6fb30-8d6a-4d8d-9994-6f42bae345f9"],
+Cell[2041509, 42121, 529, 11, 24, "Print",ExpressionUUID->"93ebc516-cebb-441b-98b8-8f4f1603bce9"],
+Cell[2042041, 42134, 529, 11, 24, "Print",ExpressionUUID->"0cdd4c37-697f-4767-ad55-4f92221a433a"],
+Cell[2042573, 42147, 529, 11, 24, "Print",ExpressionUUID->"c99942db-c4ba-48f0-95e7-30dd8f17f0cd"],
+Cell[2043105, 42160, 529, 11, 24, "Print",ExpressionUUID->"2335ac84-67b9-49a9-a017-09a8e0c4a6ae"],
+Cell[2043637, 42173, 529, 11, 24, "Print",ExpressionUUID->"0eeed8f2-195e-40f1-802b-caf21bd038e7"],
+Cell[2044169, 42186, 528, 11, 24, "Print",ExpressionUUID->"4d4b5c1c-d382-41d3-a5ac-52ae3f900f67"],
+Cell[2044700, 42199, 529, 11, 24, "Print",ExpressionUUID->"9a772258-6339-4d3a-8514-d40583d2778f"],
+Cell[2045232, 42212, 529, 11, 24, "Print",ExpressionUUID->"9eb11ee9-9ac4-4873-b466-da4df949403c"],
+Cell[2045764, 42225, 531, 11, 24, "Print",ExpressionUUID->"8f962adb-c1f8-419e-9021-a9d089c460ce"],
+Cell[2046298, 42238, 529, 11, 24, "Print",ExpressionUUID->"de26d80c-4225-45fb-8024-3ad5d34d3057"],
+Cell[2046830, 42251, 528, 11, 24, "Print",ExpressionUUID->"1bbac5d9-41b5-41e7-9808-b25a5a990907"],
+Cell[2047361, 42264, 531, 11, 24, "Print",ExpressionUUID->"0efcbad6-30b2-45be-bf8e-31907797baec"],
+Cell[2047895, 42277, 529, 11, 24, "Print",ExpressionUUID->"876194c4-d5d3-4a7e-8bd1-daf467109e1c"],
+Cell[2048427, 42290, 529, 11, 24, "Print",ExpressionUUID->"44f91fba-ff48-4310-a043-4f7922319abe"],
+Cell[2048959, 42303, 529, 11, 24, "Print",ExpressionUUID->"1aaf8a65-c5ef-4f96-ab50-7955b095de96"],
+Cell[2049491, 42316, 527, 11, 24, "Print",ExpressionUUID->"44adcac6-6fa2-4597-87be-3ffb65a19018"],
+Cell[2050021, 42329, 529, 11, 24, "Print",ExpressionUUID->"8fb3435b-6e9e-4561-b825-6e9f204aa4f7"],
+Cell[2050553, 42342, 529, 11, 24, "Print",ExpressionUUID->"78a848a3-9036-4d5e-a10c-a330d2a260c8"],
+Cell[2051085, 42355, 529, 11, 24, "Print",ExpressionUUID->"c8f2fbca-0008-4335-b6e6-c8697073261c"],
+Cell[2051617, 42368, 531, 11, 24, "Print",ExpressionUUID->"1dd6fc8d-3779-4636-802a-4189f9f826a1"],
+Cell[2052151, 42381, 529, 11, 24, "Print",ExpressionUUID->"388b48db-dd6b-4f2b-b280-7b5ee2a4632a"],
+Cell[2052683, 42394, 529, 11, 24, "Print",ExpressionUUID->"eab3aa0a-50a8-41ee-8336-7f644178464a"],
+Cell[2053215, 42407, 529, 11, 24, "Print",ExpressionUUID->"94f1163a-105e-471d-8089-7dc3b1dd1730"],
+Cell[2053747, 42420, 531, 11, 24, "Print",ExpressionUUID->"a47290ef-0229-4a79-9948-295c1804c33a"],
+Cell[2054281, 42433, 529, 11, 24, "Print",ExpressionUUID->"03f29486-c7a6-4203-9a7c-53159274b2b7"],
+Cell[2054813, 42446, 531, 11, 24, "Print",ExpressionUUID->"cbc2fb23-86f0-4eae-967b-646d27f0752f"],
+Cell[2055347, 42459, 529, 11, 24, "Print",ExpressionUUID->"02254409-5700-444c-96ee-cb7782f47981"],
+Cell[2055879, 42472, 531, 11, 24, "Print",ExpressionUUID->"9065b45d-d3e6-4550-9f25-f52c7ab5d2a1"],
+Cell[2056413, 42485, 528, 11, 24, "Print",ExpressionUUID->"cdc4b55a-8a55-4374-922f-4330437d08ae"],
+Cell[2056944, 42498, 531, 11, 24, "Print",ExpressionUUID->"d487652f-a859-4abc-afba-90fda9a6d284"],
+Cell[2057478, 42511, 529, 11, 24, "Print",ExpressionUUID->"e9a8016f-8abd-49e5-bd30-03487dac0600"],
+Cell[2058010, 42524, 531, 11, 24, "Print",ExpressionUUID->"f6627aa5-a63b-4689-a531-f9fd9f6ff3c1"],
+Cell[2058544, 42537, 528, 11, 24, "Print",ExpressionUUID->"82f0b7e8-37ef-41e4-96d9-dbaad94cf023"],
+Cell[2059075, 42550, 529, 11, 24, "Print",ExpressionUUID->"470836fa-a4ca-4f9b-bd23-4012d16256e0"],
+Cell[2059607, 42563, 531, 11, 24, "Print",ExpressionUUID->"7a3100cf-d9f4-4a9d-9228-68fb38a558fb"],
+Cell[2060141, 42576, 529, 11, 24, "Print",ExpressionUUID->"659b8e73-896e-4f34-bc5c-02830044a3d5"],
+Cell[2060673, 42589, 529, 11, 24, "Print",ExpressionUUID->"5e8da35f-7756-4964-a518-c013f255e3c4"],
+Cell[2061205, 42602, 529, 11, 24, "Print",ExpressionUUID->"46a50121-a9bf-4d85-bf5d-dc7b652d1144"],
+Cell[2061737, 42615, 529, 11, 24, "Print",ExpressionUUID->"0168d062-0bce-4e4b-9be3-0bceaac87900"],
+Cell[2062269, 42628, 529, 11, 24, "Print",ExpressionUUID->"67e103d4-033a-44ed-88f2-b30d4465084d"],
+Cell[2062801, 42641, 531, 11, 24, "Print",ExpressionUUID->"d896f028-eccb-4ef2-988b-6a7e9b0e3e27"],
+Cell[2063335, 42654, 529, 11, 24, "Print",ExpressionUUID->"dbee16e9-9956-4c34-b23a-8fa37f409128"],
+Cell[2063867, 42667, 531, 11, 24, "Print",ExpressionUUID->"e676c012-a4c6-4953-90bd-224568353817"],
+Cell[2064401, 42680, 529, 11, 24, "Print",ExpressionUUID->"dc5e52e2-92a9-45ec-8395-a9cf7f422b37"],
+Cell[2064933, 42693, 531, 11, 24, "Print",ExpressionUUID->"3ab2b64f-f0b7-4977-bf1d-7a0531297e92"],
+Cell[2065467, 42706, 529, 11, 24, "Print",ExpressionUUID->"7d1e18f1-81b5-4def-902f-f07f5c784261"],
+Cell[2065999, 42719, 529, 11, 24, "Print",ExpressionUUID->"4b5c0666-679b-45ab-8f9c-57ef999a253e"],
+Cell[2066531, 42732, 279, 5, 24, "Print",ExpressionUUID->"d4b21011-912e-41ab-8f93-a111da7aa8f6"],
+Cell[2066813, 42739, 474, 10, 24, "Print",ExpressionUUID->"16a9d063-9e47-4005-8b9a-4a83ec00a456"],
+Cell[2067290, 42751, 459, 10, 24, "Print",ExpressionUUID->"60607d17-8a34-4d71-8d39-5f6d6f4dc615"],
+Cell[2067752, 42763, 632, 14, 24, "Print",ExpressionUUID->"afa00712-e173-4895-a5f8-fa233ad4295b"],
+Cell[2068387, 42779, 632, 14, 24, "Print",ExpressionUUID->"37ce906d-2da6-487f-842b-f75452bcd614"],
+Cell[2069022, 42795, 632, 14, 24, "Print",ExpressionUUID->"af97715b-8780-4377-88e2-aec6617418f0"],
+Cell[2069657, 42811, 632, 14, 24, "Print",ExpressionUUID->"8957ac75-5a1e-4107-aa6f-de7b162718e5"],
+Cell[2070292, 42827, 636, 14, 24, "Print",ExpressionUUID->"74454467-d658-4fc9-aa06-a309b7b0df38"],
+Cell[2070931, 42843, 636, 14, 24, "Print",ExpressionUUID->"daf03625-85f6-44c4-a69b-3ca42a374fb1"],
+Cell[2071570, 42859, 636, 14, 24, "Print",ExpressionUUID->"504ce6be-8fdf-43e3-aede-6d18388e9714"],
+Cell[2072209, 42875, 636, 14, 24, "Print",ExpressionUUID->"a4d9beca-397c-4845-9373-6d4f19730fcc"],
+Cell[2072848, 42891, 636, 14, 24, "Print",ExpressionUUID->"bc085677-7c1a-48f4-9cd5-dac4e0259c00"],
+Cell[2073487, 42907, 638, 14, 24, "Print",ExpressionUUID->"4610ee3c-edec-4f45-a932-7994ef64cd37"],
+Cell[2074128, 42923, 638, 14, 24, "Print",ExpressionUUID->"54d75cf0-4e08-413c-be98-fdfd4703d4d9"],
+Cell[2074769, 42939, 638, 14, 24, "Print",ExpressionUUID->"3a41706a-380e-454e-a7f2-692e44ff77cc"],
+Cell[2075410, 42955, 637, 14, 24, "Print",ExpressionUUID->"1d2a71d1-aaa2-4ad1-9129-b78664e7eab1"],
+Cell[2076050, 42971, 637, 14, 24, "Print",ExpressionUUID->"074c3978-eaf7-434c-ba91-2c3141f81334"],
+Cell[2076690, 42987, 638, 14, 24, "Print",ExpressionUUID->"930c5b8f-719c-4dbf-958a-62d68fc46958"],
+Cell[2077331, 43003, 638, 14, 24, "Print",ExpressionUUID->"e4634487-cc5a-4ab4-a1c6-1721aee36cc1"],
+Cell[2077972, 43019, 638, 14, 24, "Print",ExpressionUUID->"530f44b3-f7af-4032-a329-45c7bc81f7e4"],
+Cell[2078613, 43035, 640, 14, 24, "Print",ExpressionUUID->"12f670a2-9c97-4115-b9b4-bd4acc18878c"],
+Cell[2079256, 43051, 637, 14, 24, "Print",ExpressionUUID->"7b783d4c-0b65-4266-a396-41f3281ec481"],
+Cell[2079896, 43067, 229727, 4270, 296, 187015, 3568, "CachedBoxData", "BoxData", "Print",ExpressionUUID->"4c5ec22e-95a1-49ef-b741-eeca0945f7d7"],
+Cell[2309626, 47339, 226896, 4275, 296, 183081, 3555, "CachedBoxData", "BoxData", "Print",ExpressionUUID->"037fbb3c-8ef3-40a2-bf6f-febd812ea256"],
+Cell[2536525, 51616, 245021, 4571, 296, 199380, 3821, "CachedBoxData", "BoxData", "Print",ExpressionUUID->"1c7a87a3-12b5-4e99-98f7-bb172de020c1"],
+Cell[2781549, 56189, 236899, 4438, 296, 191762, 3696, "CachedBoxData", "BoxData", "Print",ExpressionUUID->"44b86e37-6b82-4b3e-90a7-933c9b9fbe25"],
+Cell[3018451, 60629, 38642, 778, 296, "Print",ExpressionUUID->"0eb43952-0016-4696-bef9-7b319c25a78f"],
+Cell[3057096, 61409, 632, 14, 24, "Print",ExpressionUUID->"766fb175-9f43-40a7-a5e5-7ae88f42ca9e"],
+Cell[3057731, 61425, 632, 14, 24, "Print",ExpressionUUID->"ec0fb198-e97b-4d93-badd-f6f811bfb205"],
+Cell[3058366, 61441, 632, 14, 24, "Print",ExpressionUUID->"673a7784-fcd3-4fb3-92f8-09c499f0c71a"],
+Cell[3059001, 61457, 632, 14, 24, "Print",ExpressionUUID->"68382b7f-5248-4c77-9adb-5891b620572f"],
+Cell[3059636, 61473, 638, 14, 24, "Print",ExpressionUUID->"c39cb91c-e010-4491-8ab6-96f908294232"],
+Cell[3060277, 61489, 636, 14, 24, "Print",ExpressionUUID->"70c97ea7-6872-494c-9439-0c17e4ba8bee"],
+Cell[3060916, 61505, 636, 14, 24, "Print",ExpressionUUID->"d706ff73-2406-4c4a-9b0a-56c0010a9d52"],
+Cell[3061555, 61521, 636, 14, 24, "Print",ExpressionUUID->"ba57c76e-baf2-493d-9c2f-c4f85d55f7bc"],
+Cell[3062194, 61537, 635, 14, 24, "Print",ExpressionUUID->"01fed162-eccc-4fa8-a388-c381955985df"],
+Cell[3062832, 61553, 638, 14, 24, "Print",ExpressionUUID->"cdf96293-a47a-4694-9cf7-7c3eee562208"],
+Cell[3063473, 61569, 638, 14, 24, "Print",ExpressionUUID->"6e7bbe49-623f-4b6c-a034-a39d6aa7ba23"],
+Cell[3064114, 61585, 640, 14, 24, "Print",ExpressionUUID->"13429c38-2497-43f2-b673-70aa019a9f5d"],
+Cell[3064757, 61601, 638, 14, 24, "Print",ExpressionUUID->"6c327368-c9b9-4ae3-949a-593fb2b77007"],
+Cell[3065398, 61617, 638, 14, 24, "Print",ExpressionUUID->"47e85b11-c505-4659-89e4-33b60d35abca"],
+Cell[3066039, 61633, 637, 14, 24, "Print",ExpressionUUID->"f3fde698-e9e2-4581-812a-b0bde8dcf250"],
+Cell[3066679, 61649, 638, 14, 24, "Print",ExpressionUUID->"415d3b58-6c3b-419e-a420-fd69f60e69a2"],
+Cell[3067320, 61665, 640, 14, 24, "Print",ExpressionUUID->"f9ef4194-ebb3-4cb6-a5f8-07187185012c"],
+Cell[3067963, 61681, 640, 14, 24, "Print",ExpressionUUID->"4c972635-8329-42e5-9eee-204cdd18f466"],
+Cell[3068606, 61697, 638, 14, 24, "Print",ExpressionUUID->"1aebfe8a-7e86-4a40-8242-1b5cd17fc43d"],
+Cell[3069247, 61713, 279, 5, 24, "Print",ExpressionUUID->"ce56c22a-c969-4120-8ab3-76908cd7cb8f"],
+Cell[3069529, 61720, 496, 10, 24, "Print",ExpressionUUID->"b2ad0c55-c228-4dd8-afe1-596ac3e8de27"],
+Cell[3070028, 61732, 525, 11, 24, "Print",ExpressionUUID->"3f8774c5-285b-44f4-88e8-0185fa11c1a4"],
+Cell[3070556, 61745, 457, 10, 24, "Print",ExpressionUUID->"e93aab79-e7b3-4dbd-8e2b-1c90b2aa247c"],
+Cell[3071016, 61757, 398, 7, 63, "Print",ExpressionUUID->"5a36d2f5-f14d-44c6-9613-e31cb7d50f4f"],
+Cell[3071417, 61766, 295, 5, 24, "Print",ExpressionUUID->"b6a2c1c9-b900-4fe8-a272-adf23b8f05ac"],
+Cell[3071715, 61773, 284, 5, 44, "Print",ExpressionUUID->"9c92fc32-0f89-45c0-afd7-d26c1b8ab947"]
+}, Open  ]]
+}, Open  ]],
+Cell[3072026, 61782, 156, 3, 30, "Input",ExpressionUUID->"e983dc9e-7c02-4e79-995f-db0add5406de"]
+}
+]
+*)
+
diff --git a/scripts/HelicityAmps.nb b/scripts/HelicityAmps.nb
new file mode 100644
index 0000000000000000000000000000000000000000..91014c96164d65d3412cf5aca7370c7bc99778c3
--- /dev/null
+++ b/scripts/HelicityAmps.nb
@@ -0,0 +1,13635 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 11.3' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[       158,          7]
+NotebookDataLength[    507940,      13627]
+NotebookOptionsPosition[    470780,      13062]
+NotebookOutlinePosition[    471133,      13078]
+CellTagsIndexPosition[    471090,      13075]
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[
+ RowBox[{"(*", " ", 
+  RowBox[{
+   RowBox[{
+    RowBox[{
+     RowBox[{"HelicityAmps", ".", "m"}], "\[IndentingNewLine]", " ", 
+     RowBox[{"Process", ":", " ", 
+      RowBox[{"g", " ", "+", " ", "g"}]}]}], " ", "\[Rule]", " ", 
+    RowBox[{"H", " ", "+", " ", "g", " ", "+", " ", 
+     RowBox[{"g", "\[IndentingNewLine]", 
+      RowBox[{"Model", ":", " ", "SMQCD"}]}]}]}], ",", " ", 
+   RowBox[{"Definition", " ", "of", " ", "kinematic", " ", "variables"}], ",",
+    "\[IndentingNewLine]", "   ", 
+   RowBox[{"and", " ", "helicity", " ", 
+    RowBox[{"projections", ".", " ", "Last"}], " ", "Modified", " ", "August",
+     " ", "2019.", "\[IndentingNewLine]", "Created", " ", 
+    RowBox[{"by", ":", " ", 
+     RowBox[{
+      RowBox[{"J", ".", "G", ".", "Reyes"}], " ", "Rivera"}]}]}]}], " ", 
+  "*)"}]], "Input",
+ CellChangeTimes->{{3.7483460640690107`*^9, 3.748346128736135*^9}, {
+  3.7505322064466867`*^9, 3.7505322096193037`*^9}, {3.750685818525031*^9, 
+  3.7506858187985888`*^9}, {3.750685862467576*^9, 3.750685862527199*^9}, {
+  3.7513081531132383`*^9, 3.751308157253491*^9}, {3.761295781705222*^9, 
+  3.761295787067747*^9}, {3.7640060179701233`*^9, 3.7640060182815123`*^9}, {
+  3.769416168255188*^9, 3.769416171052967*^9}, {3.774008385144402*^9, 
+  3.774008446027734*^9}, {3.774361814019129*^9, 
+  3.7743618176296263`*^9}},ExpressionUUID->"a9eb43f9-c437-4ff0-ae8b-\
+eb31f4d06b38"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{"Needs", "[", "\"\<X`\>\"", "]"}], "\n", 
+ RowBox[{"<<", "helicityvec`"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"SetDirectory", "[", 
+   RowBox[{"NotebookDirectory", "[", "]"}], "]"}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{"NotebookSave", "[", "]"}]}], "Input",
+ CellChangeTimes->{{3.7694157567375174`*^9, 3.7694157651420507`*^9}, {
+  3.7694161379556293`*^9, 3.769416138416831*^9}, {3.7694161826886263`*^9, 
+  3.769416192145475*^9}, {3.769416241287668*^9, 3.769416242139756*^9}, {
+  3.769421884524377*^9, 3.769421889789727*^9}, {3.7740084724707212`*^9, 
+  3.7740084728784323`*^9}, {3.774014142722267*^9, 3.774014161359538*^9}, {
+  3.7743464356886587`*^9, 3.77434644432825*^9}, {3.7743465118165216`*^9, 
+  3.774346538188527*^9}, {3.7743467576241837`*^9, 3.774346762569035*^9}},
+ CellLabel->"In[1]:=",ExpressionUUID->"aa6e76d2-ec10-49c0-b6e0-1dd4d91b1a18"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["\<\"\\!\\(\\*TemplateBox[List[\\\"\\\\\\\"Package-X v2.1.1, by \
+Hiren H. Patel\\\\\\\\nFor more information, see the \\\\\\\"\\\", \
+TemplateBox[List[\\\"\\\\\\\"guide\\\\\\\"\\\", \\\"paclet:X/guide/PackageX\\\
+\"], \\\"HyperlinkPaclet\\\"]], \\\"RowDefault\\\"]\\)\"\>"], "Print",
+ CellChangeTimes->{
+  3.774346538743554*^9, {3.77434675511267*^9, 3.774346775904129*^9}, 
+   3.774346890682291*^9, 3.7743475854203463`*^9, 3.7743476889237003`*^9, 
+   3.7743495115108013`*^9, 3.774371782249662*^9, 3.774376134357814*^9, 
+   3.7752210665837917`*^9, {3.77523223041602*^9, 3.775232240208652*^9}, 
+   3.77523345055406*^9, 3.7752338986011133`*^9, 3.775484241099798*^9, 
+   3.7754868687355537`*^9, 3.7754893499682302`*^9, 3.775489810607164*^9, 
+   3.775490894912174*^9, 3.775495005616561*^9, 3.7764382105007544`*^9},
+ CellLabel->
+  "During evaluation of \
+In[1]:=",ExpressionUUID->"25a5da31-44dc-4fb5-8479-d3b3e9d9997d"],
+
+Cell[BoxData["\<\"helicityvec by J.G. Reyes v1. August 2019\"\>"], "Print",
+ CellChangeTimes->{
+  3.774346538743554*^9, {3.77434675511267*^9, 3.774346775904129*^9}, 
+   3.774346890682291*^9, 3.7743475854203463`*^9, 3.7743476889237003`*^9, 
+   3.7743495115108013`*^9, 3.774371782249662*^9, 3.774376134357814*^9, 
+   3.7752210665837917`*^9, {3.77523223041602*^9, 3.775232240208652*^9}, 
+   3.77523345055406*^9, 3.7752338986011133`*^9, 3.775484241099798*^9, 
+   3.7754868687355537`*^9, 3.7754893499682302`*^9, 3.775489810607164*^9, 
+   3.775490894912174*^9, 3.775495005616561*^9, 3.776438210515339*^9},
+ CellLabel->
+  "During evaluation of \
+In[1]:=",ExpressionUUID->"f4dab8ad-d8ed-4620-a2d6-6211b6054aed"]
+}, Open  ]]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"$Assumptions", "=", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{"Element", "[", 
+      RowBox[{
+       RowBox[{"{", 
+        RowBox[{
+        "ki", ",", "k1", ",", "k2", ",", "k3", ",", "k4", ",", " ", 
+         "\[Theta]1", ",", "\[Theta]2", ",", "\[Theta]3", ",", "\[Theta]4", 
+         ",", " ", "\[Phi]1", ",", "\[Phi]2", ",", "\[Phi]3", ",", "\[Phi]4", 
+         ",", "p", ",", "MT2", ",", "GS", ",", "EL", ",", "Alfas", ",", "a1", 
+         ",", "S", ",", "T", ",", "U", ",", "MT", ",", "MH", ",", "MH2", ",", 
+         "\[Eta]4", ",", "\[Eta]3", ",", "\[Beta]"}], "}"}], ",", "Reals"}], 
+      "]"}], ",", 
+     RowBox[{"ki", ">", "0"}], " ", ",", 
+     RowBox[{"MT2", ">", "0"}], ",", 
+     RowBox[{"MT", ">", "0"}], ",", 
+     RowBox[{"MH2", ">", "0"}], ",", " ", 
+     RowBox[{"MH", ">", "0"}], ",", 
+     RowBox[{"k4", ">", "0"}], ",", 
+     RowBox[{"p", ">", "0"}], ",", 
+     RowBox[{"k3", ">", "0"}], ",", 
+     RowBox[{"k1", ">", "0"}], ",", 
+     RowBox[{"k2", ">", "0"}], ",", 
+     RowBox[{"rS", ">", "0"}], ",", 
+     RowBox[{"kT4", ">", "0"}], ",", 
+     RowBox[{"kT3", ">", "0"}], ",", 
+     RowBox[{"\[Beta]", ">", "0"}]}], "}"}]}], ";"}]], "Input",
+ CellChangeTimes->{{3.774349510085885*^9, 3.774349514308477*^9}, {
+  3.776441432289131*^9, 3.776441435349208*^9}, {3.7764414951384068`*^9, 
+  3.7764414973318167`*^9}},
+ CellLabel->"In[96]:=",ExpressionUUID->"907a0a71-f5d0-4c01-bacf-80d42748259d"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{
+   "Defines", " ", "the", " ", "center", " ", "of", " ", "mass", " ", 
+    RowBox[{"frame", "."}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"CMSFrame", "=", 
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{"k1x", "\[Rule]", " ", "0"}], ",", 
+       RowBox[{"k1y", "\[Rule]", " ", "0"}], ",", 
+       RowBox[{"k1z", "\[Rule]", " ", 
+        RowBox[{"rS", "/", "2"}]}], ",", 
+       RowBox[{"k2x", "\[Rule]", " ", "0"}], ",", 
+       RowBox[{"k2y", "\[Rule]", " ", "0"}], ",", 
+       RowBox[{"k2z", "\[Rule]", " ", 
+        RowBox[{
+         RowBox[{"-", "rS"}], "/", "2"}]}], ",", 
+       RowBox[{"k5x", "\[Rule]", " ", 
+        RowBox[{"-", 
+         RowBox[{"(", 
+          RowBox[{"k4x", "+", "k3x"}], ")"}]}]}], ",", 
+       RowBox[{"k5y", "\[Rule]", " ", 
+        RowBox[{"-", 
+         RowBox[{"(", 
+          RowBox[{"k4y", "+", "k3y"}], ")"}]}]}], ",", 
+       RowBox[{"k5z", "\[Rule]", " ", 
+        RowBox[{"-", 
+         RowBox[{"(", 
+          RowBox[{"k4z", " ", "+", "k3z"}], ")"}]}]}]}], "}"}]}], ";"}], 
+   "\[IndentingNewLine]", "\[IndentingNewLine]", 
+   RowBox[{"(*", " ", 
+    RowBox[{"Returns", " ", "vector", " ", 
+     RowBox[{"(", 
+      RowBox[{"E", ",", "px", ",", "py", ",", "pz"}], ")"}], " ", "in", " ", 
+     "Euclidean", " ", "coordinates"}], " ", "*)"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"vec4xyz", "[", 
+      RowBox[{"m_", ",", "kx_", ",", "ky_", ",", "kz_"}], "]"}], ":=", 
+     RowBox[{"Module", "[", 
+      RowBox[{
+       RowBox[{"{", 
+        RowBox[{"k", "=", 
+         RowBox[{"Sqrt", "[", 
+          RowBox[{
+           RowBox[{"kx", "^", "2"}], " ", "+", 
+           RowBox[{"ky", "^", "2"}], " ", "+", 
+           RowBox[{"kz", "^", "2"}]}], "]"}]}], "}"}], ",", 
+       RowBox[{"{", 
+        RowBox[{
+         RowBox[{"Sqrt", "[", 
+          RowBox[{
+           RowBox[{"k", "^", "2"}], " ", "+", " ", 
+           RowBox[{"m", "^", "2"}]}], "]"}], ",", "kx", ",", "ky", ",", 
+         "kz"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", 
+   "\[IndentingNewLine]", 
+   RowBox[{"(*", " ", 
+    RowBox[{"Returns", " ", "vector", " ", 
+     RowBox[{"(", 
+      RowBox[{"E", ",", "px", ",", "py", ",", "pz"}], ")"}], " ", "in", " ", 
+     "Collider", " ", "coordinates"}], " ", "*)"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"vec4Tep", "[", 
+      RowBox[{"m_", ",", "kT_", ",", "\[Eta]_", ",", "\[Phi]_"}], "]"}], ":=", 
+     RowBox[{"Block", "[", 
+      RowBox[{
+       RowBox[{"{", 
+        RowBox[{
+         RowBox[{"k", "=", 
+          RowBox[{"kT", " ", 
+           RowBox[{"Cosh", "[", "\[Eta]", "]"}]}]}], ",", 
+         RowBox[{"kx", "=", " ", 
+          RowBox[{"kT", "  ", 
+           RowBox[{"Cos", "[", "\[Phi]", "]"}]}]}], ",", 
+         RowBox[{"ky", "=", " ", 
+          RowBox[{"kT", "  ", 
+           RowBox[{"Sin", "[", "\[Phi]", "]"}]}]}], ",", 
+         RowBox[{"kz", " ", "=", " ", 
+          RowBox[{"kT", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]", "]"}]}]}]}], "}"}], ",", 
+       RowBox[{"{", 
+        RowBox[{
+         RowBox[{"Sqrt", "[", 
+          RowBox[{
+           RowBox[{"k", "^", "2"}], " ", "+", " ", 
+           RowBox[{"m", "^", "2"}]}], "]"}], ",", "kx", ",", "ky", ",", 
+         "kz"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", 
+   "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"rkT4", "=", 
+     RowBox[{
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"-", "2"}], "*", 
+         RowBox[{"kT3", "^", "2"}], "*", "S"}], "+", 
+        RowBox[{
+         RowBox[{"(", 
+          RowBox[{
+           RowBox[{"Sqrt", "[", 
+            RowBox[{
+             RowBox[{"kT3", "^", "2"}], "+", 
+             RowBox[{"MH", "^", "2"}]}], "]"}], "-", "S"}], ")"}], "*", 
+         RowBox[{"(", 
+          RowBox[{
+           RowBox[{"MH", "^", "2"}], "-", 
+           RowBox[{"S", "^", "2"}]}], ")"}]}], "+", 
+        RowBox[{"kT3", "*", 
+         RowBox[{"(", 
+          RowBox[{
+           RowBox[{"MH", "^", "2"}], "+", 
+           RowBox[{"S", "*", 
+            RowBox[{"(", 
+             RowBox[{
+              RowBox[{
+               RowBox[{"-", "2"}], "*", 
+               RowBox[{"Sqrt", "[", 
+                RowBox[{
+                 RowBox[{"kT3", "^", "2"}], "+", 
+                 RowBox[{"MH", "^", "2"}]}], "]"}]}], "+", "S"}], ")"}]}]}], 
+          ")"}], "*", 
+         RowBox[{"Cos", "[", 
+          RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], "/", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"-", 
+         RowBox[{"kT3", "^", "2"}]}], "-", 
+        RowBox[{"2", "*", 
+         RowBox[{"MH", "^", "2"}]}], "+", 
+        RowBox[{"2", "*", 
+         RowBox[{"S", "^", "2"}]}], "+", 
+        RowBox[{
+         RowBox[{"kT3", "^", "2"}], "*", 
+         RowBox[{"Cos", "[", 
+          RowBox[{
+           RowBox[{"2", "*", "\[Phi]3"}], "-", 
+           RowBox[{"2", "*", "\[Phi]4"}]}], "]"}]}], "+", 
+        RowBox[{"4", "*", "kT3", "*", "S", "*", 
+         RowBox[{"Cos", "[", 
+          RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}]}]}], ";"}], 
+   "\[IndentingNewLine]", "\[IndentingNewLine]", 
+   RowBox[{"(*", " ", 
+    RowBox[{
+    "Definition", " ", "of", " ", "the", " ", "four", " ", "vector", " ", 
+     "of", " ", "particle", " ", "3", " ", 
+     RowBox[{"(", "Higgs", ")"}]}], " ", "*)"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"vecetaphi3", "=", 
+     RowBox[{
+      RowBox[{"vec4Tep", "[", 
+       RowBox[{"MH", ",", "kT3", ",", "\[Eta]3", ",", "\[Phi]3"}], "]"}], "//",
+       "Simplify"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
+   RowBox[{"(*", " ", 
+    RowBox[{
+    "Definition", " ", "of", " ", "the", " ", "four", " ", "vector", " ", 
+     "of", " ", "particle", " ", "4", " ", 
+     RowBox[{"(", 
+      RowBox[{"outgoing", " ", "gluon"}], ")"}]}], " ", "*)"}], 
+   "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"vecetaphi4", "=", 
+     RowBox[{"(", 
+      RowBox[{
+       RowBox[{"vec4Tep", "[", 
+        RowBox[{"0", ",", "kT4", ",", "\[Eta]4", ",", "\[Phi]4"}], "]"}], "//",
+        "Simplify"}], ")"}]}], ";"}], "\[IndentingNewLine]", 
+   "\[IndentingNewLine]", 
+   RowBox[{"(*", " ", 
+    RowBox[{
+     RowBox[{
+     "Transformation", " ", "of", " ", "momentum", " ", "variables", " ", 
+      "from", " ", "Euclidean", " ", "to", " ", "Collider", " ", 
+      "coordinates", " ", "for", " ", "particles", " ", "3"}], ",", "4."}], 
+    " ", "*)"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"vecsubetaphi", "=", 
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{"k4x", "\[Rule]", " ", 
+        RowBox[{"vecetaphi4", "[", 
+         RowBox[{"[", "2", "]"}], "]"}]}], ",", 
+       RowBox[{"k4y", "\[Rule]", " ", 
+        RowBox[{"vecetaphi4", "[", 
+         RowBox[{"[", "3", "]"}], "]"}]}], ",", 
+       RowBox[{"k4z", "\[Rule]", " ", 
+        RowBox[{"vecetaphi4", "[", 
+         RowBox[{"[", "4", "]"}], "]"}]}], ",", 
+       RowBox[{"k3x", "\[Rule]", " ", 
+        RowBox[{"vecetaphi3", "[", 
+         RowBox[{"[", "2", "]"}], "]"}]}], ",", 
+       RowBox[{"k3y", "\[Rule]", " ", 
+        RowBox[{"vecetaphi3", "[", 
+         RowBox[{"[", "3", "]"}], "]"}]}], ",", 
+       RowBox[{"k3z", "\[Rule]", " ", 
+        RowBox[{"vecetaphi3", "[", 
+         RowBox[{"[", "4", "]"}], "]"}]}]}], "}"}]}], ";"}], 
+   "\[IndentingNewLine]", "\[IndentingNewLine]", 
+   RowBox[{"SetAttributes", "[", 
+    RowBox[{"f", ",", "Listable"}], "]"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"f", "[", 
+     RowBox[{"a_", ",", "b_"}], "]"}], ":=", 
+    RowBox[{"a", "\[Rule]", "b"}]}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"variables", "=", 
+     RowBox[{"{", 
+      RowBox[{
+      "kT3", ",", "kT4", ",", "S", ",", "T", ",", "U", ",", "T24", ",", "T14",
+        ",", "S34", ",", 
+       RowBox[{"Sqrt", "[", "S", "]"}], ",", 
+       RowBox[{"Sqrt", "[", "S34", "]"}], ",", 
+       RowBox[{"Tan", "[", "\[Phi]5", "]"}], ",", "kT5", ",", 
+       RowBox[{"Sqrt", "[", "S35", "]"}]}], "}"}]}], ";"}], 
+   "\[IndentingNewLine]", "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"MATColor", ":=", 
+     RowBox[{"{", "\[IndentingNewLine]", 
+      RowBox[{
+       RowBox[{"A", "\[Rule]", "c3"}], " ", 
+       RowBox[{"(*", 
+        RowBox[{"Mat", "[", 
+         RowBox[{"SUNT", "[", 
+          RowBox[{
+          "Glu1", ",", "Glu5", ",", "Glu2", ",", "Glu4", ",", "0", ",", "0"}],
+           "]"}], "]"}], "*)"}], ",", "\[IndentingNewLine]", 
+       RowBox[{"B", "\[Rule]", "c2"}], " ", 
+       RowBox[{"(*", 
+        RowBox[{"Mat", "[", 
+         RowBox[{"SUNT", "[", 
+          RowBox[{
+          "Glu1", ",", "Glu4", ",", "Glu5", ",", "Glu2", ",", "0", ",", "0"}],
+           "]"}], "]"}], "*)"}], ",", "\[IndentingNewLine]", 
+       RowBox[{"C", "\[Rule]", "c2"}], " ", 
+       RowBox[{"(*", 
+        RowBox[{"Mat", "[", 
+         RowBox[{"SUNT", "[", 
+          RowBox[{
+          "Glu1", ",", "Glu2", ",", "Glu5", ",", "Glu4", ",", "0", ",", "0"}],
+           "]"}], "]"}], "*)"}], ",", "\[IndentingNewLine]", 
+       RowBox[{"D", "\[Rule]", "c3"}], " ", 
+       RowBox[{"(*", 
+        RowBox[{"Mat", "[", 
+         RowBox[{"SUNT", "[", 
+          RowBox[{
+          "Glu1", ",", "Glu4", ",", "Glu2", ",", "Glu5", ",", "0", ",", "0"}],
+           "]"}], "]"}], "*)"}], ",", "\[IndentingNewLine]", 
+       RowBox[{"F", "\[Rule]", "c1"}], " ", 
+       RowBox[{"(*", 
+        RowBox[{"Mat", "[", 
+         RowBox[{"SUNT", "[", 
+          RowBox[{
+          "Glu1", ",", "Glu5", ",", "Glu4", ",", "Glu2", ",", "0", ",", "0"}],
+           "]"}], "]"}], "*)"}], ",", "\[IndentingNewLine]", 
+       RowBox[{"G", "\[Rule]", "c1"}]}], 
+      RowBox[{"(*", " ", 
+       RowBox[{"Mat", "[", 
+        RowBox[{"SUNT", "[", 
+         RowBox[{
+         "Glu1", ",", "Glu2", ",", "Glu4", ",", "Glu5", ",", "0", ",", "0"}], 
+         "]"}], "]"}], "*)"}], "\[IndentingNewLine]", "}"}]}], 
+    ";"}]}]}]], "Input",
+ CellChangeTimes->{{3.774008509020266*^9, 3.7740085381409407`*^9}, {
+  3.774010228954178*^9, 3.7740102997172318`*^9}, {3.774010472134542*^9, 
+  3.774010557287574*^9}, {3.7740105997645206`*^9, 3.774010663124332*^9}, {
+  3.774350209862176*^9, 3.7743502113767548`*^9}, {3.774351250016728*^9, 
+  3.774351417512418*^9}, {3.774376113932404*^9, 3.774376122200436*^9}, {
+  3.775489537189768*^9, 3.775489538288254*^9}},
+ CellLabel->"In[6]:=",ExpressionUUID->"26f4a4e8-5f12-4a95-a30f-5e40153ac3f8"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{
+   "Four", " ", "momentum", " ", "vectors", " ", "for", " ", "all", " ", 
+    RowBox[{"particles", "."}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{"(*", " ", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"g", 
+      RowBox[{"(", "k1", ")"}], " ", "g", 
+      RowBox[{"(", "k2", ")"}]}], " ", "\[Rule]", " ", 
+     RowBox[{"h", 
+      RowBox[{"(", "k3", ")"}]}]}], ",", 
+    RowBox[{"g", 
+     RowBox[{"(", "k4", ")"}]}], ",", 
+    RowBox[{"g", 
+     RowBox[{"(", "k5", ")"}]}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"k1vec", "=", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"vec4xyz", "[", 
+        RowBox[{"0", ",", "k1x", ",", "k1y", ",", "k1z"}], "]"}], "/.", 
+       "CMSFrame"}], "//", "Simplify"}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"k2vec", "=", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"vec4xyz", "[", 
+        RowBox[{"0", ",", "k2x", ",", "k2y", ",", "k2z"}], "]"}], "/.", 
+       "CMSFrame"}], "//", "Simplify"}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"k3vec", "=", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"vec4xyz", "[", 
+        RowBox[{"MH", ",", "k3x", ",", "k3y", ",", "k3z"}], "]"}], "/.", 
+       "CMSFrame"}], "//", "Simplify"}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"k4vec", "=", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"vec4xyz", "[", 
+        RowBox[{"0", ",", "k4x", ",", "k4y", ",", "k4z"}], "]"}], "/.", 
+       "CMSFrame"}], "//", "Simplify"}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"k5vec", "=", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"vec4xyz", "[", 
+        RowBox[{"0", ",", "k5x", ",", "k5y", ",", "k5z"}], "]"}], "/.", 
+       "CMSFrame"}], "//", "Simplify"}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"kvec1", "=", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"k1vec", "/.", " ", "vecsubetaphi"}], "/.", 
+       RowBox[{"rS", "\[Rule]", 
+        RowBox[{"Sqrt", "[", "S", "]"}]}]}], "//", "Simplify"}]}], ";"}], 
+   "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"kvec2", "=", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"k2vec", "/.", " ", "vecsubetaphi"}], "/.", 
+       RowBox[{"rS", "\[Rule]", 
+        RowBox[{"Sqrt", "[", "S", "]"}]}]}], "//", "Simplify"}]}], ";"}], 
+   "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"kvec3", "=", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"k3vec", "/.", " ", "vecsubetaphi"}], "/.", 
+       RowBox[{"rS", "\[Rule]", 
+        RowBox[{"Sqrt", "[", "S", "]"}]}]}], "//", "Simplify"}]}], ";"}], 
+   "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"kvec4", "=", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"k4vec", "/.", " ", "vecsubetaphi"}], "/.", 
+       RowBox[{"rS", "\[Rule]", 
+        RowBox[{"Sqrt", "[", "S", "]"}]}]}], "//", "Simplify"}]}], ";"}], 
+   "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"kvec5", "=", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"k5vec", "/.", " ", "vecsubetaphi"}], "/.", 
+       RowBox[{"rS", "\[Rule]", 
+        RowBox[{"Sqrt", "[", "S", "]"}]}]}], "//", "Simplify"}]}], 
+    ";"}]}]}]], "Input",
+ CellChangeTimes->{{3.774010789274702*^9, 3.774010812450952*^9}, {
+  3.774010874362638*^9, 3.774010888392482*^9}, {3.774014361258362*^9, 
+  3.774014361502096*^9}, {3.7740145370041933`*^9, 3.7740145375876703`*^9}, {
+  3.7740167862280827`*^9, 3.7740168375673*^9}, {3.774348193461874*^9, 
+  3.774348221322661*^9}, {3.774348765307613*^9, 3.774348785123725*^9}, {
+  3.774349827303525*^9, 3.7743498295202417`*^9}},
+ CellLabel->"In[17]:=",ExpressionUUID->"295b0a52-febf-49d7-b5c5-afa40a220c70"],
+
+Cell[BoxData[""], "Input",
+ CellChangeTimes->{{3.7743499044425*^9, 
+  3.774349905506363*^9}},ExpressionUUID->"facae057-50b1-4b42-bf4f-\
+443f5b3c37d1"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{
+   "Polarization", " ", "Vectors", " ", "in", " ", "Helicity", " ", 
+    "Eigenbasis", " ", "and", " ", "four", " ", "vectors"}], " ", "*)"}], 
+  "\[IndentingNewLine]", 
+  RowBox[{"(*", " ", 
+   RowBox[{"1", ",", "2", ",", "4", ",", 
+    RowBox[{"5", " ", "-", " ", "gluons"}], ",", " ", 
+    RowBox[{"3", " ", "-", " ", "Higgs"}]}], " ", "*)"}]}]], "Input",
+ CellChangeTimes->{{3.774016844431131*^9, 3.774016870646851*^9}, {
+  3.774348591141938*^9, 3.774348602112896*^9}, {3.774349878328457*^9, 
+  3.774349899911847*^9}, {3.774349933691104*^9, 
+  3.774349940627697*^9}},ExpressionUUID->"08460ef5-a698-495d-8762-\
+405256a0b03d"],
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{
+   RowBox[{"pairdef", "[", 
+    RowBox[{"l1_", ",", "l2_", ",", "l4_", ",", "l5_"}], "]"}], " ", ":=", 
+   "\[IndentingNewLine]", 
+   RowBox[{"{", "\[IndentingNewLine]", 
+    RowBox[{
+     RowBox[{
+      RowBox[{"ek1vecInc", "=", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"EpolEuc", "[", 
+          RowBox[{"0", ",", "k1x", ",", "k1y", ",", "k1z", ",", "l1"}], "]"}],
+          "/.", 
+         RowBox[{"{", 
+          RowBox[{"k1y", "\[Rule]", "0"}], "}"}]}], "//", "Simplify"}]}], ";",
+       "\[IndentingNewLine]", 
+      RowBox[{"ek1vec", "=", 
+       RowBox[{
+        RowBox[{
+         RowBox[{
+          RowBox[{"Limit", "[", 
+           RowBox[{"ek1vecInc", ",", 
+            RowBox[{"k1x", "\[Rule]", "0"}], ",", 
+            RowBox[{"Direction", "\[Rule]", "\"\<FromAbove\>\""}]}], "]"}], "/.",
+           "CMSFrame"}], "/.", 
+         RowBox[{"rS", "\[Rule]", 
+          RowBox[{"Sqrt", "[", "S", "]"}]}]}], "//", "Simplify"}]}]}], " ", 
+     ",", 
+     RowBox[{"(*", " ", 
+      RowBox[{
+       RowBox[{"because", " ", "kz"}], " ", ">", " ", "0"}], " ", "*)"}], 
+     "\[IndentingNewLine]", "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"ek2vecInc", "=", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"EpolEuc", "[", 
+          RowBox[{"0", ",", "k2x", ",", "k2y", ",", "k2z", ",", "l2"}], "]"}],
+          "/.", 
+         RowBox[{"{", 
+          RowBox[{"k2y", "\[Rule]", "0"}], "}"}]}], "//", "Simplify"}]}], ";",
+       "\[IndentingNewLine]", 
+      RowBox[{"ek2vec", "=", 
+       RowBox[{
+        RowBox[{
+         RowBox[{
+          RowBox[{"Limit", "[", 
+           RowBox[{"ek2vecInc", ",", 
+            RowBox[{"k2x", "\[Rule]", "0"}], ",", 
+            RowBox[{"Direction", "\[Rule]", "\"\<FromBelow\>\""}]}], "]"}], "/.",
+           "CMSFrame"}], "/.", 
+         RowBox[{"rS", "\[Rule]", 
+          RowBox[{"Sqrt", "[", "S", "]"}]}]}], "//", "Simplify"}]}]}], " ", 
+     ",", 
+     RowBox[{"(*", " ", 
+      RowBox[{
+       RowBox[{"because", " ", "kz"}], " ", "<", " ", "0"}], " ", "*)"}], 
+     "\[IndentingNewLine]", "\[IndentingNewLine]", 
+     RowBox[{"ek4vec", "=", 
+      RowBox[{
+       RowBox[{
+        RowBox[{
+         RowBox[{"EpolEuc", "[", 
+          RowBox[{"0", ",", "k4x", ",", "k4y", ",", "k4z", ",", "l4"}], "]"}],
+          "/.", "CMSFrame"}], "/.", "vecsubetaphi"}], "//", "Simplify"}]}], 
+     ",", "\[IndentingNewLine]", "\[IndentingNewLine]", 
+     RowBox[{"ek5vec", "=", 
+      RowBox[{
+       RowBox[{
+        RowBox[{
+         RowBox[{"EpolEuc", "[", 
+          RowBox[{"0", ",", "k5x", ",", "k5y", ",", "k5z", ",", "l5"}], "]"}],
+          "/.", "CMSFrame"}], "/.", "vecsubetaphi"}], "//", "Simplify"}]}], 
+     ",", "\[IndentingNewLine]", "\[IndentingNewLine]", 
+     RowBox[{"ek1vecCC", "=", 
+      RowBox[{
+       RowBox[{"Conjugate", "[", "ek1vec", "]"}], "//", "Simplify"}]}], ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{"ek2vecCC", "=", 
+      RowBox[{
+       RowBox[{"Conjugate", "[", "ek2vec", "]"}], "//", "Simplify"}]}], ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{"ek4vecCC", "=", 
+      RowBox[{
+       RowBox[{"Conjugate", "[", "ek4vec", "]"}], "//", "Simplify"}]}], ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{"ek5vecCC", "=", 
+      RowBox[{
+       RowBox[{"Conjugate", "[", "ek5vec", "]"}], "//", "Simplify"}]}]}], 
+    "\[IndentingNewLine]", "}"}]}], 
+  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"SubFourVecs", ":=", 
+   RowBox[{"{", "\[IndentingNewLine]", 
+    RowBox[{
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"e", "[", "1", "]"}], ",", 
+        RowBox[{"k", "[", "2", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek1vec", ",", "kvec2"}], "]"}]}], ",", "\[IndentingNewLine]", 
+     
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"e", "[", "2", "]"}], ",", 
+        RowBox[{"k", "[", "1", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek2vec", ",", "kvec1"}], "]"}]}], ",", "\[IndentingNewLine]", 
+     
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"ec", "[", "1", "]"}], ",", 
+        RowBox[{"k", "[", "2", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek1vecCC", ",", "kvec2"}], "]"}]}], ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"ec", "[", "2", "]"}], ",", 
+        RowBox[{"k", "[", "1", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek2vecCC", ",", "kvec1"}], "]"}]}], ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"e", "[", "1", "]"}], ",", 
+        RowBox[{"e", "[", "2", "]"}]}], "]"}], "\[Rule]", " ", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek1vec", ",", "ek2vec"}], "]"}]}], ",", "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"ec", "[", "1", "]"}], ",", 
+        RowBox[{"ec", "[", "2", "]"}]}], "]"}], "\[Rule]", " ", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek1vecCC", ",", "ek2vecCC"}], "]"}]}], ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"e", "[", "1", "]"}], ",", 
+        RowBox[{"k", "[", "3", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek1vec", ",", "kvec3"}], "]"}]}], ",", "\[IndentingNewLine]", 
+     
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"ec", "[", "1", "]"}], ",", 
+        RowBox[{"k", "[", "3", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek1vecCC", ",", "kvec3"}], "]"}]}], ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"e", "[", "1", "]"}], ",", 
+        RowBox[{"ec", "[", "4", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek1vec", ",", "ek4vecCC"}], "]"}]}], ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"ec", "[", "1", "]"}], ",", 
+        RowBox[{"e", "[", "4", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek1vecCC", ",", "ek4vec"}], "]"}]}], ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"e", "[", "1", "]"}], ",", 
+        RowBox[{"k", "[", "4", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek1vec", ",", "kvec4"}], "]"}]}], " ", ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"ec", "[", "1", "]"}], ",", 
+        RowBox[{"k", "[", "4", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek1vecCC", ",", "kvec4"}], "]"}]}], ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"e", "[", "1", "]"}], ",", " ", 
+        RowBox[{"ec", "[", "5", "]"}]}], "]"}], "\[Rule]", " ", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek1vec", ",", "ek5vecCC"}], "]"}]}], ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"e", "[", "1", "]"}], ",", " ", 
+        RowBox[{"k", "[", "5", "]"}]}], "]"}], "->", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek1vec", ",", "kvec5"}], "]"}]}], ",", "\[IndentingNewLine]", 
+     
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"e", "[", "2", "]"}], ",", " ", 
+        RowBox[{"k", "[", "1", "]"}]}], "]"}], "->", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek2vec", ",", "kvec1"}], "]"}]}], ",", "\[IndentingNewLine]", 
+     
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"e", "[", "2", "]"}], ",", 
+        RowBox[{"k", "[", "3", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek2vec", ",", "kvec3"}], "]"}]}], ",", "\[IndentingNewLine]", 
+     
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"ec", "[", "2", "]"}], ",", 
+        RowBox[{"k", "[", "3", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek2vecCC", ",", "kvec3"}], "]"}]}], ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"e", "[", "2", "]"}], ",", 
+        RowBox[{"ec", "[", "4", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek2vec", ",", "ek4vecCC"}], "]"}]}], ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"ec", "[", "2", "]"}], ",", 
+        RowBox[{"e", "[", "4", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek2vecCC", ",", "ek4vec"}], "]"}]}], ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"e", "[", "2", "]"}], ",", 
+        RowBox[{"k", "[", "4", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek2vec", ",", "kvec4"}], "]"}]}], ",", "\[IndentingNewLine]", 
+     
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"ec", "[", "2", "]"}], ",", 
+        RowBox[{"k", "[", "4", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek2vecCC", ",", "kvec4"}], "]"}]}], ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"e", "[", "2", "]"}], ",", " ", 
+        RowBox[{"ec", "[", "5", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek2vec", ",", "ek5vecCC"}], "]"}]}], ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"e", "[", "2", "]"}], ",", " ", 
+        RowBox[{"k", "[", "5", "]"}]}], "]"}], "->", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek2vec", ",", "kvec5"}], "]"}]}], ",", "\[IndentingNewLine]", 
+     
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"e", "[", "4", "]"}], ",", 
+        RowBox[{"k", "[", "1", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek4vec", ",", "kvec1"}], "]"}]}], ",", "\[IndentingNewLine]", 
+     
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"ec", "[", "4", "]"}], ",", 
+        RowBox[{"k", "[", "1", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek4vecCC", ",", "kvec1"}], "]"}]}], ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"e", "[", "4", "]"}], ",", 
+        RowBox[{"k", "[", "2", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek4vec", ",", "kvec2"}], "]"}]}], ",", "\[IndentingNewLine]", 
+     
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"ec", "[", "4", "]"}], ",", 
+        RowBox[{"k", "[", "2", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek4vecCC", ",", "kvec2"}], "]"}]}], ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"e", "[", "4", "]"}], ",", 
+        RowBox[{"k", "[", "3", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek4vec", ",", "kvec3"}], "]"}]}], ",", "\[IndentingNewLine]", 
+     
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"ec", "[", "4", "]"}], ",", 
+        RowBox[{"k", "[", "3", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek4vecCC", ",", "kvec3"}], "]"}]}], ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"ec", "[", "4", "]"}], ",", " ", 
+        RowBox[{"ec", "[", "5", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek4vecCC", ",", "ek5vecCC"}], "]"}]}], ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"ec", "[", "4", "]"}], ",", " ", 
+        RowBox[{"k", "[", "5", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek4vecCC", ",", "kvec5"}], "]"}]}], ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"ec", "[", "5", "]"}], ",", " ", 
+        RowBox[{"k", "[", "1", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek5vecCC", ",", "kvec1"}], "]"}]}], ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"ec", "[", "5", "]"}], ",", " ", 
+        RowBox[{"k", "[", "2", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek5vecCC", ",", "kvec2"}], "]"}]}], ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"ec", "[", "5", "]"}], ",", " ", 
+        RowBox[{"k", "[", "3", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek5vecCC", ",", "kvec3"}], "]"}]}], ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"ec", "[", "5", "]"}], ",", " ", 
+        RowBox[{"k", "[", "4", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek5vecCC", ",", "kvec4"}], "]"}]}]}], "\[IndentingNewLine]", 
+    "}"}]}], "\[IndentingNewLine]"}], "\[IndentingNewLine]"}], "Input",
+ CellChangeTimes->{{3.774349706695448*^9, 3.7743497828732653`*^9}, {
+   3.774349850953391*^9, 3.774349862059946*^9}, {3.774349926376834*^9, 
+   3.774349927398417*^9}, {3.7743502672838717`*^9, 3.77435028684074*^9}, {
+   3.7743505888923492`*^9, 3.7743506931950197`*^9}, 3.774698454292612*^9, {
+   3.775221130841752*^9, 3.775221291609036*^9}, {3.7752213259119787`*^9, 
+   3.775221638747273*^9}, {3.775221692692317*^9, 3.775221742566423*^9}, {
+   3.775221778064539*^9, 3.77522181254742*^9}, 3.775489820991585*^9, {
+   3.776437785777536*^9, 3.77643778747199*^9}},
+ CellLabel->"In[27]:=",ExpressionUUID->"0977815c-55b7-47b0-a967-05c8f45dc601"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Bseries", " ", "=", " ", 
+  RowBox[{"Normal", "[", 
+   RowBox[{"Series", "[", 
+    RowBox[{
+     RowBox[{"1", "/", 
+      RowBox[{"(", 
+       RowBox[{"1", "-", 
+        RowBox[{"\[Beta]", "^", "2"}]}], ")"}]}], ",", 
+     RowBox[{"{", 
+      RowBox[{"\[Beta]", ",", "0", ",", "4"}], "}"}]}], "]"}], 
+   "]"}]}]], "Input",
+ CellChangeTimes->{3.774698457392561*^9},
+ CellLabel->"In[59]:=",ExpressionUUID->"fb2e028f-6f3b-492a-bb4e-bea3e5c1534a"],
+
+Cell[BoxData[
+ RowBox[{"1", "+", 
+  SuperscriptBox["\[Beta]", "2"], "+", 
+  SuperscriptBox["\[Beta]", "4"]}]], "Output",
+ CellChangeTimes->{3.7746984576731167`*^9, 3.775221096010333*^9, 
+  3.775232186661045*^9, 3.7752322536715937`*^9, 3.775233918380353*^9, 
+  3.775486901052134*^9},
+ CellLabel->"Out[59]=",ExpressionUUID->"ab71d7ff-d1f5-4255-835e-f05816070c0f"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{
+   "Solve", " ", "for", " ", "kT4", " ", "using", " ", "energy", " ", 
+    "conservation"}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{"(*", 
+   RowBox[{
+    RowBox[{"tl2", "=", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"(", 
+          RowBox[{"k3vec", "+", "k4vec", " ", "+", " ", "k5vec"}], ")"}], "//.",
+          "vecsubetaphi"}], ")"}], "/.", 
+       RowBox[{"{", 
+        RowBox[{
+         RowBox[{"\[Eta]3", "\[Rule]", " ", "0"}], ",", " ", 
+         RowBox[{"\[Eta]4", "\[Rule]", " ", "0"}]}], "}"}]}], "//", 
+      "Simplify"}]}], ";", "\[IndentingNewLine]", 
+    RowBox[{"kt4Sol", "=", 
+     RowBox[{
+      RowBox[{"Solve", "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"tl2", "[", 
+          RowBox[{"[", "1", "]"}], "]"}], " ", "==", " ", "rS"}], ",", 
+        "kT4"}], "]"}], "//", "Simplify"}]}], ";"}], "*)"}]}]], "Input",
+ CellChangeTimes->{{3.774011243517682*^9, 3.774011286981452*^9}, {
+   3.774011317682962*^9, 3.774011324591983*^9}, {3.774011409090329*^9, 
+   3.7740114556132603`*^9}, 3.7740125998758698`*^9, {3.774348796466803*^9, 
+   3.774348797308817*^9}, 
+   3.7754950318891277`*^9},ExpressionUUID->"fce22054-d858-451a-8e65-\
+81090d25d088"],
+
+Cell[BoxData[
+ RowBox[{"(*", 
+  RowBox[{"kT3Condition", "=", 
+   RowBox[{"Solve", "[", 
+    RowBox[{
+     RowBox[{
+      RowBox[{"kt4Sol", "[", 
+       RowBox[{"[", 
+        RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], ">", "0"}], ",", 
+     "kT3"}], "]"}]}], 
+  RowBox[{"(*", " ", 
+   RowBox[{"NEVER", " ", "ENDS"}], " ", "*)"}], "*)"}]], "Input",
+ CellChangeTimes->{{3.774012704301947*^9, 3.774012723451788*^9}, {
+   3.774012753630478*^9, 3.774012776494421*^9}, {3.774348715880101*^9, 
+   3.774348719902397*^9}, 
+   3.77435004614639*^9},ExpressionUUID->"1652bbc6-4ff3-4d2b-a987-\
+9b54bd7481f8"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{
+    RowBox[{"Check", " ", "kinematics"}], ",", " ", 
+    RowBox[{
+     RowBox[{"input", " ", 
+      RowBox[{"is", ":", " ", 
+       RowBox[{"root", "-", "S"}]}]}], " ", "=", " ", "rrS"}], ",", " ", 
+    "kT3m", ",", " ", "\[Eta]3", ",", " ", "\[Phi]3", ",", " ", "\[Eta]4", 
+    ",", " ", "\[Phi]4", ",", " ", "mh"}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{"(*", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"checkKinematics", "[", 
+      RowBox[{
+      "rrS_", ",", "rkT3_", ",", "r\[Eta]3_", ",", "r\[Phi]3_", ",", 
+       "r\[Eta]4_", ",", "r\[Phi]4_", ",", "mh_"}], "]"}], ":=", 
+     RowBox[{"Block", "[", 
+      RowBox[{
+       RowBox[{"{", 
+        RowBox[{
+         RowBox[{"rkT4", "=", 
+          RowBox[{
+           RowBox[{"(", 
+            RowBox[{
+             RowBox[{
+              RowBox[{"-", "2"}], "*", 
+              RowBox[{"rkT3", "^", "2"}], "*", "rrS"}], "+", 
+             RowBox[{
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{"Sqrt", "[", 
+                 RowBox[{
+                  RowBox[{"rkT3", "^", "2"}], "+", 
+                  RowBox[{"mh", "^", "2"}]}], "]"}], "-", "rrS"}], ")"}], "*", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{"mh", "^", "2"}], "-", 
+                RowBox[{"rrS", "^", "2"}]}], ")"}]}], "+", 
+             RowBox[{"rkT3", "*", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{"mh", "^", "2"}], "+", 
+                RowBox[{"rrS", "*", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"-", "2"}], "*", 
+                    RowBox[{"Sqrt", "[", 
+                    RowBox[{
+                    RowBox[{"rkT3", "^", "2"}], "+", 
+                    RowBox[{"mh", "^", "2"}]}], "]"}]}], "+", "rrS"}], 
+                  ")"}]}]}], ")"}], "*", 
+              RowBox[{"Cos", "[", 
+               RowBox[{"r\[Phi]3", "-", "r\[Phi]4"}], "]"}]}]}], ")"}], "/", 
+           RowBox[{"(", 
+            RowBox[{
+             RowBox[{"-", 
+              RowBox[{"rkT3", "^", "2"}]}], "-", 
+             RowBox[{"2", "*", 
+              RowBox[{"mh", "^", "2"}]}], "+", 
+             RowBox[{"2", "*", 
+              RowBox[{"rrS", "^", "2"}]}], "+", 
+             RowBox[{
+              RowBox[{"rkT3", "^", "2"}], "*", 
+              RowBox[{"Cos", "[", 
+               RowBox[{
+                RowBox[{"2", "*", "r\[Phi]3"}], "-", 
+                RowBox[{"2", "*", "r\[Phi]4"}]}], "]"}]}], "+", 
+             RowBox[{"4", "*", "rkT3", "*", "rrS", "*", 
+              RowBox[{"Cos", "[", 
+               RowBox[{"r\[Phi]3", "-", "r\[Phi]4"}], "]"}]}]}], ")"}]}]}], 
+         ",", 
+         RowBox[{"mh2", "=", 
+          RowBox[{"mh", "^", "2"}]}], ",", 
+         RowBox[{"(*", 
+          RowBox[{
+           RowBox[{"p4x", "=", 
+            RowBox[{"p4vec3", "[", 
+             RowBox[{"[", "1", "]"}], "]"}]}], ",", 
+           RowBox[{"p4y", "=", 
+            RowBox[{"p4vec3", "[", 
+             RowBox[{"[", "2", "]"}], "]"}]}], ",", 
+           RowBox[{"p4z", "=", 
+            RowBox[{"p4vec3", "[", 
+             RowBox[{"[", "3", "]"}], "]"}]}], ",", "\[IndentingNewLine]", 
+           RowBox[{"p5x", "=", 
+            RowBox[{"p5vec3", "[", 
+             RowBox[{"[", "1", "]"}], "]"}]}], ",", 
+           RowBox[{"p5y", "=", 
+            RowBox[{"p5vec3", "[", 
+             RowBox[{"[", "2", "]"}], "]"}]}], ",", 
+           RowBox[{"p5z", "=", 
+            RowBox[{"p5vec3", "[", 
+             RowBox[{"[", "3", "]"}], "]"}]}], ",", "\[IndentingNewLine]", 
+           RowBox[{"E4", "=", 
+            RowBox[{"mf3", "[", "p4vec3", "]"}]}], ",", 
+           RowBox[{"E5", "=", 
+            RowBox[{"mf3", "[", "p5vec3", "]"}]}], ",", 
+           RowBox[{"E3", "=", 
+            RowBox[{"Sqrt", "[", 
+             RowBox[{
+              RowBox[{"MH", "^", "2"}], "+", 
+              RowBox[{
+               RowBox[{"mf3", "[", 
+                RowBox[{"p4vec3", "+", "p5vec3"}], "]"}], "^", "2"}]}], 
+             "]"}]}], ","}], "*)"}], "\[IndentingNewLine]", 
+         RowBox[{"SS", "=", 
+          RowBox[{
+           RowBox[{"MyPair", "[", 
+            RowBox[{
+             RowBox[{"k1vec", "+", "k2vec"}], ",", 
+             RowBox[{"k1vec", "+", "k2vec"}]}], "]"}], "/.", 
+           "vecsubetaphi"}]}], ",", "\[IndentingNewLine]", 
+         RowBox[{"TT", "=", 
+          RowBox[{
+           RowBox[{"MyPair", "[", 
+            RowBox[{
+             RowBox[{"k1vec", "-", "k3vec"}], ",", 
+             RowBox[{"k1vec", "-", "k3vec"}]}], "]"}], "/.", 
+           "vecsubetaphi"}]}], ",", "\[IndentingNewLine]", 
+         RowBox[{"UU", "=", 
+          RowBox[{
+           RowBox[{"MyPair", "[", 
+            RowBox[{
+             RowBox[{"k2vec", "-", "k3vec"}], ",", 
+             RowBox[{"k2vec", "-", "k3vec"}]}], "]"}], "/.", 
+           "vecsubetaphi"}]}], ",", "\[IndentingNewLine]", 
+         RowBox[{"TT14", "=", 
+          RowBox[{
+           RowBox[{"MyPair", "[", 
+            RowBox[{
+             RowBox[{"k1vec", "-", "k4vec"}], ",", 
+             RowBox[{"k1vec", "-", "k4vec"}]}], "]"}], "/.", 
+           "vecsubetaphi"}]}], ",", "\[IndentingNewLine]", 
+         RowBox[{"TT24", "=", 
+          RowBox[{
+           RowBox[{"MyPair", "[", 
+            RowBox[{
+             RowBox[{"k2vec", "-", "k4vec"}], ",", 
+             RowBox[{"k2vec", "-", "k4vec"}]}], "]"}], "/.", 
+           "vecsubetaphi"}]}], ",", "\[IndentingNewLine]", 
+         RowBox[{"(*", 
+          RowBox[{
+           RowBox[{"TT15", "=", 
+            RowBox[{"MyPair", "[", 
+             RowBox[{
+              RowBox[{"k1vec", "-", "k5vec"}], ",", 
+              RowBox[{"k1vec", "-", "k5vec"}]}], "]"}]}], ",", 
+           "\[IndentingNewLine]", 
+           RowBox[{"TT25", "=", 
+            RowBox[{"MyPair", "[", 
+             RowBox[{
+              RowBox[{"k2vec", "-", "k5vec"}], ",", 
+              RowBox[{"k2vec", "-", "k5vec"}]}], "]"}]}], ","}], "*)"}], 
+         "\[IndentingNewLine]", 
+         RowBox[{"SS34", "=", 
+          RowBox[{
+           RowBox[{"MyPair", "[", 
+            RowBox[{
+             RowBox[{"k3vec", "+", "k4vec"}], ",", 
+             RowBox[{"k3vec", "+", "k4vec"}]}], "]"}], "/.", 
+           "vecsubetaphi"}]}], ",", "\[IndentingNewLine]", "rl1", ",", "rl1a",
+          ",", "rl2", ",", 
+         RowBox[{"sqmetemp", "=", "0"}], ",", 
+         RowBox[{"p1v", "=", "k1vec"}], ",", 
+         RowBox[{"p2v", "=", "k2vec"}], ",", 
+         RowBox[{"p3v", "=", "k3vec"}], ",", 
+         RowBox[{"p4v", "=", "k4vec"}], ",", 
+         RowBox[{"p5v", "=", "k5vec"}], ",", "sexpr", ",", "abbr"}], "}"}], 
+       ",", "\[IndentingNewLine]", 
+       RowBox[{"(*", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"**", "**"}], "**"}], "**"}], "******)"}], 
+       "\[IndentingNewLine]", 
+       RowBox[{
+        RowBox[{"Print", "[", 
+         RowBox[{"\"\<kT3_max = \>\"", ",", " ", 
+          RowBox[{"(", 
+           RowBox[{"kT3condition", "/.", 
+            RowBox[{"{", 
+             RowBox[{
+              RowBox[{"rS", "\[Rule]", " ", "rrS"}], ",", 
+              RowBox[{"MH", "\[Rule]", " ", "mh"}]}], "}"}]}], ")"}], ",", 
+          "\"\<\\n\>\""}], "]"}], ";", "\[IndentingNewLine]", 
+        RowBox[{"If", " ", "[", 
+         RowBox[{
+          RowBox[{"rkT3", ">", " ", 
+           RowBox[{"(", 
+            RowBox[{"kT3", "/.", 
+             RowBox[{"(", 
+              RowBox[{"kT3condition", "/.", 
+               RowBox[{"{", 
+                RowBox[{
+                 RowBox[{"rS", "\[Rule]", " ", "rrS"}], ",", 
+                 RowBox[{"MH", "\[Rule]", " ", "mh"}]}], "}"}]}], ")"}]}], 
+            ")"}]}], ",", 
+          RowBox[{
+          "Print", "[", " ", 
+           "\"\<UNPHYSICAL kT3. kT3 should be less than kT3_max!!!\>\"", 
+           "]"}]}], "]"}], ";", "\[IndentingNewLine]", 
+        RowBox[{"If", "[", 
+         RowBox[{
+          RowBox[{"rkT4", "<", "0"}], ",", 
+          RowBox[{
+          "Print", "[", "\"\<UNPHYSICAL kT4, kT4 should be positive!!!\>\"", 
+           "]"}]}], "]"}], ";", "\[IndentingNewLine]", 
+        RowBox[{"rl1", "=", 
+         RowBox[{"{", 
+          RowBox[{
+           RowBox[{"rS", "\[Rule]", " ", "rrS"}], ",", 
+           RowBox[{"kT3", "\[Rule]", " ", "rkT3"}], ",", 
+           RowBox[{"kT4", "\[Rule]", "rkT4"}], ",", 
+           RowBox[{"\[Eta]4", "\[Rule]", " ", "r\[Eta]4"}], ",", 
+           RowBox[{"\[Eta]3", "\[Rule]", "r\[Eta]3"}], ",", 
+           RowBox[{"\[Phi]3", "\[Rule]", " ", "r\[Phi]3"}], ",", 
+           RowBox[{"\[Phi]4", "\[Rule]", " ", "r\[Phi]4"}], ",", 
+           RowBox[{"MH2", "\[Rule]", " ", 
+            RowBox[{"mh", "^", "2"}]}], ",", 
+           RowBox[{"MH", "\[Rule]", " ", "mh"}]}], "}"}]}], ";", 
+        "\[IndentingNewLine]", 
+        RowBox[{"p1v", "=", 
+         RowBox[{
+          RowBox[{"p1v", "/.", "vecsubetaphi"}], "//.", "rl1"}]}], ";", 
+        "\[IndentingNewLine]", 
+        RowBox[{"p2v", "=", 
+         RowBox[{
+          RowBox[{"p2v", "/.", "vecsubetaphi"}], "//.", "rl1"}]}], ";", 
+        "\[IndentingNewLine]", 
+        RowBox[{"p3v", "=", 
+         RowBox[{
+          RowBox[{"p3v", "/.", "vecsubetaphi"}], "//.", "rl1"}]}], ";", 
+        "\[IndentingNewLine]", 
+        RowBox[{"p4v", "=", 
+         RowBox[{
+          RowBox[{"p4v", "/.", "vecsubetaphi"}], "//.", "rl1"}]}], ";", 
+        "\[IndentingNewLine]", 
+        RowBox[{"p5v", "=", 
+         RowBox[{
+          RowBox[{"p5v", "/.", "vecsubetaphi"}], "//.", "rl1"}]}], ";", 
+        "\[IndentingNewLine]", 
+        RowBox[{"Print", "[", 
+         RowBox[{"\"\<Four Momenta : \\n\>\"", ",", 
+          RowBox[{"MatrixForm", "[", 
+           RowBox[{
+            RowBox[{"{", 
+             RowBox[{
+              RowBox[{"p1", "\[Rule]", " ", "p1v"}], ",", 
+              RowBox[{"p2", "\[Rule]", " ", "p2v"}], ",", 
+              RowBox[{"p3", "\[Rule]", " ", "p3v"}], ",", 
+              RowBox[{"p4", "\[Rule]", " ", "p4v"}], ",", 
+              RowBox[{"p5", "\[Rule]", " ", "p5v"}]}], "}"}], "//", "N"}], 
+           "]"}], ",", "\"\<\\n\>\""}], "]"}], ";", "\[IndentingNewLine]", 
+        RowBox[{"Print", "[", 
+         RowBox[{
+         "\"\<Check 4 momentum conservation: p3+p4+p5 -p1 -p2 =0 :  \>\"", 
+          ",", " ", 
+          RowBox[{
+          "p3v", " ", "+", " ", "p4v", " ", "+", "p5v", "  ", "-", "p1v", " ",
+            "-", "p2v"}]}], "]"}], ";", "\[IndentingNewLine]", 
+        RowBox[{"If", "[", 
+         RowBox[{
+          RowBox[{
+           RowBox[{"Abs", "[", 
+            RowBox[{"Total", "[", 
+             RowBox[{
+             "p3v", " ", "+", " ", "p4v", " ", "+", "p5v", "  ", "-", "p1v", 
+              " ", "-", "p2v"}], " ", "]"}], "]"}], ">", 
+           RowBox[{"10", "^", 
+            RowBox[{"-", "10"}]}]}], ",", 
+          RowBox[{
+          "Print", "[", 
+           "\"\<Energy-Momentum NOT CONSERVED !!!, TRY AGAIN.\>\"", "]"}], 
+          ",", " ", 
+          RowBox[{
+          "Print", "[", "\"\<MOMENTUM IS CONSERVED, ALL IS WELL!\>\"", 
+           "]"}]}], "]"}], ";", "\[IndentingNewLine]", 
+        RowBox[{"rl2", " ", "=", " ", 
+         RowBox[{"{", 
+          RowBox[{
+           RowBox[{"S", "\[Rule]", " ", "SS"}], ",", 
+           RowBox[{"T", "\[Rule]", " ", "TT"}], ",", 
+           RowBox[{"U", "\[Rule]", " ", "UU"}], ",", 
+           RowBox[{"T24", "\[Rule]", " ", "TT24"}], ",", 
+           RowBox[{"T14", "\[Rule]", " ", "TT14"}], ",", 
+           RowBox[{"S34", "\[Rule]", " ", "SS34"}], ",", " ", 
+           RowBox[{
+            RowBox[{"Sqrt", "[", "S", "]"}], "\[Rule]", " ", 
+            RowBox[{"Sqrt", "[", "SS", "]"}]}], ",", 
+           RowBox[{
+            RowBox[{"Sqrt", "[", "S34", "]"}], "\[Rule]", " ", 
+            RowBox[{"Sqrt", "[", "SS34", "]"}]}], ",", 
+           RowBox[{
+            RowBox[{"Tan", "[", "\[Phi]5", "]"}], "\[Rule]", " ", 
+            RowBox[{
+             RowBox[{"p5v", "[", 
+              RowBox[{"[", "2", "]"}], "]"}], "/", 
+             RowBox[{"p5v", "[", 
+              RowBox[{"[", "3", "]"}], "]"}]}]}], ",", 
+           RowBox[{"kT5", "\[Rule]", " ", 
+            RowBox[{"Sqrt", "[", 
+             RowBox[{
+              RowBox[{
+               RowBox[{"p5v", "[", 
+                RowBox[{"[", "2", "]"}], "]"}], "^", "2"}], " ", "+", 
+              RowBox[{
+               RowBox[{"p5v", "[", 
+                RowBox[{"[", "3", "]"}], "]"}], "^", "2"}]}], "]"}]}]}], 
+          "}"}]}], ";", " ", 
+        RowBox[{"rl2", "/.", "rl1"}]}]}], "]"}]}], ";"}], "*)"}]}]], "Input",
+ CellChangeTimes->{{3.774012943123294*^9, 3.774013017190256*^9}, 
+   3.7754950381133223`*^9},ExpressionUUID->"ab581e1f-c5c9-4f7d-9a00-\
+c83f2a5d582b"],
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"kT3condition", " ", "=", " ", 
+   RowBox[{"{", 
+    RowBox[{"kT3", "\[Rule]", 
+     RowBox[{
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"-", 
+         RowBox[{"MH", "^", "2"}]}], "+", 
+        RowBox[{"rS", "^", "2"}]}], ")"}], "/", 
+      RowBox[{"(", 
+       RowBox[{"2", "*", "rS"}], ")"}]}]}], "}"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"sprec", "=", "60"}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{
+   RowBox[{
+    RowBox[{"testOutputPS", "[", 
+     RowBox[{
+     "rrS_", ",", "rkT3_", ",", "r\[Eta]3_", ",", "r\[Phi]3_", ",", 
+      "r\[Eta]4_", ",", "r\[Phi]4_", ",", "mh_"}], "]"}], ":=", 
+    RowBox[{"Block", "[", 
+     RowBox[{
+      RowBox[{"{", 
+       RowBox[{"rkT4", "=", 
+        RowBox[{"SetPrecision", "[", 
+         RowBox[{
+          RowBox[{
+           RowBox[{"(", 
+            RowBox[{
+             RowBox[{"-", 
+              RowBox[{"mh", "^", "2"}]}], "-", 
+             RowBox[{"rrS", "^", "2"}], "+", 
+             RowBox[{
+              RowBox[{"Sqrt", "[", "2", "]"}], "*", "rrS", "*", 
+              RowBox[{"Sqrt", "[", 
+               RowBox[{
+                RowBox[{"2", "*", 
+                 RowBox[{"mh", "^", "2"}]}], "+", 
+                RowBox[{"rkT3", "^", "2"}], "+", 
+                RowBox[{
+                 RowBox[{"rkT3", "^", "2"}], "*", 
+                 RowBox[{"Cosh", "[", 
+                  RowBox[{"2", "*", "r\[Eta]3"}], "]"}]}]}], "]"}]}]}], ")"}],
+            "/", 
+           RowBox[{"(", 
+            RowBox[{
+             RowBox[{
+              RowBox[{"-", "2"}], "*", "rkT3", "*", 
+              RowBox[{"Cos", "[", 
+               RowBox[{"r\[Phi]3", "-", "r\[Phi]4"}], "]"}]}], "-", 
+             RowBox[{"2", "*", "rrS", "*", 
+              RowBox[{"Cosh", "[", "r\[Eta]4", "]"}]}], "+", 
+             RowBox[{
+              RowBox[{"Sqrt", "[", "2", "]"}], "*", 
+              RowBox[{"Sqrt", "[", 
+               RowBox[{
+                RowBox[{"2", "*", 
+                 RowBox[{"mh", "^", "2"}]}], "+", 
+                RowBox[{"rkT3", "^", "2"}], "+", 
+                RowBox[{
+                 RowBox[{"rkT3", "^", "2"}], "*", 
+                 RowBox[{"Cosh", "[", 
+                  RowBox[{"2", "*", "r\[Eta]3"}], "]"}]}]}], "]"}], "*", 
+              RowBox[{"Cosh", "[", "r\[Eta]4", "]"}]}], "-", 
+             RowBox[{"2", "*", "rkT3", "*", 
+              RowBox[{"Sinh", "[", "r\[Eta]3", "]"}], "*", 
+              RowBox[{"Sinh", "[", "r\[Eta]4", "]"}]}]}], ")"}]}], ",", 
+          "sprec"}], "]"}]}], "}"}], ",", "rkT4"}], "]"}]}], ";"}], 
+  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"OutputPS", "[", 
+   RowBox[{
+   "rrS_", ",", "rkT3_", ",", "r\[Eta]3_", ",", "r\[Phi]3_", ",", "r\[Eta]4_",
+     ",", "r\[Phi]4_", ",", "mh_"}], "]"}], ":=", 
+  RowBox[{"Block", "[", 
+   RowBox[{
+    RowBox[{"{", 
+     RowBox[{
+      RowBox[{"rkT4", "=", 
+       RowBox[{"SetPrecision", "[", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"mh", "^", "2"}], "+", 
+            RowBox[{"rrS", "*", 
+             RowBox[{"(", 
+              RowBox[{"rrS", "-", 
+               RowBox[{
+                RowBox[{"Sqrt", "[", "2", "]"}], "*", 
+                RowBox[{"Sqrt", "[", 
+                 RowBox[{
+                  RowBox[{"2", "*", 
+                   RowBox[{"mh", "^", "2"}]}], "+", 
+                  RowBox[{"rkT3", "^", "2"}], "+", 
+                  RowBox[{
+                   RowBox[{"rkT3", "^", "2"}], "*", 
+                   RowBox[{"Cosh", "[", 
+                    RowBox[{"2", "*", "r\[Eta]3"}], "]"}]}]}], "]"}]}]}], 
+              ")"}]}]}], ")"}], "/", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"2", "*", "rrS"}], "-", 
+               RowBox[{
+                RowBox[{"Sqrt", "[", "2", "]"}], "*", 
+                RowBox[{"Sqrt", "[", 
+                 RowBox[{
+                  RowBox[{"2", "*", 
+                   RowBox[{"mh", "^", "2"}]}], "+", 
+                  RowBox[{"rkT3", "^", "2"}], "+", 
+                  RowBox[{
+                   RowBox[{"rkT3", "^", "2"}], "*", 
+                   RowBox[{"Cosh", "[", 
+                    RowBox[{"2", "*", "r\[Eta]3"}], "]"}]}]}], "]"}]}]}], 
+              ")"}], "*", 
+             RowBox[{"Cosh", "[", "r\[Eta]4", "]"}]}], "+", 
+            RowBox[{"2", "*", "rkT3", "*", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Cos", "[", 
+                RowBox[{"r\[Phi]3", "-", "r\[Phi]4"}], "]"}], "+", 
+               RowBox[{
+                RowBox[{"Sinh", "[", "r\[Eta]3", "]"}], "*", 
+                RowBox[{"Sinh", "[", "r\[Eta]4", "]"}]}]}], ")"}]}]}], 
+           ")"}]}], ",", "sprec"}], "]"}]}], 
+      RowBox[{"(*", 
+       RowBox[{"SetPrecision", "[", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"-", "2"}], "*", 
+             RowBox[{"rkT3", "^", "2"}], "*", "rrS"}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Sqrt", "[", 
+                RowBox[{
+                 RowBox[{"rkT3", "^", "2"}], "+", 
+                 RowBox[{"mh", "^", "2"}]}], "]"}], "-", "rrS"}], ")"}], "*", 
+             
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"mh", "^", "2"}], "-", 
+               RowBox[{"rrS", "^", "2"}]}], ")"}]}], "+", 
+            RowBox[{"rkT3", "*", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"mh", "^", "2"}], "+", 
+               RowBox[{"rrS", "*", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "2"}], "*", 
+                   RowBox[{"Sqrt", "[", 
+                    RowBox[{
+                    RowBox[{"rkT3", "^", "2"}], "+", 
+                    RowBox[{"mh", "^", "2"}]}], "]"}]}], "+", "rrS"}], 
+                 ")"}]}]}], ")"}], "*", 
+             RowBox[{"Cos", "[", 
+              RowBox[{"r\[Phi]3", "-", "r\[Phi]4"}], "]"}]}]}], ")"}], "/", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"-", 
+             RowBox[{"rkT3", "^", "2"}]}], "-", 
+            RowBox[{"2", "*", 
+             RowBox[{"mh", "^", "2"}]}], "+", 
+            RowBox[{"2", "*", 
+             RowBox[{"rrS", "^", "2"}]}], "+", 
+            RowBox[{
+             RowBox[{"rkT3", "^", "2"}], "*", 
+             RowBox[{"Cos", "[", 
+              RowBox[{
+               RowBox[{"2", "*", "r\[Phi]3"}], "-", 
+               RowBox[{"2", "*", "r\[Phi]4"}]}], "]"}]}], "+", 
+            RowBox[{"4", "*", "rkT3", "*", "rrS", "*", 
+             RowBox[{"Cos", "[", 
+              RowBox[{"r\[Phi]3", "-", "r\[Phi]4"}], "]"}]}]}], ")"}]}], ",", 
+         "sprec"}], "]"}], "*)"}], ",", 
+      RowBox[{"mh2", "=", 
+       RowBox[{"SetPrecision", "[", 
+        RowBox[{
+         RowBox[{"mh", "^", "2"}], ",", "sprec"}], "]"}]}], ",", 
+      RowBox[{"(*", 
+       RowBox[{
+        RowBox[{"p4x", "=", 
+         RowBox[{"p4vec3", "[", 
+          RowBox[{"[", "1", "]"}], "]"}]}], ",", 
+        RowBox[{"p4y", "=", 
+         RowBox[{"p4vec3", "[", 
+          RowBox[{"[", "2", "]"}], "]"}]}], ",", 
+        RowBox[{"p4z", "=", 
+         RowBox[{"p4vec3", "[", 
+          RowBox[{"[", "3", "]"}], "]"}]}], ",", "\[IndentingNewLine]", 
+        RowBox[{"p5x", "=", 
+         RowBox[{"p5vec3", "[", 
+          RowBox[{"[", "1", "]"}], "]"}]}], ",", 
+        RowBox[{"p5y", "=", 
+         RowBox[{"p5vec3", "[", 
+          RowBox[{"[", "2", "]"}], "]"}]}], ",", 
+        RowBox[{"p5z", "=", 
+         RowBox[{"p5vec3", "[", 
+          RowBox[{"[", "3", "]"}], "]"}]}], ",", "\[IndentingNewLine]", 
+        RowBox[{"E4", "=", 
+         RowBox[{"mf3", "[", "p4vec3", "]"}]}], ",", 
+        RowBox[{"E5", "=", 
+         RowBox[{"mf3", "[", "p5vec3", "]"}]}], ",", 
+        RowBox[{"E3", "=", 
+         RowBox[{"Sqrt", "[", 
+          RowBox[{
+           RowBox[{"MH", "^", "2"}], "+", 
+           RowBox[{
+            RowBox[{"mf3", "[", 
+             RowBox[{"p4vec3", "+", "p5vec3"}], "]"}], "^", "2"}]}], "]"}]}], 
+        ","}], "*)"}], "\[IndentingNewLine]", 
+      RowBox[{"SS", "=", 
+       RowBox[{"SetPrecision", "[", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"MyPair", "[", 
+           RowBox[{
+            RowBox[{"k1vec", "+", "k2vec"}], ",", 
+            RowBox[{"k1vec", "+", "k2vec"}]}], "]"}], "/.", "vecsubetaphi"}], 
+         ",", "sprec"}], "]"}]}], ",", 
+      RowBox[{"TT", "=", 
+       RowBox[{"SetPrecision", "[", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"MyPair", "[", 
+           RowBox[{
+            RowBox[{"k1vec", "-", "k3vec"}], ",", 
+            RowBox[{"k1vec", "-", "k3vec"}]}], "]"}], "/.", "vecsubetaphi"}], 
+         ",", "sprec"}], "]"}]}], ",", 
+      RowBox[{"UU", "=", 
+       RowBox[{"SetPrecision", "[", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"MyPair", "[", 
+           RowBox[{
+            RowBox[{"k2vec", "-", "k3vec"}], ",", 
+            RowBox[{"k2vec", "-", "k3vec"}]}], "]"}], "/.", "vecsubetaphi"}], 
+         ",", "sprec"}], "]"}]}], ",", "\[IndentingNewLine]", 
+      RowBox[{"TT14", "=", 
+       RowBox[{"SetPrecision", "[", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"MyPair", "[", 
+           RowBox[{
+            RowBox[{"k1vec", "-", "k4vec"}], ",", 
+            RowBox[{"k1vec", "-", "k4vec"}]}], "]"}], "/.", "vecsubetaphi"}], 
+         ",", "sprec"}], "]"}]}], ",", "\[IndentingNewLine]", 
+      RowBox[{"TT24", "=", 
+       RowBox[{"SetPrecision", "[", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"MyPair", "[", 
+           RowBox[{
+            RowBox[{"k2vec", "-", "k4vec"}], ",", 
+            RowBox[{"k2vec", "-", "k4vec"}]}], "]"}], "/.", "vecsubetaphi"}], 
+         ",", "sprec"}], "]"}]}], ",", "\[IndentingNewLine]", 
+      RowBox[{"(*", 
+       RowBox[{
+        RowBox[{"TT15", "=", 
+         RowBox[{"MyPair", "[", 
+          RowBox[{
+           RowBox[{"k1vec", "-", "k5vec"}], ",", 
+           RowBox[{"k1vec", "-", "k5vec"}]}], "]"}]}], ",", 
+        "\[IndentingNewLine]", 
+        RowBox[{"TT25", "=", 
+         RowBox[{"MyPair", "[", 
+          RowBox[{
+           RowBox[{"k2vec", "-", "k5vec"}], ",", 
+           RowBox[{"k2vec", "-", "k5vec"}]}], "]"}]}], ","}], "*)"}], 
+      "\[IndentingNewLine]", 
+      RowBox[{"SS34", "=", 
+       RowBox[{"SetPrecision", "[", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"MyPair", "[", 
+           RowBox[{
+            RowBox[{"k3vec", "+", "k4vec"}], ",", 
+            RowBox[{"k3vec", "+", "k4vec"}]}], "]"}], "/.", "vecsubetaphi"}], 
+         ",", "sprec"}], "]"}]}], ",", "\[IndentingNewLine]", 
+      RowBox[{"SS35", "=", 
+       RowBox[{"SetPrecision", "[", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"MyPair", "[", 
+           RowBox[{
+            RowBox[{"k3vec", "+", "k5vec"}], ",", 
+            RowBox[{"k3vec", "+", "k5vec"}]}], "]"}], "/.", "vecsubetaphi"}], 
+         ",", "sprec"}], "]"}]}], ",", "\[IndentingNewLine]", "rl1", ",", 
+      "rl1a", ",", "rl2", ",", "rl3", ",", 
+      RowBox[{"sqmetemp", "=", 
+       RowBox[{"SetPrecision", "[", 
+        RowBox[{"0", ",", "sprec"}], "]"}]}], ",", 
+      RowBox[{"p1v", "=", 
+       RowBox[{"SetPrecision", "[", 
+        RowBox[{"k1vec", ",", "sprec"}], "]"}]}], ",", 
+      RowBox[{"p2v", "=", 
+       RowBox[{"SetPrecision", "[", 
+        RowBox[{"k2vec", ",", "sprec"}], "]"}]}], ",", 
+      RowBox[{"p3v", "=", 
+       RowBox[{"SetPrecision", "[", 
+        RowBox[{"k3vec", ",", "sprec"}], "]"}]}], ",", 
+      RowBox[{"p4v", "=", 
+       RowBox[{"SetPrecision", "[", 
+        RowBox[{"k4vec", ",", "sprec"}], "]"}]}], ",", 
+      RowBox[{"p5v", "=", 
+       RowBox[{"SetPrecision", "[", 
+        RowBox[{"k5vec", ",", "sprec"}], "]"}]}], ",", "sexpr", ",", "abbr", 
+      ",", "ll1", ",", "ll2"}], "}"}], ",", "\[IndentingNewLine]", 
+    RowBox[{"(*", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"**", "**"}], "**"}], "**"}], "******)"}], 
+    "\[IndentingNewLine]", 
+    RowBox[{
+     RowBox[{"Print", "[", 
+      RowBox[{"\"\<kT3_max = \>\"", ",", " ", 
+       RowBox[{"(", 
+        RowBox[{"kT3condition", "/.", 
+         RowBox[{"{", 
+          RowBox[{
+           RowBox[{"rS", "\[Rule]", " ", "rrS"}], ",", 
+           RowBox[{"MH", "\[Rule]", " ", "mh"}]}], "}"}]}], ")"}], ",", 
+       "\"\<\\n\>\""}], "]"}], ";", "\[IndentingNewLine]", 
+     RowBox[{"If", " ", "[", 
+      RowBox[{
+       RowBox[{"rkT3", ">", " ", 
+        RowBox[{"(", 
+         RowBox[{"kT3", "/.", 
+          RowBox[{"(", 
+           RowBox[{"kT3condition", "/.", 
+            RowBox[{"{", 
+             RowBox[{
+              RowBox[{"rS", "\[Rule]", " ", "rrS"}], ",", 
+              RowBox[{"MH", "\[Rule]", " ", "mh"}]}], "}"}]}], ")"}]}], 
+         ")"}]}], ",", 
+       RowBox[{
+       "Print", "[", " ", 
+        "\"\<UNPHYSICAL kT3. kT3 should be less than kT3_max!!!\>\"", "]"}]}],
+       "]"}], ";", "\[IndentingNewLine]", 
+     RowBox[{"If", "[", 
+      RowBox[{
+       RowBox[{"rkT4", "<", "0"}], ",", 
+       RowBox[{
+       "Print", "[", "\"\<UNPHYSICAL kT4, kT4 should be positive!!!\>\"", 
+        "]"}]}], "]"}], ";", "\[IndentingNewLine]", 
+     RowBox[{"rl1", "=", 
+      RowBox[{"SetPrecision", "[", 
+       RowBox[{
+        RowBox[{"{", 
+         RowBox[{
+          RowBox[{"rS", "\[Rule]", " ", "rrS"}], ",", 
+          RowBox[{"kT3", "\[Rule]", " ", "rkT3"}], ",", 
+          RowBox[{"kT4", "\[Rule]", "rkT4"}], ",", 
+          RowBox[{"\[Eta]4", "\[Rule]", " ", "r\[Eta]4"}], ",", 
+          RowBox[{"\[Eta]3", "\[Rule]", "r\[Eta]3"}], ",", 
+          RowBox[{"\[Phi]3", "\[Rule]", " ", "r\[Phi]3"}], ",", 
+          RowBox[{"\[Phi]4", "\[Rule]", " ", "r\[Phi]4"}], ",", 
+          RowBox[{"MH2", "\[Rule]", " ", 
+           RowBox[{"mh", "^", "2"}]}], ",", 
+          RowBox[{"MH", "\[Rule]", " ", "mh"}]}], "}"}], ",", "sprec"}], 
+       "]"}]}], ";", "\[IndentingNewLine]", 
+     RowBox[{"p1v", "=", 
+      RowBox[{"SetPrecision", "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"p1v", "/.", "vecsubetaphi"}], "//.", "rl1"}], ",", 
+        "sprec"}], "]"}]}], ";", "\[IndentingNewLine]", 
+     RowBox[{"p2v", "=", 
+      RowBox[{"SetPrecision", "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"p2v", "/.", "vecsubetaphi"}], "//.", "rl1"}], ",", 
+        "sprec"}], "]"}]}], ";", "\[IndentingNewLine]", 
+     RowBox[{"p3v", "=", 
+      RowBox[{"SetPrecision", "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"p3v", "/.", "vecsubetaphi"}], "//.", "rl1"}], ",", 
+        "sprec"}], "]"}]}], ";", "\[IndentingNewLine]", 
+     RowBox[{"p4v", "=", 
+      RowBox[{"SetPrecision", "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"p4v", "/.", "vecsubetaphi"}], "//.", "rl1"}], ",", 
+        "sprec"}], "]"}]}], ";", "\[IndentingNewLine]", 
+     RowBox[{"p5v", "=", 
+      RowBox[{"SetPrecision", "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"p5v", "/.", "vecsubetaphi"}], "//.", "rl1"}], ",", 
+        "sprec"}], "]"}]}], ";", "\[IndentingNewLine]", 
+     RowBox[{"Print", "[", 
+      RowBox[{"\"\<Four Momenta : \\n\>\"", ",", 
+       RowBox[{"MatrixForm", "[", 
+        RowBox[{
+         RowBox[{"{", 
+          RowBox[{
+           RowBox[{"p1", "\[Rule]", " ", "p1v"}], ",", 
+           RowBox[{"p2", "\[Rule]", " ", "p2v"}], ",", 
+           RowBox[{"p3", "\[Rule]", " ", "p3v"}], ",", 
+           RowBox[{"p4", "\[Rule]", " ", "p4v"}], ",", 
+           RowBox[{"p5", "\[Rule]", " ", "p5v"}]}], "}"}], "//", "N"}], "]"}],
+        ",", "\"\<\\n\>\""}], "]"}], ";", "\[IndentingNewLine]", 
+     "\[IndentingNewLine]", 
+     RowBox[{"Print", "[", 
+      RowBox[{
+      "\"\<Check 4 momentum conservation: p3+p4+p5 -p1 -p2 =0 :  \>\"", ",", 
+       " ", 
+       RowBox[{
+       "p3v", " ", "+", " ", "p4v", " ", "+", "p5v", "  ", "-", "p1v", " ", 
+        "-", "p2v"}]}], "]"}], ";", "\[IndentingNewLine]", 
+     RowBox[{"If", "[", 
+      RowBox[{
+       RowBox[{
+        RowBox[{"Abs", "[", 
+         RowBox[{"Total", "[", 
+          RowBox[{
+          "p3v", " ", "+", " ", "p4v", " ", "+", "p5v", "  ", "-", "p1v", " ",
+            "-", "p2v"}], " ", "]"}], "]"}], ">", 
+        RowBox[{"10", "^", 
+         RowBox[{"-", "10"}]}]}], ",", 
+       RowBox[{
+       "Print", "[", "\"\<Energy-Momentum NOT CONSERVED !!!, TRY AGAIN.\>\"", 
+        "]"}], ",", " ", 
+       RowBox[{
+       "Print", "[", "\"\<MOMENTUM IS CONSERVED, ALL IS WELL!\>\"", "]"}]}], 
+      "]"}], ";", "\[IndentingNewLine]", 
+     RowBox[{"rl2", " ", "=", " ", 
+      RowBox[{"{", 
+       RowBox[{
+        RowBox[{"kkT3", "\[Rule]", " ", "rkT3"}], ",", 
+        RowBox[{"kkT4", "\[Rule]", " ", "rkT4"}], ",", 
+        RowBox[{"S", "\[Rule]", " ", "SS"}], ",", 
+        RowBox[{"T", "\[Rule]", " ", "TT"}], ",", 
+        RowBox[{"U", "\[Rule]", " ", "UU"}], ",", 
+        RowBox[{"T24", "\[Rule]", " ", "TT24"}], ",", 
+        RowBox[{"T14", "\[Rule]", " ", "TT14"}], ",", 
+        RowBox[{"S34", "\[Rule]", " ", "SS34"}], ",", " ", 
+        RowBox[{
+         RowBox[{"Sqrt", "[", "S", "]"}], "\[Rule]", " ", 
+         RowBox[{"Sqrt", "[", "SS", "]"}]}], ",", 
+        RowBox[{
+         RowBox[{"Sqrt", "[", "S34", "]"}], "\[Rule]", " ", 
+         RowBox[{"Sqrt", "[", "SS34", "]"}]}], ",", 
+        RowBox[{
+         RowBox[{"Tan", "[", "\[Phi]5", "]"}], "\[Rule]", " ", 
+         RowBox[{
+          RowBox[{"p5v", "[", 
+           RowBox[{"[", "2", "]"}], "]"}], "/", 
+          RowBox[{"p5v", "[", 
+           RowBox[{"[", "3", "]"}], "]"}]}]}], ",", 
+        RowBox[{"kT5", "\[Rule]", " ", 
+         RowBox[{"Sqrt", "[", 
+          RowBox[{
+           RowBox[{
+            RowBox[{"p5v", "[", 
+             RowBox[{"[", "2", "]"}], "]"}], "^", "2"}], " ", "+", 
+           RowBox[{
+            RowBox[{"p5v", "[", 
+             RowBox[{"[", "3", "]"}], "]"}], "^", "2"}]}], "]"}]}], ",", 
+        RowBox[{
+         RowBox[{"Sqrt", "[", "S35", "]"}], "\[Rule]", " ", 
+         RowBox[{"Sqrt", "[", "SS35", "]"}]}]}], "}"}]}], ";", " ", 
+     "\[IndentingNewLine]", "\[IndentingNewLine]", 
+     RowBox[{"rl3", "=", " ", 
+      RowBox[{"{", 
+       RowBox[{
+       "kkT3", ",", "kkT4", ",", "S", ",", "T", ",", "U", ",", "T24", ",", 
+        "T14", ",", "S34", ",", " ", 
+        RowBox[{"Sqrt", "[", "S", "]"}], ",", 
+        RowBox[{"Sqrt", "[", "S34", "]"}], ",", 
+        RowBox[{"Tan", "[", "\[Phi]5", "]"}], ",", "kT5", ",", 
+        RowBox[{"Sqrt", "[", "S35", "]"}]}], "}"}]}], ";", 
+     RowBox[{"(*", 
+      RowBox[{
+       RowBox[{"Export", "[", 
+        RowBox[{"\"\<PS.dat\>\"", ",", 
+         RowBox[{"N", "[", 
+          RowBox[{"{", 
+           RowBox[{
+            RowBox[{"AppendTo", "[", 
+             RowBox[{"p1v", ",", 
+              RowBox[{"Sqrt", "[", 
+               RowBox[{"MyPair", "[", 
+                RowBox[{"p1v", ",", "p1v"}], "]"}], "]"}]}], "]"}], ",", 
+            RowBox[{"AppendTo", "[", 
+             RowBox[{"p2v", ",", 
+              RowBox[{"Sqrt", "[", 
+               RowBox[{"MyPair", "[", 
+                RowBox[{"p2v", ",", "p2v"}], "]"}], "]"}]}], "]"}], ",", 
+            RowBox[{"AppendTo", "[", 
+             RowBox[{"p3v", ",", 
+              RowBox[{"Sqrt", "[", 
+               RowBox[{"MyPair", "[", 
+                RowBox[{"p3v", ",", "p3v"}], "]"}], "]"}]}], "]"}], ",", 
+            RowBox[{"AppendTo", "[", 
+             RowBox[{"p4v", ",", 
+              RowBox[{"Sqrt", "[", 
+               RowBox[{"MyPair", "[", 
+                RowBox[{"p4v", ",", "p4v"}], "]"}], "]"}]}], "]"}], ",", 
+            RowBox[{"AppendTo", "[", 
+             RowBox[{"p5v", ",", 
+              RowBox[{"Sqrt", "[", 
+               RowBox[{"MyPair", "[", 
+                RowBox[{"p5v", ",", "p5v"}], "]"}], "]"}]}], "]"}]}], "}"}], 
+          "]"}]}], "]"}], ";"}], "*)"}], 
+     RowBox[{"(*", 
+      RowBox[{
+       RowBox[{"ll1", "=", 
+        RowBox[{"SetPrecision", "[", 
+         RowBox[{
+          RowBox[{"N", "[", 
+           RowBox[{"{", 
+            RowBox[{
+             RowBox[{"AppendTo", "[", 
+              RowBox[{"p1v", ",", 
+               RowBox[{"Re", "[", 
+                RowBox[{"Sqrt", "[", 
+                 RowBox[{"MyPair", "[", 
+                  RowBox[{"p1v", ",", "p1v"}], "]"}], "]"}], "]"}]}], "]"}], 
+             ",", 
+             RowBox[{"AppendTo", "[", 
+              RowBox[{"p2v", ",", 
+               RowBox[{"Re", "[", 
+                RowBox[{"Sqrt", "[", 
+                 RowBox[{"MyPair", "[", 
+                  RowBox[{"p2v", ",", "p2v"}], "]"}], "]"}], "]"}]}], "]"}], 
+             ",", 
+             RowBox[{"AppendTo", "[", 
+              RowBox[{"p3v", ",", 
+               RowBox[{"Re", "[", 
+                RowBox[{"Sqrt", "[", 
+                 RowBox[{"MyPair", "[", 
+                  RowBox[{"p3v", ",", "p3v"}], "]"}], "]"}], "]"}]}], "]"}], 
+             ",", 
+             RowBox[{"AppendTo", "[", 
+              RowBox[{"p4v", ",", 
+               RowBox[{"Re", "[", 
+                RowBox[{"Sqrt", "[", 
+                 RowBox[{"MyPair", "[", 
+                  RowBox[{"p4v", ",", "p4v"}], "]"}], "]"}], "]"}]}], "]"}], 
+             ",", 
+             RowBox[{"AppendTo", "[", 
+              RowBox[{"p5v", ",", 
+               RowBox[{"Re", "[", 
+                RowBox[{"Sqrt", "[", 
+                 RowBox[{"MyPair", "[", 
+                  RowBox[{"p5v", ",", "p5v"}], "]"}], "]"}], "]"}]}], "]"}]}],
+             "}"}], "]"}], ",", "sprec"}], "]"}]}], ";"}], "*)"}], 
+     RowBox[{"ll1", "=", 
+      RowBox[{"SetPrecision", "[", 
+       RowBox[{
+        RowBox[{"N", "[", 
+         RowBox[{"{", 
+          RowBox[{
+           RowBox[{"AppendTo", "[", 
+            RowBox[{"p1v", ",", 
+             RowBox[{"Re", "[", 
+              RowBox[{"Sqrt", "[", 
+               RowBox[{"MyPair", "[", 
+                RowBox[{"p1v", ",", "p1v"}], "]"}], "]"}], "]"}]}], "]"}], 
+           ",", 
+           RowBox[{"AppendTo", "[", 
+            RowBox[{"p2v", ",", 
+             RowBox[{"Re", "[", 
+              RowBox[{"Sqrt", "[", 
+               RowBox[{"MyPair", "[", 
+                RowBox[{"p2v", ",", "p2v"}], "]"}], "]"}], "]"}]}], "]"}], 
+           ",", 
+           RowBox[{"AppendTo", "[", 
+            RowBox[{"p3v", ",", 
+             RowBox[{"Sqrt", "[", 
+              RowBox[{"MyPair", "[", 
+               RowBox[{"p3v", ",", "p3v"}], "]"}], "]"}]}], "]"}], ",", 
+           RowBox[{"AppendTo", "[", 
+            RowBox[{"p4v", ",", 
+             RowBox[{"Sqrt", "[", 
+              RowBox[{"MyPair", "[", 
+               RowBox[{"p4v", ",", "p4v"}], "]"}], "]"}]}], "]"}], ",", 
+           RowBox[{"AppendTo", "[", 
+            RowBox[{"p5v", ",", 
+             RowBox[{"Sqrt", "[", 
+              RowBox[{"MyPair", "[", 
+               RowBox[{"p5v", ",", "p5v"}], "]"}], "]"}]}], "]"}]}], "}"}], 
+         "]"}], ",", "sprec"}], "]"}]}], ";", 
+     RowBox[{"ll2", "=", 
+      RowBox[{"(", 
+       RowBox[{"rl2", "/.", "rl1"}], ")"}]}], ";", "\[IndentingNewLine]", 
+     RowBox[{"Print", "[", 
+      RowBox[{"N", "[", 
+       RowBox[{"ll2", ",", "10"}], "]"}], "]"}], ";", "\[IndentingNewLine]", 
+     RowBox[{"{", 
+      RowBox[{"ll1", ",", 
+       RowBox[{"(", 
+        RowBox[{"rl3", "/.", "ll2"}], ")"}]}], "}"}]}]}], "]"}]}]}], "Input",
+ CellChangeTimes->{{3.774372136548223*^9, 3.7743721388290977`*^9}, {
+  3.775495053660193*^9, 3.775495054534686*^9}},
+ CellLabel->"In[29]:=",ExpressionUUID->"cccbcfb5-f779-4768-8bad-bc93be841f88"],
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", "\[IndentingNewLine]"}]], "Input",
+ CellChangeTimes->{{3.769416382706212*^9, 3.769416403306004*^9}, {
+   3.7694168727346354`*^9, 3.769416881103343*^9}, {3.769420802600919*^9, 
+   3.769420810995673*^9}, {3.770096644875188*^9, 3.770096645965609*^9}, 
+   3.773746114995344*^9, 3.774010932827186*^9, 
+   3.774350202417961*^9},ExpressionUUID->"a5c5e12e-157e-4719-b09d-\
+930d037e0d1b"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{
+   "Importing", " ", "triangle", " ", "scattering", " ", "amplitude", " ", 
+    RowBox[{"w", "/", " ", "PV"}], " ", "coefficients", " ", "analytically", 
+    " ", 
+    RowBox[{"expanded", "."}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{"triangle", " ", "=", " ", 
+    RowBox[{"Import", "[", "\"\<ggHgg_LR_triangle_38diags.m\>\"", "]"}]}], 
+   ";"}]}]], "Input",
+ CellChangeTimes->{{3.76941678968123*^9, 3.769416834146682*^9}, {
+   3.769418270698312*^9, 3.7694182769864492`*^9}, {3.769420598958762*^9, 
+   3.769420642106495*^9}, {3.769421602470723*^9, 3.769421736756125*^9}, {
+   3.77374127963312*^9, 3.77374128280485*^9}, 3.7737414197690268`*^9, {
+   3.774010941769153*^9, 3.774010945328281*^9}, {3.774010984977004*^9, 
+   3.7740110365685997`*^9}, {3.7743503313914537`*^9, 3.774350332864695*^9}},
+ CellLabel->"In[36]:=",ExpressionUUID->"6f54e202-a28b-4a1d-9e81-76bb7154ddaa"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"Importing", " ", "box", " ", "scattering", " ", "amplitudes", " ", 
+    RowBox[{"w", "/", " ", "PV"}], " ", "coefficients", " ", "analytically", 
+    " ", 
+    RowBox[{"expanded", "."}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"box1", " ", "=", " ", 
+     RowBox[{"Import", "[", "\"\<ggHgg_LR_box_1_9diags.m\>\"", "]"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"box2", " ", "=", " ", 
+     RowBox[{"Import", "[", "\"\<ggHgg_LR_box_2_9diags.m\>\"", "]"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"box3", " ", "=", " ", 
+     RowBox[{"Import", "[", "\"\<ggHgg_LR_box_3_9diags.m\>\"", "]"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"box4", " ", "=", " ", 
+     RowBox[{"Import", "[", "\"\<ggHgg_LR_box_4_9diags.m\>\"", "]"}]}], 
+    ";"}]}]}]], "Input",
+ CellChangeTimes->{{3.774011056707362*^9, 3.7740111034424753`*^9}},
+ CellLabel->"In[37]:=",ExpressionUUID->"60913534-eef8-4103-af9a-ab50a0b353b9"],
+
+Cell[BoxData["\[IndentingNewLine]"], "Input",
+ CellChangeTimes->{
+  3.773141712723225*^9},ExpressionUUID->"2239b8d8-532e-4c08-ac3b-\
+e377a166b460"],
+
+Cell[BoxData[
+ RowBox[{"(*", " ", 
+  RowBox[{
+  "Sub", " ", "for", " ", "all", " ", "helicities", " ", "and", " ", "save", 
+   " ", 
+   RowBox[{"them", "."}]}], " ", "*)"}]], "Input",
+ CellChangeTimes->{{3.774351499832851*^9, 
+  3.774351510535021*^9}},ExpressionUUID->"a8edcb3d-289d-4ff2-aab2-\
+1178c47d2c24"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"SetDirectory", "[", "\"\<helicities\>\"", "]"}], ";"}]], "Input",
+ CellLabel->"In[41]:=",ExpressionUUID->"2fbc45e0-5167-407c-a174-583971bd7d06"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Directory", "[", "]"}]], "Input",
+ CellChangeTimes->{{3.774351673653612*^9, 3.774351676437744*^9}},
+ CellLabel->"In[42]:=",ExpressionUUID->"7685320a-c96c-4f66-a42b-1f0a30a78e68"],
+
+Cell[BoxData["\<\"/Users/josegabrielreyes/Documents/Higgs/Mathematica \
+Scripts/ggHgg/FinalSetUp/helicities\"\>"], "Output",
+ CellChangeTimes->{3.7743516767244864`*^9, 3.7743718504005413`*^9, 
+  3.7743761919598207`*^9, 3.7752219466374807`*^9, 3.775227350978853*^9, 
+  3.7754951217016773`*^9},
+ CellLabel->"Out[42]=",ExpressionUUID->"bfbcf21c-cca2-47a8-81bb-f83b15bbc8df"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"++", "++"}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"config", "=", "\"\<++++\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{"1", ",", "1", ",", "1", ",", "1"}], "]"}], ";"}], 
+   "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub1", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box1", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub2", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box2", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub3", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box3", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub4", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box4", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"sumbox", "=", 
+     RowBox[{
+      RowBox[{"bsub1", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub2", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub3", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub4", "[", 
+       RowBox[{"[", "1", "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<box_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "sumbox"}], "]"}], ";"}]}]}]], "Input",
+ CellChangeTimes->{{3.774350335914909*^9, 3.774350382613131*^9}, {
+  3.774350732452187*^9, 3.7743507645220213`*^9}, {3.774351033389183*^9, 
+  3.774351145928581*^9}, {3.774351431336866*^9, 3.774351446708275*^9}, {
+  3.774351483249557*^9, 3.7743514934640923`*^9}, {3.774351550426754*^9, 
+  3.77435169416295*^9}, {3.774351916303782*^9, 3.774352021105199*^9}, {
+  3.774352095583454*^9, 3.7743521131451178`*^9}, {3.774364790080785*^9, 
+  3.774364842486887*^9}, {3.775222153633851*^9, 3.775222168779771*^9}, {
+  3.775495131959234*^9, 3.775495165246623*^9}},
+ CellLabel->"In[43]:=",ExpressionUUID->"7e7f013d-f22f-4c3a-81bd-d58630ecb407"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{"ek1vec", "\[IndentingNewLine]", "ek2vec", \
+"\[IndentingNewLine]", "ek4vec", "\[IndentingNewLine]", "ek5vec"}], "Input",
+ CellChangeTimes->{{3.775495322893921*^9, 3.775495334535952*^9}},
+ CellLabel->"In[53]:=",ExpressionUUID->"6e143612-3c0d-4282-a651-8cad89a3b66b"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox["2"]]}], ",", 
+   RowBox[{"-", 
+    FractionBox["\[ImaginaryI]", 
+     SqrtBox["2"]]}], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.775495486085648*^9},
+ CellLabel->"Out[53]=",ExpressionUUID->"98797b05-90d0-4926-b83f-0fdac2f8507c"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox["2"]]}], ",", 
+   FractionBox["\[ImaginaryI]", 
+    SqrtBox["2"]], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.7754954860962257`*^9},
+ CellLabel->"Out[54]=",ExpressionUUID->"3c0d0c1a-efc7-4be2-989a-76364c5184c4"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{
+      RowBox[{"Sech", "[", "\[Eta]4", "]"}], " ", 
+      RowBox[{"Sinh", "[", 
+       RowBox[{"\[Eta]4", "-", 
+        RowBox[{"\[ImaginaryI]", " ", "\[Phi]4"}]}], "]"}]}], 
+     SqrtBox["2"]]}], ",", 
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{
+      RowBox[{"\[ImaginaryI]", " ", 
+       RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+      RowBox[{
+       RowBox[{"Sin", "[", "\[Phi]4", "]"}], " ", 
+       RowBox[{"Tanh", "[", "\[Eta]4", "]"}]}]}], 
+     SqrtBox["2"]]}], ",", 
+   FractionBox[
+    RowBox[{"Sech", "[", "\[Eta]4", "]"}], 
+    SqrtBox["2"]]}], "}"}]], "Output",
+ CellChangeTimes->{3.775495486104487*^9},
+ CellLabel->"Out[55]=",ExpressionUUID->"295e5521-bc86-438c-a78c-4ff98b1a4eaf"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"-", "kT3"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "-", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "-", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"-", "kT3"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "-", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "+", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   FractionBox["1", 
+    SqrtBox[
+     FractionBox[
+      RowBox[{
+       SuperscriptBox["kT3", "2"], "+", 
+       SuperscriptBox["kT4", "2"], "+", 
+       RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+        RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+       RowBox[{
+        SuperscriptBox["kT3", "2"], " ", 
+        RowBox[{"Cosh", "[", 
+         RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+       RowBox[{
+        SuperscriptBox["kT4", "2"], " ", 
+        RowBox[{"Cosh", "[", 
+         RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+       RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+        RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+       RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+        RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], 
+      RowBox[{
+       SuperscriptBox["kT3", "2"], "+", 
+       SuperscriptBox["kT4", "2"], "+", 
+       RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Cos", "[", 
+         RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}]]]]}], "}"}]], "Output",\
+
+ CellChangeTimes->{3.775495486120371*^9},
+ CellLabel->"Out[56]=",ExpressionUUID->"e4e3dc2e-2896-4dfa-890b-ce015e0dd3cb"]
+}, Closed]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"++", 
+    RowBox[{"+", "-"}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"config", "=", "\"\<+++-\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{"1", ",", "1", ",", "1", ",", 
+      RowBox[{"-", "1"}]}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub1", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box1", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub2", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box2", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub3", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box3", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub4", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box4", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"sumbox", "=", 
+     RowBox[{
+      RowBox[{"bsub1", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub2", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub3", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub4", "[", 
+       RowBox[{"[", "1", "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<box_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "sumbox"}], "]"}], ";"}]}]}]], "Input",
+ CellChangeTimes->{{3.77435187261103*^9, 3.7743518983220797`*^9}, {
+   3.774352030399287*^9, 3.774352049137046*^9}, {3.774352117249259*^9, 
+   3.774352135475457*^9}, 3.7743522476903477`*^9, {3.774364854944893*^9, 
+   3.7743648551892653`*^9}, {3.77549530700056*^9, 3.775495314102174*^9}},
+ CellLabel->"In[57]:=",ExpressionUUID->"de07b359-92c5-4c50-9757-257a3b86203c"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{"ek1vec", "\[IndentingNewLine]", "ek2vec", \
+"\[IndentingNewLine]", "ek4vec", "\[IndentingNewLine]", "ek5vec"}], "Input",
+ CellLabel->"In[67]:=",ExpressionUUID->"4bd24bf0-4f95-4aeb-a92a-36addec143e9"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox["2"]]}], ",", 
+   RowBox[{"-", 
+    FractionBox["\[ImaginaryI]", 
+     SqrtBox["2"]]}], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.775495725939406*^9},
+ CellLabel->"Out[67]=",ExpressionUUID->"0caa581a-26a8-4421-91ce-03a7011cd4c6"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox["2"]]}], ",", 
+   FractionBox["\[ImaginaryI]", 
+    SqrtBox["2"]], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.775495726000888*^9},
+ CellLabel->"Out[68]=",ExpressionUUID->"27e4ad47-e57e-49f6-84f4-963c4f4e2144"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{
+      RowBox[{"Sech", "[", "\[Eta]4", "]"}], " ", 
+      RowBox[{"Sinh", "[", 
+       RowBox[{"\[Eta]4", "-", 
+        RowBox[{"\[ImaginaryI]", " ", "\[Phi]4"}]}], "]"}]}], 
+     SqrtBox["2"]]}], ",", 
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{
+      RowBox[{"\[ImaginaryI]", " ", 
+       RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+      RowBox[{
+       RowBox[{"Sin", "[", "\[Phi]4", "]"}], " ", 
+       RowBox[{"Tanh", "[", "\[Eta]4", "]"}]}]}], 
+     SqrtBox["2"]]}], ",", 
+   FractionBox[
+    RowBox[{"Sech", "[", "\[Eta]4", "]"}], 
+    SqrtBox["2"]]}], "}"}]], "Output",
+ CellChangeTimes->{3.775495726008683*^9},
+ CellLabel->"Out[69]=",ExpressionUUID->"c13ffd92-283d-4eff-935e-259792c34b35"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{"kT3", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "+", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "-", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{"kT3", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "+", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "+", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox[
+      FractionBox[
+       RowBox[{
+        SuperscriptBox["kT3", "2"], "+", 
+        SuperscriptBox["kT4", "2"], "+", 
+        RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+         RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+        RowBox[{
+         SuperscriptBox["kT3", "2"], " ", 
+         RowBox[{"Cosh", "[", 
+          RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+        RowBox[{
+         SuperscriptBox["kT4", "2"], " ", 
+         RowBox[{"Cosh", "[", 
+          RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+        RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+         RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+        RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+         RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], 
+       RowBox[{
+        SuperscriptBox["kT3", "2"], "+", 
+        SuperscriptBox["kT4", "2"], "+", 
+        RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Cos", "[", 
+          RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}]]]]}]}], 
+  "}"}]], "Output",
+ CellChangeTimes->{3.775495726030079*^9},
+ CellLabel->"Out[70]=",ExpressionUUID->"bd7742ef-097f-4ece-b454-127c41a84927"]
+}, Closed]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"++", 
+    RowBox[{"-", "+"}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"config", "=", "\"\<++-+\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{"1", ",", "1", ",", 
+      RowBox[{"-", "1"}], ",", "1"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub1", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box1", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub2", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box2", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub3", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box3", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub4", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box4", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"sumbox", "=", 
+     RowBox[{
+      RowBox[{"bsub1", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub2", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub3", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub4", "[", 
+       RowBox[{"[", "1", "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<box_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "sumbox"}], "]"}], ";"}]}]}]], "Input",
+ CellChangeTimes->{{3.774352147770486*^9, 3.7743521728122683`*^9}, 
+   3.774352260382543*^9, {3.7743648592657423`*^9, 3.77436485952067*^9}, {
+   3.775495582942519*^9, 3.7754955900584507`*^9}},
+ CellLabel->"In[71]:=",ExpressionUUID->"0dc936c5-a3bf-49d3-8822-b8bf3e097443"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{"ek1vec", "\[IndentingNewLine]", "ek2vec", \
+"\[IndentingNewLine]", "ek4vec", "\[IndentingNewLine]", "ek5vec"}], "Input",
+ CellLabel->"In[81]:=",ExpressionUUID->"de1972ab-9631-4c95-a3ac-cc2439eaff59"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox["2"]]}], ",", 
+   RowBox[{"-", 
+    FractionBox["\[ImaginaryI]", 
+     SqrtBox["2"]]}], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.775496041262051*^9},
+ CellLabel->"Out[81]=",ExpressionUUID->"83c34964-b013-4847-9113-6809ef586914"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox["2"]]}], ",", 
+   FractionBox["\[ImaginaryI]", 
+    SqrtBox["2"]], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.775496041274247*^9},
+ CellLabel->"Out[82]=",ExpressionUUID->"76cacd3c-7b01-4bf0-bf2d-05ee732b6108"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{"Sech", "[", "\[Eta]4", "]"}], " ", 
+     RowBox[{"Sinh", "[", 
+      RowBox[{"\[Eta]4", "+", 
+       RowBox[{"\[ImaginaryI]", " ", "\[Phi]4"}]}], "]"}]}], 
+    SqrtBox["2"]], ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{
+      RowBox[{"-", "\[ImaginaryI]"}], " ", 
+      RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+     RowBox[{
+      RowBox[{"Sin", "[", "\[Phi]4", "]"}], " ", 
+      RowBox[{"Tanh", "[", "\[Eta]4", "]"}]}]}], 
+    SqrtBox["2"]], ",", 
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{"Sech", "[", "\[Eta]4", "]"}], 
+     SqrtBox["2"]]}]}], "}"}]], "Output",
+ CellChangeTimes->{3.775496041281838*^9},
+ CellLabel->"Out[83]=",ExpressionUUID->"2af82568-b2f2-4e08-823a-56af3a079456"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"-", "kT3"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "-", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "-", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"-", "kT3"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "-", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "+", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   FractionBox["1", 
+    SqrtBox[
+     FractionBox[
+      RowBox[{
+       SuperscriptBox["kT3", "2"], "+", 
+       SuperscriptBox["kT4", "2"], "+", 
+       RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+        RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+       RowBox[{
+        SuperscriptBox["kT3", "2"], " ", 
+        RowBox[{"Cosh", "[", 
+         RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+       RowBox[{
+        SuperscriptBox["kT4", "2"], " ", 
+        RowBox[{"Cosh", "[", 
+         RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+       RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+        RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+       RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+        RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], 
+      RowBox[{
+       SuperscriptBox["kT3", "2"], "+", 
+       SuperscriptBox["kT4", "2"], "+", 
+       RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Cos", "[", 
+         RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}]]]]}], "}"}]], "Output",\
+
+ CellChangeTimes->{3.775496041305704*^9},
+ CellLabel->"Out[84]=",ExpressionUUID->"888f7613-7ca5-4c0c-9910-37224a4d42c2"]
+}, Closed]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"++", "--"}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"config", "=", "\"\<++--\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{"1", ",", "1", ",", 
+      RowBox[{"-", "1"}], ",", 
+      RowBox[{"-", "1"}]}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub1", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box1", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub2", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box2", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub3", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box3", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub4", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box4", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"sumbox", "=", 
+     RowBox[{
+      RowBox[{"bsub1", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub2", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub3", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub4", "[", 
+       RowBox[{"[", "1", "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<box_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "sumbox"}], "]"}], ";"}]}]}]], "Input",
+ CellChangeTimes->{{3.7743522016662197`*^9, 3.774352224887178*^9}, 
+   3.774352262175974*^9, {3.774364861979569*^9, 3.774364862258802*^9}, {
+   3.775495831158877*^9, 3.775495839831895*^9}},
+ CellLabel->"In[85]:=",ExpressionUUID->"2f945793-af8e-4f9f-8ee4-f6a5ddef3041"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{"ek1vec", "\[IndentingNewLine]", "ek2vec", \
+"\[IndentingNewLine]", "ek4vec", "\[IndentingNewLine]", "ek5vec"}], "Input",
+ CellLabel->"In[95]:=",ExpressionUUID->"1b3a5a8e-9a75-4ea8-81fc-12e00b1e7a8b"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox["2"]]}], ",", 
+   RowBox[{"-", 
+    FractionBox["\[ImaginaryI]", 
+     SqrtBox["2"]]}], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.775496278877109*^9},
+ CellLabel->"Out[95]=",ExpressionUUID->"4800b669-1ac2-461c-8d0e-6c8e0db4feb2"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox["2"]]}], ",", 
+   FractionBox["\[ImaginaryI]", 
+    SqrtBox["2"]], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.775496278884636*^9},
+ CellLabel->"Out[96]=",ExpressionUUID->"127daa54-286d-4dfe-a228-45ea02f3a29b"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{"Sech", "[", "\[Eta]4", "]"}], " ", 
+     RowBox[{"Sinh", "[", 
+      RowBox[{"\[Eta]4", "+", 
+       RowBox[{"\[ImaginaryI]", " ", "\[Phi]4"}]}], "]"}]}], 
+    SqrtBox["2"]], ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{
+      RowBox[{"-", "\[ImaginaryI]"}], " ", 
+      RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+     RowBox[{
+      RowBox[{"Sin", "[", "\[Phi]4", "]"}], " ", 
+      RowBox[{"Tanh", "[", "\[Eta]4", "]"}]}]}], 
+    SqrtBox["2"]], ",", 
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{"Sech", "[", "\[Eta]4", "]"}], 
+     SqrtBox["2"]]}]}], "}"}]], "Output",
+ CellChangeTimes->{3.7754962788921328`*^9},
+ CellLabel->"Out[97]=",ExpressionUUID->"ff5a2c2d-bcb9-4a08-a0db-e3ec3e0b8eab"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{"kT3", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "+", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "-", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{"kT3", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "+", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "+", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox[
+      FractionBox[
+       RowBox[{
+        SuperscriptBox["kT3", "2"], "+", 
+        SuperscriptBox["kT4", "2"], "+", 
+        RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+         RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+        RowBox[{
+         SuperscriptBox["kT3", "2"], " ", 
+         RowBox[{"Cosh", "[", 
+          RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+        RowBox[{
+         SuperscriptBox["kT4", "2"], " ", 
+         RowBox[{"Cosh", "[", 
+          RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+        RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+         RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+        RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+         RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], 
+       RowBox[{
+        SuperscriptBox["kT3", "2"], "+", 
+        SuperscriptBox["kT4", "2"], "+", 
+        RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Cos", "[", 
+          RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}]]]]}]}], 
+  "}"}]], "Output",
+ CellChangeTimes->{3.7754962789055977`*^9},
+ CellLabel->"Out[98]=",ExpressionUUID->"3613bcfe-306c-417b-be00-8b237e1f74fc"]
+}, Closed]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"+", 
+    RowBox[{"-", "++"}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"config", "=", "\"\<+-++\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{"1", ",", 
+      RowBox[{"-", "1"}], ",", "1", ",", "1"}], "]"}], ";"}], 
+   "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub1", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box1", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub2", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box2", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub3", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box3", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub4", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box4", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"sumbox", "=", 
+     RowBox[{
+      RowBox[{"bsub1", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub2", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub3", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub4", "[", 
+       RowBox[{"[", "1", "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<box_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "sumbox"}], "]"}], ";"}]}]}]], "Input",
+ CellChangeTimes->{{3.774352213966481*^9, 3.774352230053808*^9}, {
+  3.774352264211151*^9, 3.774352265069294*^9}, {3.774364864710299*^9, 
+  3.77436486506133*^9}, {3.775496132812826*^9, 3.775496140075749*^9}},
+ CellLabel->"In[99]:=",ExpressionUUID->"736a8768-21b4-4a78-91c9-5a2f8b836a59"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{"ek1vec", "\[IndentingNewLine]", "ek2vec", \
+"\[IndentingNewLine]", "ek4vec", "\[IndentingNewLine]", "ek5vec"}], "Input",
+ CellLabel->
+  "In[109]:=",ExpressionUUID->"ddb548c2-b966-4ebb-8b4d-20e4c052552c"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox["2"]]}], ",", 
+   RowBox[{"-", 
+    FractionBox["\[ImaginaryI]", 
+     SqrtBox["2"]]}], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.7754964343568783`*^9},
+ CellLabel->
+  "Out[109]=",ExpressionUUID->"8e7c14f1-46c4-45be-9499-0e7ff9cfe533"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox["1", 
+    SqrtBox["2"]], ",", 
+   FractionBox["\[ImaginaryI]", 
+    SqrtBox["2"]], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.775496434368865*^9},
+ CellLabel->
+  "Out[110]=",ExpressionUUID->"665ee0e0-b7dc-4373-bc72-91094ed4ebfa"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{
+      RowBox[{"Sech", "[", "\[Eta]4", "]"}], " ", 
+      RowBox[{"Sinh", "[", 
+       RowBox[{"\[Eta]4", "-", 
+        RowBox[{"\[ImaginaryI]", " ", "\[Phi]4"}]}], "]"}]}], 
+     SqrtBox["2"]]}], ",", 
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{
+      RowBox[{"\[ImaginaryI]", " ", 
+       RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+      RowBox[{
+       RowBox[{"Sin", "[", "\[Phi]4", "]"}], " ", 
+       RowBox[{"Tanh", "[", "\[Eta]4", "]"}]}]}], 
+     SqrtBox["2"]]}], ",", 
+   FractionBox[
+    RowBox[{"Sech", "[", "\[Eta]4", "]"}], 
+    SqrtBox["2"]]}], "}"}]], "Output",
+ CellChangeTimes->{3.775496434374834*^9},
+ CellLabel->
+  "Out[111]=",ExpressionUUID->"76a06765-1e32-464b-b653-74c9c41bfad0"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"-", "kT3"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "-", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "-", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"-", "kT3"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "-", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "+", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   FractionBox["1", 
+    SqrtBox[
+     FractionBox[
+      RowBox[{
+       SuperscriptBox["kT3", "2"], "+", 
+       SuperscriptBox["kT4", "2"], "+", 
+       RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+        RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+       RowBox[{
+        SuperscriptBox["kT3", "2"], " ", 
+        RowBox[{"Cosh", "[", 
+         RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+       RowBox[{
+        SuperscriptBox["kT4", "2"], " ", 
+        RowBox[{"Cosh", "[", 
+         RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+       RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+        RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+       RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+        RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], 
+      RowBox[{
+       SuperscriptBox["kT3", "2"], "+", 
+       SuperscriptBox["kT4", "2"], "+", 
+       RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Cos", "[", 
+         RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}]]]]}], "}"}]], "Output",\
+
+ CellChangeTimes->{3.775496434384726*^9},
+ CellLabel->
+  "Out[112]=",ExpressionUUID->"6c5ab671-9271-4d6d-941f-1661679185be"]
+}, Closed]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"+", 
+    RowBox[{"-", 
+     RowBox[{"+", "-"}]}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"config", "=", "\"\<+-+-\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{"1", ",", 
+      RowBox[{"-", "1"}], ",", "1", ",", 
+      RowBox[{"-", "1"}]}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub1", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box1", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub2", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box2", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub3", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box3", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub4", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box4", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"sumbox", "=", 
+     RowBox[{
+      RowBox[{"bsub1", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub2", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub3", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub4", "[", 
+       RowBox[{"[", "1", "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<box_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "sumbox"}], "]"}], ";"}]}]}]], "Input",
+ CellChangeTimes->{{3.774352273302424*^9, 3.774352278179654*^9}, 
+   3.7743528399898767`*^9, {3.774364868115095*^9, 3.774364868379517*^9}, {
+   3.775496254973625*^9, 3.775496262224195*^9}},
+ CellLabel->
+  "In[113]:=",ExpressionUUID->"f1b82eb6-3e5a-4cf7-9deb-3109924714c4"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{"ek1vec", "\[IndentingNewLine]", "ek2vec", \
+"\[IndentingNewLine]", "ek4vec", "\[IndentingNewLine]", "ek5vec"}], "Input",
+ CellLabel->
+  "In[123]:=",ExpressionUUID->"5d0e564a-ae95-4bd5-a6cc-af961332242f"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox["2"]]}], ",", 
+   RowBox[{"-", 
+    FractionBox["\[ImaginaryI]", 
+     SqrtBox["2"]]}], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.775496660867567*^9},
+ CellLabel->
+  "Out[123]=",ExpressionUUID->"9fb01334-2129-4aec-994f-886876491615"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox["1", 
+    SqrtBox["2"]], ",", 
+   FractionBox["\[ImaginaryI]", 
+    SqrtBox["2"]], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.7754966608774843`*^9},
+ CellLabel->
+  "Out[124]=",ExpressionUUID->"7df88261-7455-4dcf-a0de-7b4494d6ea05"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{
+      RowBox[{"Sech", "[", "\[Eta]4", "]"}], " ", 
+      RowBox[{"Sinh", "[", 
+       RowBox[{"\[Eta]4", "-", 
+        RowBox[{"\[ImaginaryI]", " ", "\[Phi]4"}]}], "]"}]}], 
+     SqrtBox["2"]]}], ",", 
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{
+      RowBox[{"\[ImaginaryI]", " ", 
+       RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+      RowBox[{
+       RowBox[{"Sin", "[", "\[Phi]4", "]"}], " ", 
+       RowBox[{"Tanh", "[", "\[Eta]4", "]"}]}]}], 
+     SqrtBox["2"]]}], ",", 
+   FractionBox[
+    RowBox[{"Sech", "[", "\[Eta]4", "]"}], 
+    SqrtBox["2"]]}], "}"}]], "Output",
+ CellChangeTimes->{3.775496660893093*^9},
+ CellLabel->
+  "Out[125]=",ExpressionUUID->"73f9133d-e1ae-4484-9c71-cead4cfc2778"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{"kT3", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "+", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "-", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{"kT3", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "+", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "+", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox[
+      FractionBox[
+       RowBox[{
+        SuperscriptBox["kT3", "2"], "+", 
+        SuperscriptBox["kT4", "2"], "+", 
+        RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+         RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+        RowBox[{
+         SuperscriptBox["kT3", "2"], " ", 
+         RowBox[{"Cosh", "[", 
+          RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+        RowBox[{
+         SuperscriptBox["kT4", "2"], " ", 
+         RowBox[{"Cosh", "[", 
+          RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+        RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+         RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+        RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+         RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], 
+       RowBox[{
+        SuperscriptBox["kT3", "2"], "+", 
+        SuperscriptBox["kT4", "2"], "+", 
+        RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Cos", "[", 
+          RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}]]]]}]}], 
+  "}"}]], "Output",
+ CellChangeTimes->{3.77549666091581*^9},
+ CellLabel->
+  "Out[126]=",ExpressionUUID->"d00bf2c3-bcc7-4d1d-9603-58fce399f9be"]
+}, Closed]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"+", 
+    RowBox[{"--", "+"}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"config", "=", "\"\<+--+\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{"1", ",", 
+      RowBox[{"-", "1"}], ",", 
+      RowBox[{"-", "1"}], ",", "1"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub1", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box1", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub2", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box2", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub3", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box3", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub4", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box4", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"sumbox", "=", 
+     RowBox[{
+      RowBox[{"bsub1", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub2", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub3", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub4", "[", 
+       RowBox[{"[", "1", "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<box_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "sumbox"}], "]"}], ";"}]}]}]], "Input",
+ CellChangeTimes->{{3.774352293453846*^9, 3.7743522993176413`*^9}, 
+   3.774352845194046*^9, {3.7743648708807707`*^9, 3.7743648711612997`*^9}, {
+   3.7754964165912733`*^9, 3.775496422911582*^9}},
+ CellLabel->
+  "In[127]:=",ExpressionUUID->"ea09958c-619e-47a8-ba2e-3c72622f3837"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{"ek1vec", "\[IndentingNewLine]", "ek2vec", \
+"\[IndentingNewLine]", "ek4vec", "\[IndentingNewLine]", "ek5vec"}], "Input",
+ CellLabel->
+  "In[137]:=",ExpressionUUID->"49c8fe2c-a955-4a56-b5d2-645fdd8ee1b8"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox["2"]]}], ",", 
+   RowBox[{"-", 
+    FractionBox["\[ImaginaryI]", 
+     SqrtBox["2"]]}], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.775496828904537*^9},
+ CellLabel->
+  "Out[137]=",ExpressionUUID->"ac928864-fb46-4277-a04b-a9984873ba5e"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox["1", 
+    SqrtBox["2"]], ",", 
+   FractionBox["\[ImaginaryI]", 
+    SqrtBox["2"]], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.7754968289145823`*^9},
+ CellLabel->
+  "Out[138]=",ExpressionUUID->"9bf967d4-1cd5-43e7-b270-9802dbd89330"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{"Sech", "[", "\[Eta]4", "]"}], " ", 
+     RowBox[{"Sinh", "[", 
+      RowBox[{"\[Eta]4", "+", 
+       RowBox[{"\[ImaginaryI]", " ", "\[Phi]4"}]}], "]"}]}], 
+    SqrtBox["2"]], ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{
+      RowBox[{"-", "\[ImaginaryI]"}], " ", 
+      RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+     RowBox[{
+      RowBox[{"Sin", "[", "\[Phi]4", "]"}], " ", 
+      RowBox[{"Tanh", "[", "\[Eta]4", "]"}]}]}], 
+    SqrtBox["2"]], ",", 
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{"Sech", "[", "\[Eta]4", "]"}], 
+     SqrtBox["2"]]}]}], "}"}]], "Output",
+ CellChangeTimes->{3.775496828923019*^9},
+ CellLabel->
+  "Out[139]=",ExpressionUUID->"e531c14c-844f-4ad1-9bfb-471d4db9b31e"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"-", "kT3"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "-", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "-", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"-", "kT3"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "-", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "+", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   FractionBox["1", 
+    SqrtBox[
+     FractionBox[
+      RowBox[{
+       SuperscriptBox["kT3", "2"], "+", 
+       SuperscriptBox["kT4", "2"], "+", 
+       RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+        RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+       RowBox[{
+        SuperscriptBox["kT3", "2"], " ", 
+        RowBox[{"Cosh", "[", 
+         RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+       RowBox[{
+        SuperscriptBox["kT4", "2"], " ", 
+        RowBox[{"Cosh", "[", 
+         RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+       RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+        RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+       RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+        RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], 
+      RowBox[{
+       SuperscriptBox["kT3", "2"], "+", 
+       SuperscriptBox["kT4", "2"], "+", 
+       RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Cos", "[", 
+         RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}]]]]}], "}"}]], "Output",\
+
+ CellChangeTimes->{3.7754968289393587`*^9},
+ CellLabel->
+  "Out[140]=",ExpressionUUID->"9030a139-1619-4bd0-baa7-f65aaed95fc1"]
+}, Closed]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"+", 
+    RowBox[{"--", "-"}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"config", "=", "\"\<+---\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{"1", ",", 
+      RowBox[{"-", "1"}], ",", 
+      RowBox[{"-", "1"}], ",", 
+      RowBox[{"-", "1"}]}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub1", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box1", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub2", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box2", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub3", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box3", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub4", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box4", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"sumbox", "=", 
+     RowBox[{
+      RowBox[{"bsub1", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub2", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub3", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub4", "[", 
+       RowBox[{"[", "1", "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<box_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "sumbox"}], "]"}], ";"}]}]}]], "Input",
+ CellChangeTimes->{{3.7743523076196537`*^9, 3.774352310862866*^9}, 
+   3.774352847449963*^9, {3.774364873150992*^9, 3.774364873470278*^9}, {
+   3.775496427523074*^9, 3.775496434270932*^9}},
+ CellLabel->
+  "In[141]:=",ExpressionUUID->"109d8c91-098d-43cf-8963-751531807ae7"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{"ek1vec", "\[IndentingNewLine]", "ek2vec", \
+"\[IndentingNewLine]", "ek4vec", "\[IndentingNewLine]", "ek5vec"}], "Input",
+ CellLabel->
+  "In[151]:=",ExpressionUUID->"133b9470-d798-489d-8481-9a8a3698a3a8"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox["2"]]}], ",", 
+   RowBox[{"-", 
+    FractionBox["\[ImaginaryI]", 
+     SqrtBox["2"]]}], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.775496985041739*^9},
+ CellLabel->
+  "Out[151]=",ExpressionUUID->"52c45524-838a-46a1-9ad1-7648b6637a0a"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox["1", 
+    SqrtBox["2"]], ",", 
+   FractionBox["\[ImaginaryI]", 
+    SqrtBox["2"]], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.7754969850580997`*^9},
+ CellLabel->
+  "Out[152]=",ExpressionUUID->"921a68f6-d009-4488-b8f7-58a4a926ca24"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{"Sech", "[", "\[Eta]4", "]"}], " ", 
+     RowBox[{"Sinh", "[", 
+      RowBox[{"\[Eta]4", "+", 
+       RowBox[{"\[ImaginaryI]", " ", "\[Phi]4"}]}], "]"}]}], 
+    SqrtBox["2"]], ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{
+      RowBox[{"-", "\[ImaginaryI]"}], " ", 
+      RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+     RowBox[{
+      RowBox[{"Sin", "[", "\[Phi]4", "]"}], " ", 
+      RowBox[{"Tanh", "[", "\[Eta]4", "]"}]}]}], 
+    SqrtBox["2"]], ",", 
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{"Sech", "[", "\[Eta]4", "]"}], 
+     SqrtBox["2"]]}]}], "}"}]], "Output",
+ CellChangeTimes->{3.775496985068839*^9},
+ CellLabel->
+  "Out[153]=",ExpressionUUID->"dd1b4ff6-53c6-45ef-9a44-0b1769b80634"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{"kT3", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "+", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "-", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{"kT3", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "+", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "+", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox[
+      FractionBox[
+       RowBox[{
+        SuperscriptBox["kT3", "2"], "+", 
+        SuperscriptBox["kT4", "2"], "+", 
+        RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+         RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+        RowBox[{
+         SuperscriptBox["kT3", "2"], " ", 
+         RowBox[{"Cosh", "[", 
+          RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+        RowBox[{
+         SuperscriptBox["kT4", "2"], " ", 
+         RowBox[{"Cosh", "[", 
+          RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+        RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+         RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+        RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+         RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], 
+       RowBox[{
+        SuperscriptBox["kT3", "2"], "+", 
+        SuperscriptBox["kT4", "2"], "+", 
+        RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Cos", "[", 
+          RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}]]]]}]}], 
+  "}"}]], "Output",
+ CellChangeTimes->{3.775496985083159*^9},
+ CellLabel->
+  "Out[154]=",ExpressionUUID->"1328d2bc-b60d-4dff-a61f-fafce78b861e"]
+}, Closed]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"-", 
+    RowBox[{"++", "+"}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"config", "=", "\"\<-+++\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{
+      RowBox[{"-", "1"}], ",", "1", ",", "1", ",", "1"}], "]"}], ";"}], 
+   "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub1", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box1", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub2", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box2", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub3", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box3", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub4", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box4", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"sumbox", "=", 
+     RowBox[{
+      RowBox[{"bsub1", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub2", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub3", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub4", "[", 
+       RowBox[{"[", "1", "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<box_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "sumbox"}], "]"}], ";"}]}]}]], "Input",
+ CellChangeTimes->{{3.7743523173610086`*^9, 3.7743523280971813`*^9}, 
+   3.774352858488297*^9, {3.7743648755870953`*^9, 3.774364876566372*^9}, {
+   3.775496439874864*^9, 3.775496447799618*^9}},
+ CellLabel->
+  "In[155]:=",ExpressionUUID->"90ea42ce-b398-4fbc-bd9f-f41999d112ee"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{"ek1vec", "\[IndentingNewLine]", "ek2vec", \
+"\[IndentingNewLine]", "ek4vec", "\[IndentingNewLine]", "ek5vec"}], "Input",
+ CellLabel->
+  "In[165]:=",ExpressionUUID->"aeeee502-d9db-4ade-88d9-b512c4326bb6"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox["1", 
+    SqrtBox["2"]], ",", 
+   RowBox[{"-", 
+    FractionBox["\[ImaginaryI]", 
+     SqrtBox["2"]]}], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.775497102445105*^9},
+ CellLabel->
+  "Out[165]=",ExpressionUUID->"9031a0a9-cf9d-437b-8216-b065685cc651"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox["2"]]}], ",", 
+   FractionBox["\[ImaginaryI]", 
+    SqrtBox["2"]], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.775497102457593*^9},
+ CellLabel->
+  "Out[166]=",ExpressionUUID->"2c6398cd-b359-4fe5-a36e-0b40aa0a73ac"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{
+      RowBox[{"Sech", "[", "\[Eta]4", "]"}], " ", 
+      RowBox[{"Sinh", "[", 
+       RowBox[{"\[Eta]4", "-", 
+        RowBox[{"\[ImaginaryI]", " ", "\[Phi]4"}]}], "]"}]}], 
+     SqrtBox["2"]]}], ",", 
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{
+      RowBox[{"\[ImaginaryI]", " ", 
+       RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+      RowBox[{
+       RowBox[{"Sin", "[", "\[Phi]4", "]"}], " ", 
+       RowBox[{"Tanh", "[", "\[Eta]4", "]"}]}]}], 
+     SqrtBox["2"]]}], ",", 
+   FractionBox[
+    RowBox[{"Sech", "[", "\[Eta]4", "]"}], 
+    SqrtBox["2"]]}], "}"}]], "Output",
+ CellChangeTimes->{3.77549710246371*^9},
+ CellLabel->
+  "Out[167]=",ExpressionUUID->"d0c4ab05-2228-4b3d-b9f0-380f03f445fc"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"-", "kT3"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "-", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "-", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"-", "kT3"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "-", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "+", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   FractionBox["1", 
+    SqrtBox[
+     FractionBox[
+      RowBox[{
+       SuperscriptBox["kT3", "2"], "+", 
+       SuperscriptBox["kT4", "2"], "+", 
+       RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+        RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+       RowBox[{
+        SuperscriptBox["kT3", "2"], " ", 
+        RowBox[{"Cosh", "[", 
+         RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+       RowBox[{
+        SuperscriptBox["kT4", "2"], " ", 
+        RowBox[{"Cosh", "[", 
+         RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+       RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+        RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+       RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+        RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], 
+      RowBox[{
+       SuperscriptBox["kT3", "2"], "+", 
+       SuperscriptBox["kT4", "2"], "+", 
+       RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Cos", "[", 
+         RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}]]]]}], "}"}]], "Output",\
+
+ CellChangeTimes->{3.775497102471272*^9},
+ CellLabel->
+  "Out[168]=",ExpressionUUID->"25c04453-c4d9-49a8-b58e-b82acd1058e8"]
+}, Closed]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"-", 
+    RowBox[{"++", "-"}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"config", "=", "\"\<-++-\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{
+      RowBox[{"-", "1"}], ",", "1", ",", "1", ",", 
+      RowBox[{"-", "1"}]}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub1", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box1", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub2", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box2", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub3", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box3", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub4", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box4", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"sumbox", "=", 
+     RowBox[{
+      RowBox[{"bsub1", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub2", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub3", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub4", "[", 
+       RowBox[{"[", "1", "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<box_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "sumbox"}], "]"}], ";"}]}]}]], "Input",
+ CellChangeTimes->{{3.77435233561648*^9, 3.7743523421620617`*^9}, 
+   3.774352860614139*^9, {3.774364879285968*^9, 3.774364879609729*^9}, {
+   3.775496454326095*^9, 3.775496461326519*^9}},
+ CellLabel->
+  "In[169]:=",ExpressionUUID->"eda41e35-0731-4f86-8fd3-b64e5553fef0"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{"ek1vec", "\[IndentingNewLine]", "ek2vec", \
+"\[IndentingNewLine]", "ek4vec", "\[IndentingNewLine]", "ek5vec"}], "Input",
+ CellLabel->
+  "In[179]:=",ExpressionUUID->"0e9ee2b7-6c7f-44b1-9f11-5d09fdee3c8a"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox["1", 
+    SqrtBox["2"]], ",", 
+   RowBox[{"-", 
+    FractionBox["\[ImaginaryI]", 
+     SqrtBox["2"]]}], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.775497207798451*^9},
+ CellLabel->
+  "Out[179]=",ExpressionUUID->"564638da-a074-4583-95bd-4f2f8cba6de0"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox["2"]]}], ",", 
+   FractionBox["\[ImaginaryI]", 
+    SqrtBox["2"]], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.775497207806608*^9},
+ CellLabel->
+  "Out[180]=",ExpressionUUID->"ead6394e-5d7d-4027-bf26-da5af46080e0"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{
+      RowBox[{"Sech", "[", "\[Eta]4", "]"}], " ", 
+      RowBox[{"Sinh", "[", 
+       RowBox[{"\[Eta]4", "-", 
+        RowBox[{"\[ImaginaryI]", " ", "\[Phi]4"}]}], "]"}]}], 
+     SqrtBox["2"]]}], ",", 
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{
+      RowBox[{"\[ImaginaryI]", " ", 
+       RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+      RowBox[{
+       RowBox[{"Sin", "[", "\[Phi]4", "]"}], " ", 
+       RowBox[{"Tanh", "[", "\[Eta]4", "]"}]}]}], 
+     SqrtBox["2"]]}], ",", 
+   FractionBox[
+    RowBox[{"Sech", "[", "\[Eta]4", "]"}], 
+    SqrtBox["2"]]}], "}"}]], "Output",
+ CellChangeTimes->{3.7754972078141117`*^9},
+ CellLabel->
+  "Out[181]=",ExpressionUUID->"05920693-2791-461f-bb39-d05893eff923"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{"kT3", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "+", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "-", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{"kT3", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "+", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "+", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox[
+      FractionBox[
+       RowBox[{
+        SuperscriptBox["kT3", "2"], "+", 
+        SuperscriptBox["kT4", "2"], "+", 
+        RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+         RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+        RowBox[{
+         SuperscriptBox["kT3", "2"], " ", 
+         RowBox[{"Cosh", "[", 
+          RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+        RowBox[{
+         SuperscriptBox["kT4", "2"], " ", 
+         RowBox[{"Cosh", "[", 
+          RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+        RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+         RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+        RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+         RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], 
+       RowBox[{
+        SuperscriptBox["kT3", "2"], "+", 
+        SuperscriptBox["kT4", "2"], "+", 
+        RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Cos", "[", 
+          RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}]]]]}]}], 
+  "}"}]], "Output",
+ CellChangeTimes->{3.77549720782825*^9},
+ CellLabel->
+  "Out[182]=",ExpressionUUID->"4d737b53-7257-44f3-b230-4b20b7cf4403"]
+}, Closed]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"-", 
+    RowBox[{"+", 
+     RowBox[{"-", "+"}]}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"config", "=", "\"\<-+-+\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{
+      RowBox[{"-", "1"}], ",", "1", ",", 
+      RowBox[{"-", "1"}], ",", "1"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub1", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box1", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub2", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box2", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub3", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box3", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub4", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box4", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"sumbox", "=", 
+     RowBox[{
+      RowBox[{"bsub1", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub2", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub3", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub4", "[", 
+       RowBox[{"[", "1", "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<box_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "sumbox"}], "]"}], ";"}]}]}]], "Input",
+ CellChangeTimes->{{3.774352349907421*^9, 3.774352359869708*^9}, 
+   3.774352862947967*^9, {3.774365871990572*^9, 3.774365872779541*^9}, {
+   3.775496464963257*^9, 3.775496471995942*^9}},
+ CellLabel->
+  "In[183]:=",ExpressionUUID->"b4e55406-dd72-45f8-a3b3-34f05228afd8"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{"ek1vec", "\[IndentingNewLine]", "ek2vec", \
+"\[IndentingNewLine]", "ek4vec", "\[IndentingNewLine]", "ek5vec"}], "Input",
+ CellLabel->
+  "In[193]:=",ExpressionUUID->"31473832-1b3e-4feb-9476-fa165b39ef5b"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox["1", 
+    SqrtBox["2"]], ",", 
+   RowBox[{"-", 
+    FractionBox["\[ImaginaryI]", 
+     SqrtBox["2"]]}], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.775497344555745*^9},
+ CellLabel->
+  "Out[193]=",ExpressionUUID->"49c964a7-ca37-4ece-b767-4725d6cd726d"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox["2"]]}], ",", 
+   FractionBox["\[ImaginaryI]", 
+    SqrtBox["2"]], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.7754973445676527`*^9},
+ CellLabel->
+  "Out[194]=",ExpressionUUID->"aff9ab87-5ee7-4424-a8c5-9003da78ed6a"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{"Sech", "[", "\[Eta]4", "]"}], " ", 
+     RowBox[{"Sinh", "[", 
+      RowBox[{"\[Eta]4", "+", 
+       RowBox[{"\[ImaginaryI]", " ", "\[Phi]4"}]}], "]"}]}], 
+    SqrtBox["2"]], ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{
+      RowBox[{"-", "\[ImaginaryI]"}], " ", 
+      RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+     RowBox[{
+      RowBox[{"Sin", "[", "\[Phi]4", "]"}], " ", 
+      RowBox[{"Tanh", "[", "\[Eta]4", "]"}]}]}], 
+    SqrtBox["2"]], ",", 
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{"Sech", "[", "\[Eta]4", "]"}], 
+     SqrtBox["2"]]}]}], "}"}]], "Output",
+ CellChangeTimes->{3.775497344576572*^9},
+ CellLabel->
+  "Out[195]=",ExpressionUUID->"7255aa0b-c54c-4726-b608-3a1e1ec73f55"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"-", "kT3"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "-", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "-", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"-", "kT3"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "-", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "+", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   FractionBox["1", 
+    SqrtBox[
+     FractionBox[
+      RowBox[{
+       SuperscriptBox["kT3", "2"], "+", 
+       SuperscriptBox["kT4", "2"], "+", 
+       RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+        RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+       RowBox[{
+        SuperscriptBox["kT3", "2"], " ", 
+        RowBox[{"Cosh", "[", 
+         RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+       RowBox[{
+        SuperscriptBox["kT4", "2"], " ", 
+        RowBox[{"Cosh", "[", 
+         RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+       RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+        RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+       RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+        RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], 
+      RowBox[{
+       SuperscriptBox["kT3", "2"], "+", 
+       SuperscriptBox["kT4", "2"], "+", 
+       RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Cos", "[", 
+         RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}]]]]}], "}"}]], "Output",\
+
+ CellChangeTimes->{3.7754973446010847`*^9},
+ CellLabel->
+  "Out[196]=",ExpressionUUID->"7676935b-3e9e-423c-9495-99c76e7836d8"]
+}, Closed]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"-", 
+    RowBox[{"+", "--"}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"config", "=", "\"\<-+--\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{
+      RowBox[{"-", "1"}], ",", "1", ",", 
+      RowBox[{"-", "1"}], ",", 
+      RowBox[{"-", "1"}]}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub1", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box1", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub2", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box2", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub3", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box3", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub4", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box4", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"sumbox", "=", 
+     RowBox[{
+      RowBox[{"bsub1", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub2", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub3", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub4", "[", 
+       RowBox[{"[", "1", "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<box_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "sumbox"}], "]"}], ";"}]}]}]], "Input",
+ CellChangeTimes->{{3.77435236671383*^9, 3.774352386298221*^9}, {
+   3.774352466818277*^9, 3.774352467649146*^9}, 3.774352865354597*^9, {
+   3.7743648829489393`*^9, 3.774364883197905*^9}, {3.775496532325181*^9, 
+   3.7754965403423853`*^9}},
+ CellLabel->
+  "In[197]:=",ExpressionUUID->"17600b0b-71c8-4b17-9c49-9fa20ea3d684"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{"ek1vec", "\[IndentingNewLine]", "ek2vec", \
+"\[IndentingNewLine]", "ek4vec", "\[IndentingNewLine]", "ek5vec"}], "Input",
+ CellLabel->
+  "In[207]:=",ExpressionUUID->"acc3ef55-c9ff-41e2-a5ce-951fcf403a30"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox["1", 
+    SqrtBox["2"]], ",", 
+   RowBox[{"-", 
+    FractionBox["\[ImaginaryI]", 
+     SqrtBox["2"]]}], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.775497518082234*^9},
+ CellLabel->
+  "Out[207]=",ExpressionUUID->"b58e0eea-b86b-4b4d-9af9-0514d9cec5b3"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox["2"]]}], ",", 
+   FractionBox["\[ImaginaryI]", 
+    SqrtBox["2"]], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.775497518093644*^9},
+ CellLabel->
+  "Out[208]=",ExpressionUUID->"5cae39f8-cd31-4f16-9795-7943f4a5fa19"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{"Sech", "[", "\[Eta]4", "]"}], " ", 
+     RowBox[{"Sinh", "[", 
+      RowBox[{"\[Eta]4", "+", 
+       RowBox[{"\[ImaginaryI]", " ", "\[Phi]4"}]}], "]"}]}], 
+    SqrtBox["2"]], ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{
+      RowBox[{"-", "\[ImaginaryI]"}], " ", 
+      RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+     RowBox[{
+      RowBox[{"Sin", "[", "\[Phi]4", "]"}], " ", 
+      RowBox[{"Tanh", "[", "\[Eta]4", "]"}]}]}], 
+    SqrtBox["2"]], ",", 
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{"Sech", "[", "\[Eta]4", "]"}], 
+     SqrtBox["2"]]}]}], "}"}]], "Output",
+ CellChangeTimes->{3.775497518102331*^9},
+ CellLabel->
+  "Out[209]=",ExpressionUUID->"89c26d17-1c70-4219-a637-da8fbe3ce30e"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{"kT3", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "+", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "-", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{"kT3", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "+", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "+", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox[
+      FractionBox[
+       RowBox[{
+        SuperscriptBox["kT3", "2"], "+", 
+        SuperscriptBox["kT4", "2"], "+", 
+        RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+         RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+        RowBox[{
+         SuperscriptBox["kT3", "2"], " ", 
+         RowBox[{"Cosh", "[", 
+          RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+        RowBox[{
+         SuperscriptBox["kT4", "2"], " ", 
+         RowBox[{"Cosh", "[", 
+          RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+        RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+         RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+        RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+         RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], 
+       RowBox[{
+        SuperscriptBox["kT3", "2"], "+", 
+        SuperscriptBox["kT4", "2"], "+", 
+        RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Cos", "[", 
+          RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}]]]]}]}], 
+  "}"}]], "Output",
+ CellChangeTimes->{3.7754975181166553`*^9},
+ CellLabel->
+  "Out[210]=",ExpressionUUID->"6e5ebac0-5967-47da-8716-e7ea61df247a"]
+}, Closed]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"--", "++"}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"config", "=", "\"\<--++\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{
+      RowBox[{"-", "1"}], ",", 
+      RowBox[{"-", "1"}], ",", "1", ",", "1"}], "]"}], ";"}], 
+   "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub1", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box1", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub2", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box2", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub3", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box3", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub4", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box4", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"sumbox", "=", 
+     RowBox[{
+      RowBox[{"bsub1", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub2", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub3", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub4", "[", 
+       RowBox[{"[", "1", "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<box_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "sumbox"}], "]"}], ";"}]}]}]], "Input",
+ CellChangeTimes->{{3.774352487534183*^9, 3.7743525101778307`*^9}, 
+   3.774352867436016*^9, {3.774364885310581*^9, 3.774364885553205*^9}, {
+   3.775496587979397*^9, 3.775496598024398*^9}},
+ CellLabel->
+  "In[211]:=",ExpressionUUID->"b64b8f87-82c8-4857-a557-001146451746"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{"ek1vec", "\[IndentingNewLine]", "ek2vec", \
+"\[IndentingNewLine]", "ek4vec", "\[IndentingNewLine]", "ek5vec"}], "Input",
+ CellLabel->
+  "In[221]:=",ExpressionUUID->"04bbc492-9b94-415e-a91d-f36d5b545005"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox["1", 
+    SqrtBox["2"]], ",", 
+   RowBox[{"-", 
+    FractionBox["\[ImaginaryI]", 
+     SqrtBox["2"]]}], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.7754977054722652`*^9},
+ CellLabel->
+  "Out[221]=",ExpressionUUID->"14f63c8c-5f9d-4ceb-940c-502703daeac5"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox["1", 
+    SqrtBox["2"]], ",", 
+   FractionBox["\[ImaginaryI]", 
+    SqrtBox["2"]], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.775497705485059*^9},
+ CellLabel->
+  "Out[222]=",ExpressionUUID->"b269e7ef-8a34-43b6-a7be-907a76c65945"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{
+      RowBox[{"Sech", "[", "\[Eta]4", "]"}], " ", 
+      RowBox[{"Sinh", "[", 
+       RowBox[{"\[Eta]4", "-", 
+        RowBox[{"\[ImaginaryI]", " ", "\[Phi]4"}]}], "]"}]}], 
+     SqrtBox["2"]]}], ",", 
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{
+      RowBox[{"\[ImaginaryI]", " ", 
+       RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+      RowBox[{
+       RowBox[{"Sin", "[", "\[Phi]4", "]"}], " ", 
+       RowBox[{"Tanh", "[", "\[Eta]4", "]"}]}]}], 
+     SqrtBox["2"]]}], ",", 
+   FractionBox[
+    RowBox[{"Sech", "[", "\[Eta]4", "]"}], 
+    SqrtBox["2"]]}], "}"}]], "Output",
+ CellChangeTimes->{3.7754977054948587`*^9},
+ CellLabel->
+  "Out[223]=",ExpressionUUID->"fae7b65b-0f03-4de9-bfa9-ffbfc4ebcf53"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"-", "kT3"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "-", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "-", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"-", "kT3"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "-", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "+", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   FractionBox["1", 
+    SqrtBox[
+     FractionBox[
+      RowBox[{
+       SuperscriptBox["kT3", "2"], "+", 
+       SuperscriptBox["kT4", "2"], "+", 
+       RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+        RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+       RowBox[{
+        SuperscriptBox["kT3", "2"], " ", 
+        RowBox[{"Cosh", "[", 
+         RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+       RowBox[{
+        SuperscriptBox["kT4", "2"], " ", 
+        RowBox[{"Cosh", "[", 
+         RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+       RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+        RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+       RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+        RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], 
+      RowBox[{
+       SuperscriptBox["kT3", "2"], "+", 
+       SuperscriptBox["kT4", "2"], "+", 
+       RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Cos", "[", 
+         RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}]]]]}], "}"}]], "Output",\
+
+ CellChangeTimes->{3.775497705512158*^9},
+ CellLabel->
+  "Out[224]=",ExpressionUUID->"b70b5df9-83b0-4ee9-aa8c-5d2d741914f3"]
+}, Closed]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"--", 
+    RowBox[{"+", "-"}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"config", "=", "\"\<--+-\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{
+      RowBox[{"-", "1"}], ",", 
+      RowBox[{"-", "1"}], ",", "1", ",", 
+      RowBox[{"-", "1"}]}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub1", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box1", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub2", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box2", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub3", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box3", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub4", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box4", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"sumbox", "=", 
+     RowBox[{
+      RowBox[{"bsub1", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub2", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub3", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub4", "[", 
+       RowBox[{"[", "1", "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<box_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "sumbox"}], "]"}], ";"}]}]}]], "Input",
+ CellChangeTimes->{{3.774352529005231*^9, 3.774352532203652*^9}, 
+   3.774352869480513*^9, {3.77436488780518*^9, 3.774364888111985*^9}, {
+   3.775496611025816*^9, 3.775496618028469*^9}},
+ CellLabel->
+  "In[225]:=",ExpressionUUID->"ccddb553-b79e-4e2f-b2e8-37d92e711b60"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{"ek1vec", "\[IndentingNewLine]", "ek2vec", \
+"\[IndentingNewLine]", "ek4vec", "\[IndentingNewLine]", "ek5vec"}], "Input",
+ CellLabel->
+  "In[235]:=",ExpressionUUID->"5e22bb0e-cc8d-4d2c-8d89-8696ac48023c"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox["1", 
+    SqrtBox["2"]], ",", 
+   RowBox[{"-", 
+    FractionBox["\[ImaginaryI]", 
+     SqrtBox["2"]]}], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.7754979053258247`*^9},
+ CellLabel->
+  "Out[235]=",ExpressionUUID->"1d1aff26-c11b-498f-a281-4edca3f48b8e"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox["1", 
+    SqrtBox["2"]], ",", 
+   FractionBox["\[ImaginaryI]", 
+    SqrtBox["2"]], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.775497905333959*^9},
+ CellLabel->
+  "Out[236]=",ExpressionUUID->"fe1b4903-a745-4370-a850-2eb30e49b07e"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{
+      RowBox[{"Sech", "[", "\[Eta]4", "]"}], " ", 
+      RowBox[{"Sinh", "[", 
+       RowBox[{"\[Eta]4", "-", 
+        RowBox[{"\[ImaginaryI]", " ", "\[Phi]4"}]}], "]"}]}], 
+     SqrtBox["2"]]}], ",", 
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{
+      RowBox[{"\[ImaginaryI]", " ", 
+       RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+      RowBox[{
+       RowBox[{"Sin", "[", "\[Phi]4", "]"}], " ", 
+       RowBox[{"Tanh", "[", "\[Eta]4", "]"}]}]}], 
+     SqrtBox["2"]]}], ",", 
+   FractionBox[
+    RowBox[{"Sech", "[", "\[Eta]4", "]"}], 
+    SqrtBox["2"]]}], "}"}]], "Output",
+ CellChangeTimes->{3.7754979053420057`*^9},
+ CellLabel->
+  "Out[237]=",ExpressionUUID->"c0401559-5133-43a1-95d9-2c147aeac684"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{"kT3", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "+", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "-", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{"kT3", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "+", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "+", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox[
+      FractionBox[
+       RowBox[{
+        SuperscriptBox["kT3", "2"], "+", 
+        SuperscriptBox["kT4", "2"], "+", 
+        RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+         RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+        RowBox[{
+         SuperscriptBox["kT3", "2"], " ", 
+         RowBox[{"Cosh", "[", 
+          RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+        RowBox[{
+         SuperscriptBox["kT4", "2"], " ", 
+         RowBox[{"Cosh", "[", 
+          RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+        RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+         RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+        RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+         RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], 
+       RowBox[{
+        SuperscriptBox["kT3", "2"], "+", 
+        SuperscriptBox["kT4", "2"], "+", 
+        RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Cos", "[", 
+          RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}]]]]}]}], 
+  "}"}]], "Output",
+ CellChangeTimes->{3.775497905356739*^9},
+ CellLabel->
+  "Out[238]=",ExpressionUUID->"69980d33-68ef-4bc7-8483-e5f3624dc2f2"]
+}, Closed]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"--", 
+    RowBox[{"-", "+"}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"config", "=", "\"\<---+\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{
+      RowBox[{"-", "1"}], ",", 
+      RowBox[{"-", "1"}], ",", 
+      RowBox[{"-", "1"}], ",", "1"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub1", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box1", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub2", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box2", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub3", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box3", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub4", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box4", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"sumbox", "=", 
+     RowBox[{
+      RowBox[{"bsub1", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub2", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub3", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub4", "[", 
+       RowBox[{"[", "1", "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<box_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "sumbox"}], "]"}], ";"}]}]}]], "Input",
+ CellChangeTimes->{{3.7743525555879*^9, 3.7743525676513443`*^9}, 
+   3.774352872458866*^9, {3.774364890455717*^9, 3.77436489078689*^9}, {
+   3.775496623359764*^9, 3.7754966299863863`*^9}},
+ CellLabel->
+  "In[239]:=",ExpressionUUID->"b793fa34-3995-4321-8821-1b621911c453"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{"ek1vec", "\[IndentingNewLine]", "ek2vec", \
+"\[IndentingNewLine]", "ek4vec", "\[IndentingNewLine]", "ek5vec"}], "Input",
+ CellChangeTimes->{{3.775496709815193*^9, 3.775496712543408*^9}},
+ CellLabel->
+  "In[249]:=",ExpressionUUID->"f84ff2cc-9ea3-4b80-b650-9f55fc0f9050"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox["1", 
+    SqrtBox["2"]], ",", 
+   RowBox[{"-", 
+    FractionBox["\[ImaginaryI]", 
+     SqrtBox["2"]]}], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.775498108673365*^9},
+ CellLabel->
+  "Out[249]=",ExpressionUUID->"c06349b5-a8e5-4a9d-9151-70897cbad86c"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox["1", 
+    SqrtBox["2"]], ",", 
+   FractionBox["\[ImaginaryI]", 
+    SqrtBox["2"]], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.7754981086826982`*^9},
+ CellLabel->
+  "Out[250]=",ExpressionUUID->"f6e999f4-5535-4229-b523-b56222e09ce5"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{"Sech", "[", "\[Eta]4", "]"}], " ", 
+     RowBox[{"Sinh", "[", 
+      RowBox[{"\[Eta]4", "+", 
+       RowBox[{"\[ImaginaryI]", " ", "\[Phi]4"}]}], "]"}]}], 
+    SqrtBox["2"]], ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{
+      RowBox[{"-", "\[ImaginaryI]"}], " ", 
+      RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+     RowBox[{
+      RowBox[{"Sin", "[", "\[Phi]4", "]"}], " ", 
+      RowBox[{"Tanh", "[", "\[Eta]4", "]"}]}]}], 
+    SqrtBox["2"]], ",", 
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{"Sech", "[", "\[Eta]4", "]"}], 
+     SqrtBox["2"]]}]}], "}"}]], "Output",
+ CellChangeTimes->{3.775498108693202*^9},
+ CellLabel->
+  "Out[251]=",ExpressionUUID->"e26cd2b4-0fcd-4c1a-bc01-8ecb0c2ab4db"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"-", "kT3"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "-", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "-", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"-", "kT3"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "-", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "+", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   FractionBox["1", 
+    SqrtBox[
+     FractionBox[
+      RowBox[{
+       SuperscriptBox["kT3", "2"], "+", 
+       SuperscriptBox["kT4", "2"], "+", 
+       RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+        RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+       RowBox[{
+        SuperscriptBox["kT3", "2"], " ", 
+        RowBox[{"Cosh", "[", 
+         RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+       RowBox[{
+        SuperscriptBox["kT4", "2"], " ", 
+        RowBox[{"Cosh", "[", 
+         RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+       RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+        RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+       RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+        RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], 
+      RowBox[{
+       SuperscriptBox["kT3", "2"], "+", 
+       SuperscriptBox["kT4", "2"], "+", 
+       RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Cos", "[", 
+         RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}]]]]}], "}"}]], "Output",\
+
+ CellChangeTimes->{3.775498108709044*^9},
+ CellLabel->
+  "Out[252]=",ExpressionUUID->"9657c170-36b8-411d-8b6b-3d6276292375"]
+}, Closed]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"--", "--"}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"config", "=", "\"\<----\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{
+      RowBox[{"-", "1"}], ",", 
+      RowBox[{"-", "1"}], ",", 
+      RowBox[{"-", "1"}], ",", 
+      RowBox[{"-", "1"}]}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub1", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box1", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub2", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box2", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub3", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box3", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub4", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box4", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"sumbox", "=", 
+     RowBox[{
+      RowBox[{"bsub1", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub2", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub3", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub4", "[", 
+       RowBox[{"[", "1", "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<box_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "sumbox"}], "]"}], ";"}]}]}]], "Input",
+ CellChangeTimes->{{3.774352583126089*^9, 3.7743525908491087`*^9}, 
+   3.774352874811473*^9, {3.774364893076682*^9, 3.774364893332685*^9}, {
+   3.775496635538294*^9, 3.775496642575879*^9}},
+ CellLabel->
+  "In[253]:=",ExpressionUUID->"904d1e14-4906-4fe4-96f1-2666b54aee06"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{"ek1vec", "\[IndentingNewLine]", "ek2vec", \
+"\[IndentingNewLine]", "ek4vec", "\[IndentingNewLine]", "ek5vec"}], "Input",
+ CellLabel->
+  "In[263]:=",ExpressionUUID->"ccf4c247-cfe0-485b-8f60-c5cb1c2404f2"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox["1", 
+    SqrtBox["2"]], ",", 
+   RowBox[{"-", 
+    FractionBox["\[ImaginaryI]", 
+     SqrtBox["2"]]}], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.775498312810131*^9},
+ CellLabel->
+  "Out[263]=",ExpressionUUID->"eb569226-c832-4d1b-bd18-8c78de3ac024"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox["1", 
+    SqrtBox["2"]], ",", 
+   FractionBox["\[ImaginaryI]", 
+    SqrtBox["2"]], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.775498312819539*^9},
+ CellLabel->
+  "Out[264]=",ExpressionUUID->"4c4d179c-6005-4a69-869b-32e6c3d44696"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{"Sech", "[", "\[Eta]4", "]"}], " ", 
+     RowBox[{"Sinh", "[", 
+      RowBox[{"\[Eta]4", "+", 
+       RowBox[{"\[ImaginaryI]", " ", "\[Phi]4"}]}], "]"}]}], 
+    SqrtBox["2"]], ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{
+      RowBox[{"-", "\[ImaginaryI]"}], " ", 
+      RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+     RowBox[{
+      RowBox[{"Sin", "[", "\[Phi]4", "]"}], " ", 
+      RowBox[{"Tanh", "[", "\[Eta]4", "]"}]}]}], 
+    SqrtBox["2"]], ",", 
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{"Sech", "[", "\[Eta]4", "]"}], 
+     SqrtBox["2"]]}]}], "}"}]], "Output",
+ CellChangeTimes->{3.775498312827202*^9},
+ CellLabel->
+  "Out[265]=",ExpressionUUID->"122f04a8-3049-4ef7-812a-dedea2b60c56"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{"kT3", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "+", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "-", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{"kT3", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "+", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "+", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox[
+      FractionBox[
+       RowBox[{
+        SuperscriptBox["kT3", "2"], "+", 
+        SuperscriptBox["kT4", "2"], "+", 
+        RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+         RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+        RowBox[{
+         SuperscriptBox["kT3", "2"], " ", 
+         RowBox[{"Cosh", "[", 
+          RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+        RowBox[{
+         SuperscriptBox["kT4", "2"], " ", 
+         RowBox[{"Cosh", "[", 
+          RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+        RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+         RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+        RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+         RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], 
+       RowBox[{
+        SuperscriptBox["kT3", "2"], "+", 
+        SuperscriptBox["kT4", "2"], "+", 
+        RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Cos", "[", 
+          RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}]]]]}]}], 
+  "}"}]], "Output",
+ CellChangeTimes->{3.77549831284846*^9},
+ CellLabel->
+  "Out[266]=",ExpressionUUID->"b4ca1d9c-4431-4e3d-bafa-ac054aac2ca1"]
+}, Closed]],
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", "\[IndentingNewLine]"}]], "Input",
+ CellChangeTimes->{{3.775496646442024*^9, 
+  3.775496646585607*^9}},ExpressionUUID->"748f33a8-75a3-45ad-8268-\
+03283d31b0cc"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", 
+   RowBox[{"Triangles", " ", "Only"}], "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"config", "=", "\"\<++++\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{"1", ",", "1", ",", "1", ",", "1"}], "]"}], ";"}], 
+   "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"config", "=", "\"\<+++-\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{"1", ",", "1", ",", "1", ",", 
+      RowBox[{"-", "1"}]}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"config", "=", "\"\<++-+\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{"1", ",", "1", ",", 
+      RowBox[{"-", "1"}], ",", "1"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"config", "=", "\"\<++--\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{"1", ",", "1", ",", 
+      RowBox[{"-", "1"}], ",", 
+      RowBox[{"-", "1"}]}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"config", "=", "\"\<+-++\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{"1", ",", 
+      RowBox[{"-", "1"}], ",", "1", ",", "1"}], "]"}], ";"}], 
+   "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"config", "=", "\"\<+-+-\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{"1", ",", 
+      RowBox[{"-", "1"}], ",", "1", ",", 
+      RowBox[{"-", "1"}]}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"config", "=", "\"\<+--+\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{"1", ",", 
+      RowBox[{"-", "1"}], ",", 
+      RowBox[{"-", "1"}], ",", "1"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"config", "=", "\"\<+---\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{"1", ",", 
+      RowBox[{"-", "1"}], ",", 
+      RowBox[{"-", "1"}], ",", 
+      RowBox[{"-", "1"}]}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"config", "=", "\"\<-+++\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{
+      RowBox[{"-", "1"}], ",", "1", ",", "1", ",", "1"}], "]"}], ";"}], 
+   "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"config", "=", "\"\<-++-\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{
+      RowBox[{"-", "1"}], ",", "1", ",", "1", ",", 
+      RowBox[{"-", "1"}]}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"config", "=", "\"\<-+-+\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{
+      RowBox[{"-", "1"}], ",", "1", ",", 
+      RowBox[{"-", "1"}], ",", "1"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"config", "=", "\"\<-+-+\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{
+      RowBox[{"-", "1"}], ",", "1", ",", 
+      RowBox[{"-", "1"}], ",", "1"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"config", "=", "\"\<-+--\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{
+      RowBox[{"-", "1"}], ",", "1", ",", 
+      RowBox[{"-", "1"}], ",", 
+      RowBox[{"-", "1"}]}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"config", "=", "\"\<--++\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{
+      RowBox[{"-", "1"}], ",", 
+      RowBox[{"-", "1"}], ",", "1", ",", "1"}], "]"}], ";"}], 
+   "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"config", "=", "\"\<--+-\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{
+      RowBox[{"-", "1"}], ",", 
+      RowBox[{"-", "1"}], ",", "1", ",", 
+      RowBox[{"-", "1"}]}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"config", "=", "\"\<---+\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{
+      RowBox[{"-", "1"}], ",", 
+      RowBox[{"-", "1"}], ",", 
+      RowBox[{"-", "1"}], ",", "1"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"config", "=", "\"\<----\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{
+      RowBox[{"-", "1"}], ",", 
+      RowBox[{"-", "1"}], ",", 
+      RowBox[{"-", "1"}], ",", 
+      RowBox[{"-", "1"}]}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]"}]}]], "Input",
+ CellChangeTimes->{
+  3.7743577285420027`*^9, {3.77437176080653*^9, 3.774371770188993*^9}},
+ CellLabel->"In[35]:=",ExpressionUUID->"decca2b0-8e15-4e87-a985-d5712b125d5f"],
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
+  
+  RowBox[{"(*", " ", 
+   RowBox[{
+    RowBox[{
+    "Differences", " ", "in", " ", "helicity", " ", "vectors", " ", "due", 
+     " ", "to", " ", "taking", " ", "the", " ", "limit", " ", "when", " ", 
+     "kT"}], "\[Rule]", "0."}], " ", "*)"}]}]], "Input",
+ CellChangeTimes->{{3.774375381176281*^9, 
+  3.774375409332838*^9}},ExpressionUUID->"4563076e-3246-46f7-97bc-\
+73b664b8307f"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"pairdef", "[", 
+   RowBox[{"1", ",", "1", ",", "1", ",", "1"}], "]"}], ";"}]], "Input",
+ CellChangeTimes->{{3.774375673171742*^9, 3.7743756809353333`*^9}, {
+  3.775487160130682*^9, 
+  3.775487161357504*^9}},ExpressionUUID->"0bc98909-fe56-4051-8545-\
+05a60ebbbb32"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"ek1vecInc", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"EpolEuc", "[", 
+      RowBox[{"0", ",", "k1x", ",", "k1y", ",", "k1z", ",", "1"}], "]"}], "/.", 
+     RowBox[{"{", 
+      RowBox[{"k1y", "\[Rule]", "0"}], "}"}]}], "//", "Simplify"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"ek1vec", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{
+      RowBox[{"Limit", "[", 
+       RowBox[{"ek1vecInc", ",", 
+        RowBox[{"k1x", "\[Rule]", "0"}], ",", 
+        RowBox[{"Direction", "\[Rule]", "\"\<FromAbove\>\""}]}], "]"}], "/.", 
+      "CMSFrame"}], "/.", 
+     RowBox[{"rS", "\[Rule]", 
+      RowBox[{"Sqrt", "[", "S", "]"}]}]}], "//", "Simplify"}]}], " ", 
+  RowBox[{"(*", " ", 
+   RowBox[{
+    RowBox[{"because", " ", "kz"}], " ", ">", " ", "0"}], " ", "*)"}], 
+  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"ek1vecW", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{
+      RowBox[{"Limit", "[", 
+       RowBox[{"ek1vecInc", ",", 
+        RowBox[{"k1x", "\[Rule]", "0"}], ",", 
+        RowBox[{"Direction", "\[Rule]", "\"\<FromBelow\>\""}]}], "]"}], "/.", 
+      "CMSFrame"}], "/.", 
+     RowBox[{"rS", "\[Rule]", 
+      RowBox[{"Sqrt", "[", "S", "]"}]}]}], "//", "Simplify"}]}], 
+  " "}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{
+    RowBox[{"if", " ", "kz"}], " ", "<", " ", "0"}], " ", "*)"}]}]}], "Input",\
+
+ CellChangeTimes->{{3.774374300765133*^9, 3.7743743287287283`*^9}, 
+   3.774374519002439*^9, {3.774374889448814*^9, 3.774374899167944*^9}, {
+   3.774375118790688*^9, 3.774375121358261*^9}, {3.774375414725223*^9, 
+   3.774375424138667*^9}},
+ CellLabel->
+  "In[289]:=",ExpressionUUID->"c2b37f9c-dad4-4307-af24-d9a0d850bff4"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox["2"]]}], ",", 
+   RowBox[{"-", 
+    FractionBox["\[ImaginaryI]", 
+     SqrtBox["2"]]}], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{{3.774374316813087*^9, 3.774374329259758*^9}, 
+   3.774374520182932*^9, {3.7743748931774483`*^9, 3.7743748995100613`*^9}, 
+   3.774375683458005*^9, 3.774614591885223*^9},
+ CellLabel->
+  "Out[290]=",ExpressionUUID->"0053d0e2-0989-4bdf-b06a-f9d1922adf20"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox["1", 
+    SqrtBox["2"]], ",", 
+   FractionBox["\[ImaginaryI]", 
+    SqrtBox["2"]], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{{3.774374316813087*^9, 3.774374329259758*^9}, 
+   3.774374520182932*^9, {3.7743748931774483`*^9, 3.7743748995100613`*^9}, 
+   3.774375683458005*^9, 3.774614591934792*^9},
+ CellLabel->
+  "Out[291]=",ExpressionUUID->"43fbcf8e-8599-42a1-bfcc-4516bc717d3d"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"ek2vecInc", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"EpolEuc", "[", 
+      RowBox[{"0", ",", "k2x", ",", "k2y", ",", "k2z", ",", "1"}], "]"}], "/.", 
+     RowBox[{"{", 
+      RowBox[{"k2y", "\[Rule]", "0"}], "}"}]}], "//", "Simplify"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"ek2vec", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{
+      RowBox[{"Limit", "[", 
+       RowBox[{"ek2vecInc", ",", 
+        RowBox[{"k2x", "\[Rule]", "0"}], ",", 
+        RowBox[{"Direction", "\[Rule]", "\"\<FromBelow\>\""}]}], "]"}], "/.", 
+      "CMSFrame"}], "/.", 
+     RowBox[{"rS", "\[Rule]", 
+      RowBox[{"Sqrt", "[", "S", "]"}]}]}], "//", "Simplify"}]}], " ", 
+  "\[IndentingNewLine]", 
+  RowBox[{"(*", " ", 
+   RowBox[{
+    RowBox[{"because", " ", "kz"}], " ", "<", " ", "0"}], " ", "*)"}], 
+  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
+ RowBox[{"ek2vecW", "=", 
+  RowBox[{
+   RowBox[{
+    RowBox[{
+     RowBox[{"Limit", "[", 
+      RowBox[{"ek2vecInc", ",", 
+       RowBox[{"k2x", "\[Rule]", "0"}], ",", 
+       RowBox[{"Direction", "\[Rule]", "\"\<FromAbove\>\""}]}], "]"}], "/.", 
+     "CMSFrame"}], "/.", 
+    RowBox[{"rS", "\[Rule]", 
+     RowBox[{"Sqrt", "[", "S", "]"}]}]}], "//", 
+   "Simplify"}]}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{
+    RowBox[{"if", " ", "kz"}], " ", ">", " ", "0"}], " ", "*)"}], 
+  " "}]}], "Input",
+ CellChangeTimes->{{3.774374732551367*^9, 3.774374736580291*^9}, {
+  3.77437486733582*^9, 3.774374886301341*^9}, {3.774375109145692*^9, 
+  3.774375111125836*^9}, {3.7743754271117153`*^9, 3.7743754355611143`*^9}},
+ CellLabel->
+  "In[535]:=",ExpressionUUID->"93d4e542-71cc-4953-af8e-c169abe35c37"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox["2"]]}], ",", 
+   FractionBox["\[ImaginaryI]", 
+    SqrtBox["2"]], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{{3.774374733308296*^9, 3.7743747371111307`*^9}, 
+   3.7743748960302362`*^9, 3.7743749700018387`*^9, 3.7743756863446007`*^9, 
+   3.774614594309457*^9, 3.775230073268903*^9},
+ CellLabel->
+  "Out[536]=",ExpressionUUID->"3293794e-373e-45b0-88e3-12a28b10e6d4"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox["1", 
+    SqrtBox["2"]], ",", 
+   RowBox[{"-", 
+    FractionBox["\[ImaginaryI]", 
+     SqrtBox["2"]]}], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{{3.774374733308296*^9, 3.7743747371111307`*^9}, 
+   3.7743748960302362`*^9, 3.7743749700018387`*^9, 3.7743756863446007`*^9, 
+   3.774614594309457*^9, 3.775230073358686*^9},
+ CellLabel->
+  "Out[537]=",ExpressionUUID->"105e4034-56e9-4119-976c-1771ee3f4d7e"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"ek4vec", "/.", "KinRules"}], "/.", "KinSub"}]], "Input",
+ CellChangeTimes->{{3.77437560512392*^9, 3.774375614570808*^9}},
+ CellLabel->
+  "In[297]:=",ExpressionUUID->"8f69032e-381e-4355-9ee9-143e3faa4659"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox["\[ImaginaryI]", 
+     SqrtBox["2"]]}], ",", "0", ",", 
+   FractionBox["1", 
+    SqrtBox["2"]]}], "}"}]], "Output",
+ CellChangeTimes->{3.774375614964827*^9, 3.774375692319228*^9, 
+  3.774614602339438*^9},
+ CellLabel->
+  "Out[297]=",ExpressionUUID->"395e9ca9-8a54-41e6-b00a-82e661c745b9"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"ek5vec", "/.", "KinRules"}], "/.", "KinSub"}]], "Input",
+ CellChangeTimes->{{3.774375617284769*^9, 3.774375624171795*^9}},
+ CellLabel->
+  "In[298]:=",ExpressionUUID->"82dd246c-415e-4947-89d4-a9492a7c08d0"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"0.`", "\[VeryThinSpace]", "+", 
+    RowBox[{"0.7013259782290641`", " ", "\[ImaginaryI]"}]}], ",", 
+   RowBox[{"0.`", "\[VeryThinSpace]", "+", 
+    RowBox[{"0.09023232381495236`", " ", "\[ImaginaryI]"}]}], ",", 
+   "0.7071067811865476`"}], "}"}]], "Output",
+ CellChangeTimes->{3.7743756244196453`*^9, 3.774375694529842*^9, 
+  3.7746146086277113`*^9},
+ CellLabel->
+  "Out[298]=",ExpressionUUID->"439827f5-7f37-45eb-a6db-4f44bbe16d70"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
+  "\[IndentingNewLine]", "\[IndentingNewLine]"}]], "Input",
+ CellChangeTimes->{{3.7754954543658113`*^9, 
+  3.775495454866901*^9}},ExpressionUUID->"46f1ab6d-937e-4ec4-ac8d-\
+bff28579c110"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", 
+   RowBox[{"TEST", " ", "ggHgg", " ", "Triangle"}], "*)"}], 
+  "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
+  RowBox[{"(*", 
+   RowBox[{"test", " ", "1"}], "*)"}], "\[IndentingNewLine]", 
+  "tsub"}]], "Input",
+ CellChangeTimes->{{3.7752248394984837`*^9, 3.775224900537775*^9}, {
+  3.775227377920702*^9, 3.775227385044223*^9}, {3.775487200391507*^9, 
+  3.7754872030342817`*^9}},
+ CellLabel->"In[96]:=",ExpressionUUID->"39596f69-54b3-4502-bc9a-e27bb48d3f41"],
+
+Cell[BoxData["tsub"], "Output",
+ CellChangeTimes->{
+  3.775224847700425*^9, {3.775224892303636*^9, 3.775224901027123*^9}, 
+   3.775487206480253*^9},
+ CellLabel->"Out[96]=",ExpressionUUID->"391ef8fa-412a-4103-98ac-6efb4aca67ca"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"output", "=", 
+   RowBox[{
+    RowBox[{"N", "[", 
+     RowBox[{
+      RowBox[{"OutputPS", "[", 
+       RowBox[{"300.", ",", "20.", ",", "0", ",", 
+        RowBox[{"Pi", "/", "3"}], ",", "0", ",", 
+        RowBox[{"3", "*", 
+         RowBox[{"Pi", "/", "2"}]}], ",", "125."}], "]"}], ",", "10"}], "]"}],
+     "[", 
+    RowBox[{"[", "2", "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"KinRules", "=", 
+   RowBox[{"f", "[", 
+    RowBox[{"variables", ",", "output"}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"KinSub", "=", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{"S", "\[Rule]", 
+      RowBox[{"300.", "^", "2"}]}], ",", 
+     RowBox[{"kT3", "\[Rule]", "20."}], ",", 
+     RowBox[{"\[Eta]3", "\[Rule]", "0"}], ",", 
+     RowBox[{"\[Phi]3", "\[Rule]", 
+      RowBox[{"Pi", "/", "3"}]}], ",", 
+     RowBox[{"\[Eta]4", "\[Rule]", "0"}], ",", 
+     RowBox[{"\[Phi]4", "\[Rule]", 
+      RowBox[{"3", "*", 
+       RowBox[{"Pi", "/", "2"}]}]}], ",", 
+     RowBox[{"MH", "\[Rule]", "125."}], ",", 
+     RowBox[{"MT", "\[Rule]", "173."}]}], "}"}]}], ";"}]}], "Input",
+ CellChangeTimes->{{3.7752282010678043`*^9, 3.775228231892907*^9}},
+ CellLabel->"In[33]:=",ExpressionUUID->"b34e4af8-5a92-4433-91fe-7fe2aaea58e5"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"kT3_max = \"\>", "\[InvisibleSpace]", 
+   RowBox[{"{", 
+    RowBox[{"kT3", "\[Rule]", "123.95833333333334`"}], "}"}], 
+   "\[InvisibleSpace]", "\<\"\\n\"\>"}],
+  SequenceForm["kT3_max = ", {$CellContext`kT3 -> 123.95833333333334`}, "\n"],
+  
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775230932041807*^9, 3.7752309727942142`*^9, 
+  3.775231284982201*^9, 3.776438248575953*^9},
+ CellLabel->
+  "During evaluation of \
+In[33]:=",ExpressionUUID->"036d06c3-d736-46a4-85af-321881037012"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Four Momenta : \\n\"\>", "\[InvisibleSpace]", 
+   TagBox[
+    RowBox[{"(", "\[NoBreak]", 
+     TagBox[GridBox[{
+        {
+         RowBox[{"p1", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"150.`", ",", "0.`", ",", "0.`", ",", "150.`"}], "}"}]}]},
+        {
+         RowBox[{"p2", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"150.`", ",", "0.`", ",", "0.`", ",", 
+            RowBox[{"-", "150.`"}]}], "}"}]}]},
+        {
+         RowBox[{"p3", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{
+           "126.58988901172162`", ",", "10.`", ",", "17.320508075688775`", 
+            ",", "0.`"}], "}"}]}]},
+        {
+         RowBox[{"p4", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"95.04498070119013`", ",", "0.`", ",", 
+            RowBox[{"-", "95.04498070119013`"}], ",", "0.`"}], "}"}]}]},
+        {
+         RowBox[{"p5", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"78.3651302870882`", ",", 
+            RowBox[{"-", "10.`"}], ",", "77.72447262550135`", ",", "0.`"}], 
+           "}"}]}]}
+       },
+       GridBoxAlignment->{
+        "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, 
+         "Rows" -> {{Baseline}}, "RowsIndexed" -> {}},
+       GridBoxSpacings->{"Columns" -> {
+           Offset[0.27999999999999997`], {
+            Offset[0.5599999999999999]}, 
+           Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+           Offset[0.2], {
+            Offset[0.4]}, 
+           Offset[0.2]}, "RowsIndexed" -> {}}],
+      Column], "\[NoBreak]", ")"}],
+    Function[BoxForm`e$, 
+     MatrixForm[BoxForm`e$]]], "\[InvisibleSpace]", "\<\"\\n\"\>"}],
+  SequenceForm["Four Momenta : \n", 
+   MatrixForm[{$CellContext`p1 -> {150., 0., 0., 150.}, $CellContext`p2 -> {
+      150., 0., 0., -150.}, $CellContext`p3 -> {126.58988901172162`, 10., 
+      17.320508075688775`, 0.}, $CellContext`p4 -> {95.04498070119013, 
+      0., -95.04498070119013, 0.}, $CellContext`p5 -> {78.3651302870882, -10.,
+       77.72447262550135, 0.}}], "\n"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775230932041807*^9, 3.7752309727942142`*^9, 
+  3.775231284982201*^9, 3.776438248589973*^9},
+ CellLabel->
+  "During evaluation of \
+In[33]:=",ExpressionUUID->"7f092130-65a6-48f6-a225-c9cb2c9bf4af"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Check 4 momentum conservation: p3+p4+p5 -p1 -p2 =0 :  \"\>", 
+   "\[InvisibleSpace]", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{
+     "-", "3.887221955939928966560590155849714544348308363744058289341178206`\
+43.811488088675176*^-14"}], ",", "0``58.69897000433602", ",", 
+     "0``57.72104081749894", ",", "0``57.522878745280345"}], "}"}]}],
+  SequenceForm[
+  "Check 4 momentum conservation: p3+p4+p5 -p1 -p2 =0 :  ", \
+{-3.887221955939928966560590155849714544348308363744058289341178206`43.\
+811488088675176*^-14, 0``58.69897000433602, 0``57.72104081749894, 
+    0``57.522878745280345}],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775230932041807*^9, 3.7752309727942142`*^9, 
+  3.775231284982201*^9, 3.7764382486049023`*^9},
+ CellLabel->
+  "During evaluation of \
+In[33]:=",ExpressionUUID->"74d09005-80d4-4eb5-b2ad-db0c1a75acc8"],
+
+Cell[BoxData["\<\"MOMENTUM IS CONSERVED, ALL IS WELL!\"\>"], "Print",
+ CellChangeTimes->{3.775230932041807*^9, 3.7752309727942142`*^9, 
+  3.775231284982201*^9, 3.77643824861449*^9},
+ CellLabel->
+  "During evaluation of \
+In[33]:=",ExpressionUUID->"b274558c-4e4b-4c44-9c4c-5fbe2460bcbc"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{
+   RowBox[{"kkT3", "\[Rule]", "20.`"}], ",", 
+   RowBox[{"kkT4", "\[Rule]", "95.0449807011901270926`10."}], ",", 
+   RowBox[{"S", "\[Rule]", "90000.`10."}], ",", 
+   RowBox[{"T", "\[Rule]", 
+    RowBox[{"-", "22351.9667035164881926659`10."}]}], ",", 
+   RowBox[{"U", "\[Rule]", 
+    RowBox[{"-", "22351.9667035164881926659`10."}]}], ",", 
+   RowBox[{"T24", "\[Rule]", 
+    RowBox[{"-", "28513.4942103570381277677`10."}]}], ",", 
+   RowBox[{"T14", "\[Rule]", 
+    RowBox[{"-", "28513.4942103570381277677`10."}]}], ",", 
+   RowBox[{"S34", "\[Rule]", "42980.9218277470587333204`10."}], ",", 
+   RowBox[{
+    SqrtBox["S"], "\[Rule]", "300.`10."}], ",", 
+   RowBox[{
+    SqrtBox["S34"], "\[Rule]", "207.3184068715246970733`10."}], ",", 
+   RowBox[{
+    RowBox[{"Tan", "[", "\[Phi]5", "]"}], "\[Rule]", 
+    RowBox[{"-", "0.12865960568407904294629727505559632487`10."}]}], ",", 
+   RowBox[{"kT5", "\[Rule]", "78.3651302870882067263`10."}], ",", 
+   RowBox[{
+    SqrtBox["S35"], "\[Rule]", "181.5847228686540904465`10."}]}], 
+  "}"}]], "Print",
+ CellChangeTimes->{3.775230932041807*^9, 3.7752309727942142`*^9, 
+  3.775231284982201*^9, 3.776438248624385*^9},
+ CellLabel->
+  "During evaluation of \
+In[33]:=",ExpressionUUID->"3221b609-dcc3-4da4-a3e3-9f5bc8e7bbf2"]
+}, Open  ]]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{"t", "=", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"tsub", "//.", "KinRules"}], "//.", "KinSub"}], "//", 
+   "FullSimplify"}]}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"tfinal", "=", 
+   RowBox[{
+    RowBox[{"t", "/.", 
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{"Alfas", "\[Rule]", 
+        RowBox[{"1", "/", "128"}]}], ",", 
+       RowBox[{"MW", "\[Rule]", "80.376"}], ",", 
+       RowBox[{"SW", "\[Rule]", "0.480832611207"}], ",", 
+       RowBox[{"EL", "\[Rule]", 
+        RowBox[{"Sqrt", "[", 
+         RowBox[{"4", "*", "Pi", "*", 
+          RowBox[{"(", 
+           RowBox[{"1", "/", "128"}], ")"}]}], "]"}]}]}], "}"}]}], "//", 
+    "Simplify"}]}], ";"}]}], "Input",
+ CellChangeTimes->{{3.775225058535507*^9, 3.7752250620472116`*^9}, {
+   3.775225117463687*^9, 3.7752251255225*^9}, {3.7752256278150873`*^9, 
+   3.7752256713762207`*^9}, {3.775228280738386*^9, 3.775228280888126*^9}, {
+   3.775228383635068*^9, 3.7752283879715357`*^9}, {3.775230702176445*^9, 
+   3.7752307026709137`*^9}, {3.775230819239026*^9, 3.7752308282809753`*^9}, {
+   3.77523090526558*^9, 3.7752309059485817`*^9}, 3.775230965516696*^9, {
+   3.775231230843745*^9, 3.775231239908455*^9}, {3.775231275597724*^9, 
+   3.7752312824194508`*^9}},
+ CellLabel->
+  "In[713]:=",ExpressionUUID->"9fd3d5e6-8ffa-493a-8595-d6d0d780805f"],
+
+Cell[BoxData[
+ FractionBox[
+  RowBox[{
+   SuperscriptBox["Alfas", "2"], " ", 
+   RowBox[{"(", 
+    RowBox[{
+     RowBox[{
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"-", "4.42282197922486`"}], "-", 
+        RowBox[{"0.2629022710276373`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+      "c1"}], "-", 
+     RowBox[{
+      RowBox[{"(", 
+       RowBox[{"4.422821979224851`", "\[VeryThinSpace]", "-", 
+        RowBox[{"0.2629022710276477`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+      "c2"}], "+", 
+     RowBox[{
+      RowBox[{"(", 
+       RowBox[{"8.845643958449717`", "\[VeryThinSpace]", "-", 
+        RowBox[{"1.0325074129013956`*^-14", " ", "\[ImaginaryI]"}]}], ")"}], 
+      " ", "c3"}]}], ")"}], " ", "EL"}], 
+  RowBox[{"MW", " ", "SW"}]]], "Output",
+ CellChangeTimes->{{3.775225664088006*^9, 3.77522567177706*^9}, 
+   3.775227855365807*^9, {3.775228209005939*^9, 3.775228237774908*^9}, 
+   3.7752282816268797`*^9, 3.775228322851685*^9, {3.775230703071548*^9, 
+   3.775230720365859*^9}, 3.775230828894676*^9, {3.7752309372342987`*^9, 
+   3.775230975260806*^9}, 3.775231288410503*^9},
+ CellLabel->
+  "Out[713]=",ExpressionUUID->"fa64eb15-5601-48dd-a605-5df7944ad9aa"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"t", "=", 
+   RowBox[{"List", "[", 
+    RowBox[{
+     RowBox[{"tfinal", "[", 
+      RowBox[{"[", 
+       RowBox[{"1", ",", "1"}], "]"}], "]"}], ",", 
+     RowBox[{"tfinal", "[", 
+      RowBox[{"[", 
+       RowBox[{"1", ",", "1"}], "]"}], "]"}], ",", 
+     RowBox[{"tfinal", "[", 
+      RowBox[{"[", 
+       RowBox[{"2", ",", "1"}], "]"}], "]"}], ",", 
+     RowBox[{"tfinal", "[", 
+      RowBox[{"[", 
+       RowBox[{"2", ",", "1"}], "]"}], "]"}], ",", 
+     RowBox[{"tfinal", "[", 
+      RowBox[{"[", 
+       RowBox[{"3", ",", "1"}], "]"}], "]"}], ",", 
+     RowBox[{"tfinal", "[", 
+      RowBox[{"[", 
+       RowBox[{"3", ",", "1"}], "]"}], "]"}]}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"t", "//", "MatrixForm"}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"mat", "=", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{"19", "/", "6"}], ",", 
+       RowBox[{"2", "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}]}], "}"}], ",", 
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{"2", "/", "3"}], ",", 
+       RowBox[{"19", "/", "6"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}]}], "}"}], ",", 
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{"2", "/", "3"}], ",", 
+       RowBox[{"19", "/", "6"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}]}], "}"}], ",", 
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{"19", "/", "6"}], ",", 
+       RowBox[{"2", "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}]}], "}"}], ",", 
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{"19", "/", "6"}], ",", 
+       RowBox[{"2", "/", "3"}]}], "}"}], ",", 
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{"2", "/", "3"}], ",", 
+       RowBox[{"19", "/", "6"}]}], "}"}]}], "}"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"mat", "//", "MatrixForm"}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"tdagger", "=", 
+   RowBox[{"Conjugate", "[", "t", "]"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"tdagger", "//", "MatrixForm"}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{"MdagM0", "=", " ", 
+  RowBox[{"Dot", "[", 
+   RowBox[{"tdagger", ",", "mat", ",", "t"}], "]"}]}]}], "Input",
+ CellChangeTimes->{{3.7752263172970657`*^9, 3.775226370760921*^9}, {
+   3.775226419611183*^9, 3.7752265454864264`*^9}, {3.775226879450161*^9, 
+   3.775227076406006*^9}, 3.775227861069626*^9, {3.775228176084751*^9, 
+   3.775228176316021*^9}, {3.775230890963722*^9, 3.775230891140901*^9}, {
+   3.775230946959694*^9, 3.7752309506553507`*^9}},
+ CellLabel->
+  "In[715]:=",ExpressionUUID->"5ded4345-d664-4ac5-9642-1b00a0681b1c"],
+
+Cell[BoxData[
+ RowBox[{"2.589543990648512`*^-10", "-", 
+  RowBox[{"4.1584903321868325`*^-28", " ", "\[ImaginaryI]"}]}]], "Output",
+ CellChangeTimes->{
+  3.775226331131727*^9, 3.775226372663734*^9, {3.7752264954014072`*^9, 
+   3.775226506968534*^9}, {3.775226537183036*^9, 3.775226545869584*^9}, 
+   3.775227022067236*^9, 3.775227078289074*^9, {3.775227857897359*^9, 
+   3.775227861355043*^9}, {3.7752282113000717`*^9, 3.775228239141239*^9}, 
+   3.775228284641056*^9, 3.775228327350637*^9, {3.775230705260297*^9, 
+   3.775230722370657*^9}, 3.775230831560916*^9, {3.7752309397957487`*^9, 
+   3.7752309771630077`*^9}, 3.775231290721431*^9},
+ CellLabel->
+  "Out[721]=",ExpressionUUID->"1a1d7ca1-25cc-4fb7-8df5-582cc32ec06c"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"(*", " ", 
+  RowBox[{"test", " ", "2"}], " ", "*)"}]], "Input",
+ CellChangeTimes->{{3.775227392185399*^9, 
+  3.775227397719922*^9}},ExpressionUUID->"5b66fb87-293a-4ef7-bff7-\
+0d09631bb6d8"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"output", "=", 
+   RowBox[{
+    RowBox[{"N", "[", 
+     RowBox[{
+      RowBox[{"OutputPS", "[", 
+       RowBox[{"300.", ",", "40.", ",", "0", ",", 
+        RowBox[{"Pi", "/", "3"}], ",", "0", ",", 
+        RowBox[{"3", "*", 
+         RowBox[{"Pi", "/", "2"}]}], ",", "125."}], "]"}], ",", "10"}], "]"}],
+     "[", 
+    RowBox[{"[", "2", "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"KinRules", "=", 
+   RowBox[{"f", "[", 
+    RowBox[{"variables", ",", "output"}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"KinSub", "=", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{"S", "\[Rule]", 
+      RowBox[{"300.", "^", "2"}]}], ",", 
+     RowBox[{"kT3", "\[Rule]", "40."}], ",", 
+     RowBox[{"\[Eta]3", "\[Rule]", "0"}], ",", 
+     RowBox[{"\[Phi]3", "\[Rule]", 
+      RowBox[{"Pi", "/", "3"}]}], ",", 
+     RowBox[{"\[Eta]4", "\[Rule]", "0"}], ",", 
+     RowBox[{"\[Phi]4", "\[Rule]", 
+      RowBox[{"3", "*", 
+       RowBox[{"Pi", "/", "2"}]}]}], ",", 
+     RowBox[{"MH", "\[Rule]", "125."}], ",", 
+     RowBox[{"MT", "\[Rule]", "173"}]}], "}"}]}], ";"}]}], "Input",
+ CellChangeTimes->{{3.775227712322483*^9, 3.775227726510152*^9}, {
+  3.77522812757227*^9, 3.775228136486952*^9}, {3.7752282452191553`*^9, 
+  3.775228245389009*^9}},
+ CellLabel->
+  "In[722]:=",ExpressionUUID->"a821d5f4-c947-47d0-a68d-88efb3b8dd3d"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"kT3_max = \"\>", "\[InvisibleSpace]", 
+   RowBox[{"{", 
+    RowBox[{"kT3", "\[Rule]", "123.95833333333334`"}], "}"}], 
+   "\[InvisibleSpace]", "\<\"\\n\"\>"}],
+  SequenceForm["kT3_max = ", {$CellContext`kT3 -> 123.95833333333334`}, "\n"],
+  
+  Editable->False]], "Print",
+ CellChangeTimes->{
+  3.7752274257605*^9, {3.775227713754155*^9, 3.7752277270115967`*^9}, {
+   3.775228130545632*^9, 3.7752281370688543`*^9}, 3.775228245742526*^9, 
+   3.7752283334404593`*^9, 3.7752306807614107`*^9, 3.775230795706949*^9, {
+   3.775230957605077*^9, 3.7752309799804153`*^9}, 3.7752312967710857`*^9},
+ CellLabel->
+  "During evaluation of \
+In[722]:=",ExpressionUUID->"bdd84ee5-e5de-4399-85d7-f620c7667877"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Four Momenta : \\n\"\>", "\[InvisibleSpace]", 
+   TagBox[
+    RowBox[{"(", "\[NoBreak]", 
+     TagBox[GridBox[{
+        {
+         RowBox[{"p1", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"150.`", ",", "0.`", ",", "0.`", ",", "150.`"}], "}"}]}]},
+        {
+         RowBox[{"p2", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"150.`", ",", "0.`", ",", "0.`", ",", 
+            RowBox[{"-", "150.`"}]}], "}"}]}]},
+        {
+         RowBox[{"p3", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{
+           "131.24404748406687`", ",", "20.`", ",", "34.64101615137755`", ",",
+             "0.`"}], "}"}]}]},
+        {
+         RowBox[{"p4", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"100.20722612318758`", ",", "0.`", ",", 
+            RowBox[{"-", "100.20722612318758`"}], ",", "0.`"}], "}"}]}]},
+        {
+         RowBox[{"p5", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"68.5487263927455`", ",", 
+            RowBox[{"-", "20.`"}], ",", "65.56620997181004`", ",", "0.`"}], 
+           "}"}]}]}
+       },
+       GridBoxAlignment->{
+        "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, 
+         "Rows" -> {{Baseline}}, "RowsIndexed" -> {}},
+       GridBoxSpacings->{"Columns" -> {
+           Offset[0.27999999999999997`], {
+            Offset[0.5599999999999999]}, 
+           Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+           Offset[0.2], {
+            Offset[0.4]}, 
+           Offset[0.2]}, "RowsIndexed" -> {}}],
+      Column], "\[NoBreak]", ")"}],
+    Function[BoxForm`e$, 
+     MatrixForm[BoxForm`e$]]], "\[InvisibleSpace]", "\<\"\\n\"\>"}],
+  SequenceForm["Four Momenta : \n", 
+   MatrixForm[{$CellContext`p1 -> {150., 0., 0., 150.}, $CellContext`p2 -> {
+      150., 0., 0., -150.}, $CellContext`p3 -> {131.24404748406687`, 20., 
+      34.64101615137755, 0.}, $CellContext`p4 -> {100.20722612318758`, 
+      0., -100.20722612318758`, 0.}, $CellContext`p5 -> {
+      68.5487263927455, -20., 65.56620997181004, 0.}}], "\n"],
+  Editable->False]], "Print",
+ CellChangeTimes->{
+  3.7752274257605*^9, {3.775227713754155*^9, 3.7752277270115967`*^9}, {
+   3.775228130545632*^9, 3.7752281370688543`*^9}, 3.775228245742526*^9, 
+   3.7752283334404593`*^9, 3.7752306807614107`*^9, 3.775230795706949*^9, {
+   3.775230957605077*^9, 3.7752309799804153`*^9}, 3.775231296785734*^9},
+ CellLabel->
+  "During evaluation of \
+In[722]:=",ExpressionUUID->"3939f696-ad00-464e-8f62-39d979d7c35d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Check 4 momentum conservation: p3+p4+p5 -p1 -p2 =0 :  \"\>", 
+   "\[InvisibleSpace]", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{
+     "-", "5.876373720011891608134562217738742061745029729160199708223878675`\
+43.99095815745918*^-14"}], ",", "0``58.39794000867204", ",", 
+     "0``57.69807096391986", ",", "0``57.522878745280345"}], "}"}]}],
+  SequenceForm[
+  "Check 4 momentum conservation: p3+p4+p5 -p1 -p2 =0 :  ", \
+{-5.876373720011891608134562217738742061745029729160199708223878675`43.\
+99095815745918*^-14, 0``58.39794000867204, 0``57.69807096391986, 
+    0``57.522878745280345}],
+  Editable->False]], "Print",
+ CellChangeTimes->{
+  3.7752274257605*^9, {3.775227713754155*^9, 3.7752277270115967`*^9}, {
+   3.775228130545632*^9, 3.7752281370688543`*^9}, 3.775228245742526*^9, 
+   3.7752283334404593`*^9, 3.7752306807614107`*^9, 3.775230795706949*^9, {
+   3.775230957605077*^9, 3.7752309799804153`*^9}, 3.775231296799769*^9},
+ CellLabel->
+  "During evaluation of \
+In[722]:=",ExpressionUUID->"44d8caf9-61b8-46aa-972d-67abe87916ae"],
+
+Cell[BoxData["\<\"MOMENTUM IS CONSERVED, ALL IS WELL!\"\>"], "Print",
+ CellChangeTimes->{
+  3.7752274257605*^9, {3.775227713754155*^9, 3.7752277270115967`*^9}, {
+   3.775228130545632*^9, 3.7752281370688543`*^9}, 3.775228245742526*^9, 
+   3.7752283334404593`*^9, 3.7752306807614107`*^9, 3.775230795706949*^9, {
+   3.775230957605077*^9, 3.7752309799804153`*^9}, 3.775231296810185*^9},
+ CellLabel->
+  "During evaluation of \
+In[722]:=",ExpressionUUID->"2f29d13e-6df9-4305-9cb5-665b6f5790de"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{
+   RowBox[{"kkT3", "\[Rule]", "40.`"}], ",", 
+   RowBox[{"kkT4", "\[Rule]", "100.2072261231875813792`10."}], ",", 
+   RowBox[{"S", "\[Rule]", "90000.`10."}], ",", 
+   RowBox[{"T", "\[Rule]", 
+    RowBox[{"-", "23748.2142452200617895598`10."}]}], ",", 
+   RowBox[{"U", "\[Rule]", 
+    RowBox[{"-", "23748.2142452200617895598`10."}]}], ",", 
+   RowBox[{"T24", "\[Rule]", 
+    RowBox[{"-", "30062.1678369562744137511`10."}]}], ",", 
+   RowBox[{"T14", "\[Rule]", 
+    RowBox[{"-", "30062.1678369562744137511`10."}]}], ",", 
+   RowBox[{"S34", "\[Rule]", "48870.7641643526804629805`10."}], ",", 
+   RowBox[{
+    SqrtBox["S"], "\[Rule]", "300.`10."}], ",", 
+   RowBox[{
+    SqrtBox["S34"], "\[Rule]", "221.0673294821120339102`10."}], ",", 
+   RowBox[{
+    RowBox[{"Tan", "[", "\[Phi]5", "]"}], "\[Rule]", 
+    RowBox[{"-", "0.30503516992363796243170073189201937468`10."}]}], ",", 
+   RowBox[{"kT5", "\[Rule]", "68.5487263927454872252`10."}], ",", 
+   RowBox[{
+    SqrtBox["S35"], "\[Rule]", "172.8457819158090640716`10."}]}], 
+  "}"}]], "Print",
+ CellChangeTimes->{
+  3.7752274257605*^9, {3.775227713754155*^9, 3.7752277270115967`*^9}, {
+   3.775228130545632*^9, 3.7752281370688543`*^9}, 3.775228245742526*^9, 
+   3.7752283334404593`*^9, 3.7752306807614107`*^9, 3.775230795706949*^9, {
+   3.775230957605077*^9, 3.7752309799804153`*^9}, 3.775231296820582*^9},
+ CellLabel->
+  "During evaluation of \
+In[722]:=",ExpressionUUID->"dbcfd14d-2210-4c86-b316-c61c776b7076"]
+}, Open  ]]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"t", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"tsub", "//.", "KinRules"}], "//.", "KinSub"}], "//", 
+    "FullSimplify"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{"tfinal", "=", 
+  RowBox[{
+   RowBox[{"t", "/.", 
+    RowBox[{"{", 
+     RowBox[{
+      RowBox[{"Alfas", "\[Rule]", "1"}], ",", 
+      RowBox[{"MW", "\[Rule]", "80.376"}], ",", 
+      RowBox[{"SW", "\[Rule]", "0.480832611207"}], ",", 
+      RowBox[{"EL", "\[Rule]", 
+       RowBox[{"Sqrt", "[", 
+        RowBox[{"4", "*", "Pi", "*", 
+         RowBox[{"(", 
+          RowBox[{"1", "/", "128"}], ")"}]}], "]"}]}]}], "}"}]}], "//", 
+   "Simplify"}]}]}], "Input",
+ CellChangeTimes->{{3.775227488213812*^9, 3.7752275145464983`*^9}, {
+  3.7752283401742573`*^9, 3.7752283715282087`*^9}, {3.7752306778102283`*^9, 
+  3.775230678351553*^9}, {3.7752307792459707`*^9, 3.775230793078136*^9}, {
+  3.775231300565361*^9, 3.7752313127611427`*^9}},
+ CellLabel->
+  "In[725]:=",ExpressionUUID->"edd720c6-62d1-4267-aae0-a0e8be2f9c5d"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{
+     RowBox[{"-", "0.04110032633364382`"}], "-", 
+     RowBox[{"0.004910048365539927`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c1"}], "-", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"0.041366954994243976`", "\[VeryThinSpace]", "-", 
+     RowBox[{"0.004464006731377908`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c2"}], "+", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"0.0824672813278878`", "\[VeryThinSpace]", "+", 
+     RowBox[{"0.0004460416341620203`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c3"}]}]], "Output",
+ CellChangeTimes->{{3.775227506826735*^9, 3.775227515452433*^9}, 
+   3.775227742717857*^9, 3.7752281411315813`*^9, 3.775228248401593*^9, 
+   3.775228341260454*^9, 3.7752306830171432`*^9, 3.775230797913719*^9, {
+   3.775230960812364*^9, 3.775230982674633*^9}, 3.775231313439258*^9},
+ CellLabel->
+  "Out[726]=",ExpressionUUID->"3fcfdace-e39d-40f0-931d-65df47dc584f"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"t", "=", 
+   RowBox[{"List", "[", 
+    RowBox[{
+     RowBox[{"tfinal", "[", 
+      RowBox[{"[", 
+       RowBox[{"1", ",", "1"}], "]"}], "]"}], ",", 
+     RowBox[{"tfinal", "[", 
+      RowBox[{"[", 
+       RowBox[{"1", ",", "1"}], "]"}], "]"}], ",", 
+     RowBox[{"tfinal", "[", 
+      RowBox[{"[", 
+       RowBox[{"2", ",", "1"}], "]"}], "]"}], ",", 
+     RowBox[{"tfinal", "[", 
+      RowBox[{"[", 
+       RowBox[{"2", ",", "1"}], "]"}], "]"}], ",", 
+     RowBox[{"tfinal", "[", 
+      RowBox[{"[", 
+       RowBox[{"3", ",", "1"}], "]"}], "]"}], ",", 
+     RowBox[{"tfinal", "[", 
+      RowBox[{"[", 
+       RowBox[{"3", ",", "1"}], "]"}], "]"}]}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"t", "//", "MatrixForm"}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"mat", "=", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{"19", "/", "6"}], ",", 
+       RowBox[{"2", "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}]}], "}"}], ",", 
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{"2", "/", "3"}], ",", 
+       RowBox[{"19", "/", "6"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}]}], "}"}], ",", 
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{"2", "/", "3"}], ",", 
+       RowBox[{"19", "/", "6"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}]}], "}"}], ",", 
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{"19", "/", "6"}], ",", 
+       RowBox[{"2", "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}]}], "}"}], ",", 
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{"19", "/", "6"}], ",", 
+       RowBox[{"2", "/", "3"}]}], "}"}], ",", 
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{"2", "/", "3"}], ",", 
+       RowBox[{"19", "/", "6"}]}], "}"}]}], "}"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"mat", "//", "MatrixForm"}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"tdagger", "=", 
+   RowBox[{"Conjugate", "[", "t", "]"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"tdagger", "//", "MatrixForm"}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{"MdagM1", "=", " ", 
+  RowBox[{"Dot", "[", 
+   RowBox[{"tdagger", ",", "mat", ",", "t"}], "]"}]}]}], "Input",
+ CellChangeTimes->{{3.7752275570312223`*^9, 3.775227690221272*^9}, {
+  3.775230883254527*^9, 3.7752308835510406`*^9}, {3.775230987433601*^9, 
+  3.775230991216572*^9}},
+ CellLabel->
+  "In[727]:=",ExpressionUUID->"f9a36ccc-6bbb-4713-9d83-1c7447160476"],
+
+Cell[BoxData[
+ RowBox[{"0.09220994247626954`", "\[VeryThinSpace]", "+", 
+  RowBox[{"1.3552527156068805`*^-19", " ", "\[ImaginaryI]"}]}]], "Output",
+ CellChangeTimes->{{3.775227564571664*^9, 3.775227575245241*^9}, 
+   3.775227629240129*^9, {3.7752276620064917`*^9, 3.775227690571496*^9}, 
+   3.7752277473169727`*^9, 3.775228144086871*^9, 3.775228249674532*^9, 
+   3.775228345985065*^9, 3.775230684528902*^9, 3.775230800155424*^9, {
+   3.775230985314646*^9, 3.775230991567499*^9}, 3.7752313155678*^9},
+ CellLabel->
+  "Out[733]=",ExpressionUUID->"aa7d22b9-3036-4d75-b2d0-18fc747a8a8d"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["MdagM0"], "Input",
+ CellChangeTimes->{{3.775227793917057*^9, 3.775227811343598*^9}, 
+   3.775227871143363*^9},
+ CellLabel->
+  "In[734]:=",ExpressionUUID->"36eb691a-1df8-413f-a81b-b5d04d022935"],
+
+Cell[BoxData[
+ RowBox[{"2.589543990648512`*^-10", "-", 
+  RowBox[{"4.1584903321868325`*^-28", " ", "\[ImaginaryI]"}]}]], "Output",
+ CellChangeTimes->{3.775227811862928*^9, 3.7752278716194763`*^9, 
+  3.775228221435535*^9, 3.775228350744491*^9, 3.775230733194573*^9, 
+  3.775230842865101*^9, 3.77523099720271*^9, 3.775231317986163*^9},
+ CellLabel->
+  "Out[734]=",ExpressionUUID->"fdfb1397-fb23-4c7c-8c83-b32a045efe7a"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["MdagM1"], "Input",
+ CellChangeTimes->{{3.775230998632595*^9, 3.775231000530785*^9}},
+ CellLabel->
+  "In[735]:=",ExpressionUUID->"7f66cd20-d1e8-4ca7-a221-9ff39aca36aa"],
+
+Cell[BoxData[
+ RowBox[{"0.09220994247626954`", "\[VeryThinSpace]", "+", 
+  RowBox[{"1.3552527156068805`*^-19", " ", "\[ImaginaryI]"}]}]], "Output",
+ CellChangeTimes->{3.775231001061522*^9, 3.775231319936281*^9},
+ CellLabel->
+  "Out[735]=",ExpressionUUID->"335e2f70-756c-4dba-8305-8a636f2cf6ae"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"MdagM0", "/", "MdagM1"}]], "Input",
+ CellChangeTimes->{{3.775227814838396*^9, 3.775227823287915*^9}},
+ CellLabel->
+  "In[736]:=",ExpressionUUID->"809aadb6-16f8-4cc9-bd6f-1d91f28835f9"],
+
+Cell[BoxData[
+ RowBox[{"2.8083132047446377`*^-9", "-", 
+  RowBox[{"8.637316340633591`*^-27", " ", "\[ImaginaryI]"}]}]], "Output",
+ CellChangeTimes->{3.7752278236474257`*^9, 3.775227875891039*^9, 
+  3.775228223085803*^9, 3.775228253833722*^9, 3.7752283528475513`*^9, 
+  3.775230735896517*^9, 3.775230845901018*^9, 3.775231005961709*^9, 
+  3.7752313221382027`*^9},
+ CellLabel->
+  "Out[736]=",ExpressionUUID->"25057792-749b-4102-83c6-f9f495295eec"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"MdagM1", "/", "MdagM0"}]], "Input",
+ CellChangeTimes->{{3.775227878977666*^9, 3.7752278909876623`*^9}},
+ CellLabel->
+  "In[737]:=",ExpressionUUID->"f8772f15-8b4e-49fe-a3b6-236dbafe3613"],
+
+Cell[BoxData[
+ RowBox[{"3.560856382794137`*^8", "+", 
+  RowBox[{"1.0951856427479182`*^-9", " ", "\[ImaginaryI]"}]}]], "Output",
+ CellChangeTimes->{{3.775227886110634*^9, 3.7752278913736897`*^9}, {
+   3.775228225719728*^9, 3.775228255335204*^9}, 3.775228354880397*^9, 
+   3.775230737795094*^9, 3.775230848068742*^9, 3.775231007766411*^9, 
+   3.775231323820561*^9},
+ CellLabel->
+  "Out[737]=",ExpressionUUID->"57e8dfd9-908a-48b6-8d80-cf22e344347f"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Directory", "[", "]"}]], "Input",
+ CellChangeTimes->{{3.775229023457518*^9, 3.7752290251402903`*^9}},
+ CellLabel->
+  "In[421]:=",ExpressionUUID->"aa43aae6-fbd8-489b-b700-ebe9d437a84b"],
+
+Cell[BoxData["\<\"/Users/josegabrielreyes/Documents/Higgs/Mathematica \
+Scripts/ggHgg/FinalSetUp/helicitiesTest\"\>"], "Output",
+ CellChangeTimes->{3.7752290901589317`*^9},
+ CellLabel->
+  "Out[421]=",ExpressionUUID->"d2d8c151-4c04-472d-91db-93581375244f"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"(*", " ", 
+  RowBox[{"BOXES", " ", "TEST"}], " ", "*)"}]], "Input",
+ CellChangeTimes->{{3.775229138398674*^9, 
+  3.775229144749391*^9}},ExpressionUUID->"b20f7e47-3fac-4864-a7ff-\
+e1acd3f6092a"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"subbox", "=", 
+  RowBox[{"Import", "[", "\"\<box_++++.m\>\"", "]"}]}]], "Input",
+ CellChangeTimes->{{3.775229092912006*^9, 3.775229117822713*^9}},
+ CellLabel->
+  "In[422]:=",ExpressionUUID->"c82ec215-95ed-4d74-990c-6d27d1f70484"],
+
+Cell[BoxData[
+ InterpretationBox[
+  TagBox[
+   FrameBox[GridBox[{
+      {
+       ItemBox[
+        TagBox[
+         RowBox[{
+          FractionBox[
+           RowBox[{"c3", " ", 
+            RowBox[{"(", 
+             RowBox[{
+              TemplateBox[{"33"},
+               "OutputSizeLimit`Skeleton"], "+", 
+              FractionBox[
+               RowBox[{"8", " ", 
+                TemplateBox[{"4"},
+                 "OutputSizeLimit`Skeleton"], " ", 
+                RowBox[{"(", 
+                 TemplateBox[{"1"},
+                  "OutputSizeLimit`Skeleton"], ")"}]}], 
+               RowBox[{"MW", " ", "SW"}]]}], ")"}]}], 
+           RowBox[{
+            SuperscriptBox["MH", "2"], "-", "S", "-", "T24", "-", "U"}]], "+", 
+          FractionBox[
+           RowBox[{"c3", " ", 
+            RowBox[{"(", 
+             RowBox[{
+              FractionBox[
+               TemplateBox[{"1"},
+                "OutputSizeLimit`Skeleton"], 
+               RowBox[{"MW", " ", "SW"}]], "+", 
+              TemplateBox[{"60"},
+               "OutputSizeLimit`Skeleton"], "+", 
+              FractionBox[
+               RowBox[{"4", " ", 
+                TemplateBox[{"4"},
+                 "OutputSizeLimit`Skeleton"], " ", 
+                RowBox[{"(", 
+                 TemplateBox[{"1"},
+                  "OutputSizeLimit`Skeleton"], ")"}]}], 
+               RowBox[{"MW", " ", "SW"}]]}], ")"}]}], 
+           RowBox[{
+            SuperscriptBox["MH", "2"], "-", "S", "-", "T24", "-", "U"}]], "+", 
+          FractionBox[
+           RowBox[{"2", " ", "c1", " ", 
+            RowBox[{"(", 
+             TemplateBox[{"1"},
+              "OutputSizeLimit`Skeleton"], ")"}]}], 
+           RowBox[{
+            SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", "T14"}]], "+", 
+          FractionBox[
+           RowBox[{"c3", 
+            TemplateBox[{"1"},
+             "OutputSizeLimit`Skeleton"], 
+            RowBox[{"(", 
+             RowBox[{
+              TemplateBox[{"1"},
+               "OutputSizeLimit`Skeleton"], 
+              TemplateBox[{"1"},
+               "OutputSizeLimit`Skeleton"]}]}]}], "T14"], "+", 
+          TemplateBox[{"14"},
+           "OutputSizeLimit`Skeleton"], "+", 
+          TemplateBox[{"1"},
+           "OutputSizeLimit`Skeleton"], "+", 
+          FractionBox[
+           RowBox[{
+            SuperscriptBox["Alfas", "2"], " ", 
+            TemplateBox[{"3"},
+             "OutputSizeLimit`Skeleton"], " ", 
+            RowBox[{"(", 
+             RowBox[{
+              FractionBox[
+               TemplateBox[{"1"},
+                "OutputSizeLimit`Skeleton"], 
+               TemplateBox[{"1"},
+                "OutputSizeLimit`Skeleton"]], "+", 
+              TemplateBox[{"1"},
+               "OutputSizeLimit`Skeleton"]}], ")"}]}], 
+           RowBox[{"MW", " ", "SW"}]], "-", 
+          FractionBox[
+           RowBox[{
+            SuperscriptBox["Alfas", "2"], " ", "c3", " ", "EL", " ", 
+            SuperscriptBox["MT", "2"], " ", 
+            RowBox[{"(", 
+             RowBox[{
+              FractionBox[
+               TemplateBox[{"1"},
+                "OutputSizeLimit`Skeleton"], "T14"], "-", 
+              FractionBox[
+               TemplateBox[{"1"},
+                "OutputSizeLimit`Skeleton"], "T24"]}], ")"}]}], 
+           RowBox[{"MW", " ", "SW"}]], "-", 
+          FractionBox[
+           RowBox[{
+            SuperscriptBox["Alfas", "2"], " ", "c3", " ", "EL", " ", 
+            SuperscriptBox["MT", "2"], " ", 
+            RowBox[{"(", 
+             RowBox[{
+              FractionBox[
+               TemplateBox[{"1"},
+                "OutputSizeLimit`Skeleton"], "T14"], "-", 
+              FractionBox[
+               RowBox[{
+                TemplateBox[{"1"},
+                 "OutputSizeLimit`Skeleton"], "+", 
+                TemplateBox[{"59"},
+                 "OutputSizeLimit`Skeleton"]}], "T24"]}], ")"}]}], 
+           RowBox[{"MW", " ", "SW"}]]}],
+         Short[#, 5]& ],
+        BaseStyle->{Deployed -> False},
+        StripOnInput->False]},
+      {GridBox[{
+         {
+          TagBox[
+           TooltipBox[
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource[
+                "FEStrings", "sizeBriefExplanation"], StandardForm],
+               ImageSizeCache->{58., {2., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLText",
+             StripOnInput->False],
+            StyleBox[
+             DynamicBox[
+              ToBoxes[
+               FEPrivate`FrontEndResource["FEStrings", "sizeExplanation"], 
+               StandardForm]], DynamicUpdating -> True, StripOnInput -> 
+             False]],
+           Annotation[#, 
+            Style[
+             Dynamic[
+              FEPrivate`FrontEndResource["FEStrings", "sizeExplanation"]], 
+             DynamicUpdating -> True], "Tooltip"]& ], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowLess"], 
+                StandardForm],
+               ImageSizeCache->{50., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowLess"], 
+                StandardForm],
+               ImageSizeCache->{50., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           
+           ButtonFunction:>OutputSizeLimit`ButtonFunction[
+            OutputSizeLimit`Defer, 422, 17477231814507770626, 5/2],
+           Enabled->True,
+           Evaluator->Automatic,
+           Method->"Queued"], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowMore"], 
+                StandardForm],
+               ImageSizeCache->{56., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowMore"], 
+                StandardForm],
+               ImageSizeCache->{56., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           
+           ButtonFunction:>OutputSizeLimit`ButtonFunction[
+            OutputSizeLimit`Defer, 422, 17477231814507770626, 5 2],
+           Enabled->True,
+           Evaluator->Automatic,
+           Method->"Queued"], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowAll"], 
+                StandardForm],
+               ImageSizeCache->{42., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowAll"], 
+                StandardForm]],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           
+           ButtonFunction:>OutputSizeLimit`ButtonFunction[
+            OutputSizeLimit`Defer, 422, 17477231814507770626, Infinity],
+           Enabled->True,
+           Evaluator->Automatic,
+           Method->"Queued"], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeChangeLimit"], 
+                StandardForm],
+               ImageSizeCache->{74., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeChangeLimit"], 
+                StandardForm]],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           ButtonFunction:>FrontEndExecute[{
+              FrontEnd`SetOptions[
+              FrontEnd`$FrontEnd, 
+               FrontEnd`PreferencesSettings -> {"Page" -> "Advanced"}], 
+              FrontEnd`FrontEndToken["PreferencesDialog"]}],
+           Evaluator->None,
+           Method->"Preemptive"]}
+        },
+        AutoDelete->False,
+        FrameStyle->GrayLevel[0.85],
+        GridBoxDividers->{"Columns" -> {False, {True}}},
+        GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
+        GridBoxSpacings->{"Columns" -> {{2}}}]}
+     },
+     DefaultBaseStyle->"Column",
+     GridBoxAlignment->{
+      "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
+       "RowsIndexed" -> {}},
+     GridBoxDividers->{
+      "Columns" -> {{False}}, "ColumnsIndexed" -> {}, "Rows" -> {{False}}, 
+       "RowsIndexed" -> {}},
+     GridBoxItemSize->{
+      "Columns" -> {{Automatic}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, 
+       "RowsIndexed" -> {}},
+     GridBoxSpacings->{"Columns" -> {
+         Offset[0.27999999999999997`], {
+          Offset[0.5599999999999999]}, 
+         Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+         Offset[0.2], 
+         Offset[1.2], {
+          Offset[0.4]}, 
+         Offset[0.2]}, "RowsIndexed" -> {}}],
+    BaseStyle->"OutputSizeLimit",
+    FrameMargins->{{12, 12}, {0, 15}},
+    FrameStyle->GrayLevel[0.85],
+    RoundingRadius->5,
+    StripOnInput->False],
+   Deploy,
+   DefaultBaseStyle->"Deploy"],
+  If[17477231814507770626 === $SessionID, 
+   Out[422], Message[
+     MessageName[Syntax, "noinfoker"]]; Missing["NotAvailable"]; 
+   Null]]], "Output",
+ CellChangeTimes->{3.775229157866227*^9},
+ CellLabel->
+  "Out[422]=",ExpressionUUID->"d2eb5bb5-ca40-4bc9-8035-0ad20d7444eb"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"output", "=", 
+   RowBox[{
+    RowBox[{"N", "[", 
+     RowBox[{
+      RowBox[{"OutputPS", "[", 
+       RowBox[{"300.", ",", "20.", ",", "0", ",", 
+        RowBox[{"Pi", "/", "3"}], ",", "0", ",", 
+        RowBox[{"3", "*", 
+         RowBox[{"Pi", "/", "2"}]}], ",", "125."}], "]"}], ",", "10"}], "]"}],
+     "[", 
+    RowBox[{"[", "2", "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"KinRules", "=", 
+   RowBox[{"f", "[", 
+    RowBox[{"variables", ",", "output"}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"KinSub", "=", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{"S", "\[Rule]", 
+      RowBox[{"300.", "^", "2"}]}], ",", 
+     RowBox[{"kT3", "\[Rule]", "20."}], ",", 
+     RowBox[{"\[Eta]3", "\[Rule]", "0"}], ",", 
+     RowBox[{"\[Phi]3", "\[Rule]", 
+      RowBox[{"Pi", "/", "3"}]}], ",", 
+     RowBox[{"\[Eta]4", "\[Rule]", "0"}], ",", 
+     RowBox[{"\[Phi]4", "\[Rule]", 
+      RowBox[{"3", "*", 
+       RowBox[{"Pi", "/", "2"}]}]}], ",", 
+     RowBox[{"MH", "\[Rule]", "125."}], ",", 
+     RowBox[{"MT", "\[Rule]", "173."}]}], "}"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"bsub", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"subbox", "//.", "KinRules"}], "//.", "KinSub"}], "//", 
+    "FullSimplify"}]}], ";"}], "\[IndentingNewLine]"}], "Input",
+ CellChangeTimes->{{3.775229164689459*^9, 3.7752292459898567`*^9}, {
+   3.7752293068416357`*^9, 3.7752293082899437`*^9}, {3.775229436018053*^9, 
+   3.775229448330065*^9}, {3.775229483919393*^9, 3.7752294847148743`*^9}, {
+   3.775229538653103*^9, 3.7752295449435863`*^9}, 3.7752296549936523`*^9},
+ CellLabel->
+  "In[546]:=",ExpressionUUID->"cd9723fe-5ae1-425a-ab81-ebf4322d7796"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"kT3_max = \"\>", "\[InvisibleSpace]", 
+   RowBox[{"{", 
+    RowBox[{"kT3", "\[Rule]", "123.95833333333334`"}], "}"}], 
+   "\[InvisibleSpace]", "\<\"\\n\"\>"}],
+  SequenceForm["kT3_max = ", {$CellContext`kT3 -> 123.95833333333334`}, "\n"],
+  
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775229542211306*^9, 3.77523054453467*^9},
+ CellLabel->
+  "During evaluation of \
+In[546]:=",ExpressionUUID->"2d451221-0c8c-4a6d-900e-eef366e55a07"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Four Momenta : \\n\"\>", "\[InvisibleSpace]", 
+   TagBox[
+    RowBox[{"(", "\[NoBreak]", 
+     TagBox[GridBox[{
+        {
+         RowBox[{"p1", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"150.`", ",", "0.`", ",", "0.`", ",", "150.`"}], "}"}]}]},
+        {
+         RowBox[{"p2", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"150.`", ",", "0.`", ",", "0.`", ",", 
+            RowBox[{"-", "150.`"}]}], "}"}]}]},
+        {
+         RowBox[{"p3", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{
+           "126.58988901172162`", ",", "10.`", ",", "17.320508075688775`", 
+            ",", "0.`"}], "}"}]}]},
+        {
+         RowBox[{"p4", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"95.04498070119013`", ",", "0.`", ",", 
+            RowBox[{"-", "95.04498070119013`"}], ",", "0.`"}], "}"}]}]},
+        {
+         RowBox[{"p5", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"78.3651302870882`", ",", 
+            RowBox[{"-", "10.`"}], ",", "77.72447262550135`", ",", "0.`"}], 
+           "}"}]}]}
+       },
+       GridBoxAlignment->{
+        "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, 
+         "Rows" -> {{Baseline}}, "RowsIndexed" -> {}},
+       GridBoxSpacings->{"Columns" -> {
+           Offset[0.27999999999999997`], {
+            Offset[0.5599999999999999]}, 
+           Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+           Offset[0.2], {
+            Offset[0.4]}, 
+           Offset[0.2]}, "RowsIndexed" -> {}}],
+      Column], "\[NoBreak]", ")"}],
+    Function[BoxForm`e$, 
+     MatrixForm[BoxForm`e$]]], "\[InvisibleSpace]", "\<\"\\n\"\>"}],
+  SequenceForm["Four Momenta : \n", 
+   MatrixForm[{$CellContext`p1 -> {150., 0., 0., 150.}, $CellContext`p2 -> {
+      150., 0., 0., -150.}, $CellContext`p3 -> {126.58988901172162`, 10., 
+      17.320508075688775`, 0.}, $CellContext`p4 -> {95.04498070119013, 
+      0., -95.04498070119013, 0.}, $CellContext`p5 -> {78.3651302870882, -10.,
+       77.72447262550135, 0.}}], "\n"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775229542211306*^9, 3.775230544550933*^9},
+ CellLabel->
+  "During evaluation of \
+In[546]:=",ExpressionUUID->"446afc90-b7d9-40f2-a649-5b1fb0898ef2"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Check 4 momentum conservation: p3+p4+p5 -p1 -p2 =0 :  \"\>", 
+   "\[InvisibleSpace]", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{
+     "-", "3.887221955939928966560590155849714544348308363744058289341178206`\
+43.811488088675176*^-14"}], ",", "0``58.69897000433602", ",", 
+     "0``57.72104081749894", ",", "0``57.522878745280345"}], "}"}]}],
+  SequenceForm[
+  "Check 4 momentum conservation: p3+p4+p5 -p1 -p2 =0 :  ", \
+{-3.887221955939928966560590155849714544348308363744058289341178206`43.\
+811488088675176*^-14, 0``58.69897000433602, 0``57.72104081749894, 
+    0``57.522878745280345}],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775229542211306*^9, 3.775230544565895*^9},
+ CellLabel->
+  "During evaluation of \
+In[546]:=",ExpressionUUID->"445e2145-d7ab-4474-817e-fca7d8921e18"],
+
+Cell[BoxData["\<\"MOMENTUM IS CONSERVED, ALL IS WELL!\"\>"], "Print",
+ CellChangeTimes->{3.775229542211306*^9, 3.775230544575285*^9},
+ CellLabel->
+  "During evaluation of \
+In[546]:=",ExpressionUUID->"576e6130-cb63-4d40-9fa7-06ce080bbda8"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{
+   RowBox[{"kkT3", "\[Rule]", "20.`"}], ",", 
+   RowBox[{"kkT4", "\[Rule]", "95.0449807011901270926`10."}], ",", 
+   RowBox[{"S", "\[Rule]", "90000.`10."}], ",", 
+   RowBox[{"T", "\[Rule]", 
+    RowBox[{"-", "22351.9667035164881926659`10."}]}], ",", 
+   RowBox[{"U", "\[Rule]", 
+    RowBox[{"-", "22351.9667035164881926659`10."}]}], ",", 
+   RowBox[{"T24", "\[Rule]", 
+    RowBox[{"-", "28513.4942103570381277677`10."}]}], ",", 
+   RowBox[{"T14", "\[Rule]", 
+    RowBox[{"-", "28513.4942103570381277677`10."}]}], ",", 
+   RowBox[{"S34", "\[Rule]", "42980.9218277470587333204`10."}], ",", 
+   RowBox[{
+    SqrtBox["S"], "\[Rule]", "300.`10."}], ",", 
+   RowBox[{
+    SqrtBox["S34"], "\[Rule]", "207.3184068715246970733`10."}], ",", 
+   RowBox[{
+    RowBox[{"Tan", "[", "\[Phi]5", "]"}], "\[Rule]", 
+    RowBox[{"-", "0.12865960568407904294629727505559632487`10."}]}], ",", 
+   RowBox[{"kT5", "\[Rule]", "78.3651302870882067263`10."}], ",", 
+   RowBox[{
+    SqrtBox["S35"], "\[Rule]", "181.5847228686540904465`10."}]}], 
+  "}"}]], "Print",
+ CellChangeTimes->{3.775229542211306*^9, 3.775230544585321*^9},
+ CellLabel->
+  "During evaluation of \
+In[546]:=",ExpressionUUID->"5eb1a54c-f688-440b-9825-8273a1dadee7"]
+}, Open  ]]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{"bfinal", "=", 
+  RowBox[{
+   RowBox[{"bsub", "/.", 
+    RowBox[{"{", 
+     RowBox[{
+      RowBox[{"Alfas", "\[Rule]", "1"}], ",", 
+      RowBox[{"MW", "\[Rule]", "80.376"}], ",", 
+      RowBox[{"SW", "\[Rule]", "0.480832611207"}], ",", 
+      RowBox[{"EL", "\[Rule]", 
+       RowBox[{"Sqrt", "[", 
+        RowBox[{"4", "*", "Pi"}], "]"}]}]}], "}"}]}], "//", 
+   "Simplify"}]}], "\[IndentingNewLine]", 
+ RowBox[{"bfinal", "=", " ", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{"0.5081635528028182`", "\[VeryThinSpace]", "+", 
+      RowBox[{"0.014585184336615332`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+    "c1"}], "+", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{"0.5081953030728049`", "\[VeryThinSpace]", "-", 
+      RowBox[{"0.01458926931457687`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+    "c2"}], "-", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{"1.016358855875623`", "\[VeryThinSpace]", "-", 
+      RowBox[{"4.084977961588639`*^-6", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+    "c3"}]}]}]}], "Input",
+ CellChangeTimes->{{3.775229661002421*^9, 3.775229661621059*^9}, {
+  3.775229745934651*^9, 3.7752297944663467`*^9}},
+ CellLabel->
+  "In[550]:=",ExpressionUUID->"36a40cc7-40c3-4807-8617-acf13576bbcd"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(", 
+   RowBox[{"0.`", "\[VeryThinSpace]", "+", 
+    RowBox[{"0.`", " ", "\[ImaginaryI]"}]}], ")"}], "+", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"0.5081635528028182`", "\[VeryThinSpace]", "+", 
+     RowBox[{"0.014585184336615332`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c1"}], "+", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"0.5081953030728049`", "\[VeryThinSpace]", "-", 
+     RowBox[{"0.01458926931457687`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c2"}], "-", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"1.016358855875623`", "\[VeryThinSpace]", "-", 
+     RowBox[{"4.084977961588639`*^-6", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c3"}]}]], "Output",
+ CellChangeTimes->{{3.775229658233827*^9, 3.775229662203299*^9}, {
+   3.775229746808633*^9, 3.775229795056713*^9}, 3.775230570731395*^9},
+ CellLabel->
+  "Out[550]=",ExpressionUUID->"92cd9b5e-a716-4e44-bd0a-1880c41e59e9"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"0.5081635528028182`", "\[VeryThinSpace]", "+", 
+     RowBox[{"0.014585184336615332`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c1"}], "+", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"0.5081953030728049`", "\[VeryThinSpace]", "-", 
+     RowBox[{"0.01458926931457687`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c2"}], "-", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"1.016358855875623`", "\[VeryThinSpace]", "-", 
+     RowBox[{"4.084977961588639`*^-6", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c3"}]}]], "Output",
+ CellChangeTimes->{{3.775229658233827*^9, 3.775229662203299*^9}, {
+   3.775229746808633*^9, 3.775229795056713*^9}, 3.775230570747328*^9},
+ CellLabel->
+  "Out[551]=",ExpressionUUID->"7bbae190-812f-49ad-a656-5a73f8176dd3"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"b", "=", 
+   RowBox[{"List", "[", 
+    RowBox[{
+     RowBox[{"bfinal", "[", 
+      RowBox[{"[", 
+       RowBox[{"1", ",", "1"}], "]"}], "]"}], ",", 
+     RowBox[{"bfinal", "[", 
+      RowBox[{"[", 
+       RowBox[{"1", ",", "1"}], "]"}], "]"}], ",", 
+     RowBox[{"bfinal", "[", 
+      RowBox[{"[", 
+       RowBox[{"2", ",", "1"}], "]"}], "]"}], ",", 
+     RowBox[{"bfinal", "[", 
+      RowBox[{"[", 
+       RowBox[{"2", ",", "1"}], "]"}], "]"}], ",", 
+     RowBox[{"bfinal", "[", 
+      RowBox[{"[", 
+       RowBox[{"3", ",", "1"}], "]"}], "]"}], ",", 
+     RowBox[{"bfinal", "[", 
+      RowBox[{"[", 
+       RowBox[{"3", ",", "1"}], "]"}], "]"}]}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{"b", "//", "MatrixForm"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"mat", "=", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{"19", "/", "6"}], ",", 
+       RowBox[{"2", "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}]}], "}"}], ",", 
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{"2", "/", "3"}], ",", 
+       RowBox[{"19", "/", "6"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}]}], "}"}], ",", 
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{"2", "/", "3"}], ",", 
+       RowBox[{"19", "/", "6"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}]}], "}"}], ",", 
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{"19", "/", "6"}], ",", 
+       RowBox[{"2", "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}]}], "}"}], ",", 
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{"19", "/", "6"}], ",", 
+       RowBox[{"2", "/", "3"}]}], "}"}], ",", 
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{"2", "/", "3"}], ",", 
+       RowBox[{"19", "/", "6"}]}], "}"}]}], "}"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{"mat", "//", "MatrixForm"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"bdagger", "=", 
+   RowBox[{"Conjugate", "[", "b", "]"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{"bdagger", "//", "MatrixForm"}], "\[IndentingNewLine]", 
+ RowBox[{"MdagM0", "=", " ", 
+  RowBox[{"Dot", "[", 
+   RowBox[{"bdagger", ",", "mat", ",", "b"}], "]"}]}]}], "Input",
+ CellLabel->
+  "In[552]:=",ExpressionUUID->"12f49268-37df-4130-a29f-0ba951bf6635"],
+
+Cell[BoxData[
+ TagBox[
+  RowBox[{"(", "\[NoBreak]", 
+   TagBox[GridBox[{
+      {
+       RowBox[{"0.5081635528028182`", "\[VeryThinSpace]", "+", 
+        RowBox[{"0.014585184336615332`", " ", "\[ImaginaryI]"}]}]},
+      {
+       RowBox[{"0.5081635528028182`", "\[VeryThinSpace]", "+", 
+        RowBox[{"0.014585184336615332`", " ", "\[ImaginaryI]"}]}]},
+      {
+       RowBox[{"0.5081953030728049`", "\[VeryThinSpace]", "-", 
+        RowBox[{"0.01458926931457687`", " ", "\[ImaginaryI]"}]}]},
+      {
+       RowBox[{"0.5081953030728049`", "\[VeryThinSpace]", "-", 
+        RowBox[{"0.01458926931457687`", " ", "\[ImaginaryI]"}]}]},
+      {
+       RowBox[{
+        RowBox[{"-", "1.016358855875623`"}], "+", 
+        RowBox[{"4.084977961588639`*^-6", " ", "\[ImaginaryI]"}]}]},
+      {
+       RowBox[{
+        RowBox[{"-", "1.016358855875623`"}], "+", 
+        RowBox[{"4.084977961588639`*^-6", " ", "\[ImaginaryI]"}]}]}
+     },
+     GridBoxAlignment->{
+      "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
+        "RowsIndexed" -> {}},
+     GridBoxSpacings->{"Columns" -> {
+         Offset[0.27999999999999997`], {
+          Offset[0.5599999999999999]}, 
+         Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+         Offset[0.2], {
+          Offset[0.4]}, 
+         Offset[0.2]}, "RowsIndexed" -> {}}],
+    Column], "\[NoBreak]", ")"}],
+  Function[BoxForm`e$, 
+   MatrixForm[BoxForm`e$]]]], "Output",
+ CellChangeTimes->{3.7752292775431757`*^9, 3.775229335743758*^9, 
+  3.775229436892448*^9, 3.775229476345936*^9, 3.775229510860489*^9, 
+  3.77522964641859*^9, 3.775229809066353*^9, 3.77523051577046*^9, 
+  3.775230570885751*^9},
+ CellLabel->
+  "Out[553]//MatrixForm=",ExpressionUUID->"1a999a2c-24e4-458b-9240-\
+da9ed516f81d"],
+
+Cell[BoxData[
+ TagBox[
+  RowBox[{"(", "\[NoBreak]", GridBox[{
+     {
+      FractionBox["19", "6"], 
+      FractionBox["2", "3"], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}]},
+     {
+      FractionBox["2", "3"], 
+      FractionBox["19", "6"], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}]},
+     {
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      FractionBox["2", "3"], 
+      FractionBox["19", "6"], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}]},
+     {
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      FractionBox["19", "6"], 
+      FractionBox["2", "3"], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}]},
+     {
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      FractionBox["19", "6"], 
+      FractionBox["2", "3"]},
+     {
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      FractionBox["2", "3"], 
+      FractionBox["19", "6"]}
+    },
+    GridBoxAlignment->{
+     "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
+      "RowsIndexed" -> {}},
+    GridBoxSpacings->{"Columns" -> {
+        Offset[0.27999999999999997`], {
+         Offset[0.7]}, 
+        Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+        Offset[0.2], {
+         Offset[0.4]}, 
+        Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}],
+  Function[BoxForm`e$, 
+   MatrixForm[BoxForm`e$]]]], "Output",
+ CellChangeTimes->{3.7752292775431757`*^9, 3.775229335743758*^9, 
+  3.775229436892448*^9, 3.775229476345936*^9, 3.775229510860489*^9, 
+  3.77522964641859*^9, 3.775229809066353*^9, 3.77523051577046*^9, 
+  3.775230570902236*^9},
+ CellLabel->
+  "Out[555]//MatrixForm=",ExpressionUUID->"2fb42af8-da7f-4552-9e3b-\
+9bbf57fab2ce"],
+
+Cell[BoxData[
+ TagBox[
+  RowBox[{"(", "\[NoBreak]", 
+   TagBox[GridBox[{
+      {
+       RowBox[{"0.5081635528028182`", "\[VeryThinSpace]", "-", 
+        RowBox[{"0.014585184336615332`", " ", "\[ImaginaryI]"}]}]},
+      {
+       RowBox[{"0.5081635528028182`", "\[VeryThinSpace]", "-", 
+        RowBox[{"0.014585184336615332`", " ", "\[ImaginaryI]"}]}]},
+      {
+       RowBox[{"0.5081953030728049`", "\[VeryThinSpace]", "+", 
+        RowBox[{"0.01458926931457687`", " ", "\[ImaginaryI]"}]}]},
+      {
+       RowBox[{"0.5081953030728049`", "\[VeryThinSpace]", "+", 
+        RowBox[{"0.01458926931457687`", " ", "\[ImaginaryI]"}]}]},
+      {
+       RowBox[{
+        RowBox[{"-", "1.016358855875623`"}], "-", 
+        RowBox[{"4.084977961588639`*^-6", " ", "\[ImaginaryI]"}]}]},
+      {
+       RowBox[{
+        RowBox[{"-", "1.016358855875623`"}], "-", 
+        RowBox[{"4.084977961588639`*^-6", " ", "\[ImaginaryI]"}]}]}
+     },
+     GridBoxAlignment->{
+      "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
+        "RowsIndexed" -> {}},
+     GridBoxSpacings->{"Columns" -> {
+         Offset[0.27999999999999997`], {
+          Offset[0.5599999999999999]}, 
+         Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+         Offset[0.2], {
+          Offset[0.4]}, 
+         Offset[0.2]}, "RowsIndexed" -> {}}],
+    Column], "\[NoBreak]", ")"}],
+  Function[BoxForm`e$, 
+   MatrixForm[BoxForm`e$]]]], "Output",
+ CellChangeTimes->{3.7752292775431757`*^9, 3.775229335743758*^9, 
+  3.775229436892448*^9, 3.775229476345936*^9, 3.775229510860489*^9, 
+  3.77522964641859*^9, 3.775229809066353*^9, 3.77523051577046*^9, 
+  3.77523057091267*^9},
+ CellLabel->
+  "Out[557]//MatrixForm=",ExpressionUUID->"a3d1a0f7-2104-419a-a290-\
+17d0866e267d"],
+
+Cell[BoxData[
+ RowBox[{"13.949132046994812`", "\[VeryThinSpace]", "+", 
+  RowBox[{"6.288372600415926`*^-18", " ", "\[ImaginaryI]"}]}]], "Output",
+ CellChangeTimes->{3.7752292775431757`*^9, 3.775229335743758*^9, 
+  3.775229436892448*^9, 3.775229476345936*^9, 3.775229510860489*^9, 
+  3.77522964641859*^9, 3.775229809066353*^9, 3.77523051577046*^9, 
+  3.775230570922517*^9},
+ CellLabel->
+  "Out[558]=",ExpressionUUID->"49cf19f7-b5ca-4da2-a2fc-4505f8717f09"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"output", "=", 
+   RowBox[{
+    RowBox[{"N", "[", 
+     RowBox[{
+      RowBox[{"OutputPS", "[", 
+       RowBox[{"300.", ",", "40.", ",", "0", ",", 
+        RowBox[{"Pi", "/", "3"}], ",", "0", ",", 
+        RowBox[{"3", "*", 
+         RowBox[{"Pi", "/", "2"}]}], ",", "125."}], "]"}], ",", "10"}], "]"}],
+     "[", 
+    RowBox[{"[", "2", "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"KinRules", "=", 
+   RowBox[{"f", "[", 
+    RowBox[{"variables", ",", "output"}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"KinSub", "=", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{"S", "\[Rule]", 
+      RowBox[{"300.", "^", "2"}]}], ",", 
+     RowBox[{"kT3", "\[Rule]", "40."}], ",", 
+     RowBox[{"\[Eta]3", "\[Rule]", "0"}], ",", 
+     RowBox[{"\[Phi]3", "\[Rule]", 
+      RowBox[{"Pi", "/", "3"}]}], ",", 
+     RowBox[{"\[Eta]4", "\[Rule]", "0"}], ",", 
+     RowBox[{"\[Phi]4", "\[Rule]", 
+      RowBox[{"3", "*", 
+       RowBox[{"Pi", "/", "2"}]}]}], ",", 
+     RowBox[{"MH", "\[Rule]", "125."}], ",", 
+     RowBox[{"MT", "\[Rule]", "173."}]}], "}"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"bsub", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"subbox", "//.", "KinRules"}], "//.", "KinSub"}], "//", 
+    "FullSimplify"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{"bfinal", "=", 
+  RowBox[{
+   RowBox[{"bsub", "/.", 
+    RowBox[{"{", 
+     RowBox[{
+      RowBox[{"Alfas", "\[Rule]", "1"}], ",", 
+      RowBox[{"MW", "\[Rule]", "80.376"}], ",", 
+      RowBox[{"SW", "\[Rule]", "0.480832611207"}], ",", 
+      RowBox[{"EL", "\[Rule]", 
+       RowBox[{"Sqrt", "[", 
+        RowBox[{"4", "*", "Pi"}], "]"}]}]}], "}"}]}], "//", 
+   "Simplify"}]}], "\[IndentingNewLine]"}], "Input",
+ CellChangeTimes->{{3.77522931828927*^9, 3.775229335995839*^9}, {
+   3.775229456299572*^9, 3.775229493104308*^9}, 3.7752298183255167`*^9},
+ CellLabel->
+  "In[559]:=",ExpressionUUID->"ac44598b-9a1a-4e52-85ef-2d23a5904111"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"kT3_max = \"\>", "\[InvisibleSpace]", 
+   RowBox[{"{", 
+    RowBox[{"kT3", "\[Rule]", "123.95833333333334`"}], "}"}], 
+   "\[InvisibleSpace]", "\<\"\\n\"\>"}],
+  SequenceForm["kT3_max = ", {$CellContext`kT3 -> 123.95833333333334`}, "\n"],
+  
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775229338725016*^9, 3.775229819928619*^9, 
+  3.775230571186458*^9},
+ CellLabel->
+  "During evaluation of \
+In[559]:=",ExpressionUUID->"672b46d5-b182-43d6-9ad5-74e89857e3af"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Four Momenta : \\n\"\>", "\[InvisibleSpace]", 
+   TagBox[
+    RowBox[{"(", "\[NoBreak]", 
+     TagBox[GridBox[{
+        {
+         RowBox[{"p1", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"150.`", ",", "0.`", ",", "0.`", ",", "150.`"}], "}"}]}]},
+        {
+         RowBox[{"p2", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"150.`", ",", "0.`", ",", "0.`", ",", 
+            RowBox[{"-", "150.`"}]}], "}"}]}]},
+        {
+         RowBox[{"p3", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{
+           "131.24404748406687`", ",", "20.`", ",", "34.64101615137755`", ",",
+             "0.`"}], "}"}]}]},
+        {
+         RowBox[{"p4", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"100.20722612318758`", ",", "0.`", ",", 
+            RowBox[{"-", "100.20722612318758`"}], ",", "0.`"}], "}"}]}]},
+        {
+         RowBox[{"p5", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"68.5487263927455`", ",", 
+            RowBox[{"-", "20.`"}], ",", "65.56620997181004`", ",", "0.`"}], 
+           "}"}]}]}
+       },
+       GridBoxAlignment->{
+        "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, 
+         "Rows" -> {{Baseline}}, "RowsIndexed" -> {}},
+       GridBoxSpacings->{"Columns" -> {
+           Offset[0.27999999999999997`], {
+            Offset[0.5599999999999999]}, 
+           Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+           Offset[0.2], {
+            Offset[0.4]}, 
+           Offset[0.2]}, "RowsIndexed" -> {}}],
+      Column], "\[NoBreak]", ")"}],
+    Function[BoxForm`e$, 
+     MatrixForm[BoxForm`e$]]], "\[InvisibleSpace]", "\<\"\\n\"\>"}],
+  SequenceForm["Four Momenta : \n", 
+   MatrixForm[{$CellContext`p1 -> {150., 0., 0., 150.}, $CellContext`p2 -> {
+      150., 0., 0., -150.}, $CellContext`p3 -> {131.24404748406687`, 20., 
+      34.64101615137755, 0.}, $CellContext`p4 -> {100.20722612318758`, 
+      0., -100.20722612318758`, 0.}, $CellContext`p5 -> {
+      68.5487263927455, -20., 65.56620997181004, 0.}}], "\n"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775229338725016*^9, 3.775229819928619*^9, 
+  3.775230571199201*^9},
+ CellLabel->
+  "During evaluation of \
+In[559]:=",ExpressionUUID->"05058169-5587-47d7-967f-cefedf01eb4f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Check 4 momentum conservation: p3+p4+p5 -p1 -p2 =0 :  \"\>", 
+   "\[InvisibleSpace]", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{
+     "-", "5.876373720011891608134562217738742061745029729160199708223878675`\
+43.99095815745918*^-14"}], ",", "0``58.39794000867204", ",", 
+     "0``57.69807096391986", ",", "0``57.522878745280345"}], "}"}]}],
+  SequenceForm[
+  "Check 4 momentum conservation: p3+p4+p5 -p1 -p2 =0 :  ", \
+{-5.876373720011891608134562217738742061745029729160199708223878675`43.\
+99095815745918*^-14, 0``58.39794000867204, 0``57.69807096391986, 
+    0``57.522878745280345}],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775229338725016*^9, 3.775229819928619*^9, 
+  3.775230571213154*^9},
+ CellLabel->
+  "During evaluation of \
+In[559]:=",ExpressionUUID->"4097f6e5-fc74-4212-ac6e-bd19306fd20d"],
+
+Cell[BoxData["\<\"MOMENTUM IS CONSERVED, ALL IS WELL!\"\>"], "Print",
+ CellChangeTimes->{3.775229338725016*^9, 3.775229819928619*^9, 
+  3.7752305712220907`*^9},
+ CellLabel->
+  "During evaluation of \
+In[559]:=",ExpressionUUID->"bbc2f3b7-c6b3-4828-b1af-c4fcbecd6b32"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{
+   RowBox[{"kkT3", "\[Rule]", "40.`"}], ",", 
+   RowBox[{"kkT4", "\[Rule]", "100.2072261231875813792`10."}], ",", 
+   RowBox[{"S", "\[Rule]", "90000.`10."}], ",", 
+   RowBox[{"T", "\[Rule]", 
+    RowBox[{"-", "23748.2142452200617895598`10."}]}], ",", 
+   RowBox[{"U", "\[Rule]", 
+    RowBox[{"-", "23748.2142452200617895598`10."}]}], ",", 
+   RowBox[{"T24", "\[Rule]", 
+    RowBox[{"-", "30062.1678369562744137511`10."}]}], ",", 
+   RowBox[{"T14", "\[Rule]", 
+    RowBox[{"-", "30062.1678369562744137511`10."}]}], ",", 
+   RowBox[{"S34", "\[Rule]", "48870.7641643526804629805`10."}], ",", 
+   RowBox[{
+    SqrtBox["S"], "\[Rule]", "300.`10."}], ",", 
+   RowBox[{
+    SqrtBox["S34"], "\[Rule]", "221.0673294821120339102`10."}], ",", 
+   RowBox[{
+    RowBox[{"Tan", "[", "\[Phi]5", "]"}], "\[Rule]", 
+    RowBox[{"-", "0.30503516992363796243170073189201937468`10."}]}], ",", 
+   RowBox[{"kT5", "\[Rule]", "68.5487263927454872252`10."}], ",", 
+   RowBox[{
+    SqrtBox["S35"], "\[Rule]", "172.8457819158090640716`10."}]}], 
+  "}"}]], "Print",
+ CellChangeTimes->{3.775229338725016*^9, 3.775229819928619*^9, 
+  3.775230571231678*^9},
+ CellLabel->
+  "During evaluation of \
+In[559]:=",ExpressionUUID->"28ddf3b3-c3f9-4cf3-ba05-02312cd12f5c"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(", 
+   RowBox[{"0.`", "\[VeryThinSpace]", "+", 
+    RowBox[{"0.`", " ", "\[ImaginaryI]"}]}], ")"}], "+", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"0.5566332737265782`", "\[VeryThinSpace]", "+", 
+     RowBox[{"0.04417169412437272`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c1"}], "+", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"0.555115709076102`", "\[VeryThinSpace]", "-", 
+     RowBox[{"0.03177639407330288`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c2"}], "-", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"1.111748982802681`", "\[VeryThinSpace]", "+", 
+     RowBox[{"0.012395300051069856`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c3"}]}]], "Output",
+ CellChangeTimes->{3.775230596453958*^9},
+ CellLabel->
+  "Out[563]=",ExpressionUUID->"61209ac1-6811-4927-8d5d-7e002a9c297f"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{"bfinal", "=", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{"0.5566332737265782`", "\[VeryThinSpace]", "+", 
+      RowBox[{"0.04417169412437272`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+    "c1"}], "+", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{"0.555115709076102`", "\[VeryThinSpace]", "-", 
+      RowBox[{"0.03177639407330288`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+    "c2"}], "-", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{"1.111748982802681`", "\[VeryThinSpace]", "+", 
+      RowBox[{"0.012395300051069856`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+    "c3"}]}]}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"b", "=", 
+   RowBox[{"List", "[", 
+    RowBox[{
+     RowBox[{"bfinal", "[", 
+      RowBox[{"[", 
+       RowBox[{"1", ",", "1"}], "]"}], "]"}], ",", 
+     RowBox[{"bfinal", "[", 
+      RowBox[{"[", 
+       RowBox[{"1", ",", "1"}], "]"}], "]"}], ",", 
+     RowBox[{"bfinal", "[", 
+      RowBox[{"[", 
+       RowBox[{"2", ",", "1"}], "]"}], "]"}], ",", 
+     RowBox[{"bfinal", "[", 
+      RowBox[{"[", 
+       RowBox[{"2", ",", "1"}], "]"}], "]"}], ",", 
+     RowBox[{"bfinal", "[", 
+      RowBox[{"[", 
+       RowBox[{"3", ",", "1"}], "]"}], "]"}], ",", 
+     RowBox[{"bfinal", "[", 
+      RowBox[{"[", 
+       RowBox[{"3", ",", "1"}], "]"}], "]"}]}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{"b", "//", "MatrixForm"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"mat", "=", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{"19", "/", "6"}], ",", 
+       RowBox[{"2", "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}]}], "}"}], ",", 
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{"2", "/", "3"}], ",", 
+       RowBox[{"19", "/", "6"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}]}], "}"}], ",", 
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{"2", "/", "3"}], ",", 
+       RowBox[{"19", "/", "6"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}]}], "}"}], ",", 
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{"19", "/", "6"}], ",", 
+       RowBox[{"2", "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}]}], "}"}], ",", 
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{"19", "/", "6"}], ",", 
+       RowBox[{"2", "/", "3"}]}], "}"}], ",", 
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{"2", "/", "3"}], ",", 
+       RowBox[{"19", "/", "6"}]}], "}"}]}], "}"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{"mat", "//", "MatrixForm"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"bdagger", "=", 
+   RowBox[{"Conjugate", "[", "b", "]"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{"bdagger", "//", "MatrixForm"}], "\[IndentingNewLine]", 
+ RowBox[{"MdagM1", "=", " ", 
+  RowBox[{"Dot", "[", 
+   RowBox[{"bdagger", ",", "mat", ",", "b"}], "]"}]}]}], "Input",
+ CellChangeTimes->{
+  3.775229827028739*^9, {3.775230568237907*^9, 3.775230604882635*^9}},
+ CellLabel->
+  "In[564]:=",ExpressionUUID->"0e414578-8bf7-48dd-aa07-72f420f87330"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"0.5566332737265782`", "\[VeryThinSpace]", "+", 
+     RowBox[{"0.04417169412437272`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c1"}], "+", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"0.555115709076102`", "\[VeryThinSpace]", "-", 
+     RowBox[{"0.03177639407330288`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c2"}], "-", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"1.111748982802681`", "\[VeryThinSpace]", "+", 
+     RowBox[{"0.012395300051069856`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c3"}]}]], "Output",
+ CellChangeTimes->{3.775230608627625*^9},
+ CellLabel->
+  "Out[564]=",ExpressionUUID->"82608b25-bb9e-46a9-bc23-8896e03febd6"],
+
+Cell[BoxData[
+ TagBox[
+  RowBox[{"(", "\[NoBreak]", 
+   TagBox[GridBox[{
+      {
+       RowBox[{"0.5566332737265782`", "\[VeryThinSpace]", "+", 
+        RowBox[{"0.04417169412437272`", " ", "\[ImaginaryI]"}]}]},
+      {
+       RowBox[{"0.5566332737265782`", "\[VeryThinSpace]", "+", 
+        RowBox[{"0.04417169412437272`", " ", "\[ImaginaryI]"}]}]},
+      {
+       RowBox[{"0.555115709076102`", "\[VeryThinSpace]", "-", 
+        RowBox[{"0.03177639407330288`", " ", "\[ImaginaryI]"}]}]},
+      {
+       RowBox[{"0.555115709076102`", "\[VeryThinSpace]", "-", 
+        RowBox[{"0.03177639407330288`", " ", "\[ImaginaryI]"}]}]},
+      {
+       RowBox[{
+        RowBox[{"-", "1.111748982802681`"}], "-", 
+        RowBox[{"0.012395300051069856`", " ", "\[ImaginaryI]"}]}]},
+      {
+       RowBox[{
+        RowBox[{"-", "1.111748982802681`"}], "-", 
+        RowBox[{"0.012395300051069856`", " ", "\[ImaginaryI]"}]}]}
+     },
+     GridBoxAlignment->{
+      "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
+        "RowsIndexed" -> {}},
+     GridBoxSpacings->{"Columns" -> {
+         Offset[0.27999999999999997`], {
+          Offset[0.5599999999999999]}, 
+         Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+         Offset[0.2], {
+          Offset[0.4]}, 
+         Offset[0.2]}, "RowsIndexed" -> {}}],
+    Column], "\[NoBreak]", ")"}],
+  Function[BoxForm`e$, 
+   MatrixForm[BoxForm`e$]]]], "Output",
+ CellChangeTimes->{3.775230608640141*^9},
+ CellLabel->
+  "Out[566]//MatrixForm=",ExpressionUUID->"85a4546b-1e22-4f24-a959-\
+89ef205f1685"],
+
+Cell[BoxData[
+ TagBox[
+  RowBox[{"(", "\[NoBreak]", GridBox[{
+     {
+      FractionBox["19", "6"], 
+      FractionBox["2", "3"], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}]},
+     {
+      FractionBox["2", "3"], 
+      FractionBox["19", "6"], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}]},
+     {
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      FractionBox["2", "3"], 
+      FractionBox["19", "6"], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}]},
+     {
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      FractionBox["19", "6"], 
+      FractionBox["2", "3"], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}]},
+     {
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      FractionBox["19", "6"], 
+      FractionBox["2", "3"]},
+     {
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      FractionBox["2", "3"], 
+      FractionBox["19", "6"]}
+    },
+    GridBoxAlignment->{
+     "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
+      "RowsIndexed" -> {}},
+    GridBoxSpacings->{"Columns" -> {
+        Offset[0.27999999999999997`], {
+         Offset[0.7]}, 
+        Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+        Offset[0.2], {
+         Offset[0.4]}, 
+        Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}],
+  Function[BoxForm`e$, 
+   MatrixForm[BoxForm`e$]]]], "Output",
+ CellChangeTimes->{3.7752306086548643`*^9},
+ CellLabel->
+  "Out[568]//MatrixForm=",ExpressionUUID->"501d3523-5b39-4f6b-bfc6-\
+43c241646426"],
+
+Cell[BoxData[
+ TagBox[
+  RowBox[{"(", "\[NoBreak]", 
+   TagBox[GridBox[{
+      {
+       RowBox[{"0.5566332737265782`", "\[VeryThinSpace]", "-", 
+        RowBox[{"0.04417169412437272`", " ", "\[ImaginaryI]"}]}]},
+      {
+       RowBox[{"0.5566332737265782`", "\[VeryThinSpace]", "-", 
+        RowBox[{"0.04417169412437272`", " ", "\[ImaginaryI]"}]}]},
+      {
+       RowBox[{"0.555115709076102`", "\[VeryThinSpace]", "+", 
+        RowBox[{"0.03177639407330288`", " ", "\[ImaginaryI]"}]}]},
+      {
+       RowBox[{"0.555115709076102`", "\[VeryThinSpace]", "+", 
+        RowBox[{"0.03177639407330288`", " ", "\[ImaginaryI]"}]}]},
+      {
+       RowBox[{
+        RowBox[{"-", "1.111748982802681`"}], "+", 
+        RowBox[{"0.012395300051069856`", " ", "\[ImaginaryI]"}]}]},
+      {
+       RowBox[{
+        RowBox[{"-", "1.111748982802681`"}], "+", 
+        RowBox[{"0.012395300051069856`", " ", "\[ImaginaryI]"}]}]}
+     },
+     GridBoxAlignment->{
+      "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
+        "RowsIndexed" -> {}},
+     GridBoxSpacings->{"Columns" -> {
+         Offset[0.27999999999999997`], {
+          Offset[0.5599999999999999]}, 
+         Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+         Offset[0.2], {
+          Offset[0.4]}, 
+         Offset[0.2]}, "RowsIndexed" -> {}}],
+    Column], "\[NoBreak]", ")"}],
+  Function[BoxForm`e$, 
+   MatrixForm[BoxForm`e$]]]], "Output",
+ CellChangeTimes->{3.775230608667103*^9},
+ CellLabel->
+  "Out[570]//MatrixForm=",ExpressionUUID->"22c8d040-d710-4aca-89d1-\
+17964cf0761b"],
+
+Cell[BoxData[
+ RowBox[{"16.71384936501812`", "\[VeryThinSpace]", "+", 
+  RowBox[{"4.163336342344337`*^-17", " ", "\[ImaginaryI]"}]}]], "Output",
+ CellChangeTimes->{3.775230608679388*^9},
+ CellLabel->
+  "Out[571]=",ExpressionUUID->"200f382c-f9d9-46dd-9e7e-396321b66395"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"(*", " ", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"0", " ", "\[Rule]", " ", "kT3"}], "=", "20"}], ",", " ", 
+   RowBox[{
+    RowBox[{"1", " ", "\[Rule]", " ", "kT3"}], "=", "40"}]}], " ", 
+  "*)"}]], "Input",ExpressionUUID->"6bd9d4e3-c0eb-46c8-9ee1-2cc1a6f9f551"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"MdagM0", "/", "MdagM1", "  "}]], "Input",
+ CellChangeTimes->{{3.775229350472871*^9, 3.775229388611747*^9}},
+ CellLabel->
+  "In[572]:=",ExpressionUUID->"7dc2aeaf-1eea-4790-86f2-2e38260ef446"],
+
+Cell[BoxData[
+ RowBox[{"0.8345852437913059`", "\[VeryThinSpace]", "-", 
+  RowBox[{"1.7026728876564662`*^-18", " ", "\[ImaginaryI]"}]}]], "Output",
+ CellChangeTimes->{3.7752293927054787`*^9, 3.775230612497229*^9},
+ CellLabel->
+  "Out[572]=",ExpressionUUID->"d9baed4e-4c27-4541-baf9-0d1e1b49c1fc"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"MdagM1", "/", "MdagM0"}], "\[IndentingNewLine]", 
+  "\[IndentingNewLine]"}]], "Input",
+ CellChangeTimes->{
+  3.7752275896248493`*^9, {3.77522767187156*^9, 3.775227683066543*^9}, {
+   3.775229358285284*^9, 3.77522936368441*^9}},
+ CellLabel->
+  "In[573]:=",ExpressionUUID->"65d1e451-71c5-4a37-bb29-1ec9c57d89ad"],
+
+Cell[BoxData[
+ RowBox[{"1.1981999531375098`", "\[VeryThinSpace]", "+", 
+  RowBox[{"2.4444987367984653`*^-18", " ", "\[ImaginaryI]"}]}]], "Output",
+ CellChangeTimes->{3.7752293941729507`*^9, 3.7752306140600367`*^9},
+ CellLabel->
+  "Out[573]=",ExpressionUUID->"719d6feb-e988-4831-acc0-7728ca02e7e1"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
+  "\[IndentingNewLine]", "\[IndentingNewLine]", 
+  "\[IndentingNewLine]"}]], "Input",
+ CellChangeTimes->{{3.775487617925837*^9, 
+  3.775487618576902*^9}},ExpressionUUID->"d8336dbe-baca-4c43-98ec-\
+e9fa0e90ceb9"],
+
+Cell[BoxData[
+ RowBox[{"(*", " ", 
+  RowBox[{
+   RowBox[{"TEST", " ", "triangles", " ", "gg"}], " ", "\[Rule]", " ", 
+   "Hgg"}], " ", "*)"}]], "Input",
+ CellChangeTimes->{{3.775487341723607*^9, 
+  3.775487351568636*^9}},ExpressionUUID->"dbe86d55-f903-4c16-aba8-\
+5c64dcd510d8"],
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"SetDirectory", "[", 
+   RowBox[{"NotebookDirectory", "[", "]"}], "]"}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"config", "=", "\"\<++++\>\""}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"triangle", " ", "=", " ", 
+   RowBox[{"Import", "[", "\"\<ggHgg_LR_triangle_38diags.m\>\"", "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"pairdef", "[", 
+   RowBox[{"1", ",", "1", ",", "1", ",", "1"}], "]"}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"tsub", " ", "=", " ", 
+   RowBox[{
+    RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"Export", "[", 
+   RowBox[{
+    RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+    "tsub"}], "]"}], ";"}]}], "Input",
+ CellChangeTimes->{{3.775487398836247*^9, 3.775487400633142*^9}, {
+  3.775487437936494*^9, 3.775487473836816*^9}},
+ CellLabel->
+  "In[140]:=",ExpressionUUID->"ff902789-8764-47df-ae19-f8e2732cb693"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["tsub"], "Input",
+ CellChangeTimes->{{3.775487406670053*^9, 3.775487408597879*^9}},
+ CellLabel->
+  "In[146]:=",ExpressionUUID->"d259943e-df1a-4b8b-8ce1-f2d8a1c6ce82"],
+
+Cell[BoxData[
+ InterpretationBox[
+  TagBox[
+   FrameBox[GridBox[{
+      {
+       ItemBox[
+        TagBox[
+         RowBox[{
+          RowBox[{"-", 
+           FractionBox[
+            RowBox[{"2", " ", 
+             TemplateBox[{"4"},
+              "OutputSizeLimit`Skeleton"], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               FractionBox[
+                TemplateBox[{"1"},
+                 "OutputSizeLimit`Skeleton"], "T"], "+", 
+               FractionBox[
+                RowBox[{
+                 RowBox[{
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    TemplateBox[{"1"},
+                    "OutputSizeLimit`Skeleton"], ")"}]}], "-", 
+                    RowBox[{"16", " ", 
+                    TemplateBox[{"1"},
+                    "OutputSizeLimit`Skeleton"]}]}], ")"}], " ", 
+                  RowBox[{"(", 
+                   TemplateBox[{"1"},
+                    "OutputSizeLimit`Skeleton"], ")"}]}], "+", 
+                 TemplateBox[{"7"},
+                  "OutputSizeLimit`Skeleton"]}], "S34"], "+", 
+               FractionBox[
+                TemplateBox[{"1"},
+                 "OutputSizeLimit`Skeleton"], 
+                TemplateBox[{"1"},
+                 "OutputSizeLimit`Skeleton"]], "+", 
+               FractionBox[
+                TemplateBox[{"1"},
+                 "OutputSizeLimit`Skeleton"], 
+                TemplateBox[{"1"},
+                 "OutputSizeLimit`Skeleton"]], "-", 
+               FractionBox[
+                RowBox[{
+                 FractionBox[
+                  TemplateBox[{"1"},
+                   "OutputSizeLimit`Skeleton"], "S"], "+", 
+                 FractionBox[
+                  TemplateBox[{"1"},
+                   "OutputSizeLimit`Skeleton"], "T"]}], 
+                RowBox[{
+                 SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                 "T24"}]], "+", 
+               FractionBox[
+                TemplateBox[{"1"},
+                 "OutputSizeLimit`Skeleton"], "U"]}], ")"}]}], 
+            RowBox[{"MW", " ", "SW"}]]}], "-", 
+          FractionBox[
+           RowBox[{"2", " ", 
+            TemplateBox[{"4"},
+             "OutputSizeLimit`Skeleton"], " ", 
+            RowBox[{"(", 
+             RowBox[{
+              FractionBox[
+               TemplateBox[{"1"},
+                "OutputSizeLimit`Skeleton"], "T"], "+", 
+              TemplateBox[{"4"},
+               "OutputSizeLimit`Skeleton"], "+", 
+              FractionBox[
+               TemplateBox[{"1"},
+                "OutputSizeLimit`Skeleton"], "T24"]}], ")"}]}], 
+           RowBox[{"MW", " ", "SW"}]], "+", 
+          FractionBox[
+           RowBox[{"2", " ", 
+            TemplateBox[{"4"},
+             "OutputSizeLimit`Skeleton"], " ", 
+            RowBox[{"(", 
+             RowBox[{
+              FractionBox[
+               TemplateBox[{"1"},
+                "OutputSizeLimit`Skeleton"], "T"], "+", 
+              FractionBox[
+               TemplateBox[{"1"},
+                "OutputSizeLimit`Skeleton"], "S34"], "+", 
+              TemplateBox[{"2"},
+               "OutputSizeLimit`Skeleton"], "+", 
+              FractionBox[
+               TemplateBox[{"1"},
+                "OutputSizeLimit`Skeleton"], "U"], "+", 
+              FractionBox[
+               RowBox[{
+                TemplateBox[{"1"},
+                 "OutputSizeLimit`Skeleton"], "+", 
+                TemplateBox[{"1"},
+                 "OutputSizeLimit`Skeleton"]}], "T24"]}], ")"}]}], 
+           RowBox[{"MW", " ", "SW"}]]}],
+         Short[#, 5]& ],
+        BaseStyle->{Deployed -> False},
+        StripOnInput->False]},
+      {GridBox[{
+         {
+          TagBox[
+           TooltipBox[
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource[
+                "FEStrings", "sizeBriefExplanation"], StandardForm],
+               ImageSizeCache->{58., {2., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLText",
+             StripOnInput->False],
+            StyleBox[
+             DynamicBox[
+              ToBoxes[
+               FEPrivate`FrontEndResource["FEStrings", "sizeExplanation"], 
+               StandardForm]], DynamicUpdating -> True, StripOnInput -> 
+             False]],
+           Annotation[#, 
+            Style[
+             Dynamic[
+              FEPrivate`FrontEndResource["FEStrings", "sizeExplanation"]], 
+             DynamicUpdating -> True], "Tooltip"]& ], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowLess"], 
+                StandardForm],
+               ImageSizeCache->{50., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowLess"], 
+                StandardForm]],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           
+           ButtonFunction:>OutputSizeLimit`ButtonFunction[
+            OutputSizeLimit`Defer, 146, 17479000166414073932, 5/2],
+           Enabled->True,
+           Evaluator->Automatic,
+           Method->"Queued"], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowMore"], 
+                StandardForm],
+               ImageSizeCache->{56., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowMore"], 
+                StandardForm]],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           
+           ButtonFunction:>OutputSizeLimit`ButtonFunction[
+            OutputSizeLimit`Defer, 146, 17479000166414073932, 5 2],
+           Enabled->True,
+           Evaluator->Automatic,
+           Method->"Queued"], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowAll"], 
+                StandardForm],
+               ImageSizeCache->{42., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowAll"], 
+                StandardForm]],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           
+           ButtonFunction:>OutputSizeLimit`ButtonFunction[
+            OutputSizeLimit`Defer, 146, 17479000166414073932, Infinity],
+           Enabled->True,
+           Evaluator->Automatic,
+           Method->"Queued"], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeChangeLimit"], 
+                StandardForm],
+               ImageSizeCache->{74., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeChangeLimit"], 
+                StandardForm]],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           ButtonFunction:>FrontEndExecute[{
+              FrontEnd`SetOptions[
+              FrontEnd`$FrontEnd, 
+               FrontEnd`PreferencesSettings -> {"Page" -> "Advanced"}], 
+              FrontEnd`FrontEndToken["PreferencesDialog"]}],
+           Evaluator->None,
+           Method->"Preemptive"]}
+        },
+        AutoDelete->False,
+        FrameStyle->GrayLevel[0.85],
+        GridBoxDividers->{"Columns" -> {False, {True}}},
+        GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
+        GridBoxSpacings->{"Columns" -> {{2}}}]}
+     },
+     DefaultBaseStyle->"Column",
+     GridBoxAlignment->{
+      "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
+       "RowsIndexed" -> {}},
+     GridBoxDividers->{
+      "Columns" -> {{False}}, "ColumnsIndexed" -> {}, "Rows" -> {{False}}, 
+       "RowsIndexed" -> {}},
+     GridBoxItemSize->{
+      "Columns" -> {{Automatic}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, 
+       "RowsIndexed" -> {}},
+     GridBoxSpacings->{"Columns" -> {
+         Offset[0.27999999999999997`], {
+          Offset[0.5599999999999999]}, 
+         Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+         Offset[0.2], 
+         Offset[1.2], {
+          Offset[0.4]}, 
+         Offset[0.2]}, "RowsIndexed" -> {}}],
+    BaseStyle->"OutputSizeLimit",
+    FrameMargins->{{12, 12}, {0, 15}},
+    FrameStyle->GrayLevel[0.85],
+    RoundingRadius->5,
+    StripOnInput->False],
+   Deploy,
+   DefaultBaseStyle->"Deploy"],
+  If[17479000166414073932 === $SessionID, 
+   Out[146], Message[
+     MessageName[Syntax, "noinfoker"]]; Missing["NotAvailable"]; 
+   Null]]], "Output",
+ CellChangeTimes->{
+  3.775487408894373*^9, {3.7754874813905573`*^9, 3.775487510187152*^9}, 
+   3.775491049018458*^9, 3.775492172589079*^9},
+ CellLabel->
+  "Out[146]=",ExpressionUUID->"bb81f3e0-43b8-4bed-817f-ab833c1db0b0"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"output", "=", 
+   RowBox[{
+    RowBox[{"N", "[", 
+     RowBox[{
+      RowBox[{"OutputPS", "[", 
+       RowBox[{"300.", ",", "20.", ",", "0", ",", 
+        RowBox[{"Pi", "/", "3"}], ",", "0", ",", 
+        RowBox[{"3", "*", 
+         RowBox[{"Pi", "/", "2"}]}], ",", "125."}], "]"}], ",", "10"}], "]"}],
+     "[", 
+    RowBox[{"[", "2", "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"KinRules", "=", 
+   RowBox[{"f", "[", 
+    RowBox[{"variables", ",", "output"}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"KinSub", "=", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{"S", "\[Rule]", 
+      RowBox[{"300.", "^", "2"}]}], ",", 
+     RowBox[{"kT3", "\[Rule]", "20."}], ",", 
+     RowBox[{"\[Eta]3", "\[Rule]", "0"}], ",", 
+     RowBox[{"\[Phi]3", "\[Rule]", 
+      RowBox[{"Pi", "/", "3"}]}], ",", 
+     RowBox[{"\[Eta]4", "\[Rule]", "0"}], ",", 
+     RowBox[{"\[Phi]4", "\[Rule]", 
+      RowBox[{"3", "*", 
+       RowBox[{"Pi", "/", "2"}]}]}], ",", 
+     RowBox[{"MH", "\[Rule]", "125."}], ",", 
+     RowBox[{"MT", "\[Rule]", "173."}]}], "}"}]}], ";"}]}], "Input",
+ CellLabel->
+  "In[164]:=",ExpressionUUID->"9a3f574a-cd45-430d-9f41-9143c899f3d3"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"kT3_max = \"\>", "\[InvisibleSpace]", 
+   RowBox[{"{", 
+    RowBox[{"kT3", "\[Rule]", "123.95833333333334`"}], "}"}], 
+   "\[InvisibleSpace]", "\<\"\\n\"\>"}],
+  SequenceForm["kT3_max = ", {$CellContext`kT3 -> 123.95833333333334`}, "\n"],
+  
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775487552860243*^9, 3.7754879395402737`*^9, 
+  3.775488357599923*^9, 3.7754910494775543`*^9, 3.775492172749148*^9, 
+  3.77549222098951*^9},
+ CellLabel->
+  "During evaluation of \
+In[164]:=",ExpressionUUID->"e1dd3184-93ea-45aa-aa66-1a51baff8344"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Four Momenta : \\n\"\>", "\[InvisibleSpace]", 
+   TagBox[
+    RowBox[{"(", "\[NoBreak]", 
+     TagBox[GridBox[{
+        {
+         RowBox[{"p1", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"150.`", ",", "0.`", ",", "0.`", ",", "150.`"}], "}"}]}]},
+        {
+         RowBox[{"p2", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"150.`", ",", "0.`", ",", "0.`", ",", 
+            RowBox[{"-", "150.`"}]}], "}"}]}]},
+        {
+         RowBox[{"p3", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{
+           "126.58988901172162`", ",", "10.`", ",", "17.320508075688775`", 
+            ",", "0.`"}], "}"}]}]},
+        {
+         RowBox[{"p4", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"95.04498070119013`", ",", "0.`", ",", 
+            RowBox[{"-", "95.04498070119013`"}], ",", "0.`"}], "}"}]}]},
+        {
+         RowBox[{"p5", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"78.3651302870882`", ",", 
+            RowBox[{"-", "10.`"}], ",", "77.72447262550135`", ",", "0.`"}], 
+           "}"}]}]}
+       },
+       GridBoxAlignment->{
+        "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, 
+         "Rows" -> {{Baseline}}, "RowsIndexed" -> {}},
+       GridBoxSpacings->{"Columns" -> {
+           Offset[0.27999999999999997`], {
+            Offset[0.5599999999999999]}, 
+           Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+           Offset[0.2], {
+            Offset[0.4]}, 
+           Offset[0.2]}, "RowsIndexed" -> {}}],
+      Column], "\[NoBreak]", ")"}],
+    Function[BoxForm`e$, 
+     MatrixForm[BoxForm`e$]]], "\[InvisibleSpace]", "\<\"\\n\"\>"}],
+  SequenceForm["Four Momenta : \n", 
+   MatrixForm[{$CellContext`p1 -> {150., 0., 0., 150.}, $CellContext`p2 -> {
+      150., 0., 0., -150.}, $CellContext`p3 -> {126.58988901172162`, 10., 
+      17.320508075688775`, 0.}, $CellContext`p4 -> {95.04498070119013, 
+      0., -95.04498070119013, 0.}, $CellContext`p5 -> {78.3651302870882, -10.,
+       77.72447262550135, 0.}}], "\n"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775487552860243*^9, 3.7754879395402737`*^9, 
+  3.775488357599923*^9, 3.7754910494775543`*^9, 3.775492172749148*^9, 
+  3.775492221000539*^9},
+ CellLabel->
+  "During evaluation of \
+In[164]:=",ExpressionUUID->"b6238ca4-e65e-4f5a-bd6a-19cc70b7cf87"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Check 4 momentum conservation: p3+p4+p5 -p1 -p2 =0 :  \"\>", 
+   "\[InvisibleSpace]", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{
+     "-", "3.887221955939928966560590155849714544348308363744058289341178206`\
+43.811488088675176*^-14"}], ",", "0``58.69897000433602", ",", 
+     "0``57.72104081749894", ",", "0``57.522878745280345"}], "}"}]}],
+  SequenceForm[
+  "Check 4 momentum conservation: p3+p4+p5 -p1 -p2 =0 :  ", \
+{-3.887221955939928966560590155849714544348308363744058289341178206`43.\
+811488088675176*^-14, 0``58.69897000433602, 0``57.72104081749894, 
+    0``57.522878745280345}],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775487552860243*^9, 3.7754879395402737`*^9, 
+  3.775488357599923*^9, 3.7754910494775543`*^9, 3.775492172749148*^9, 
+  3.775492221014029*^9},
+ CellLabel->
+  "During evaluation of \
+In[164]:=",ExpressionUUID->"7ea31f10-d118-4022-958f-dcfbd6a2e3e6"],
+
+Cell[BoxData["\<\"MOMENTUM IS CONSERVED, ALL IS WELL!\"\>"], "Print",
+ CellChangeTimes->{3.775487552860243*^9, 3.7754879395402737`*^9, 
+  3.775488357599923*^9, 3.7754910494775543`*^9, 3.775492172749148*^9, 
+  3.7754922210210247`*^9},
+ CellLabel->
+  "During evaluation of \
+In[164]:=",ExpressionUUID->"7d84e7e6-71cc-43f9-9858-0a9b757f59cd"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{
+   RowBox[{"kkT3", "\[Rule]", "20.`"}], ",", 
+   RowBox[{"kkT4", "\[Rule]", "95.0449807011901270926`10."}], ",", 
+   RowBox[{"S", "\[Rule]", "90000.`10."}], ",", 
+   RowBox[{"T", "\[Rule]", 
+    RowBox[{"-", "22351.9667035164881926659`10."}]}], ",", 
+   RowBox[{"U", "\[Rule]", 
+    RowBox[{"-", "22351.9667035164881926659`10."}]}], ",", 
+   RowBox[{"T24", "\[Rule]", 
+    RowBox[{"-", "28513.4942103570381277677`10."}]}], ",", 
+   RowBox[{"T14", "\[Rule]", 
+    RowBox[{"-", "28513.4942103570381277677`10."}]}], ",", 
+   RowBox[{"S34", "\[Rule]", "42980.9218277470587333204`10."}], ",", 
+   RowBox[{
+    SqrtBox["S"], "\[Rule]", "300.`10."}], ",", 
+   RowBox[{
+    SqrtBox["S34"], "\[Rule]", "207.3184068715246970733`10."}], ",", 
+   RowBox[{
+    RowBox[{"Tan", "[", "\[Phi]5", "]"}], "\[Rule]", 
+    RowBox[{"-", "0.12865960568407904294629727505559632487`10."}]}], ",", 
+   RowBox[{"kT5", "\[Rule]", "78.3651302870882067263`10."}], ",", 
+   RowBox[{
+    SqrtBox["S35"], "\[Rule]", "181.5847228686540904465`10."}]}], 
+  "}"}]], "Print",
+ CellChangeTimes->{3.775487552860243*^9, 3.7754879395402737`*^9, 
+  3.775488357599923*^9, 3.7754910494775543`*^9, 3.775492172749148*^9, 
+  3.775492221028528*^9},
+ CellLabel->
+  "During evaluation of \
+In[164]:=",ExpressionUUID->"b73767c3-0d6c-4d3c-9cfa-7190669995d9"]
+}, Open  ]]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"ek1vec", "//.", "KinRules"}], "//.", "KinSub"}]], "Input",
+ CellChangeTimes->{{3.775487557663827*^9, 3.775487582522539*^9}, {
+  3.775487623605857*^9, 3.7754876514663677`*^9}},
+ CellLabel->
+  "In[168]:=",ExpressionUUID->"ec103b6d-ad9b-47f5-99fb-35d0c73242fa"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox["2"]]}], ",", 
+   RowBox[{"-", 
+    FractionBox["\[ImaginaryI]", 
+     SqrtBox["2"]]}], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{
+  3.775487559655751*^9, {3.775487625994041*^9, 3.7754876518002863`*^9}, 
+   3.7754922263438387`*^9},
+ CellLabel->
+  "Out[168]=",ExpressionUUID->"599c636a-94ac-45e2-a43b-d95245d19773"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"ek2vec", "//.", "KinRules"}], "//.", "KinSub"}]], "Input",
+ CellChangeTimes->{{3.7754875615081987`*^9, 3.775487563472124*^9}, {
+  3.7754876329091177`*^9, 3.775487647849922*^9}},
+ CellLabel->
+  "In[169]:=",ExpressionUUID->"45cc03ff-8a7f-40ac-841b-fac68c59dfd0"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox["2"]]}], ",", 
+   FractionBox["\[ImaginaryI]", 
+    SqrtBox["2"]], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{
+  3.775487563826468*^9, {3.775487634890091*^9, 3.775487648256915*^9}, 
+   3.775492227643849*^9},
+ CellLabel->
+  "Out[169]=",ExpressionUUID->"fa0863bb-51d4-49fd-8e52-b516b20cfd16"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"ek4vec", "//.", "KinRules"}], "//.", "KinSub"}]], "Input",
+ CellChangeTimes->{{3.7754875651763983`*^9, 3.775487568091836*^9}, {
+  3.775487636983919*^9, 3.7754876424875383`*^9}},
+ CellLabel->
+  "In[170]:=",ExpressionUUID->"cb245ba0-2d36-4576-abbc-86da611f6661"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox["\[ImaginaryI]", 
+     SqrtBox["2"]]}], ",", "0", ",", 
+   FractionBox["1", 
+    SqrtBox["2"]]}], "}"}]], "Output",
+ CellChangeTimes->{
+  3.775487568485145*^9, {3.7754876390311937`*^9, 3.775487642731925*^9}, 
+   3.775492229121855*^9},
+ CellLabel->
+  "Out[170]=",ExpressionUUID->"cc3b366f-3f8c-4cef-8228-4595152eed95"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"ek5vec", "//.", "KinRules"}], "//.", "KinSub"}]], "Input",
+ CellChangeTimes->{{3.775487569824945*^9, 3.7754875714400387`*^9}, {
+  3.775487653927663*^9, 3.7754876592312*^9}},
+ CellLabel->
+  "In[167]:=",ExpressionUUID->"2adefc70-ad32-4777-bd90-01f6585fa801"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"0.`", "\[VeryThinSpace]", "+", 
+    RowBox[{"0.7013259782290641`", " ", "\[ImaginaryI]"}]}], ",", 
+   RowBox[{"0.`", "\[VeryThinSpace]", "+", 
+    RowBox[{"0.09023232381495236`", " ", "\[ImaginaryI]"}]}], ",", 
+   "0.7071067811865476`"}], "}"}]], "Output",
+ CellChangeTimes->{
+  3.77548757190513*^9, {3.7754876560668087`*^9, 3.775487659613431*^9}, 
+   3.775492224922065*^9},
+ CellLabel->
+  "Out[167]=",ExpressionUUID->"2f8c6836-a4f2-4ad0-847a-191b528ee79f"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"t", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"tsub", "//.", "KinRules"}], "//.", "KinSub"}], "//", 
+    "FullSimplify"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{"tfinalkt20", "=", 
+  RowBox[{
+   RowBox[{"t", "/.", 
+    RowBox[{"{", 
+     RowBox[{
+      RowBox[{"Alfas", "\[Rule]", "1"}], ",", 
+      RowBox[{"MW", "\[Rule]", "80.376"}], ",", 
+      RowBox[{"SW", "\[Rule]", "0.480832611207"}], ",", 
+      RowBox[{"EL", "\[Rule]", 
+       RowBox[{"Sqrt", "[", 
+        RowBox[{"4", "*", "Pi"}], "]"}]}]}], "}"}]}], "//", 
+   "Simplify"}]}]}], "Input",
+ CellChangeTimes->{
+  3.775487814954833*^9, {3.775487909267064*^9, 3.7754879134590263`*^9}, {
+   3.775488344566409*^9, 3.77548835124419*^9}, {3.775491125858963*^9, 
+   3.7754911277699213`*^9}, 3.775492216611558*^9},
+ CellLabel->
+  "In[171]:=",ExpressionUUID->"38863738-22eb-4821-ade8-5e59b57cc6c8"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"3.8563551197203405`", "\[VeryThinSpace]", "-", 
+     RowBox[{"0.10789304042050796`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c1"}], "+", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"3.856355119720342`", "\[VeryThinSpace]", "+", 
+     RowBox[{"0.10789304042050414`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c2"}], "-", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"7.712710239440681`", "\[VeryThinSpace]", "-", 
+     RowBox[{"3.788242722357783`*^-15", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c3"}]}]], "Output",
+ CellChangeTimes->{
+  3.775487817638229*^9, {3.77548791635111*^9, 3.775487946605961*^9}, {
+   3.7754883532181377`*^9, 3.7754883653373213`*^9}, 3.775491056872643*^9, 
+   3.775491129906959*^9, 3.77549217973273*^9, 3.775492232818741*^9},
+ CellLabel->
+  "Out[172]=",ExpressionUUID->"daf16945-ab0d-4374-a527-378da92f56c0"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", "\[IndentingNewLine]"}]], "Input",
+ CellChangeTimes->{{3.775487900550686*^9, 
+  3.775487900690033*^9}},ExpressionUUID->"dd96acf9-8569-436c-b71f-\
+3858bc812dc3"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"output", "=", 
+   RowBox[{
+    RowBox[{"N", "[", 
+     RowBox[{
+      RowBox[{"OutputPS", "[", 
+       RowBox[{"300.", ",", "40.", ",", "0", ",", 
+        RowBox[{"Pi", "/", "3"}], ",", "0", ",", 
+        RowBox[{"3", "*", 
+         RowBox[{"Pi", "/", "2"}]}], ",", "125."}], "]"}], ",", "10"}], "]"}],
+     "[", 
+    RowBox[{"[", "2", "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"KinRules", "=", 
+   RowBox[{"f", "[", 
+    RowBox[{"variables", ",", "output"}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"KinSub", "=", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{"S", "\[Rule]", 
+      RowBox[{"300.", "^", "2"}]}], ",", 
+     RowBox[{"kT3", "\[Rule]", "40."}], ",", 
+     RowBox[{"\[Eta]3", "\[Rule]", "0"}], ",", 
+     RowBox[{"\[Phi]3", "\[Rule]", 
+      RowBox[{"Pi", "/", "3"}]}], ",", 
+     RowBox[{"\[Eta]4", "\[Rule]", "0"}], ",", 
+     RowBox[{"\[Phi]4", "\[Rule]", 
+      RowBox[{"3", "*", 
+       RowBox[{"Pi", "/", "2"}]}]}], ",", 
+     RowBox[{"MH", "\[Rule]", "125."}], ",", 
+     RowBox[{"MT", "\[Rule]", "173."}]}], "}"}]}], ";"}]}], "Input",
+ CellChangeTimes->{{3.775487894137486*^9, 3.775487895793477*^9}},
+ CellLabel->
+  "In[152]:=",ExpressionUUID->"587fed01-95ad-4497-9991-22e72c5df35e"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"kT3_max = \"\>", "\[InvisibleSpace]", 
+   RowBox[{"{", 
+    RowBox[{"kT3", "\[Rule]", "123.95833333333334`"}], "}"}], 
+   "\[InvisibleSpace]", "\<\"\\n\"\>"}],
+  SequenceForm["kT3_max = ", {$CellContext`kT3 -> 123.95833333333334`}, "\n"],
+  
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775487902025655*^9, 3.775487921336112*^9}, 
+   3.775487952888777*^9, 3.775488370010009*^9, 3.775491061733279*^9, 
+   3.775491130954506*^9, 3.7754921882876177`*^9},
+ CellLabel->
+  "During evaluation of \
+In[152]:=",ExpressionUUID->"efbe9be0-242a-48f2-9e42-649dcc6e39f0"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Four Momenta : \\n\"\>", "\[InvisibleSpace]", 
+   TagBox[
+    RowBox[{"(", "\[NoBreak]", 
+     TagBox[GridBox[{
+        {
+         RowBox[{"p1", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"150.`", ",", "0.`", ",", "0.`", ",", "150.`"}], "}"}]}]},
+        {
+         RowBox[{"p2", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"150.`", ",", "0.`", ",", "0.`", ",", 
+            RowBox[{"-", "150.`"}]}], "}"}]}]},
+        {
+         RowBox[{"p3", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{
+           "131.24404748406687`", ",", "20.`", ",", "34.64101615137755`", ",",
+             "0.`"}], "}"}]}]},
+        {
+         RowBox[{"p4", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"100.20722612318758`", ",", "0.`", ",", 
+            RowBox[{"-", "100.20722612318758`"}], ",", "0.`"}], "}"}]}]},
+        {
+         RowBox[{"p5", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"68.5487263927455`", ",", 
+            RowBox[{"-", "20.`"}], ",", "65.56620997181004`", ",", "0.`"}], 
+           "}"}]}]}
+       },
+       GridBoxAlignment->{
+        "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, 
+         "Rows" -> {{Baseline}}, "RowsIndexed" -> {}},
+       GridBoxSpacings->{"Columns" -> {
+           Offset[0.27999999999999997`], {
+            Offset[0.5599999999999999]}, 
+           Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+           Offset[0.2], {
+            Offset[0.4]}, 
+           Offset[0.2]}, "RowsIndexed" -> {}}],
+      Column], "\[NoBreak]", ")"}],
+    Function[BoxForm`e$, 
+     MatrixForm[BoxForm`e$]]], "\[InvisibleSpace]", "\<\"\\n\"\>"}],
+  SequenceForm["Four Momenta : \n", 
+   MatrixForm[{$CellContext`p1 -> {150., 0., 0., 150.}, $CellContext`p2 -> {
+      150., 0., 0., -150.}, $CellContext`p3 -> {131.24404748406687`, 20., 
+      34.64101615137755, 0.}, $CellContext`p4 -> {100.20722612318758`, 
+      0., -100.20722612318758`, 0.}, $CellContext`p5 -> {
+      68.5487263927455, -20., 65.56620997181004, 0.}}], "\n"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775487902025655*^9, 3.775487921336112*^9}, 
+   3.775487952888777*^9, 3.775488370010009*^9, 3.775491061733279*^9, 
+   3.775491130954506*^9, 3.775492188298505*^9},
+ CellLabel->
+  "During evaluation of \
+In[152]:=",ExpressionUUID->"b773131b-d503-4156-81c4-b9207d5e08b7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Check 4 momentum conservation: p3+p4+p5 -p1 -p2 =0 :  \"\>", 
+   "\[InvisibleSpace]", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{
+     "-", "5.876373720011891608134562217738742061745029729160199708223878675`\
+43.99095815745918*^-14"}], ",", "0``58.39794000867204", ",", 
+     "0``57.69807096391986", ",", "0``57.522878745280345"}], "}"}]}],
+  SequenceForm[
+  "Check 4 momentum conservation: p3+p4+p5 -p1 -p2 =0 :  ", \
+{-5.876373720011891608134562217738742061745029729160199708223878675`43.\
+99095815745918*^-14, 0``58.39794000867204, 0``57.69807096391986, 
+    0``57.522878745280345}],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775487902025655*^9, 3.775487921336112*^9}, 
+   3.775487952888777*^9, 3.775488370010009*^9, 3.775491061733279*^9, 
+   3.775491130954506*^9, 3.775492188311578*^9},
+ CellLabel->
+  "During evaluation of \
+In[152]:=",ExpressionUUID->"87a2822b-b3de-47cc-ad5e-c06152d2025e"],
+
+Cell[BoxData["\<\"MOMENTUM IS CONSERVED, ALL IS WELL!\"\>"], "Print",
+ CellChangeTimes->{{3.775487902025655*^9, 3.775487921336112*^9}, 
+   3.775487952888777*^9, 3.775488370010009*^9, 3.775491061733279*^9, 
+   3.775491130954506*^9, 3.775492188318636*^9},
+ CellLabel->
+  "During evaluation of \
+In[152]:=",ExpressionUUID->"37c34993-2e48-4495-a764-802de147d2dd"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{
+   RowBox[{"kkT3", "\[Rule]", "40.`"}], ",", 
+   RowBox[{"kkT4", "\[Rule]", "100.2072261231875813792`10."}], ",", 
+   RowBox[{"S", "\[Rule]", "90000.`10."}], ",", 
+   RowBox[{"T", "\[Rule]", 
+    RowBox[{"-", "23748.2142452200617895598`10."}]}], ",", 
+   RowBox[{"U", "\[Rule]", 
+    RowBox[{"-", "23748.2142452200617895598`10."}]}], ",", 
+   RowBox[{"T24", "\[Rule]", 
+    RowBox[{"-", "30062.1678369562744137511`10."}]}], ",", 
+   RowBox[{"T14", "\[Rule]", 
+    RowBox[{"-", "30062.1678369562744137511`10."}]}], ",", 
+   RowBox[{"S34", "\[Rule]", "48870.7641643526804629805`10."}], ",", 
+   RowBox[{
+    SqrtBox["S"], "\[Rule]", "300.`10."}], ",", 
+   RowBox[{
+    SqrtBox["S34"], "\[Rule]", "221.0673294821120339102`10."}], ",", 
+   RowBox[{
+    RowBox[{"Tan", "[", "\[Phi]5", "]"}], "\[Rule]", 
+    RowBox[{"-", "0.30503516992363796243170073189201937468`10."}]}], ",", 
+   RowBox[{"kT5", "\[Rule]", "68.5487263927454872252`10."}], ",", 
+   RowBox[{
+    SqrtBox["S35"], "\[Rule]", "172.8457819158090640716`10."}]}], 
+  "}"}]], "Print",
+ CellChangeTimes->{{3.775487902025655*^9, 3.775487921336112*^9}, 
+   3.775487952888777*^9, 3.775488370010009*^9, 3.775491061733279*^9, 
+   3.775491130954506*^9, 3.775492188325994*^9},
+ CellLabel->
+  "During evaluation of \
+In[152]:=",ExpressionUUID->"aaee04cf-3b7e-430f-bbef-6bfe3a0c933c"]
+}, Open  ]]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"ek4vec", "//.", "KinRules"}], "//.", "KinSub"}]], "Input",
+ CellLabel->
+  "In[155]:=",ExpressionUUID->"9e8c3495-09ad-4ff0-bd7d-92eff7ebc1d8"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox["\[ImaginaryI]", 
+     SqrtBox["2"]]}], ",", "0", ",", 
+   FractionBox["1", 
+    SqrtBox["2"]]}], "}"}]], "Output",
+ CellChangeTimes->{3.7754880076182203`*^9, 3.775492192737771*^9},
+ CellLabel->
+  "Out[155]=",ExpressionUUID->"d28a7c93-4ace-4140-baec-5db8c913a946"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"ek5vec", "//.", "KinRules"}], "//.", "KinSub"}]], "Input",
+ CellChangeTimes->{{3.7754879871840773`*^9, 3.775487995354398*^9}},
+ CellLabel->
+  "In[156]:=",ExpressionUUID->"bea8deb0-f558-4fba-b807-f39d09047f9c"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"0.`", "\[VeryThinSpace]", "+", 
+    RowBox[{"0.6763409639755821`", " ", "\[ImaginaryI]"}]}], ",", 
+   RowBox[{"0.`", "\[VeryThinSpace]", "+", 
+    RowBox[{"0.20630778087260876`", " ", "\[ImaginaryI]"}]}], ",", 
+   "0.7071067811865475`"}], "}"}]], "Output",
+ CellChangeTimes->{{3.775487988453107*^9, 3.7754879960422697`*^9}, 
+   3.775492194787578*^9},
+ CellLabel->
+  "Out[156]=",ExpressionUUID->"0f2458d3-6748-4204-8103-24c778a58b4c"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"t", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"tsub", "//.", "KinRules"}], "//.", "KinSub"}], "//", 
+    "FullSimplify"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{"tfinalkt40", "=", 
+  RowBox[{
+   RowBox[{"t", "/.", 
+    RowBox[{"{", 
+     RowBox[{
+      RowBox[{"Alfas", "\[Rule]", "1"}], ",", 
+      RowBox[{"MW", "\[Rule]", "80.376"}], ",", 
+      RowBox[{"SW", "\[Rule]", "0.480832611207"}], ",", 
+      RowBox[{"EL", "\[Rule]", 
+       RowBox[{"Sqrt", "[", 
+        RowBox[{"4", "*", "Pi"}], "]"}]}]}], "}"}]}], "//", 
+   "Simplify"}]}]}], "Input",
+ CellChangeTimes->{{3.7754879642539673`*^9, 3.775487969176927*^9}, {
+  3.775488329227951*^9, 3.775488333388538*^9}, {3.775491111548188*^9, 
+  3.775491114015253*^9}},
+ CellLabel->
+  "In[157]:=",ExpressionUUID->"4a273c30-f8fc-46d1-9ea4-2dc3bb5d38c9"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"4.006591462806078`", "\[VeryThinSpace]", "-", 
+     RowBox[{"0.2762833510999711`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c1"}], "+", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"4.006591462806078`", "\[VeryThinSpace]", "+", 
+     RowBox[{"0.2762833510999748`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c2"}], "-", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"8.013182925612155`", "\[VeryThinSpace]", "+", 
+     RowBox[{"3.666041344217209`*^-15", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c3"}]}]], "Output",
+ CellChangeTimes->{
+  3.775487971440014*^9, 3.775488335545794*^9, 3.775488376384015*^9, 
+   3.775491068819869*^9, {3.775491117992406*^9, 3.775491138403043*^9}, 
+   3.7754921984201593`*^9},
+ CellLabel->
+  "Out[158]=",ExpressionUUID->"f9a5dd89-b566-4f2b-bac6-dc1b86c8af04"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["tfinalkt20"], "Input",
+ CellChangeTimes->{{3.775488255187787*^9, 3.775488257107789*^9}},
+ CellLabel->
+  "In[173]:=",ExpressionUUID->"64119c6d-52f2-400d-81ef-73a3ba94f23d"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"3.8563551197203405`", "\[VeryThinSpace]", "-", 
+     RowBox[{"0.10789304042050796`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c1"}], "+", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"3.856355119720342`", "\[VeryThinSpace]", "+", 
+     RowBox[{"0.10789304042050414`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c2"}], "-", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"7.712710239440681`", "\[VeryThinSpace]", "-", 
+     RowBox[{"3.788242722357783`*^-15", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c3"}]}]], "Output",
+ CellChangeTimes->{3.7754882575757093`*^9, 3.775488383167577*^9, 
+  3.775491071580632*^9, 3.7754911411741056`*^9, 3.775492201913412*^9, 
+  3.775492237519631*^9},
+ CellLabel->
+  "Out[173]=",ExpressionUUID->"756fccae-313a-4aa3-b142-b34d21036023"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["tfinalkt40"], "Input",
+ CellChangeTimes->{{3.7754882587069683`*^9, 3.775488260429796*^9}},
+ CellLabel->
+  "In[160]:=",ExpressionUUID->"a16290ff-6778-41a3-b359-246f67aeefaa"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"4.006591462806078`", "\[VeryThinSpace]", "-", 
+     RowBox[{"0.2762833510999711`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c1"}], "+", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"4.006591462806078`", "\[VeryThinSpace]", "+", 
+     RowBox[{"0.2762833510999748`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c2"}], "-", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"8.013182925612155`", "\[VeryThinSpace]", "+", 
+     RowBox[{"3.666041344217209`*^-15", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c3"}]}]], "Output",
+ CellChangeTimes->{3.775488260734057*^9, 3.7754883851512213`*^9, 
+  3.775491073264893*^9, 3.775491143024358*^9, 3.775492204064665*^9},
+ CellLabel->
+  "Out[160]=",ExpressionUUID->"29952b1b-a847-4460-9afd-dae006ceafb7"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"c1ration", "=", 
+  RowBox[{
+   RowBox[{"tfinalkt20", "[", 
+    RowBox[{"[", "1", "]"}], "]"}], "/", 
+   RowBox[{"tfinalkt40", "[", 
+    RowBox[{"[", "1", "]"}], "]"}]}]}]], "Input",
+ CellChangeTimes->{{3.775227370037896*^9, 3.7752273724170027`*^9}, {
+  3.775488078262741*^9, 3.775488122354746*^9}},
+ CellLabel->
+  "In[174]:=",ExpressionUUID->"9729c16f-542c-4583-8d8f-dcb1f9899ee7"],
+
+Cell[BoxData[
+ RowBox[{"0.9597957243875892`", "\[VeryThinSpace]", "+", 
+  RowBox[{"0.03925594614394856`", " ", "\[ImaginaryI]"}]}]], "Output",
+ CellChangeTimes->{{3.775488082922187*^9, 3.775488122649926*^9}, 
+   3.7754883879684258`*^9, 3.775491075532887*^9, 3.775491145212131*^9, 
+   3.775492206188027*^9, 3.775492241855863*^9},
+ CellLabel->
+  "Out[174]=",ExpressionUUID->"ef1bda56-f590-49ec-bc2a-44f732a3ba4b"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"c2ration", "=", 
+  RowBox[{
+   RowBox[{"tfinalkt20", "[", 
+    RowBox[{"[", "2", "]"}], "]"}], "/", 
+   RowBox[{"tfinalkt40", "[", 
+    RowBox[{"[", "2", "]"}], "]"}]}]}]], "Input",
+ CellChangeTimes->{{3.775488129638857*^9, 3.775488146231625*^9}},
+ CellLabel->
+  "In[175]:=",ExpressionUUID->"24ccfcaf-f4d5-4902-81e0-8d38403763c1"],
+
+Cell[BoxData[
+ RowBox[{"0.9597957243875894`", "\[VeryThinSpace]", "-", 
+  RowBox[{"0.03925594614395041`", " ", "\[ImaginaryI]"}]}]], "Output",
+ CellChangeTimes->{{3.775488140779368*^9, 3.775488146646366*^9}, 
+   3.775488389752941*^9, 3.775491077016924*^9, 3.7754921351473722`*^9, 
+   3.775492208269136*^9, 3.775492243355577*^9},
+ CellLabel->
+  "Out[175]=",ExpressionUUID->"1395b6cf-0254-469b-8225-3f3eaecd64b3"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"c3ration", "=", 
+  RowBox[{
+   RowBox[{"tfinalkt20", "[", 
+    RowBox[{"[", "3", "]"}], "]"}], "/", 
+   RowBox[{"tfinalkt40", "[", 
+    RowBox[{"[", "3", "]"}], "]"}]}]}]], "Input",
+ CellChangeTimes->{{3.775227303392332*^9, 3.775227304142188*^9}, {
+  3.77548812788452*^9, 3.7754881587453537`*^9}},
+ CellLabel->
+  "In[176]:=",ExpressionUUID->"1c4d588d-8302-4258-81e3-4cedb485f7da"],
+
+Cell[BoxData[
+ RowBox[{"0.9625027047353323`", "\[VeryThinSpace]", "-", 
+  RowBox[{"9.130975168995588`*^-16", " ", "\[ImaginaryI]"}]}]], "Output",
+ CellChangeTimes->{{3.7754881388945208`*^9, 3.7754881607714853`*^9}, 
+   3.7754883915538692`*^9, 3.7754910784168177`*^9, 3.775491146929659*^9, 
+   3.775492137484355*^9, 3.775492209984849*^9, 3.7754922449861603`*^9},
+ CellLabel->
+  "Out[176]=",ExpressionUUID->"287f41c7-e872-480d-b818-0bc23a2fa987"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
+  "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
+  "\[IndentingNewLine]", "\[IndentingNewLine]"}]], "Input",
+ CellChangeTimes->{{3.775487113187286*^9, 3.775487113690071*^9}, {
+  3.775489312687867*^9, 
+  3.775489313079639*^9}},ExpressionUUID->"c51d1221-86c4-4ebd-b3ad-\
+4106585b9017"],
+
+Cell[BoxData[
+ RowBox[{"(*", " ", 
+  RowBox[{
+   RowBox[{"TEST", " ", "gg"}], "\[Rule]", 
+   RowBox[{"Hgg", " ", 
+    RowBox[{"w", "/", " ", "2"}], " ", "diagrams", " ", 
+    RowBox[{"(", "triangles", ")"}]}]}], " ", "*)"}]], "Input",
+ CellChangeTimes->{{3.7754893173365507`*^9, 
+  3.775489333166304*^9}},ExpressionUUID->"9cd25044-4f41-49e4-80f5-\
+08d29278cb00"],
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"SetDirectory", "[", 
+   RowBox[{"NotebookDirectory", "[", "]"}], "]"}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"config", "=", "\"\<++++\>\""}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"triangle", " ", "=", " ", 
+   RowBox[{"Import", "[", "\"\<ggHgg_LR_triangle_2diags.m\>\"", "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"pairdef", "[", 
+   RowBox[{"1", ",", "1", ",", "1", ",", "1"}], "]"}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"tsub", " ", "=", " ", 
+   RowBox[{
+    RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"Export", "[", 
+   RowBox[{
+    RowBox[{"\"\<triangle_2diags\>\"", "<>", "config", "<>", "\"\<.m\>\""}], 
+    ",", "tsub"}], "]"}], ";"}]}], "Input",
+ CellChangeTimes->{{3.77548933699573*^9, 3.7754893372214212`*^9}, {
+  3.7754894233857393`*^9, 3.77548942830713*^9}},
+ CellLabel->"In[29]:=",ExpressionUUID->"d5a9b7bd-37b9-4af8-bb12-857996b7a8bc"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"output", "=", 
+   RowBox[{
+    RowBox[{"N", "[", 
+     RowBox[{
+      RowBox[{"OutputPS", "[", 
+       RowBox[{"300.", ",", "20.", ",", "0", ",", 
+        RowBox[{"Pi", "/", "3"}], ",", "0", ",", 
+        RowBox[{"3", "*", 
+         RowBox[{"Pi", "/", "2"}]}], ",", "125."}], "]"}], ",", "10"}], "]"}],
+     "[", 
+    RowBox[{"[", "2", "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"KinRules", "=", 
+   RowBox[{"f", "[", 
+    RowBox[{"variables", ",", "output"}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"KinSub", "=", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{"S", "\[Rule]", 
+      RowBox[{"300.", "^", "2"}]}], ",", 
+     RowBox[{"kT3", "\[Rule]", "20."}], ",", 
+     RowBox[{"\[Eta]3", "\[Rule]", "0"}], ",", 
+     RowBox[{"\[Phi]3", "\[Rule]", 
+      RowBox[{"Pi", "/", "3"}]}], ",", 
+     RowBox[{"\[Eta]4", "\[Rule]", "0"}], ",", 
+     RowBox[{"\[Phi]4", "\[Rule]", 
+      RowBox[{"3", "*", 
+       RowBox[{"Pi", "/", "2"}]}]}], ",", 
+     RowBox[{"MH", "\[Rule]", "125."}], ",", 
+     RowBox[{"MT", "\[Rule]", "173."}]}], "}"}]}], ";"}]}], "Input",
+ CellLabel->"In[48]:=",ExpressionUUID->"9331fb0d-1fec-43e2-9850-030fbd7bdf66"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"kT3_max = \"\>", "\[InvisibleSpace]", 
+   RowBox[{"{", 
+    RowBox[{"kT3", "\[Rule]", "123.95833333333334`"}], "}"}], 
+   "\[InvisibleSpace]", "\<\"\\n\"\>"}],
+  SequenceForm["kT3_max = ", {$CellContext`kT3 -> 123.95833333333334`}, "\n"],
+  
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775489883437943*^9, 3.77548992568414*^9},
+ CellLabel->
+  "During evaluation of \
+In[48]:=",ExpressionUUID->"37427144-5f1a-4b3d-944b-84388f7e1424"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Four Momenta : \\n\"\>", "\[InvisibleSpace]", 
+   TagBox[
+    RowBox[{"(", "\[NoBreak]", 
+     TagBox[GridBox[{
+        {
+         RowBox[{"p1", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"150.`", ",", "0.`", ",", "0.`", ",", "150.`"}], "}"}]}]},
+        {
+         RowBox[{"p2", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"150.`", ",", "0.`", ",", "0.`", ",", 
+            RowBox[{"-", "150.`"}]}], "}"}]}]},
+        {
+         RowBox[{"p3", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{
+           "126.58988901172162`", ",", "10.`", ",", "17.320508075688775`", 
+            ",", "0.`"}], "}"}]}]},
+        {
+         RowBox[{"p4", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"95.04498070119013`", ",", "0.`", ",", 
+            RowBox[{"-", "95.04498070119013`"}], ",", "0.`"}], "}"}]}]},
+        {
+         RowBox[{"p5", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"78.3651302870882`", ",", 
+            RowBox[{"-", "10.`"}], ",", "77.72447262550135`", ",", "0.`"}], 
+           "}"}]}]}
+       },
+       GridBoxAlignment->{
+        "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, 
+         "Rows" -> {{Baseline}}, "RowsIndexed" -> {}},
+       GridBoxSpacings->{"Columns" -> {
+           Offset[0.27999999999999997`], {
+            Offset[0.5599999999999999]}, 
+           Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+           Offset[0.2], {
+            Offset[0.4]}, 
+           Offset[0.2]}, "RowsIndexed" -> {}}],
+      Column], "\[NoBreak]", ")"}],
+    Function[BoxForm`e$, 
+     MatrixForm[BoxForm`e$]]], "\[InvisibleSpace]", "\<\"\\n\"\>"}],
+  SequenceForm["Four Momenta : \n", 
+   MatrixForm[{$CellContext`p1 -> {150., 0., 0., 150.}, $CellContext`p2 -> {
+      150., 0., 0., -150.}, $CellContext`p3 -> {126.58988901172162`, 10., 
+      17.320508075688775`, 0.}, $CellContext`p4 -> {95.04498070119013, 
+      0., -95.04498070119013, 0.}, $CellContext`p5 -> {78.3651302870882, -10.,
+       77.72447262550135, 0.}}], "\n"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775489883437943*^9, 3.7754899256971903`*^9},
+ CellLabel->
+  "During evaluation of \
+In[48]:=",ExpressionUUID->"4113965a-4b28-4369-abec-86637ae21960"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Check 4 momentum conservation: p3+p4+p5 -p1 -p2 =0 :  \"\>", 
+   "\[InvisibleSpace]", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{
+     "-", "3.887221955939928966560590155849714544348308363744058289341178206`\
+43.811488088675176*^-14"}], ",", "0``58.69897000433602", ",", 
+     "0``57.72104081749894", ",", "0``57.522878745280345"}], "}"}]}],
+  SequenceForm[
+  "Check 4 momentum conservation: p3+p4+p5 -p1 -p2 =0 :  ", \
+{-3.887221955939928966560590155849714544348308363744058289341178206`43.\
+811488088675176*^-14, 0``58.69897000433602, 0``57.72104081749894, 
+    0``57.522878745280345}],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775489883437943*^9, 3.775489925710073*^9},
+ CellLabel->
+  "During evaluation of \
+In[48]:=",ExpressionUUID->"6948dff3-27cb-48e8-897b-75fa8905a448"],
+
+Cell[BoxData["\<\"MOMENTUM IS CONSERVED, ALL IS WELL!\"\>"], "Print",
+ CellChangeTimes->{3.775489883437943*^9, 3.77548992571929*^9},
+ CellLabel->
+  "During evaluation of \
+In[48]:=",ExpressionUUID->"bc9fdf3f-b30b-492d-8e1d-5cf2f61575b8"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{
+   RowBox[{"kkT3", "\[Rule]", "20.`"}], ",", 
+   RowBox[{"kkT4", "\[Rule]", "95.0449807011901270926`10."}], ",", 
+   RowBox[{"S", "\[Rule]", "90000.`10."}], ",", 
+   RowBox[{"T", "\[Rule]", 
+    RowBox[{"-", "22351.9667035164881926659`10."}]}], ",", 
+   RowBox[{"U", "\[Rule]", 
+    RowBox[{"-", "22351.9667035164881926659`10."}]}], ",", 
+   RowBox[{"T24", "\[Rule]", 
+    RowBox[{"-", "28513.4942103570381277677`10."}]}], ",", 
+   RowBox[{"T14", "\[Rule]", 
+    RowBox[{"-", "28513.4942103570381277677`10."}]}], ",", 
+   RowBox[{"S34", "\[Rule]", "42980.9218277470587333204`10."}], ",", 
+   RowBox[{
+    SqrtBox["S"], "\[Rule]", "300.`10."}], ",", 
+   RowBox[{
+    SqrtBox["S34"], "\[Rule]", "207.3184068715246970733`10."}], ",", 
+   RowBox[{
+    RowBox[{"Tan", "[", "\[Phi]5", "]"}], "\[Rule]", 
+    RowBox[{"-", "0.12865960568407904294629727505559632487`10."}]}], ",", 
+   RowBox[{"kT5", "\[Rule]", "78.3651302870882067263`10."}], ",", 
+   RowBox[{
+    SqrtBox["S35"], "\[Rule]", "181.5847228686540904465`10."}]}], 
+  "}"}]], "Print",
+ CellChangeTimes->{3.775489883437943*^9, 3.7754899257285137`*^9},
+ CellLabel->
+  "During evaluation of \
+In[48]:=",ExpressionUUID->"ab68cde6-c968-40c5-b689-0e2e516ef784"]
+}, Open  ]]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"t", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"tsub", "//.", "KinRules"}], "//.", "KinSub"}], "//", 
+    "FullSimplify"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{"tfinalkt20", "=", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"t", "[", 
+     RowBox[{"[", "1", "]"}], "]"}], "/.", 
+    RowBox[{"{", 
+     RowBox[{
+      RowBox[{"Alfas", "\[Rule]", "1"}], ",", 
+      RowBox[{"MW", "\[Rule]", "80.376"}], ",", 
+      RowBox[{"SW", "\[Rule]", "0.480832611207"}], ",", 
+      RowBox[{"EL", "\[Rule]", 
+       RowBox[{"Sqrt", "[", 
+        RowBox[{"4", "*", "Pi"}], "]"}]}]}], "}"}]}], "//", 
+   "Simplify"}]}]}], "Input",
+ CellChangeTimes->{{3.775489623778441*^9, 3.775489636602193*^9}},
+ CellLabel->"In[51]:=",ExpressionUUID->"bdc583a4-5ce8-4ab5-954b-e4753cc14645"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{
+     RowBox[{"-", "0.13075798053837576`"}], "-", 
+     RowBox[{"0.03281500225499752`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c1"}], "-", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"0.1702977566394835`", "\[VeryThinSpace]", "-", 
+     RowBox[{"0.03197062023844408`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c2"}], "+", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"0.3010557371778594`", "\[VeryThinSpace]", "+", 
+     RowBox[{"0.0008443820165534565`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c3"}]}]], "Output",
+ CellChangeTimes->{{3.775489632151163*^9, 3.775489638083955*^9}, 
+   3.775489929455364*^9},
+ CellLabel->"Out[52]=",ExpressionUUID->"ba033732-01ca-402b-a434-8b7ef10663bc"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"output", "=", 
+   RowBox[{
+    RowBox[{"N", "[", 
+     RowBox[{
+      RowBox[{"OutputPS", "[", 
+       RowBox[{"300.", ",", "40.", ",", "0", ",", 
+        RowBox[{"Pi", "/", "3"}], ",", "0", ",", 
+        RowBox[{"3", "*", 
+         RowBox[{"Pi", "/", "2"}]}], ",", "125."}], "]"}], ",", "10"}], "]"}],
+     "[", 
+    RowBox[{"[", "2", "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"KinRules", "=", 
+   RowBox[{"f", "[", 
+    RowBox[{"variables", ",", "output"}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"KinSub", "=", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{"S", "\[Rule]", 
+      RowBox[{"300.", "^", "2"}]}], ",", 
+     RowBox[{"kT3", "\[Rule]", "40."}], ",", 
+     RowBox[{"\[Eta]3", "\[Rule]", "0"}], ",", 
+     RowBox[{"\[Phi]3", "\[Rule]", 
+      RowBox[{"Pi", "/", "3"}]}], ",", 
+     RowBox[{"\[Eta]4", "\[Rule]", "0"}], ",", 
+     RowBox[{"\[Phi]4", "\[Rule]", 
+      RowBox[{"3", "*", 
+       RowBox[{"Pi", "/", "2"}]}]}], ",", 
+     RowBox[{"MH", "\[Rule]", "125."}], ",", 
+     RowBox[{"MT", "\[Rule]", "173."}]}], "}"}]}], ";"}]}], "Input",
+ CellChangeTimes->{{3.77548994483876*^9, 3.775489946153615*^9}},
+ CellLabel->"In[53]:=",ExpressionUUID->"57bf9ad6-d97b-4e31-af95-23eb640aeccb"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"kT3_max = \"\>", "\[InvisibleSpace]", 
+   RowBox[{"{", 
+    RowBox[{"kT3", "\[Rule]", "123.95833333333334`"}], "}"}], 
+   "\[InvisibleSpace]", "\<\"\\n\"\>"}],
+  SequenceForm["kT3_max = ", {$CellContext`kT3 -> 123.95833333333334`}, "\n"],
+  
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7754899466897182`*^9},
+ CellLabel->
+  "During evaluation of \
+In[53]:=",ExpressionUUID->"10539cf1-126a-4c72-b496-8ac1181292c2"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Four Momenta : \\n\"\>", "\[InvisibleSpace]", 
+   TagBox[
+    RowBox[{"(", "\[NoBreak]", 
+     TagBox[GridBox[{
+        {
+         RowBox[{"p1", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"150.`", ",", "0.`", ",", "0.`", ",", "150.`"}], "}"}]}]},
+        {
+         RowBox[{"p2", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"150.`", ",", "0.`", ",", "0.`", ",", 
+            RowBox[{"-", "150.`"}]}], "}"}]}]},
+        {
+         RowBox[{"p3", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{
+           "131.24404748406687`", ",", "20.`", ",", "34.64101615137755`", ",",
+             "0.`"}], "}"}]}]},
+        {
+         RowBox[{"p4", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"100.20722612318758`", ",", "0.`", ",", 
+            RowBox[{"-", "100.20722612318758`"}], ",", "0.`"}], "}"}]}]},
+        {
+         RowBox[{"p5", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"68.5487263927455`", ",", 
+            RowBox[{"-", "20.`"}], ",", "65.56620997181004`", ",", "0.`"}], 
+           "}"}]}]}
+       },
+       GridBoxAlignment->{
+        "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, 
+         "Rows" -> {{Baseline}}, "RowsIndexed" -> {}},
+       GridBoxSpacings->{"Columns" -> {
+           Offset[0.27999999999999997`], {
+            Offset[0.5599999999999999]}, 
+           Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+           Offset[0.2], {
+            Offset[0.4]}, 
+           Offset[0.2]}, "RowsIndexed" -> {}}],
+      Column], "\[NoBreak]", ")"}],
+    Function[BoxForm`e$, 
+     MatrixForm[BoxForm`e$]]], "\[InvisibleSpace]", "\<\"\\n\"\>"}],
+  SequenceForm["Four Momenta : \n", 
+   MatrixForm[{$CellContext`p1 -> {150., 0., 0., 150.}, $CellContext`p2 -> {
+      150., 0., 0., -150.}, $CellContext`p3 -> {131.24404748406687`, 20., 
+      34.64101615137755, 0.}, $CellContext`p4 -> {100.20722612318758`, 
+      0., -100.20722612318758`, 0.}, $CellContext`p5 -> {
+      68.5487263927455, -20., 65.56620997181004, 0.}}], "\n"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775489946702546*^9},
+ CellLabel->
+  "During evaluation of \
+In[53]:=",ExpressionUUID->"822935a9-5e2c-4540-b675-dca51a34b286"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Check 4 momentum conservation: p3+p4+p5 -p1 -p2 =0 :  \"\>", 
+   "\[InvisibleSpace]", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{
+     "-", "5.876373720011891608134562217738742061745029729160199708223878675`\
+43.99095815745918*^-14"}], ",", "0``58.39794000867204", ",", 
+     "0``57.69807096391986", ",", "0``57.522878745280345"}], "}"}]}],
+  SequenceForm[
+  "Check 4 momentum conservation: p3+p4+p5 -p1 -p2 =0 :  ", \
+{-5.876373720011891608134562217738742061745029729160199708223878675`43.\
+99095815745918*^-14, 0``58.39794000867204, 0``57.69807096391986, 
+    0``57.522878745280345}],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775489946714909*^9},
+ CellLabel->
+  "During evaluation of \
+In[53]:=",ExpressionUUID->"82640b1c-5511-4c11-aba6-7d7985183a89"],
+
+Cell[BoxData["\<\"MOMENTUM IS CONSERVED, ALL IS WELL!\"\>"], "Print",
+ CellChangeTimes->{3.7754899467239037`*^9},
+ CellLabel->
+  "During evaluation of \
+In[53]:=",ExpressionUUID->"faa1baf7-d09d-4147-bb38-4bd4cd6ef2d8"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{
+   RowBox[{"kkT3", "\[Rule]", "40.`"}], ",", 
+   RowBox[{"kkT4", "\[Rule]", "100.2072261231875813792`10."}], ",", 
+   RowBox[{"S", "\[Rule]", "90000.`10."}], ",", 
+   RowBox[{"T", "\[Rule]", 
+    RowBox[{"-", "23748.2142452200617895598`10."}]}], ",", 
+   RowBox[{"U", "\[Rule]", 
+    RowBox[{"-", "23748.2142452200617895598`10."}]}], ",", 
+   RowBox[{"T24", "\[Rule]", 
+    RowBox[{"-", "30062.1678369562744137511`10."}]}], ",", 
+   RowBox[{"T14", "\[Rule]", 
+    RowBox[{"-", "30062.1678369562744137511`10."}]}], ",", 
+   RowBox[{"S34", "\[Rule]", "48870.7641643526804629805`10."}], ",", 
+   RowBox[{
+    SqrtBox["S"], "\[Rule]", "300.`10."}], ",", 
+   RowBox[{
+    SqrtBox["S34"], "\[Rule]", "221.0673294821120339102`10."}], ",", 
+   RowBox[{
+    RowBox[{"Tan", "[", "\[Phi]5", "]"}], "\[Rule]", 
+    RowBox[{"-", "0.30503516992363796243170073189201937468`10."}]}], ",", 
+   RowBox[{"kT5", "\[Rule]", "68.5487263927454872252`10."}], ",", 
+   RowBox[{
+    SqrtBox["S35"], "\[Rule]", "172.8457819158090640716`10."}]}], 
+  "}"}]], "Print",
+ CellChangeTimes->{3.775489946733102*^9},
+ CellLabel->
+  "During evaluation of \
+In[53]:=",ExpressionUUID->"56ae6788-1369-4e9a-b9a1-a2adf28ceea9"]
+}, Open  ]]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"t", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"tsub", "//.", "KinRules"}], "//.", "KinSub"}], "//", 
+    "FullSimplify"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{"tfinalkt40", "=", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"t", "[", 
+     RowBox[{"[", "1", "]"}], "]"}], "/.", 
+    RowBox[{"{", 
+     RowBox[{
+      RowBox[{"Alfas", "\[Rule]", "1"}], ",", 
+      RowBox[{"MW", "\[Rule]", "80.376"}], ",", 
+      RowBox[{"SW", "\[Rule]", "0.480832611207"}], ",", 
+      RowBox[{"EL", "\[Rule]", 
+       RowBox[{"Sqrt", "[", 
+        RowBox[{"4", "*", "Pi"}], "]"}]}]}], "}"}]}], "//", 
+   "Simplify"}]}]}], "Input",
+ CellChangeTimes->{{3.77548995836652*^9, 3.775489958482275*^9}},
+ CellLabel->"In[56]:=",ExpressionUUID->"fbd4fe0e-70d6-47b4-91d4-1664cc7ae429"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{
+     RowBox[{"-", "0.11113591935481938`"}], "-", 
+     RowBox[{"0.07191873943346128`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c1"}], "-", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"0.18025324082557106`", "\[VeryThinSpace]", "-", 
+     RowBox[{"0.06848301366250138`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c2"}], "+", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"0.29138916018039046`", "\[VeryThinSpace]", "+", 
+     RowBox[{"0.0034357257709598664`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c3"}]}]], "Output",
+ CellChangeTimes->{3.7754899593610287`*^9},
+ CellLabel->"Out[57]=",ExpressionUUID->"c2ef6ce0-85e1-4e60-a32a-1bb1af029bea"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", "\[IndentingNewLine]", 
+  "\[IndentingNewLine]"}]], "Input",
+ CellChangeTimes->{{3.7754900281856422`*^9, 
+  3.775490028478941*^9}},ExpressionUUID->"fdb1e515-144b-467e-85db-\
+8127246e82de"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["tfinalkt20"], "Input",
+ CellChangeTimes->{{3.77548997415387*^9, 3.775490023304942*^9}},
+ CellLabel->"In[58]:=",ExpressionUUID->"4bc31ae3-5bab-415c-b562-5422473e4a79"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{
+     RowBox[{"-", "0.13075798053837576`"}], "-", 
+     RowBox[{"0.03281500225499752`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c1"}], "-", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"0.1702977566394835`", "\[VeryThinSpace]", "-", 
+     RowBox[{"0.03197062023844408`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c2"}], "+", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"0.3010557371778594`", "\[VeryThinSpace]", "+", 
+     RowBox[{"0.0008443820165534565`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c3"}]}]], "Output",
+ CellChangeTimes->{3.7754900296992064`*^9},
+ CellLabel->"Out[58]=",ExpressionUUID->"20d0a29e-c20e-455b-82f9-a6a0181524eb"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["tfinalkt40"], "Input",
+ CellChangeTimes->{{3.775490014921214*^9, 3.775490025227936*^9}},
+ CellLabel->"In[59]:=",ExpressionUUID->"0fee63fd-0f7d-4f37-be22-0ee9f0b2dd29"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{
+     RowBox[{"-", "0.11113591935481938`"}], "-", 
+     RowBox[{"0.07191873943346128`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c1"}], "-", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"0.18025324082557106`", "\[VeryThinSpace]", "-", 
+     RowBox[{"0.06848301366250138`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c2"}], "+", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"0.29138916018039046`", "\[VeryThinSpace]", "+", 
+     RowBox[{"0.0034357257709598664`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c3"}]}]], "Output",
+ CellChangeTimes->{3.775490031801964*^9},
+ CellLabel->"Out[59]=",ExpressionUUID->"4de8bf7b-7b18-4fbe-a1b4-434a2cfdc5ca"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"tfinalkt20", "[", 
+  RowBox[{"[", "1", "]"}], "]"}]], "Input",
+ CellChangeTimes->{{3.77549030676084*^9, 3.775490309504115*^9}},
+ CellLabel->"In[63]:=",ExpressionUUID->"d100b567-08ac-45a3-ab1c-7102d980edd8"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"tfinalkt40", "[", 
+   RowBox[{"[", "1", "]"}], "]"}], "/", 
+  RowBox[{"tfinalkt20", "[", 
+   RowBox[{"[", "1", "]"}], "]"}]}]], "Input",
+ CellChangeTimes->{{3.7754903218560047`*^9, 3.775490337525001*^9}},
+ CellLabel->"In[65]:=",ExpressionUUID->"2004d05a-8fd9-4279-8da7-5e8db6d0b1cb"],
+
+Cell[BoxData[
+ RowBox[{"0.9294311416420606`", "\[VeryThinSpace]", "+", 
+  RowBox[{"0.3167642560253221`", " ", "\[ImaginaryI]"}]}]], "Output",
+ CellChangeTimes->{{3.775490309840643*^9, 3.775490337840879*^9}},
+ CellLabel->"Out[65]=",ExpressionUUID->"038a004b-d5d8-41b1-aa13-9f3bccce7a2d"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"c1ration", "=", 
+  RowBox[{
+   RowBox[{"tfinalkt20", "[", 
+    RowBox[{"[", "1", "]"}], "]"}], "/", 
+   RowBox[{"tfinalkt40", "[", 
+    RowBox[{"[", "1", "]"}], "]"}]}]}]], "Input",
+ CellChangeTimes->{3.775490006767206*^9},
+ CellLabel->"In[60]:=",ExpressionUUID->"3305c7cc-fb1d-4b01-8589-30f8bfb10617"],
+
+Cell[BoxData[
+ RowBox[{"0.9639583553315383`", "\[VeryThinSpace]", "-", 
+  RowBox[{"0.32853165510090265`", " ", "\[ImaginaryI]"}]}]], "Output",
+ CellChangeTimes->{3.775490033995981*^9},
+ CellLabel->"Out[60]=",ExpressionUUID->"c7d59eaa-a5dc-4b43-8b0d-0328f5c09e45"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"c2ration", "=", 
+  RowBox[{
+   RowBox[{"tfinalkt20", "[", 
+    RowBox[{"[", "2", "]"}], "]"}], "/", 
+   RowBox[{"tfinalkt40", "[", 
+    RowBox[{"[", "2", "]"}], "]"}]}]}]], "Input",
+ CellLabel->"In[61]:=",ExpressionUUID->"61457d60-4f76-43a6-bd82-ebd9fb01124b"],
+
+Cell[BoxData[
+ RowBox[{"0.884484838002122`", "\[VeryThinSpace]", "+", 
+  RowBox[{"0.15867435656487283`", " ", "\[ImaginaryI]"}]}]], "Output",
+ CellChangeTimes->{3.775490035697501*^9},
+ CellLabel->"Out[61]=",ExpressionUUID->"685f977c-0479-4d99-befc-e84b48b144ff"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"c3ration", "=", 
+  RowBox[{
+   RowBox[{"tfinalkt20", "[", 
+    RowBox[{"[", "3", "]"}], "]"}], "/", 
+   RowBox[{"tfinalkt40", "[", 
+    RowBox[{"[", "3", "]"}], "]"}]}]}]], "Input",
+ CellChangeTimes->{3.775490000045472*^9},
+ CellLabel->"In[62]:=",ExpressionUUID->"918adda1-1e50-4075-960c-15c32f887de8"],
+
+Cell[BoxData[
+ RowBox[{"1.033064659623701`", "\[VeryThinSpace]", "-", 
+  RowBox[{"0.009282928904798739`", " ", "\[ImaginaryI]"}]}]], "Output",
+ CellChangeTimes->{3.775490037477436*^9},
+ CellLabel->"Out[62]=",ExpressionUUID->"5652226d-c974-4d4d-b620-6fcddd790365"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
+  
+  RowBox[{"(*", " ", 
+   RowBox[{"TEST", " ", "ggH"}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{"ggHamp", "=", 
+   RowBox[{"Import", "[", "\"\<ggH_LR.m\>\"", "]"}]}]}]], "Input",
+ CellChangeTimes->{{3.775232114838345*^9, 3.775232130945882*^9}, {
+  3.775233525581341*^9, 3.775233532775445*^9}, {3.7764378474564667`*^9, 
+  3.776437847534371*^9}},ExpressionUUID->"ced44b95-e225-49ad-9c83-\
+b351a616e504"],
+
+Cell[BoxData[
+ RowBox[{
+  FractionBox["1", 
+   RowBox[{"4", " ", 
+    SuperscriptBox["MH", "4"], " ", "MW", " ", "\[Pi]", " ", "SW"}]], 
+  RowBox[{"Alfas", " ", "EL", " ", 
+   SuperscriptBox["MT", "2"], " ", 
+   RowBox[{"(", 
+    RowBox[{
+     RowBox[{
+      RowBox[{"-", "4"}], " ", 
+      SuperscriptBox["MH", "2"]}], "+", 
+     RowBox[{
+      RowBox[{"(", 
+       RowBox[{
+        SuperscriptBox["MH", "2"], "-", 
+        RowBox[{"4", " ", 
+         SuperscriptBox["MT", "2"]}]}], ")"}], " ", 
+      SuperscriptBox[
+       RowBox[{"Log", "[", 
+        FractionBox[
+         RowBox[{
+          RowBox[{"-", 
+           SuperscriptBox["MH", "2"]}], "+", 
+          RowBox[{"2", " ", 
+           SuperscriptBox["MT", "2"]}], "+", 
+          SqrtBox[
+           RowBox[{
+            SuperscriptBox["MH", "4"], "-", 
+            RowBox[{"4", " ", 
+             SuperscriptBox["MH", "2"], " ", 
+             SuperscriptBox["MT", "2"]}]}]]}], 
+         RowBox[{"2", " ", 
+          SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+   RowBox[{"Mat", "[", 
+    RowBox[{"SUNT", "[", 
+     RowBox[{"Glu1", ",", "Glu2", ",", "0", ",", "0"}], "]"}], "]"}], " ", 
+   RowBox[{"(", 
+    RowBox[{
+     RowBox[{
+      SuperscriptBox["MH", "2"], " ", 
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"e", "[", "1", "]"}], ",", 
+        RowBox[{"e", "[", "2", "]"}]}], "]"}]}], "-", 
+     RowBox[{"2", " ", 
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"e", "[", "1", "]"}], ",", 
+        RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"e", "[", "2", "]"}], ",", 
+        RowBox[{"k", "[", "1", "]"}]}], "]"}]}]}], ")"}]}]}]], "Output",
+ CellChangeTimes->{3.77523213154983*^9, 3.7752323259958563`*^9, 
+  3.775233437871008*^9, 3.7752334748587103`*^9},
+ CellLabel->"Out[31]=",ExpressionUUID->"52898082-c750-4891-86b9-e3e06ee9c662"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"ggHamp", "//.", "SubFourVecs"}], "//.", 
+  RowBox[{"{", 
+   RowBox[{
+    RowBox[{"MH", "\[Rule]", "125."}], ",", 
+    RowBox[{"MT", "\[Rule]", "173."}]}], "}"}]}]], "Input",
+ CellChangeTimes->{{3.7752323062483807`*^9, 3.7752324031759167`*^9}, {
+  3.775233409773683*^9, 3.7752334292652493`*^9}},
+ CellLabel->"In[32]:=",ExpressionUUID->"71e5daec-bf03-47b2-b536-dbd0414e542c"],
+
+Cell[BoxData[
+ RowBox[{"-", 
+  FractionBox[
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{"855.6201758289534`", "\[VeryThinSpace]", "+", 
+      RowBox[{"0.`", " ", "\[ImaginaryI]"}]}], ")"}], " ", "Alfas", " ", "EL",
+     " ", 
+    RowBox[{"Mat", "[", 
+     RowBox[{"SUNT", "[", 
+      RowBox[{"Glu1", ",", "Glu2", ",", "0", ",", "0"}], "]"}], "]"}]}], 
+   RowBox[{"MW", " ", "SW"}]]}]], "Output",
+ CellChangeTimes->{{3.775232317831189*^9, 3.7752324038467503`*^9}, 
+   3.7752326486237288`*^9, 3.775233432350246*^9, 3.7752334775044003`*^9},
+ CellLabel->"Out[32]=",ExpressionUUID->"5b505cff-d5bb-42a3-853e-4163fc1a29d9"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["ek1vec"], "Input",
+ CellChangeTimes->{{3.775232610001954*^9, 3.775232656220274*^9}},
+ CellLabel->"In[65]:=",ExpressionUUID->"c25bd516-0c47-432b-90fe-27e455bbc0dd"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{
+   RowBox[{"0.`", "\[VeryThinSpace]", "+", 
+    RowBox[{"0.`", " ", "\[ImaginaryI]"}]}], ",", 
+   RowBox[{
+    RowBox[{"-", "0.7071067811865475`"}], "+", 
+    RowBox[{"0.`", " ", "\[ImaginaryI]"}]}], ",", 
+   RowBox[{"0.`", "\[VeryThinSpace]", "-", 
+    RowBox[{"0.7071067811865475`", " ", "\[ImaginaryI]"}]}], ",", 
+   RowBox[{"0.`", "\[VeryThinSpace]", "+", 
+    RowBox[{"0.`", " ", "\[ImaginaryI]"}]}]}], "}"}]], "Output",
+ CellChangeTimes->{{3.7752326138836*^9, 3.775232656625577*^9}},
+ CellLabel->"Out[65]=",ExpressionUUID->"1942b838-851d-4a1f-8d51-8982c4e0bb98"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["ek2vec"], "Input",
+ CellChangeTimes->{{3.775232658263091*^9, 3.775232660772018*^9}},
+ CellLabel->"In[66]:=",ExpressionUUID->"700f0e27-c33f-4e8e-ba2e-3543e6248bf5"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{
+   RowBox[{"0.`", "\[VeryThinSpace]", "+", 
+    RowBox[{"0.`", " ", "\[ImaginaryI]"}]}], ",", 
+   RowBox[{"0.7071067811865475`", "\[VeryThinSpace]", "+", 
+    RowBox[{"0.`", " ", "\[ImaginaryI]"}]}], ",", 
+   RowBox[{"0.`", "\[VeryThinSpace]", "-", 
+    RowBox[{"0.7071067811865475`", " ", "\[ImaginaryI]"}]}], ",", 
+   RowBox[{"0.`", "\[VeryThinSpace]", "+", 
+    RowBox[{"0.`", " ", "\[ImaginaryI]"}]}]}], "}"}]], "Output",
+ CellChangeTimes->{3.7752326612216167`*^9},
+ CellLabel->"Out[66]=",ExpressionUUID->"dbebf7d3-afff-4491-89d6-99e2e2c958cf"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"MyPair", "[", 
+  RowBox[{"ek1vec", ",", "ek2vec"}], "]"}]], "Input",
+ CellChangeTimes->{{3.775232680692808*^9, 3.7752326921531153`*^9}, {
+  3.775232731241949*^9, 3.77523273309902*^9}},
+ CellLabel->"In[69]:=",ExpressionUUID->"63ad1626-8781-4e3f-9591-d8528ececcd8"],
+
+Cell[BoxData[
+ RowBox[{"0.9999999999999998`", "\[VeryThinSpace]", "+", 
+  RowBox[{"0.`", " ", "\[ImaginaryI]"}]}]], "Output",
+ CellChangeTimes->{3.775232692860549*^9, 3.7752327334569902`*^9},
+ CellLabel->"Out[69]=",ExpressionUUID->"022e836e-e6b2-4d1c-bfdd-4b758f49462e"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"MyPair", "[", 
+  RowBox[{"ek2vec", ",", "kvec1"}], "]"}]], "Input",
+ CellChangeTimes->{{3.775232802487273*^9, 3.775232811142901*^9}},
+ CellLabel->"In[70]:=",ExpressionUUID->"a371a893-d044-4e82-bd67-be5b40741382"],
+
+Cell[BoxData[
+ RowBox[{"0.`", "\[VeryThinSpace]", "+", 
+  RowBox[{"0.`", " ", "\[ImaginaryI]"}]}]], "Output",
+ CellChangeTimes->{3.775232811655692*^9},
+ CellLabel->"Out[70]=",ExpressionUUID->"6c231317-1e6f-4e59-b41f-bb17b4d83b99"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"MyPair", "[", 
+  RowBox[{"ek1vec", ",", "kvec2"}], "]"}]], "Input",
+ CellChangeTimes->{{3.775232814903119*^9, 3.7752328256517067`*^9}},
+ CellLabel->"In[71]:=",ExpressionUUID->"ef7d683b-4e10-4d26-9dd6-72279ff9244a"],
+
+Cell[BoxData[
+ RowBox[{"0.`", "\[VeryThinSpace]", "+", 
+  RowBox[{"0.`", " ", "\[ImaginaryI]"}]}]], "Output",
+ CellChangeTimes->{3.775232826151574*^9},
+ CellLabel->"Out[71]=",ExpressionUUID->"3b3eb906-3b2f-4ff9-819a-39a88193f844"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["kvec1"], "Input",
+ CellChangeTimes->{{3.7752328282964773`*^9, 3.775232831655014*^9}},
+ CellLabel->"In[72]:=",ExpressionUUID->"de45a5ed-a569-453b-824b-26f93985d288"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{
+   FractionBox[
+    SqrtBox["S"], "2"], ",", "0", ",", "0", ",", 
+   FractionBox[
+    SqrtBox["S"], "2"]}], "}"}]], "Output",
+ CellChangeTimes->{3.7752328321260977`*^9},
+ CellLabel->"Out[72]=",ExpressionUUID->"9c205819-8029-4260-ae8b-88d0e2b6ba6b"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["kvec2"], "Input",
+ CellChangeTimes->{{3.775232838801908*^9, 3.7752328401065617`*^9}},
+ CellLabel->"In[73]:=",ExpressionUUID->"3cac72c0-8845-4679-9a9d-8d4f40d62660"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{
+   FractionBox[
+    SqrtBox["S"], "2"], ",", "0", ",", "0", ",", 
+   RowBox[{"-", 
+    FractionBox[
+     SqrtBox["S"], "2"]}]}], "}"}]], "Output",
+ CellChangeTimes->{3.7752328406512136`*^9},
+ CellLabel->"Out[73]=",ExpressionUUID->"1df39c7d-0608-43f2-926b-eae7e2d5bb10"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
+  "\[IndentingNewLine]", "\[IndentingNewLine]"}]], "Input",
+ CellChangeTimes->{{3.775233870178287*^9, 
+  3.7752338707140627`*^9}},ExpressionUUID->"51cb99be-3353-4392-9fd3-\
+c37ee91d1816"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{
+   RowBox[{"KinRules", "[", 
+    RowBox[{"m1_", ",", "m2_", ",", "m3_", ",", "m4_"}], "]"}], ":=", " ", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{"k1", "\[Rule]", 
+      RowBox[{
+       RowBox[{"(", 
+        RowBox[{"1", "/", 
+         RowBox[{"(", 
+          RowBox[{"2", 
+           RowBox[{"Sqrt", "[", "S", "]"}]}], ")"}]}], ")"}], "*", 
+       RowBox[{"Sqrt", "[", 
+        RowBox[{"Kallen\[Lambda]", "[", 
+         RowBox[{"S", ",", 
+          RowBox[{"m1", "^", "2"}], ",", 
+          RowBox[{"m2", "^", "2"}]}], "]"}], "]"}]}]}], ",", 
+     RowBox[{"k2", "->", 
+      RowBox[{
+       RowBox[{"(", 
+        RowBox[{"1", "/", 
+         RowBox[{"(", 
+          RowBox[{"2", 
+           RowBox[{"Sqrt", "[", "S", "]"}]}], ")"}]}], ")"}], "*", 
+       RowBox[{"Sqrt", "[", 
+        RowBox[{"Kallen\[Lambda]", "[", 
+         RowBox[{"S", ",", 
+          RowBox[{"m1", "^", "2"}], ",", 
+          RowBox[{"m2", "^", "2"}]}], "]"}], "]"}]}]}], ",", " ", 
+     RowBox[{"k3", "->", 
+      RowBox[{
+       RowBox[{"(", 
+        RowBox[{"1", "/", 
+         RowBox[{"(", 
+          RowBox[{"2", 
+           RowBox[{"Sqrt", "[", "S", "]"}]}], ")"}]}], ")"}], "*", 
+       RowBox[{"Sqrt", "[", 
+        RowBox[{"Kallen\[Lambda]", "[", 
+         RowBox[{"S", ",", 
+          RowBox[{"m3", "^", "2"}], ",", 
+          RowBox[{"m4", "^", "2"}]}], "]"}], "]"}]}]}], ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{"k4", "->", 
+      RowBox[{
+       RowBox[{"(", 
+        RowBox[{"1", "/", 
+         RowBox[{"(", 
+          RowBox[{"2", 
+           RowBox[{"Sqrt", "[", "S", "]"}]}], ")"}]}], ")"}], "*", 
+       RowBox[{"Sqrt", "[", 
+        RowBox[{"Kallen\[Lambda]", "[", 
+         RowBox[{"S", ",", 
+          RowBox[{"m3", "^", "2"}], ",", 
+          RowBox[{"m4", "^", "2"}]}], "]"}], "]"}]}]}]}], "}"}]}], 
+  "\[IndentingNewLine]"}]], "Input",
+ CellLabel->"In[96]:=",ExpressionUUID->"3a2dff3b-cd15-4082-a16f-231d41830801"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"kinrules", " ", "=", 
+  RowBox[{
+   RowBox[{"KinRules", "[", 
+    RowBox[{"0", ",", "0", ",", "MH", ",", "0"}], "]"}], "//", 
+   "Simplify"}]}]], "Input",
+ CellChangeTimes->{{3.7752348658426027`*^9, 3.7752348715523443`*^9}, {
+   3.775234908441683*^9, 3.7752349098835077`*^9}, 3.775235029240054*^9, {
+   3.775235470670197*^9, 3.775235495869698*^9}},
+ CellLabel->
+  "In[132]:=",ExpressionUUID->"4717edd2-5164-4d8f-a082-259fc17a14ef"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{
+   RowBox[{"k1", "\[Rule]", 
+    FractionBox[
+     RowBox[{"Abs", "[", "S", "]"}], 
+     RowBox[{"2", " ", 
+      SqrtBox["S"]}]]}], ",", 
+   RowBox[{"k2", "\[Rule]", 
+    FractionBox[
+     RowBox[{"Abs", "[", "S", "]"}], 
+     RowBox[{"2", " ", 
+      SqrtBox["S"]}]]}], ",", 
+   RowBox[{"k3", "\[Rule]", 
+    FractionBox[
+     RowBox[{"Abs", "[", 
+      RowBox[{
+       SuperscriptBox["MH", "2"], "-", "S"}], "]"}], 
+     RowBox[{"2", " ", 
+      SqrtBox["S"]}]]}], ",", 
+   RowBox[{"k4", "\[Rule]", 
+    FractionBox[
+     RowBox[{"Abs", "[", 
+      RowBox[{
+       SuperscriptBox["MH", "2"], "-", "S"}], "]"}], 
+     RowBox[{"2", " ", 
+      SqrtBox["S"]}]]}]}], "}"}]], "Output",
+ CellChangeTimes->{
+  3.775234871971971*^9, 3.7752349102591248`*^9, {3.7752350263788548`*^9, 
+   3.77523502988068*^9}, 3.775235261911248*^9, {3.775235474715847*^9, 
+   3.7752354961811533`*^9}},
+ CellLabel->
+  "Out[132]=",ExpressionUUID->"c471d1a0-08f6-4e63-8c58-4c380016123b"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"(*", " ", 
+  RowBox[{"TEST", " ", "ggHg", " ", "only", " ", "triangles"}], " ", 
+  "*)"}]], "Input",
+ CellChangeTimes->{{3.7752336704725237`*^9, 
+  3.7752336844214363`*^9}},ExpressionUUID->"c016de82-2b4d-46da-8883-\
+dca8d81b33b0"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"ggHgamp", "=", 
+   RowBox[{"Import", "[", "\"\<ggHg_LR.m\>\"", "]"}]}], ";"}]], "Input",
+ CellChangeTimes->{{3.7752338840421143`*^9, 3.775233891491877*^9}, {
+   3.775233937160605*^9, 3.77523394325849*^9}, 3.7752340168034763`*^9, {
+   3.7752340953440027`*^9, 3.775234098436646*^9}},
+ CellLabel->"In[67]:=",ExpressionUUID->"2fb8be8e-1cd2-4ebe-ace8-84dfab624c1d"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["kvec1"], "Input",
+ CellChangeTimes->{{3.7752341675950108`*^9, 3.775234168743631*^9}},
+ CellLabel->"In[69]:=",ExpressionUUID->"ea64cda5-c0db-4d48-bd78-995d33d2e89b"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{
+   FractionBox[
+    SqrtBox["S"], "2"], ",", "0", ",", "0", ",", 
+   FractionBox[
+    SqrtBox["S"], "2"]}], "}"}]], "Output",
+ CellChangeTimes->{3.77523416905258*^9},
+ CellLabel->"Out[69]=",ExpressionUUID->"a788202c-d2a1-489b-9a50-5e867195c907"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["kvec2"], "Input",
+ CellChangeTimes->{{3.7752341705498743`*^9, 3.775234171963842*^9}},
+ CellLabel->"In[70]:=",ExpressionUUID->"63d668d8-464b-44a0-acf7-ed8fa5574d82"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{
+   FractionBox[
+    SqrtBox["S"], "2"], ",", "0", ",", "0", ",", 
+   RowBox[{"-", 
+    FractionBox[
+     SqrtBox["S"], "2"]}]}], "}"}]], "Output",
+ CellChangeTimes->{3.775234172334874*^9},
+ CellLabel->"Out[70]=",ExpressionUUID->"0a77be4d-16d7-4417-9174-3eaeec3d0943"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"kvec3", "=", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"vec4M", "[", 
+     RowBox[{"MH", ",", "k3", ",", "\[Theta]3", ",", "\[Phi]3"}], "]"}], "//.",
+     "kinrules"}], "//", "Simplify"}]}]], "Input",
+ CellChangeTimes->{{3.77523517587326*^9, 3.775235245278871*^9}, {
+  3.775235481684458*^9, 3.775235490207073*^9}},
+ CellLabel->
+  "In[140]:=",ExpressionUUID->"7f476354-b099-4fce-95e1-c8e3da1d445d"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{
+   FractionBox[
+    RowBox[{
+     SuperscriptBox["MH", "2"], "+", "S"}], 
+    RowBox[{"2", " ", 
+     SqrtBox["S"]}]], ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{"(", 
+      RowBox[{
+       RowBox[{"-", 
+        SuperscriptBox["MH", "2"]}], "+", "S"}], ")"}], " ", 
+     RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+     RowBox[{"Sin", "[", "\[Theta]3", "]"}]}], 
+    RowBox[{"2", " ", 
+     SqrtBox["S"]}]], ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{"(", 
+      RowBox[{
+       RowBox[{"-", 
+        SuperscriptBox["MH", "2"]}], "+", "S"}], ")"}], " ", 
+     RowBox[{"Sin", "[", "\[Theta]3", "]"}], " ", 
+     RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], 
+    RowBox[{"2", " ", 
+     SqrtBox["S"]}]], ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{"(", 
+      RowBox[{
+       RowBox[{"-", 
+        SuperscriptBox["MH", "2"]}], "+", "S"}], ")"}], " ", 
+     RowBox[{"Cos", "[", "\[Theta]3", "]"}]}], 
+    RowBox[{"2", " ", 
+     SqrtBox["S"]}]]}], "}"}]], "Output",
+ CellChangeTimes->{{3.775235201478866*^9, 3.775235245578174*^9}, {
+   3.775235485707567*^9, 3.775235490580348*^9}, 3.775235576008646*^9},
+ CellLabel->
+  "Out[140]=",ExpressionUUID->"232606ee-180f-4a6b-aae6-1505ac26d9aa"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"kvec4", "=", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"vec4M", "[", 
+     RowBox[{"0", ",", "k4", ",", "\[Theta]4", ",", "\[Phi]4"}], "]"}], "//.",
+     "kinrules"}], "//", "Simplify"}]}]], "Input",
+ CellChangeTimes->{{3.775234176979865*^9, 3.775234179201274*^9}, {
+  3.775235223822955*^9, 3.775235242958313*^9}, {3.775235530351878*^9, 
+  3.775235531848612*^9}},
+ CellLabel->
+  "In[141]:=",ExpressionUUID->"3bf9eee7-e9ce-4b9d-b371-a004db7dba36"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{
+   FractionBox[
+    RowBox[{
+     RowBox[{"-", 
+      SuperscriptBox["MH", "2"]}], "+", "S"}], 
+    RowBox[{"2", " ", 
+     SqrtBox["S"]}]], ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{"(", 
+      RowBox[{
+       RowBox[{"-", 
+        SuperscriptBox["MH", "2"]}], "+", "S"}], ")"}], " ", 
+     RowBox[{"Cos", "[", "\[Phi]4", "]"}], " ", 
+     RowBox[{"Sin", "[", "\[Theta]4", "]"}]}], 
+    RowBox[{"2", " ", 
+     SqrtBox["S"]}]], ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{"(", 
+      RowBox[{
+       RowBox[{"-", 
+        SuperscriptBox["MH", "2"]}], "+", "S"}], ")"}], " ", 
+     RowBox[{"Sin", "[", "\[Theta]4", "]"}], " ", 
+     RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], 
+    RowBox[{"2", " ", 
+     SqrtBox["S"]}]], ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{"(", 
+      RowBox[{
+       RowBox[{"-", 
+        SuperscriptBox["MH", "2"]}], "+", "S"}], ")"}], " ", 
+     RowBox[{"Cos", "[", "\[Theta]4", "]"}]}], 
+    RowBox[{"2", " ", 
+     SqrtBox["S"]}]]}], "}"}]], "Output",
+ CellChangeTimes->{
+  3.775234179651164*^9, 3.7752342413011293`*^9, {3.775235239407649*^9, 
+   3.775235243200902*^9}, 3.775235532236511*^9, 3.775235577664158*^9},
+ CellLabel->
+  "Out[141]=",ExpressionUUID->"9f6de44a-3816-436f-9eed-c65579e853f2"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SS", "=", 
+  RowBox[{"MyPair", "[", 
+   RowBox[{
+    RowBox[{"kvec1", "+", "kvec2"}], ",", 
+    RowBox[{"kvec1", "+", "kvec2"}]}], "]"}]}]], "Input",
+ CellChangeTimes->{{3.775234244274425*^9, 3.775234254281748*^9}, {
+  3.775234348280637*^9, 3.775234352779166*^9}},
+ CellLabel->
+  "In[134]:=",ExpressionUUID->"018d3a63-8c00-4393-8f48-5ea31ee4fb47"],
+
+Cell[BoxData["S"], "Output",
+ CellChangeTimes->{3.775234254770834*^9, 3.7752343544261303`*^9, 
+  3.7752352517199287`*^9, 3.77523553490416*^9},
+ CellLabel->
+  "Out[134]=",ExpressionUUID->"8ec26b8c-6895-465b-9a6d-f28a9c1bb157"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"TT", "=", 
+  RowBox[{"MyPair", "[", 
+   RowBox[{
+    RowBox[{"kvec4", "-", "kvec2"}], ",", 
+    RowBox[{"kvec4", "-", "kvec2"}]}], "]"}]}]], "Input",
+ CellChangeTimes->{{3.775234277699788*^9, 3.77523427881457*^9}, {
+  3.775234313126729*^9, 3.775234346018008*^9}, {3.775235458048749*^9, 
+  3.775235466914755*^9}},
+ CellLabel->
+  "In[143]:=",ExpressionUUID->"4a04a25c-7a5b-4d1e-9e39-cea69507a2ea"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(", 
+   RowBox[{
+    SuperscriptBox["MH", "2"], "-", "S"}], ")"}], " ", 
+  SuperscriptBox[
+   RowBox[{"Cos", "[", 
+    FractionBox["\[Theta]4", "2"], "]"}], "2"]}]], "Output",
+ CellChangeTimes->{3.775235581434252*^9},
+ CellLabel->
+  "Out[143]=",ExpressionUUID->"a324f332-3291-4f3e-984c-5d19e66452d6"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"UU", "=", 
+  RowBox[{"MyPair", "[", 
+   RowBox[{
+    RowBox[{"kvec1", "-", "kvec4"}], ",", 
+    RowBox[{"kvec1", "-", "kvec4"}]}], "]"}]}]], "Input",
+ CellChangeTimes->{{3.775234358563444*^9, 3.775234377882045*^9}},
+ CellLabel->
+  "In[144]:=",ExpressionUUID->"bb85de51-cb56-4b22-9b3f-72f33e2fe91d"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(", 
+   RowBox[{
+    SuperscriptBox["MH", "2"], "-", "S"}], ")"}], " ", 
+  SuperscriptBox[
+   RowBox[{"Sin", "[", 
+    FractionBox["\[Theta]4", "2"], "]"}], "2"]}]], "Output",
+ CellChangeTimes->{3.775234380057612*^9, 3.775235255405649*^9, 
+  3.775235538141506*^9, 3.7752355860019827`*^9},
+ CellLabel->
+  "Out[144]=",ExpressionUUID->"e34418a3-f287-4a25-be8b-b35bb3ba3b75"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{
+   RowBox[{"SS", "+", "TT", "+", "UU"}], "/.", 
+   RowBox[{"KinRules", "[", 
+    RowBox[{"0", ",", "0", ",", "MH", ",", "0"}], "]"}]}], "//", 
+  "Simplify"}]], "Input",
+ CellChangeTimes->{{3.7752353045094757`*^9, 3.7752353638645287`*^9}},
+ CellLabel->
+  "In[145]:=",ExpressionUUID->"a15db554-c750-416a-bf8e-43f7fa7fe829"],
+
+Cell[BoxData[
+ SuperscriptBox["MH", "2"]], "Output",
+ CellChangeTimes->{{3.7752353078850718`*^9, 3.77523536415522*^9}, 
+   3.7752355404450827`*^9, {3.775235572708755*^9, 3.7752355883878727`*^9}},
+ CellLabel->
+  "Out[145]=",ExpressionUUID->"82c233c3-0b0a-4a45-b5b8-037c03555249"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"$Assumptions", "=", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{"Element", "[", 
+      RowBox[{
+       RowBox[{"{", 
+        RowBox[{
+        "ki", ",", "k1", ",", "k2", ",", "k3", ",", "k4", ",", " ", 
+         "\[Theta]1", ",", "\[Theta]2", ",", "\[Theta]3", ",", "\[Theta]4", 
+         ",", " ", "\[Phi]1", ",", "\[Phi]2", ",", "\[Phi]3", ",", "\[Phi]4", 
+         ",", "p", ",", "MT2", ",", "GS", ",", "EL", ",", "Alfas", ",", "a1", 
+         ",", "S", ",", "T", ",", "U", ",", "MT", ",", "MH", ",", "MH2", ",", 
+         "\[Eta]4", ",", "\[Eta]3"}], "}"}], ",", "Reals"}], "]"}], ",", 
+     RowBox[{"ki", ">", "0"}], " ", ",", 
+     RowBox[{"MT2", ">", "0"}], ",", 
+     RowBox[{"MT", ">", "0"}], ",", 
+     RowBox[{"MH2", ">", "0"}], ",", " ", 
+     RowBox[{"MH", ">", "0"}], ",", 
+     RowBox[{"k4", ">", "0"}], ",", 
+     RowBox[{"p", ">", "0"}], ",", 
+     RowBox[{"k3", ">", "0"}], ",", 
+     RowBox[{"k1", ">", "0"}], ",", 
+     RowBox[{"k2", ">", "0"}], ",", 
+     RowBox[{"rS", ">", "0"}], ",", 
+     RowBox[{"kT4", ">", "0"}], ",", 
+     RowBox[{"kT3", ">", "0"}], ",", 
+     RowBox[{"S", ">", 
+      RowBox[{"MH", "^", "2"}]}]}], "}"}]}], ";"}]], "Input",
+ CellChangeTimes->{{3.775235566234293*^9, 3.7752355691149817`*^9}},
+ CellLabel->
+  "In[138]:=",ExpressionUUID->"13982953-6398-495a-82b4-9ddfe24a4bd0"],
+
+Cell[BoxData[""], "Input",
+ CellChangeTimes->{{3.775234139392658*^9, 
+  3.775234148228291*^9}},ExpressionUUID->"3b604925-2d87-477a-bbab-\
+bc72b933b86f"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"amp1", "=", 
+  RowBox[{
+   RowBox[{"ggHgamp", "//.", " ", "SubFourVecs"}], "//.", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{"S", "\[Rule]", 
+      RowBox[{"300", "^", "2"}]}], ",", 
+     RowBox[{"T", "\[Rule]", "TT"}], ",", 
+     RowBox[{"U", "\[Rule]", "UU"}], ",", 
+     RowBox[{"MT", "\[Rule]", "173."}], ",", 
+     RowBox[{"MH", "\[Rule]", "125."}], ",", 
+     RowBox[{"\[Theta]3", "\[Rule]", 
+      RowBox[{"Pi", "/", "2"}]}], ",", 
+     RowBox[{"\[Theta]4", "\[Rule]", 
+      RowBox[{"Pi", "/", "2"}]}], ",", 
+     RowBox[{"\[Phi]4", "\[Rule]", "Pi"}], ",", 
+     RowBox[{"\[Phi]3", "\[Rule]", "0"}]}], "}"}]}]}]], "Input",
+ CellChangeTimes->{{3.7752341002835217`*^9, 3.775234117913557*^9}, {
+  3.775234391925642*^9, 3.775234475599949*^9}, {3.775234531877942*^9, 
+  3.775234563575654*^9}, {3.7752345970058527`*^9, 3.775234671773217*^9}, {
+  3.775234733353578*^9, 3.775234737504047*^9}, {3.775235269644129*^9, 
+  3.77523530294098*^9}, {3.77523559515126*^9, 3.7752356852162857`*^9}, {
+  3.775235751690361*^9, 3.7752357857311287`*^9}, {3.775235839868848*^9, 
+  3.7752359294193163`*^9}, {3.7752361019039307`*^9, 3.7752361257766857`*^9}, {
+  3.775236336202168*^9, 3.775236339085723*^9}},
+ CellLabel->
+  "In[280]:=",ExpressionUUID->"be40774a-645c-401d-8678-e778f53524dc"],
+
+Cell[BoxData[
+ FractionBox[
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"86.53579217291438`", "\[VeryThinSpace]", "+", 
+     RowBox[{"1.7334278172536492`*^-15", " ", "\[ImaginaryI]"}]}], ")"}], " ",
+    "Alfas", " ", "EL", " ", "GS", " ", 
+   RowBox[{"(", 
+    RowBox[{
+     RowBox[{"Mat", "[", 
+      RowBox[{"SUNT", "[", 
+       RowBox[{"Glu1", ",", "Glu2", ",", "Glu4", ",", "0", ",", "0"}], "]"}], 
+      "]"}], "-", 
+     RowBox[{"Mat", "[", 
+      RowBox[{"SUNT", "[", 
+       RowBox[{"Glu1", ",", "Glu4", ",", "Glu2", ",", "0", ",", "0"}], "]"}], 
+      "]"}]}], ")"}]}], 
+  RowBox[{"MW", " ", "SW"}]]], "Output",
+ CellChangeTimes->{{3.775235595574247*^9, 3.775235623074259*^9}, 
+   3.7752356626146173`*^9, 3.775235809633503*^9, 3.77523584309721*^9, 
+   3.775235912539084*^9, 3.775235956017193*^9, {3.775236103168292*^9, 
+   3.775236128221525*^9}, {3.775236337021147*^9, 3.775236339442601*^9}, 
+   3.775236552575139*^9, 3.775237099207222*^9},
+ CellLabel->
+  "Out[280]=",ExpressionUUID->"d057959b-fd6e-407e-a0d3-91ee53705fdb"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["kvec1"], "Input",
+ CellChangeTimes->{{3.775234666900373*^9, 3.775234667629822*^9}, {
+  3.775236142255439*^9, 3.775236144294471*^9}},
+ CellLabel->
+  "In[158]:=",ExpressionUUID->"b635f1ba-43a8-4c64-8caf-41485e8e6349"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{
+   FractionBox[
+    SqrtBox["S"], "2"], ",", "0", ",", "0", ",", 
+   FractionBox[
+    SqrtBox["S"], "2"]}], "}"}]], "Output",
+ CellChangeTimes->{3.7752361447702923`*^9},
+ CellLabel->
+  "Out[158]=",ExpressionUUID->"ab0d6b89-a1b1-46d4-a6ce-1e0b2b245a9b"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["kvec2"], "Input",
+ CellChangeTimes->{{3.77523614595605*^9, 3.775236147204626*^9}},
+ CellLabel->
+  "In[159]:=",ExpressionUUID->"5b4e5bfd-5043-4c2d-9f8e-3843d808a535"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{
+   FractionBox[
+    SqrtBox["S"], "2"], ",", "0", ",", "0", ",", 
+   RowBox[{"-", 
+    FractionBox[
+     SqrtBox["S"], "2"]}]}], "}"}]], "Output",
+ CellChangeTimes->{3.7752361475624323`*^9},
+ CellLabel->
+  "Out[159]=",ExpressionUUID->"7c43f9c1-01c0-4b8a-9438-16c48fc51e47"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["kvec3"], "Input",
+ CellChangeTimes->{{3.775236148396234*^9, 3.775236149625515*^9}},
+ CellLabel->
+  "In[160]:=",ExpressionUUID->"309b1dba-9aff-4ed0-af22-d4ab58554b8a"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{
+   FractionBox[
+    RowBox[{
+     SuperscriptBox["MH", "2"], "+", "S"}], 
+    RowBox[{"2", " ", 
+     SqrtBox["S"]}]], ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{"(", 
+      RowBox[{
+       RowBox[{"-", 
+        SuperscriptBox["MH", "2"]}], "+", "S"}], ")"}], " ", 
+     RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+     RowBox[{"Sin", "[", "\[Theta]3", "]"}]}], 
+    RowBox[{"2", " ", 
+     SqrtBox["S"]}]], ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{"(", 
+      RowBox[{
+       RowBox[{"-", 
+        SuperscriptBox["MH", "2"]}], "+", "S"}], ")"}], " ", 
+     RowBox[{"Sin", "[", "\[Theta]3", "]"}], " ", 
+     RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], 
+    RowBox[{"2", " ", 
+     SqrtBox["S"]}]], ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{"(", 
+      RowBox[{
+       RowBox[{"-", 
+        SuperscriptBox["MH", "2"]}], "+", "S"}], ")"}], " ", 
+     RowBox[{"Cos", "[", "\[Theta]3", "]"}]}], 
+    RowBox[{"2", " ", 
+     SqrtBox["S"]}]]}], "}"}]], "Output",
+ CellChangeTimes->{3.7752361500531473`*^9},
+ CellLabel->
+  "Out[160]=",ExpressionUUID->"f750153f-f59e-4943-8b0c-9ba1d1f0930f"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["kvec4"], "Input",
+ CellChangeTimes->{{3.775236151421253*^9, 3.775236152088798*^9}},
+ CellLabel->
+  "In[161]:=",ExpressionUUID->"a01ded67-4f83-4bf3-a6a9-6a26bb859e2b"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{
+   FractionBox[
+    RowBox[{
+     RowBox[{"-", 
+      SuperscriptBox["MH", "2"]}], "+", "S"}], 
+    RowBox[{"2", " ", 
+     SqrtBox["S"]}]], ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{"(", 
+      RowBox[{
+       RowBox[{"-", 
+        SuperscriptBox["MH", "2"]}], "+", "S"}], ")"}], " ", 
+     RowBox[{"Cos", "[", "\[Phi]4", "]"}], " ", 
+     RowBox[{"Sin", "[", "\[Theta]4", "]"}]}], 
+    RowBox[{"2", " ", 
+     SqrtBox["S"]}]], ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{"(", 
+      RowBox[{
+       RowBox[{"-", 
+        SuperscriptBox["MH", "2"]}], "+", "S"}], ")"}], " ", 
+     RowBox[{"Sin", "[", "\[Theta]4", "]"}], " ", 
+     RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], 
+    RowBox[{"2", " ", 
+     SqrtBox["S"]}]], ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{"(", 
+      RowBox[{
+       RowBox[{"-", 
+        SuperscriptBox["MH", "2"]}], "+", "S"}], ")"}], " ", 
+     RowBox[{"Cos", "[", "\[Theta]4", "]"}]}], 
+    RowBox[{"2", " ", 
+     SqrtBox["S"]}]]}], "}"}]], "Output",
+ CellChangeTimes->{3.775236153013968*^9},
+ CellLabel->
+  "Out[161]=",ExpressionUUID->"92916bb6-be68-46d5-9db8-ffc0d29947f0"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"SS", "+", "TT", "+", "UU"}], "//", "Simplify"}]], "Input",
+ CellChangeTimes->{{3.7752361957662287`*^9, 3.775236207102852*^9}},
+ CellLabel->
+  "In[164]:=",ExpressionUUID->"e28d7b30-a554-477f-831b-c87e01beca4d"],
+
+Cell[BoxData[
+ SuperscriptBox["MH", "2"]], "Output",
+ CellChangeTimes->{{3.775236200173397*^9, 3.7752362073885593`*^9}},
+ CellLabel->
+  "Out[164]=",ExpressionUUID->"0ca7de0d-d882-4ed8-8d04-fc4574b40098"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"kvec3", "//.", 
+  RowBox[{"{", 
+   RowBox[{
+    RowBox[{"S", "\[Rule]", 
+     RowBox[{"300", "^", "2"}]}], ",", 
+    RowBox[{"T", "\[Rule]", "TT"}], ",", 
+    RowBox[{"U", "\[Rule]", "UU"}], ",", 
+    RowBox[{"MT", "\[Rule]", "173."}], ",", 
+    RowBox[{"MH", "\[Rule]", "125."}], ",", 
+    RowBox[{"\[Theta]3", "\[Rule]", 
+     RowBox[{"Pi", "/", "2"}]}], ",", 
+    RowBox[{"\[Theta]4", "\[Rule]", 
+     RowBox[{"Pi", "/", "2"}]}], ",", 
+    RowBox[{"\[Phi]4", "\[Rule]", "Pi"}], ",", 
+    RowBox[{"\[Phi]3", "\[Rule]", "0"}]}], "}"}]}]], "Input",
+ CellChangeTimes->{{3.775236225224224*^9, 3.7752362390677547`*^9}, {
+  3.775236345250381*^9, 3.7752363472610483`*^9}, {3.7752364524773073`*^9, 
+  3.775236461304338*^9}},
+ CellLabel->
+  "In[278]:=",ExpressionUUID->"04d4dbd7-9c46-485e-9f84-becb80b9d603"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{
+  "176.04166666666669`", ",", "123.95833333333334`", ",", "0.`", ",", "0.`"}],
+   "}"}]], "Output",
+ CellChangeTimes->{
+  3.775236240781623*^9, {3.775236345584844*^9, 3.775236347597986*^9}, 
+   3.7752370933315783`*^9},
+ CellLabel->
+  "Out[278]=",ExpressionUUID->"79e04ef4-1b59-4535-992c-e4424203720a"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"kvec4", "//.", 
+  RowBox[{"{", 
+   RowBox[{
+    RowBox[{"S", "\[Rule]", 
+     RowBox[{"300", "^", "2"}]}], ",", 
+    RowBox[{"T", "\[Rule]", "TT"}], ",", 
+    RowBox[{"U", "\[Rule]", "UU"}], ",", 
+    RowBox[{"MT", "\[Rule]", "173."}], ",", 
+    RowBox[{"MH", "\[Rule]", "125."}], ",", 
+    RowBox[{"\[Theta]3", "\[Rule]", 
+     RowBox[{"Pi", "/", "2"}]}], ",", 
+    RowBox[{"\[Theta]4", "\[Rule]", 
+     RowBox[{"Pi", "/", "2"}]}], ",", 
+    RowBox[{"\[Phi]4", "\[Rule]", "Pi"}], ",", 
+    RowBox[{"\[Phi]3", "\[Rule]", "0"}]}], "}"}]}]], "Input",
+ CellChangeTimes->{{3.7752362436914473`*^9, 3.775236246328574*^9}},
+ CellLabel->
+  "In[279]:=",ExpressionUUID->"6ecab3de-355f-4fd7-a4bd-167b5ec80b28"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"123.95833333333334`", ",", 
+   RowBox[{"-", "123.95833333333334`"}], ",", "0.`", ",", "0.`"}], 
+  "}"}]], "Output",
+ CellChangeTimes->{3.77523624723542*^9, 3.775237095048168*^9},
+ CellLabel->
+  "Out[279]=",ExpressionUUID->"858cefaf-42e8-42f3-9ed9-cb66408eea6e"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"ek1vecInc", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"EpolEuc", "[", 
+      RowBox[{"0", ",", "k1x", ",", "k1y", ",", "k1z", ",", "1"}], "]"}], "/.", 
+     RowBox[{"{", 
+      RowBox[{"k1y", "\[Rule]", "0"}], "}"}]}], "//", "Simplify"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"ek1vec", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{
+      RowBox[{"Limit", "[", 
+       RowBox[{"ek1vecInc", ",", 
+        RowBox[{"k1x", "\[Rule]", "0"}], ",", 
+        RowBox[{"Direction", "\[Rule]", "\"\<FromAbove\>\""}]}], "]"}], "/.", 
+      
+      RowBox[{"rS", "\[Rule]", 
+       RowBox[{"Sqrt", "[", "S", "]"}]}]}], "//.", 
+     RowBox[{"{", 
+      RowBox[{"k1z", "\[Rule]", 
+       RowBox[{"kvec1", "[", 
+        RowBox[{"[", "4", "]"}], "]"}]}], "}"}]}], "//", "Simplify"}]}], " ", 
+  
+  RowBox[{"(*", " ", 
+   RowBox[{
+    RowBox[{"because", " ", "kz"}], " ", ">", " ", "0"}], " ", "*)"}], 
+  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"ek2vecInc", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"EpolEuc", "[", 
+      RowBox[{"0", ",", "k2x", ",", "k2y", ",", "k2z", ",", "1"}], "]"}], "/.", 
+     RowBox[{"{", 
+      RowBox[{"k2y", "\[Rule]", "0"}], "}"}]}], "//", "Simplify"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"ek2vec", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{
+      RowBox[{"Limit", "[", 
+       RowBox[{"ek2vecInc", ",", 
+        RowBox[{"k2x", "\[Rule]", "0"}], ",", 
+        RowBox[{"Direction", "\[Rule]", "\"\<FromBelow\>\""}]}], "]"}], "/.", 
+      
+      RowBox[{"rS", "\[Rule]", 
+       RowBox[{"Sqrt", "[", "S", "]"}]}]}], "//.", 
+     RowBox[{"{", 
+      RowBox[{"k2z", "\[Rule]", 
+       RowBox[{"kvec2", "[", 
+        RowBox[{"[", "4", "]"}], "]"}]}], "}"}]}], "//", "Simplify"}]}], " ", 
+  
+  RowBox[{"(*", " ", 
+   RowBox[{
+    RowBox[{"because", " ", "kz"}], " ", "<", " ", "0"}], " ", "*)"}], 
+  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"ek4vec", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"EpolEuc", "[", 
+      RowBox[{"0", ",", "k4x", ",", "k4y", ",", "k4z", ",", "1"}], "]"}], "//.", 
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{"k4x", "\[Rule]", 
+        RowBox[{"kvec4", "[", 
+         RowBox[{"[", "2", "]"}], "]"}]}], ",", 
+       RowBox[{"k4y", "\[Rule]", 
+        RowBox[{"kvec4", "[", 
+         RowBox[{"[", "3", "]"}], "]"}]}], ",", 
+       RowBox[{"k4z", "\[Rule]", 
+        RowBox[{"kvec4", "[", 
+         RowBox[{"[", "4", "]"}], "]"}]}], ",", 
+       RowBox[{"\[Theta]4", "\[Rule]", 
+        RowBox[{"Pi", "/", "2"}]}], ",", 
+       RowBox[{"\[Phi]4", "\[Rule]", "Pi"}]}], "}"}]}], "//", "Simplify"}]}], 
+  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"ek1vecCC", "=", 
+   RowBox[{
+    RowBox[{"Conjugate", "[", "ek1vec", "]"}], "//", "Simplify"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"ek2vecCC", "=", 
+   RowBox[{
+    RowBox[{"Conjugate", "[", "ek2vec", "]"}], "//", "Simplify"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"ek4vecCC", "=", 
+   RowBox[{
+    RowBox[{"Conjugate", "[", "ek4vec", "]"}], "//", "Simplify"}]}], 
+  ";"}]}], "Input",
+ CellChangeTimes->{{3.775236799477029*^9, 3.775237061156251*^9}},
+ CellLabel->
+  "In[270]:=",ExpressionUUID->"e7aff029-b2d6-497e-8d41-fe171c216a43"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox["2"]]}], ",", 
+   RowBox[{"-", 
+    FractionBox["\[ImaginaryI]", 
+     SqrtBox["2"]]}], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{{3.7752368113015337`*^9, 3.775236822023851*^9}, {
+   3.7752368730447483`*^9, 3.775236979723176*^9}, 3.7752370149324293`*^9, {
+   3.77523706222206*^9, 3.775237086742407*^9}},
+ CellLabel->
+  "Out[271]=",ExpressionUUID->"8a0962be-605f-4f68-8afd-f3832246e4b6"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox["2"]]}], ",", 
+   FractionBox["\[ImaginaryI]", 
+    SqrtBox["2"]], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{{3.7752368113015337`*^9, 3.775236822023851*^9}, {
+   3.7752368730447483`*^9, 3.775236979723176*^9}, 3.7752370149324293`*^9, {
+   3.77523706222206*^9, 3.7752370867565613`*^9}},
+ CellLabel->
+  "Out[273]=",ExpressionUUID->"45641c61-b419-4a5d-844e-cda62d80939b"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", "0", ",", 
+   FractionBox["\[ImaginaryI]", 
+    SqrtBox["2"]], ",", 
+   FractionBox["1", 
+    SqrtBox["2"]]}], "}"}]], "Output",
+ CellChangeTimes->{{3.7752368113015337`*^9, 3.775236822023851*^9}, {
+   3.7752368730447483`*^9, 3.775236979723176*^9}, 3.7752370149324293`*^9, {
+   3.77523706222206*^9, 3.775237086766879*^9}},
+ CellLabel->
+  "Out[274]=",ExpressionUUID->"28740e7a-3602-491c-a46f-a2287e2eb0d6"]
+}, Open  ]]
+},
+WindowSize->{991, 755},
+WindowMargins->{{Automatic, 0}, {22, Automatic}},
+FrontEndVersion->"11.3 for Mac OS X x86 (32-bit, 64-bit Kernel) (March 5, \
+2018)",
+StyleDefinitions->"Default.nb"
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{}
+*)
+(*CellTagsIndex
+CellTagsIndex->{}
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[558, 20, 1402, 28, 115, "Input",ExpressionUUID->"a9eb43f9-c437-4ff0-ae8b-eb31f4d06b38"],
+Cell[CellGroupData[{
+Cell[1985, 52, 890, 15, 94, "Input",ExpressionUUID->"aa6e76d2-ec10-49c0-b6e0-1dd4d91b1a18"],
+Cell[CellGroupData[{
+Cell[2900, 71, 927, 14, 46, "Print",ExpressionUUID->"25a5da31-44dc-4fb5-8479-d3b3e9d9997d"],
+Cell[3830, 87, 703, 11, 24, "Print",ExpressionUUID->"f4dab8ad-d8ed-4620-a2d6-6211b6054aed"]
+}, Open  ]]
+}, Open  ]],
+Cell[4560, 102, 1453, 33, 94, "Input",ExpressionUUID->"907a0a71-f5d0-4c01-bacf-80d42748259d"],
+Cell[6016, 137, 10436, 271, 787, "Input",ExpressionUUID->"26f4a4e8-5f12-4a95-a30f-5e40153ac3f8"],
+Cell[16455, 410, 3616, 100, 262, "Input",ExpressionUUID->"295b0a52-febf-49d7-b5c5-afa40a220c70"],
+Cell[20074, 512, 150, 3, 30, "Input",ExpressionUUID->"facae057-50b1-4b42-bf4f-443f5b3c37d1"],
+Cell[20227, 517, 686, 15, 73, "Input",ExpressionUUID->"08460ef5-a698-495d-8762-405256a0b03d"],
+Cell[20916, 534, 14026, 384, 1249, "Input",ExpressionUUID->"0977815c-55b7-47b0-a967-05c8f45dc601"],
+Cell[CellGroupData[{
+Cell[34967, 922, 467, 13, 30, "Input",ExpressionUUID->"fb2e028f-6f3b-492a-bb4e-bea3e5c1534a"],
+Cell[35437, 937, 361, 7, 34, "Output",ExpressionUUID->"ab71d7ff-d1f5-4255-835e-f05816070c0f"]
+}, Open  ]],
+Cell[35813, 947, 1280, 34, 73, "Input",ExpressionUUID->"fce22054-d858-451a-8e65-81090d25d088"],
+Cell[37096, 983, 600, 16, 30, "Input",ExpressionUUID->"1652bbc6-4ff3-4d2b-a987-9b54bd7481f8"],
+Cell[37699, 1001, 12743, 314, 766, "Input",ExpressionUUID->"ab581e1f-c5c9-4f7d-9a00-c83f2a5d582b"],
+Cell[50445, 1317, 23555, 608, 1438, "Input",ExpressionUUID->"cccbcfb5-f779-4768-8bad-bc93be841f88"],
+Cell[74003, 1927, 425, 7, 73, "Input",ExpressionUUID->"a5c5e12e-157e-4719-b09d-930d037e0d1b"],
+Cell[74431, 1936, 953, 18, 52, "Input",ExpressionUUID->"6f54e202-a28b-4a1d-9e81-76bb7154ddaa"],
+Cell[75387, 1956, 1052, 25, 115, "Input",ExpressionUUID->"60913534-eef8-4103-af9a-ab50a0b353b9"],
+Cell[76442, 1983, 147, 3, 52, "Input",ExpressionUUID->"2239b8d8-532e-4c08-ac3b-e377a166b460"],
+Cell[76592, 1988, 309, 8, 30, "Input",ExpressionUUID->"a8edcb3d-289d-4ff2-aab2-1178c47d2c24"],
+Cell[76904, 1998, 179, 3, 30, "Input",ExpressionUUID->"2fbc45e0-5167-407c-a174-583971bd7d06"],
+Cell[CellGroupData[{
+Cell[77108, 2005, 202, 3, 30, "Input",ExpressionUUID->"7685320a-c96c-4f66-a42b-1f0a30a78e68"],
+Cell[77313, 2010, 371, 5, 34, "Output",ExpressionUUID->"bfbcf21c-cca2-47a8-81bb-f83b15bbc8df"]
+}, Open  ]],
+Cell[77699, 2018, 2587, 65, 241, "Input",ExpressionUUID->"7e7f013d-f22f-4c3a-81bd-d58630ecb407"],
+Cell[CellGroupData[{
+Cell[80311, 2087, 280, 3, 94, "Input",ExpressionUUID->"6e143612-3c0d-4282-a651-8cad89a3b66b"],
+Cell[80594, 2092, 340, 10, 54, "Output",ExpressionUUID->"98797b05-90d0-4926-b83f-0fdac2f8507c"],
+Cell[80937, 2104, 321, 9, 54, "Output",ExpressionUUID->"3c0d0c1a-efc7-4be2-989a-76364c5184c4"],
+Cell[81261, 2115, 802, 24, 55, "Output",ExpressionUUID->"295e5521-bc86-438c-a78c-4ff98b1a4eaf"],
+Cell[82066, 2141, 8014, 206, 415, "Output",ExpressionUUID->"e4e3dc2e-2896-4dfa-890b-ce015e0dd3cb"]
+}, Closed]],
+Cell[90095, 2350, 2360, 62, 237, "Input",ExpressionUUID->"de07b359-92c5-4c50-9757-257a3b86203c"],
+Cell[CellGroupData[{
+Cell[92480, 2416, 214, 2, 94, "Input",ExpressionUUID->"4bd24bf0-4f95-4aeb-a92a-36addec143e9"],
+Cell[92697, 2420, 340, 10, 54, "Output",ExpressionUUID->"0caa581a-26a8-4421-91ce-03a7011cd4c6"],
+Cell[93040, 2432, 319, 9, 54, "Output",ExpressionUUID->"27e4ad47-e57e-49f6-84f4-963c4f4e2144"],
+Cell[93362, 2443, 802, 24, 55, "Output",ExpressionUUID->"c13ffd92-283d-4eff-935e-259792c34b35"],
+Cell[94167, 2469, 8017, 205, 415, "Output",ExpressionUUID->"bd7742ef-097f-4ece-b454-127c41a84927"]
+}, Closed]],
+Cell[102199, 2677, 2265, 61, 237, "Input",ExpressionUUID->"0dc936c5-a3bf-49d3-8822-b8bf3e097443"],
+Cell[CellGroupData[{
+Cell[104489, 2742, 214, 2, 94, "Input",ExpressionUUID->"de1972ab-9631-4c95-a3ac-cc2439eaff59"],
+Cell[104706, 2746, 340, 10, 54, "Output",ExpressionUUID->"83c34964-b013-4847-9113-6809ef586914"],
+Cell[105049, 2758, 319, 9, 54, "Output",ExpressionUUID->"76cacd3c-7b01-4bf0-bf2d-05ee732b6108"],
+Cell[105371, 2769, 793, 24, 55, "Output",ExpressionUUID->"2af82568-b2f2-4e08-823a-56af3a079456"],
+Cell[106167, 2795, 8014, 206, 415, "Output",ExpressionUUID->"888f7613-7ca5-4c0c-9910-37224a4d42c2"]
+}, Closed]],
+Cell[114196, 3004, 2265, 61, 237, "Input",ExpressionUUID->"2f945793-af8e-4f9f-8ee4-f6a5ddef3041"],
+Cell[CellGroupData[{
+Cell[116486, 3069, 214, 2, 94, "Input",ExpressionUUID->"1b3a5a8e-9a75-4ea8-81fc-12e00b1e7a8b"],
+Cell[116703, 3073, 340, 10, 54, "Output",ExpressionUUID->"4800b669-1ac2-461c-8d0e-6c8e0db4feb2"],
+Cell[117046, 3085, 319, 9, 54, "Output",ExpressionUUID->"127daa54-286d-4dfe-a228-45ea02f3a29b"],
+Cell[117368, 3096, 795, 24, 55, "Output",ExpressionUUID->"ff5a2c2d-bcb9-4a08-a0db-e3ec3e0b8eab"],
+Cell[118166, 3122, 8019, 205, 415, "Output",ExpressionUUID->"3613bcfe-306c-417b-be00-8b237e1f74fc"]
+}, Closed]],
+Cell[126200, 3330, 2285, 62, 237, "Input",ExpressionUUID->"736a8768-21b4-4a78-91c9-5a2f8b836a59"],
+Cell[CellGroupData[{
+Cell[128510, 3396, 218, 3, 94, "Input",ExpressionUUID->"ddb548c2-b966-4ebb-8b4d-20e4c052552c"],
+Cell[128731, 3401, 346, 11, 54, "Output",ExpressionUUID->"8e7c14f1-46c4-45be-9499-0e7ff9cfe533"],
+Cell[129080, 3414, 302, 9, 54, "Output",ExpressionUUID->"665ee0e0-b7dc-4373-bc72-91094ed4ebfa"],
+Cell[129385, 3425, 806, 25, 55, "Output",ExpressionUUID->"76a06765-1e32-464b-b653-74c9c41bfad0"],
+Cell[130194, 3452, 8018, 207, 415, "Output",ExpressionUUID->"6c5ab671-9271-4d6d-941f-1661679185be"]
+}, Closed]],
+Cell[138227, 3662, 2308, 64, 237, "Input",ExpressionUUID->"f1b82eb6-3e5a-4cf7-9deb-3109924714c4"],
+Cell[CellGroupData[{
+Cell[140560, 3730, 218, 3, 94, "Input",ExpressionUUID->"5d0e564a-ae95-4bd5-a6cc-af961332242f"],
+Cell[140781, 3735, 344, 11, 54, "Output",ExpressionUUID->"9fb01334-2129-4aec-994f-886876491615"],
+Cell[141128, 3748, 304, 9, 54, "Output",ExpressionUUID->"7df88261-7455-4dcf-a0de-7b4494d6ea05"],
+Cell[141435, 3759, 806, 25, 55, "Output",ExpressionUUID->"73f9133d-e1ae-4484-9c71-cead4cfc2778"],
+Cell[142244, 3786, 8020, 206, 415, "Output",ExpressionUUID->"d00bf2c3-bcc7-4d1d-9603-58fce399f9be"]
+}, Closed]],
+Cell[150279, 3995, 2294, 63, 237, "Input",ExpressionUUID->"ea09958c-619e-47a8-ba2e-3c72622f3837"],
+Cell[CellGroupData[{
+Cell[152598, 4062, 218, 3, 94, "Input",ExpressionUUID->"49c8fe2c-a955-4a56-b5d2-645fdd8ee1b8"],
+Cell[152819, 4067, 344, 11, 54, "Output",ExpressionUUID->"ac928864-fb46-4277-a04b-a9984873ba5e"],
+Cell[153166, 4080, 304, 9, 54, "Output",ExpressionUUID->"9bf967d4-1cd5-43e7-b270-9802dbd89330"],
+Cell[153473, 4091, 797, 25, 55, "Output",ExpressionUUID->"e531c14c-844f-4ad1-9bfb-471d4db9b31e"],
+Cell[154273, 4118, 8020, 207, 415, "Output",ExpressionUUID->"9030a139-1619-4bd0-baa7-f65aaed95fc1"]
+}, Closed]],
+Cell[162308, 4328, 2310, 64, 237, "Input",ExpressionUUID->"109d8c91-098d-43cf-8963-751531807ae7"],
+Cell[CellGroupData[{
+Cell[164643, 4396, 218, 3, 94, "Input",ExpressionUUID->"133b9470-d798-489d-8481-9a8a3698a3a8"],
+Cell[164864, 4401, 344, 11, 54, "Output",ExpressionUUID->"52c45524-838a-46a1-9ad1-7648b6637a0a"],
+Cell[165211, 4414, 304, 9, 54, "Output",ExpressionUUID->"921a68f6-d009-4488-b8f7-58a4a926ca24"],
+Cell[165518, 4425, 797, 25, 55, "Output",ExpressionUUID->"dd1b4ff6-53c6-45ef-9a44-0b1769b80634"],
+Cell[166318, 4452, 8021, 206, 415, "Output",ExpressionUUID->"1328d2bc-b60d-4dff-a61f-fafce78b861e"]
+}, Closed]],
+Cell[174354, 4661, 2274, 63, 237, "Input",ExpressionUUID->"90ea42ce-b398-4fbc-bd9f-f41999d112ee"],
+Cell[CellGroupData[{
+Cell[176653, 4728, 218, 3, 94, "Input",ExpressionUUID->"aeeee502-d9db-4ade-88d9-b512c4326bb6"],
+Cell[176874, 4733, 323, 10, 54, "Output",ExpressionUUID->"9031a0a9-cf9d-437b-8216-b065685cc651"],
+Cell[177200, 4745, 323, 10, 54, "Output",ExpressionUUID->"2c6398cd-b359-4fe5-a36e-0b40aa0a73ac"],
+Cell[177526, 4757, 805, 25, 55, "Output",ExpressionUUID->"d0c4ab05-2228-4b3d-b9f0-380f03f445fc"],
+Cell[178334, 4784, 8018, 207, 415, "Output",ExpressionUUID->"25c04453-c4d9-49a8-b58e-b82acd1058e8"]
+}, Closed]],
+Cell[186367, 4994, 2287, 63, 237, "Input",ExpressionUUID->"eda41e35-0731-4f86-8fd3-b64e5553fef0"],
+Cell[CellGroupData[{
+Cell[188679, 5061, 218, 3, 94, "Input",ExpressionUUID->"0e9ee2b7-6c7f-44b1-9f11-5d09fdee3c8a"],
+Cell[188900, 5066, 323, 10, 54, "Output",ExpressionUUID->"564638da-a074-4583-95bd-4f2f8cba6de0"],
+Cell[189226, 5078, 323, 10, 54, "Output",ExpressionUUID->"ead6394e-5d7d-4027-bf26-da5af46080e0"],
+Cell[189552, 5090, 808, 25, 55, "Output",ExpressionUUID->"05920693-2791-461f-bb39-d05893eff923"],
+Cell[190363, 5117, 8020, 206, 415, "Output",ExpressionUUID->"4d737b53-7257-44f3-b230-4b20b7cf4403"]
+}, Closed]],
+Cell[198398, 5326, 2306, 64, 237, "Input",ExpressionUUID->"b4e55406-dd72-45f8-a3b3-34f05228afd8"],
+Cell[CellGroupData[{
+Cell[200729, 5394, 218, 3, 94, "Input",ExpressionUUID->"31473832-1b3e-4feb-9476-fa165b39ef5b"],
+Cell[200950, 5399, 323, 10, 54, "Output",ExpressionUUID->"49c964a7-ca37-4ece-b767-4725d6cd726d"],
+Cell[201276, 5411, 325, 10, 54, "Output",ExpressionUUID->"aff9ab87-5ee7-4424-a8c5-9003da78ed6a"],
+Cell[201604, 5423, 797, 25, 55, "Output",ExpressionUUID->"7255aa0b-c54c-4726-b608-3a1e1ec73f55"],
+Cell[202404, 5450, 8020, 207, 415, "Output",ExpressionUUID->"7676935b-3e9e-423c-9495-99c76e7836d8"]
+}, Closed]],
+Cell[210439, 5660, 2361, 65, 237, "Input",ExpressionUUID->"17600b0b-71c8-4b17-9c49-9fa20ea3d684"],
+Cell[CellGroupData[{
+Cell[212825, 5729, 218, 3, 94, "Input",ExpressionUUID->"acc3ef55-c9ff-41e2-a5ce-951fcf403a30"],
+Cell[213046, 5734, 323, 10, 54, "Output",ExpressionUUID->"b58e0eea-b86b-4b4d-9af9-0514d9cec5b3"],
+Cell[213372, 5746, 323, 10, 54, "Output",ExpressionUUID->"5cae39f8-cd31-4f16-9795-7943f4a5fa19"],
+Cell[213698, 5758, 797, 25, 55, "Output",ExpressionUUID->"89c26d17-1c70-4219-a637-da8fbe3ce30e"],
+Cell[214498, 5785, 8023, 206, 415, "Output",ExpressionUUID->"6e5ebac0-5967-47da-8716-e7ea61df247a"]
+}, Closed]],
+Cell[222536, 5994, 2273, 63, 237, "Input",ExpressionUUID->"b64b8f87-82c8-4857-a557-001146451746"],
+Cell[CellGroupData[{
+Cell[224834, 6061, 218, 3, 94, "Input",ExpressionUUID->"04bbc492-9b94-415e-a91d-f36d5b545005"],
+Cell[225055, 6066, 325, 10, 54, "Output",ExpressionUUID->"14f63c8c-5f9d-4ceb-940c-502703daeac5"],
+Cell[225383, 6078, 302, 9, 54, "Output",ExpressionUUID->"b269e7ef-8a34-43b6-a7be-907a76c65945"],
+Cell[225688, 6089, 808, 25, 55, "Output",ExpressionUUID->"fae7b65b-0f03-4de9-bfa9-ffbfc4ebcf53"],
+Cell[226499, 6116, 8018, 207, 415, "Output",ExpressionUUID->"b70b5df9-83b0-4ee9-aa8c-5d2d741914f3"]
+}, Closed]],
+Cell[234532, 6326, 2307, 64, 237, "Input",ExpressionUUID->"ccddb553-b79e-4e2f-b2e8-37d92e711b60"],
+Cell[CellGroupData[{
+Cell[236864, 6394, 218, 3, 94, "Input",ExpressionUUID->"5e22bb0e-cc8d-4d2c-8d89-8696ac48023c"],
+Cell[237085, 6399, 325, 10, 54, "Output",ExpressionUUID->"1d1aff26-c11b-498f-a281-4edca3f48b8e"],
+Cell[237413, 6411, 302, 9, 54, "Output",ExpressionUUID->"fe1b4903-a745-4370-a850-2eb30e49b07e"],
+Cell[237718, 6422, 808, 25, 55, "Output",ExpressionUUID->"c0401559-5133-43a1-95d9-2c147aeac684"],
+Cell[238529, 6449, 8021, 206, 415, "Output",ExpressionUUID->"69980d33-68ef-4bc7-8483-e5f3624dc2f2"]
+}, Closed]],
+Cell[246565, 6658, 2309, 64, 237, "Input",ExpressionUUID->"b793fa34-3995-4321-8821-1b621911c453"],
+Cell[CellGroupData[{
+Cell[248899, 6726, 284, 4, 94, "Input",ExpressionUUID->"f84ff2cc-9ea3-4b80-b650-9f55fc0f9050"],
+Cell[249186, 6732, 323, 10, 54, "Output",ExpressionUUID->"c06349b5-a8e5-4a9d-9151-70897cbad86c"],
+Cell[249512, 6744, 304, 9, 54, "Output",ExpressionUUID->"f6e999f4-5535-4229-b523-b56222e09ce5"],
+Cell[249819, 6755, 797, 25, 55, "Output",ExpressionUUID->"e26cd2b4-0fcd-4c1a-bc01-8ecb0c2ab4db"],
+Cell[250619, 6782, 8018, 207, 415, "Output",ExpressionUUID->"9657c170-36b8-411d-8b6b-3d6276292375"]
+}, Closed]],
+Cell[258652, 6992, 2313, 64, 237, "Input",ExpressionUUID->"904d1e14-4906-4fe4-96f1-2666b54aee06"],
+Cell[CellGroupData[{
+Cell[260990, 7060, 218, 3, 94, "Input",ExpressionUUID->"ccf4c247-cfe0-485b-8f60-c5cb1c2404f2"],
+Cell[261211, 7065, 323, 10, 54, "Output",ExpressionUUID->"eb569226-c832-4d1b-bd18-8c78de3ac024"],
+Cell[261537, 7077, 302, 9, 54, "Output",ExpressionUUID->"4c4d179c-6005-4a69-869b-32e6c3d44696"],
+Cell[261842, 7088, 797, 25, 55, "Output",ExpressionUUID->"122f04a8-3049-4ef7-812a-dedea2b60c56"],
+Cell[262642, 7115, 8020, 206, 415, "Output",ExpressionUUID->"b4ca1d9c-4431-4e3d-bafa-ac054aac2ca1"]
+}, Closed]],
+Cell[270677, 7324, 206, 4, 69, "Input",ExpressionUUID->"748f33a8-75a3-45ad-8268-03283d31b0cc"],
+Cell[270886, 7330, 10811, 300, 1480, "Input",ExpressionUUID->"decca2b0-8e15-4e87-a985-d5712b125d5f"],
+Cell[281700, 7632, 477, 11, 94, "Input",ExpressionUUID->"4563076e-3246-46f7-97bc-73b664b8307f"],
+Cell[282180, 7645, 299, 7, 30, "Input",ExpressionUUID->"0bc98909-fe56-4051-8545-05a60ebbbb32"],
+Cell[CellGroupData[{
+Cell[282504, 7656, 1732, 49, 136, "Input",ExpressionUUID->"c2b37f9c-dad4-4307-af24-d9a0d850bff4"],
+Cell[284239, 7707, 492, 13, 54, "Output",ExpressionUUID->"0053d0e2-0989-4bdf-b06a-f9d1922adf20"],
+Cell[284734, 7722, 450, 11, 54, "Output",ExpressionUUID->"43fbcf8e-8599-42a1-bfcc-4516bc717d3d"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[285221, 7738, 1710, 48, 136, "Input",ExpressionUUID->"93d4e542-71cc-4953-af8e-c169abe35c37"],
+Cell[286934, 7788, 473, 12, 54, "Output",ExpressionUUID->"3293794e-373e-45b0-88e3-12a28b10e6d4"],
+Cell[287410, 7802, 473, 12, 54, "Output",ExpressionUUID->"105e4034-56e9-4119-976c-1771ee3f4d7e"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[287920, 7819, 239, 5, 30, "Input",ExpressionUUID->"8f69032e-381e-4355-9ee9-143e3faa4659"],
+Cell[288162, 7826, 370, 11, 54, "Output",ExpressionUUID->"395e9ca9-8a54-41e6-b00a-82e661c745b9"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[288569, 7842, 240, 5, 30, "Input",ExpressionUUID->"82dd246c-415e-4947-89d4-a9492a7c08d0"],
+Cell[288812, 7849, 494, 11, 34, "Output",ExpressionUUID->"439827f5-7f37-45eb-a6db-4f44bbe16d70"]
+}, Open  ]],
+Cell[289321, 7863, 280, 5, 136, "Input",ExpressionUUID->"46f1ab6d-937e-4ec4-ac8d-bff28579c110"],
+Cell[CellGroupData[{
+Cell[289626, 7872, 522, 11, 115, "Input",ExpressionUUID->"39596f69-54b3-4502-bc9a-e27bb48d3f41"],
+Cell[290151, 7885, 227, 4, 34, "Output",ExpressionUUID->"391ef8fa-412a-4103-98ac-6efb4aca67ca"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[290415, 7894, 1285, 35, 73, "Input",ExpressionUUID->"b34e4af8-5a92-4433-91fe-7fe2aaea58e5"],
+Cell[CellGroupData[{
+Cell[291725, 7933, 538, 13, 44, "Print",ExpressionUUID->"036d06c3-d736-46a4-85af-321881037012"],
+Cell[292266, 7948, 2309, 57, 145, "Print",ExpressionUUID->"7f092130-65a6-48f6-a225-c9cb2c9bf4af"],
+Cell[294578, 8007, 888, 20, 47, "Print",ExpressionUUID->"74d09005-80d4-4eb5-b2ad-db0c1a75acc8"],
+Cell[295469, 8029, 286, 5, 24, "Print",ExpressionUUID->"b274558c-4e4b-4c44-9c4c-5fbe2460bcbc"],
+Cell[295758, 8036, 1295, 30, 49, "Print",ExpressionUUID->"3221b609-dcc3-4da4-a3e3-9f5bc8e7bbf2"]
+}, Open  ]]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[297102, 8072, 1328, 31, 52, "Input",ExpressionUUID->"9fd3d5e6-8ffa-493a-8595-d6d0d780805f"],
+Cell[298433, 8105, 1174, 29, 56, "Output",ExpressionUUID->"fa64eb15-5601-48dd-a605-5df7944ad9aa"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[299644, 8139, 3933, 119, 199, "Input",ExpressionUUID->"5ded4345-d664-4ac5-9642-1b00a0681b1c"],
+Cell[303580, 8260, 720, 12, 34, "Output",ExpressionUUID->"1a1d7ca1-25cc-4fb7-8df5-582cc32ec06c"]
+}, Open  ]],
+Cell[304315, 8275, 213, 5, 30, "Input",ExpressionUUID->"5b66fb87-293a-4ef7-bff7-0d09631bb6d8"],
+Cell[CellGroupData[{
+Cell[304553, 8284, 1385, 38, 73, "Input",ExpressionUUID->"a821d5f4-c947-47d0-a68d-88efb3b8dd3d"],
+Cell[CellGroupData[{
+Cell[305963, 8326, 741, 16, 44, "Print",ExpressionUUID->"bdd84ee5-e5de-4399-85d7-f620c7667877"],
+Cell[306707, 8344, 2513, 60, 145, "Print",ExpressionUUID->"3939f696-ad00-464e-8f62-39d979d7c35d"],
+Cell[309223, 8406, 1085, 23, 47, "Print",ExpressionUUID->"44d8caf9-61b8-46aa-972d-67abe87916ae"],
+Cell[310311, 8431, 488, 8, 24, "Print",ExpressionUUID->"2f29d13e-6df9-4305-9cb5-665b6f5790de"],
+Cell[310802, 8441, 1497, 33, 49, "Print",ExpressionUUID->"dbcfd14d-2210-4c86-b316-c61c776b7076"]
+}, Open  ]]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[312348, 8480, 1016, 26, 52, "Input",ExpressionUUID->"edd720c6-62d1-4267-aae0-a0e8be2f9c5d"],
+Cell[313367, 8508, 949, 23, 34, "Output",ExpressionUUID->"3fcfdace-e39d-40f0-931d-65df47dc584f"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[314353, 8536, 3761, 117, 199, "Input",ExpressionUUID->"f9a36ccc-6bbb-4713-9d83-1c7447160476"],
+Cell[318117, 8655, 582, 9, 34, "Output",ExpressionUUID->"aa7d22b9-3036-4d75-b2d0-18fc747a8a8d"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[318736, 8669, 207, 4, 30, "Input",ExpressionUUID->"36eb691a-1df8-413f-a81b-b5d04d022935"],
+Cell[318946, 8675, 416, 7, 34, "Output",ExpressionUUID->"fdfb1397-fb23-4c7c-8c83-b32a045efe7a"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[319399, 8687, 181, 3, 30, "Input",ExpressionUUID->"7f66cd20-d1e8-4ca7-a221-9ff39aca36aa"],
+Cell[319583, 8692, 294, 5, 34, "Output",ExpressionUUID->"335e2f70-756c-4dba-8305-8a636f2cf6ae"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[319914, 8702, 208, 4, 30, "Input",ExpressionUUID->"809aadb6-16f8-4cc9-bd6f-1d91f28835f9"],
+Cell[320125, 8708, 445, 8, 34, "Output",ExpressionUUID->"25057792-749b-4102-83c6-f9f495295eec"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[320607, 8721, 210, 4, 30, "Input",ExpressionUUID->"f8772f15-8b4e-49fe-a3b6-236dbafe3613"],
+Cell[320820, 8727, 446, 8, 34, "Output",ExpressionUUID->"57e8dfd9-908a-48b6-8d80-cf22e344347f"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[321303, 8740, 208, 4, 30, "Input",ExpressionUUID->"aa43aae6-fbd8-489b-b700-ebe9d437a84b"],
+Cell[321514, 8746, 255, 4, 34, "Output",ExpressionUUID->"d2d8c151-4c04-472d-91db-93581375244f"]
+}, Open  ]],
+Cell[321784, 8753, 217, 5, 30, "Input",ExpressionUUID->"b20f7e47-3fac-4864-a7ff-e1acd3f6092a"],
+Cell[CellGroupData[{
+Cell[322026, 8762, 253, 5, 30, "Input",ExpressionUUID->"c82ec215-95ed-4d74-990c-6d27d1f70484"],
+Cell[322282, 8769, 11282, 301, 166, "Output",ExpressionUUID->"d2eb5bb5-ca40-4bc9-8035-0ad20d7444eb"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[333601, 9075, 1727, 46, 115, "Input",ExpressionUUID->"cd9723fe-5ae1-425a-ab81-ebf4322d7796"],
+Cell[CellGroupData[{
+Cell[335353, 9125, 489, 12, 44, "Print",ExpressionUUID->"2d451221-0c8c-4a6d-900e-eef366e55a07"],
+Cell[335845, 9139, 2261, 56, 145, "Print",ExpressionUUID->"446afc90-b7d9-40f2-a649-5b1fb0898ef2"],
+Cell[338109, 9197, 838, 19, 47, "Print",ExpressionUUID->"445e2145-d7ab-4474-817e-fca7d8921e18"],
+Cell[338950, 9218, 239, 4, 24, "Print",ExpressionUUID->"576e6130-cb63-4d40-9fa7-06ce080bbda8"],
+Cell[339192, 9224, 1247, 29, 49, "Print",ExpressionUUID->"5eb1a54c-f688-440b-9825-8273a1dadee7"]
+}, Open  ]]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[340488, 9259, 1239, 33, 73, "Input",ExpressionUUID->"36a40cc7-40c3-4807-8617-acf13576bbcd"],
+Cell[341730, 9294, 917, 23, 37, "Output",ExpressionUUID->"92cd9b5e-a716-4e44-bd0a-1880c41e59e9"],
+Cell[342650, 9319, 799, 20, 37, "Output",ExpressionUUID->"7bbae190-812f-49ad-a656-5a73f8176dd3"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[343486, 9344, 3539, 111, 199, "Input",ExpressionUUID->"12f49268-37df-4130-a29f-0ba951bf6635"],
+Cell[347028, 9457, 1771, 44, 134, "Output",ExpressionUUID->"1a999a2c-24e4-458b-9240-da9ed516f81d"],
+Cell[348802, 9503, 2555, 88, 176, "Output",ExpressionUUID->"2fb42af8-da7f-4552-9e3b-9bbf57fab2ce"],
+Cell[351360, 9593, 1770, 44, 134, "Output",ExpressionUUID->"a3d1a0f7-2104-419a-a290-17d0866e267d"],
+Cell[353133, 9639, 455, 8, 34, "Output",ExpressionUUID->"49cf19f7-b5ca-4da2-a2fc-4505f8717f09"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[353625, 9652, 1982, 56, 136, "Input",ExpressionUUID->"ac44598b-9a1a-4e52-85ef-2d23a5904111"],
+Cell[CellGroupData[{
+Cell[355632, 9712, 515, 13, 44, "Print",ExpressionUUID->"672b46d5-b182-43d6-9ad5-74e89857e3af"],
+Cell[356150, 9727, 2289, 57, 145, "Print",ExpressionUUID->"05058169-5587-47d7-967f-cefedf01eb4f"],
+Cell[358442, 9786, 861, 20, 47, "Print",ExpressionUUID->"4097f6e5-fc74-4212-ac6e-bd19306fd20d"],
+Cell[359306, 9808, 266, 5, 24, "Print",ExpressionUUID->"bbc2f3b7-c6b3-4828-b1af-c4fcbecd6b32"],
+Cell[359575, 9815, 1273, 30, 49, "Print",ExpressionUUID->"28ddf3b3-c3f9-4cf3-ba05-02312cd12f5c"]
+}, Open  ]],
+Cell[360863, 9848, 818, 22, 34, "Output",ExpressionUUID->"61209ac1-6811-4927-8d5d-7e002a9c297f"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[361718, 9875, 4248, 130, 241, "Input",ExpressionUUID->"0e414578-8bf7-48dd-aa07-72f420f87330"],
+Cell[365969, 10007, 700, 19, 34, "Output",ExpressionUUID->"82608b25-bb9e-46a9-bc23-8896e03febd6"],
+Cell[366672, 10028, 1580, 41, 128, "Output",ExpressionUUID->"85a4546b-1e22-4f24-a959-89ef205f1685"],
+Cell[368255, 10071, 2372, 85, 176, "Output",ExpressionUUID->"501d3523-5b39-4f6b-bfc6-43c241646426"],
+Cell[370630, 10158, 1580, 41, 128, "Output",ExpressionUUID->"22c8d040-d710-4aca-89d1-17964cf0761b"],
+Cell[372213, 10201, 269, 5, 34, "Output",ExpressionUUID->"200f382c-f9d9-46dd-9e7e-396321b66395"]
+}, Open  ]],
+Cell[372497, 10209, 283, 7, 30, "Input",ExpressionUUID->"6bd9d4e3-c0eb-46c8-9ee1-2cc1a6f9f551"],
+Cell[CellGroupData[{
+Cell[372805, 10220, 214, 4, 30, "Input",ExpressionUUID->"7dc2aeaf-1eea-4790-86f2-2e38260ef446"],
+Cell[373022, 10226, 295, 5, 34, "Output",ExpressionUUID->"d9baed4e-4c27-4541-baf9-0d1e1b49c1fc"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[373354, 10236, 345, 8, 73, "Input",ExpressionUUID->"65d1e451-71c5-4a37-bb29-1ec9c57d89ad"],
+Cell[373702, 10246, 297, 5, 34, "Output",ExpressionUUID->"719d6feb-e988-4831-acc0-7728ca02e7e1"]
+}, Open  ]],
+Cell[374014, 10254, 304, 6, 157, "Input",ExpressionUUID->"d8336dbe-baca-4c43-98ec-e9fa0e90ceb9"],
+Cell[374321, 10262, 278, 7, 30, "Input",ExpressionUUID->"dbe86d55-f903-4c16-aba8-5c64dcd510d8"],
+Cell[374602, 10271, 1029, 28, 136, "Input",ExpressionUUID->"ff902789-8764-47df-ae19-f8e2732cb693"],
+Cell[CellGroupData[{
+Cell[375656, 10303, 179, 3, 30, "Input",ExpressionUUID->"d259943e-df1a-4b8b-8ce1-f2d8a1c6ce82"],
+Cell[375838, 10308, 10966, 291, 176, "Output",ExpressionUUID->"bb81f3e0-43b8-4bed-817f-ab833c1db0b0"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[386841, 10604, 1221, 35, 73, "Input",ExpressionUUID->"9a3f574a-cd45-430d-9f41-9143c899f3d3"],
+Cell[CellGroupData[{
+Cell[388087, 10643, 587, 14, 44, "Print",ExpressionUUID->"e1dd3184-93ea-45aa-aa66-1a51baff8344"],
+Cell[388677, 10659, 2359, 58, 145, "Print",ExpressionUUID->"b6238ca4-e65e-4f5a-bd6a-19cc70b7cf87"],
+Cell[391039, 10719, 936, 21, 47, "Print",ExpressionUUID->"7ea31f10-d118-4022-958f-dcfbd6a2e3e6"],
+Cell[391978, 10742, 339, 6, 24, "Print",ExpressionUUID->"7d84e7e6-71cc-43f9-9858-0a9b757f59cd"],
+Cell[392320, 10750, 1345, 31, 49, "Print",ExpressionUUID->"b73767c3-0d6c-4d3c-9cfa-7190669995d9"]
+}, Open  ]]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[393714, 10787, 293, 6, 30, "Input",ExpressionUUID->"ec103b6d-ad9b-47f5-99fb-35d0c73242fa"],
+Cell[394010, 10795, 423, 13, 54, "Output",ExpressionUUID->"599c636a-94ac-45e2-a43b-d95245d19773"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[394470, 10813, 295, 6, 30, "Input",ExpressionUUID->"45cc03ff-8a7f-40ac-841b-fac68c59dfd0"],
+Cell[394768, 10821, 398, 12, 54, "Output",ExpressionUUID->"fa0863bb-51d4-49fd-8e52-b516b20cfd16"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[395203, 10838, 295, 6, 30, "Input",ExpressionUUID->"cb245ba0-2d36-4576-abbc-86da611f6661"],
+Cell[395501, 10846, 400, 12, 54, "Output",ExpressionUUID->"cc3b366f-3f8c-4cef-8228-4595152eed95"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[395938, 10863, 291, 6, 30, "Input",ExpressionUUID->"2adefc70-ad32-4777-bd90-01f6585fa801"],
+Cell[396232, 10871, 519, 12, 34, "Output",ExpressionUUID->"2f8c6836-a4f2-4ad0-847a-191b528ee79f"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[396788, 10888, 892, 24, 52, "Input",ExpressionUUID->"38863738-22eb-4821-ade8-5e59b57cc6c8"],
+Cell[397683, 10914, 895, 22, 37, "Output",ExpressionUUID->"daf16945-ab0d-4374-a527-378da92f56c0"]
+}, Open  ]],
+Cell[398593, 10939, 206, 4, 73, "Input",ExpressionUUID->"dd96acf9-8569-436c-b71f-3858bc812dc3"],
+Cell[CellGroupData[{
+Cell[398824, 10947, 1287, 36, 73, "Input",ExpressionUUID->"587fed01-95ad-4497-9991-22e72c5df35e"],
+Cell[CellGroupData[{
+Cell[400136, 10987, 612, 14, 44, "Print",ExpressionUUID->"efbe9be0-242a-48f2-9e42-649dcc6e39f0"],
+Cell[400751, 11003, 2384, 58, 145, "Print",ExpressionUUID->"b773131b-d503-4156-81c4-b9207d5e08b7"],
+Cell[403138, 11063, 956, 21, 47, "Print",ExpressionUUID->"87a2822b-b3de-47cc-ad5e-c06152d2025e"],
+Cell[404097, 11086, 359, 6, 24, "Print",ExpressionUUID->"37c34993-2e48-4495-a764-802de147d2dd"],
+Cell[404459, 11094, 1368, 31, 49, "Print",ExpressionUUID->"aaee04cf-3b7e-430f-bbef-6bfe3a0c933c"]
+}, Open  ]]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[405876, 11131, 176, 4, 30, "Input",ExpressionUUID->"9e8c3495-09ad-4ff0-bd7d-92eff7ebc1d8"],
+Cell[406055, 11137, 347, 10, 54, "Output",ExpressionUUID->"d28a7c93-4ace-4140-baec-5db8c913a946"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[406439, 11152, 244, 5, 30, "Input",ExpressionUUID->"bea8deb0-f558-4fba-b807-f39d09047f9c"],
+Cell[406686, 11159, 495, 11, 34, "Output",ExpressionUUID->"0f2458d3-6748-4204-8103-24c778a58b4c"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[407218, 11175, 842, 23, 52, "Input",ExpressionUUID->"4a273c30-f8fc-46d1-9ea4-2dc3bb5d38c9"],
+Cell[408063, 11200, 846, 22, 37, "Output",ExpressionUUID->"f9a5dd89-b566-4f2b-bac6-dc1b86c8af04"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[408946, 11227, 185, 3, 30, "Input",ExpressionUUID->"64119c6d-52f2-400d-81ef-73a3ba94f23d"],
+Cell[409134, 11232, 822, 21, 37, "Output",ExpressionUUID->"756fccae-313a-4aa3-b142-b34d21036023"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[409993, 11258, 187, 3, 30, "Input",ExpressionUUID->"a16290ff-6778-41a3-b359-246f67aeefaa"],
+Cell[410183, 11263, 792, 20, 37, "Output",ExpressionUUID->"29952b1b-a847-4460-9afd-dae006ceafb7"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[411012, 11288, 405, 10, 30, "Input",ExpressionUUID->"9729c16f-542c-4583-8d8f-dcb1f9899ee7"],
+Cell[411420, 11300, 411, 7, 34, "Output",ExpressionUUID->"ef1bda56-f590-49ec-bc2a-44f732a3ba4b"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[411868, 11312, 354, 9, 30, "Input",ExpressionUUID->"24ccfcaf-f4d5-4902-81e0-8d38403763c1"],
+Cell[412225, 11323, 411, 7, 34, "Output",ExpressionUUID->"1395b6cf-0254-469b-8225-3f3eaecd64b3"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[412673, 11335, 404, 10, 30, "Input",ExpressionUUID->"1c4d588d-8302-4258-81e3-4cedb485f7da"],
+Cell[413080, 11347, 444, 7, 34, "Output",ExpressionUUID->"287f41c7-e872-480d-b818-0bc23a2fa987"]
+}, Open  ]],
+Cell[413539, 11357, 399, 7, 199, "Input",ExpressionUUID->"c51d1221-86c4-4ebd-b3ad-4106585b9017"],
+Cell[413941, 11366, 362, 9, 30, "Input",ExpressionUUID->"9cd25044-4f41-49e4-80f5-08d29278cb00"],
+Cell[414306, 11377, 1032, 27, 136, "Input",ExpressionUUID->"d5a9b7bd-37b9-4af8-bb12-857996b7a8bc"],
+Cell[CellGroupData[{
+Cell[415363, 11408, 1217, 34, 73, "Input",ExpressionUUID->"9331fb0d-1fec-43e2-9850-030fbd7bdf66"],
+Cell[CellGroupData[{
+Cell[416605, 11446, 488, 12, 44, "Print",ExpressionUUID->"37427144-5f1a-4b3d-944b-84388f7e1424"],
+Cell[417096, 11460, 2262, 56, 145, "Print",ExpressionUUID->"4113965a-4b28-4369-abec-86637ae21960"],
+Cell[419361, 11518, 837, 19, 47, "Print",ExpressionUUID->"6948dff3-27cb-48e8-897b-75fa8905a448"],
+Cell[420201, 11539, 237, 4, 24, "Print",ExpressionUUID->"bc9fdf3f-b30b-492d-8e1d-5cf2f61575b8"],
+Cell[420441, 11545, 1248, 29, 49, "Print",ExpressionUUID->"ab68cde6-c968-40c5-b689-0e2e516ef784"]
+}, Open  ]]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[421738, 11580, 794, 22, 52, "Input",ExpressionUUID->"bdc583a4-5ce8-4ab5-954b-e4753cc14645"],
+Cell[422535, 11604, 751, 20, 34, "Output",ExpressionUUID->"ba033732-01ca-402b-a434-8b7ef10663bc"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[423323, 11629, 1282, 35, 73, "Input",ExpressionUUID->"57bf9ad6-d97b-4e31-af95-23eb640aeccb"],
+Cell[CellGroupData[{
+Cell[424630, 11668, 469, 12, 44, "Print",ExpressionUUID->"10539cf1-126a-4c72-b496-8ac1181292c2"],
+Cell[425102, 11682, 2241, 56, 145, "Print",ExpressionUUID->"822935a9-5e2c-4540-b675-dca51a34b286"],
+Cell[427346, 11740, 813, 19, 47, "Print",ExpressionUUID->"82640b1c-5511-4c11-aba6-7d7985183a89"],
+Cell[428162, 11761, 218, 4, 24, "Print",ExpressionUUID->"faa1baf7-d09d-4147-bb38-4bd4cd6ef2d8"],
+Cell[428383, 11767, 1225, 29, 49, "Print",ExpressionUUID->"56ae6788-1369-4e9a-b9a1-a2adf28ceea9"]
+}, Open  ]]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[429657, 11802, 793, 22, 52, "Input",ExpressionUUID->"fbd4fe0e-70d6-47b4-91d4-1664cc7ae429"],
+Cell[430453, 11826, 705, 19, 34, "Output",ExpressionUUID->"c2ef6ce0-85e1-4e60-a32a-1bb1af029bea"]
+}, Open  ]],
+Cell[431173, 11848, 234, 5, 94, "Input",ExpressionUUID->"fdb1e515-144b-467e-85db-8127246e82de"],
+Cell[CellGroupData[{
+Cell[431432, 11857, 180, 2, 30, "Input",ExpressionUUID->"4bc31ae3-5bab-415c-b562-5422473e4a79"],
+Cell[431615, 11861, 703, 19, 34, "Output",ExpressionUUID->"20d0a29e-c20e-455b-82f9-a6a0181524eb"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[432355, 11885, 181, 2, 30, "Input",ExpressionUUID->"0fee63fd-0f7d-4f37-be22-0ee9f0b2dd29"],
+Cell[432539, 11889, 703, 19, 34, "Output",ExpressionUUID->"4de8bf7b-7b18-4fbe-a1b4-434a2cfdc5ca"]
+}, Open  ]],
+Cell[433257, 11911, 230, 4, 30, "Input",ExpressionUUID->"d100b567-08ac-45a3-ab1c-7102d980edd8"],
+Cell[CellGroupData[{
+Cell[433512, 11919, 318, 7, 30, "Input",ExpressionUUID->"2004d05a-8fd9-4279-8da7-5e8db6d0b1cb"],
+Cell[433833, 11928, 286, 4, 34, "Output",ExpressionUUID->"038a004b-d5d8-41b1-aa13-9f3bccce7a2d"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[434156, 11937, 326, 8, 30, "Input",ExpressionUUID->"3305c7cc-fb1d-4b01-8589-30f8bfb10617"],
+Cell[434485, 11947, 263, 4, 34, "Output",ExpressionUUID->"c7d59eaa-a5dc-4b43-8b0d-0328f5c09e45"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[434785, 11956, 284, 7, 30, "Input",ExpressionUUID->"61457d60-4f76-43a6-bd82-ebd9fb01124b"],
+Cell[435072, 11965, 262, 4, 34, "Output",ExpressionUUID->"685f977c-0479-4d99-befc-e84b48b144ff"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[435371, 11974, 326, 8, 30, "Input",ExpressionUUID->"918adda1-1e50-4075-960c-15c32f887de8"],
+Cell[435700, 11984, 263, 4, 34, "Output",ExpressionUUID->"5652226d-c974-4d4d-b620-6fcddd790365"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[436000, 11993, 503, 10, 115, "Input",ExpressionUUID->"ced44b95-e225-49ad-9c83-b351a616e504"],
+Cell[436506, 12005, 1908, 56, 97, "Output",ExpressionUUID->"52898082-c750-4891-86b9-e3e06ee9c662"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[438451, 12066, 408, 9, 30, "Input",ExpressionUUID->"71e5daec-bf03-47b2-b536-dbd0414e542c"],
+Cell[438862, 12077, 615, 14, 52, "Output",ExpressionUUID->"5b505cff-d5bb-42a3-853e-4163fc1a29d9"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[439514, 12096, 177, 2, 30, "Input",ExpressionUUID->"c25bd516-0c47-432b-90fe-27e455bbc0dd"],
+Cell[439694, 12100, 608, 13, 34, "Output",ExpressionUUID->"1942b838-851d-4a1f-8d51-8982c4e0bb98"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[440339, 12118, 177, 2, 30, "Input",ExpressionUUID->"700f0e27-c33f-4e8e-ba2e-3543e6248bf5"],
+Cell[440519, 12122, 588, 12, 34, "Output",ExpressionUUID->"dbebf7d3-afff-4491-89d6-99e2e2c958cf"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[441144, 12139, 287, 5, 30, "Input",ExpressionUUID->"63ad1626-8781-4e3f-9591-d8528ececcd8"],
+Cell[441434, 12146, 270, 4, 34, "Output",ExpressionUUID->"022e836e-e6b2-4d1c-bfdd-4b758f49462e"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[441741, 12155, 236, 4, 30, "Input",ExpressionUUID->"a371a893-d044-4e82-bd67-be5b40741382"],
+Cell[441980, 12161, 230, 4, 34, "Output",ExpressionUUID->"6c231317-1e6f-4e59-b41f-bb17b4d83b99"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[442247, 12170, 238, 4, 30, "Input",ExpressionUUID->"ef7d683b-4e10-4d26-9dd6-72279ff9244a"],
+Cell[442488, 12176, 230, 4, 34, "Output",ExpressionUUID->"3b3eb906-3b2f-4ff9-819a-39a88193f844"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[442755, 12185, 178, 2, 30, "Input",ExpressionUUID->"de45a5ed-a569-453b-824b-26f93985d288"],
+Cell[442936, 12189, 288, 8, 54, "Output",ExpressionUUID->"9c205819-8029-4260-ae8b-88d0e2b6ba6b"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[443261, 12202, 178, 2, 30, "Input",ExpressionUUID->"3cac72c0-8845-4679-9a9d-8d4f40d62660"],
+Cell[443442, 12206, 309, 9, 54, "Output",ExpressionUUID->"1df39c7d-0608-43f2-926b-eae7e2d5bb10"]
+}, Open  ]],
+Cell[443766, 12218, 280, 5, 136, "Input",ExpressionUUID->"51cb99be-3353-4392-9fd3-c37ee91d1816"],
+Cell[444049, 12225, 1954, 57, 94, "Input",ExpressionUUID->"3a2dff3b-cd15-4082-a16f-231d41830801"],
+Cell[CellGroupData[{
+Cell[446028, 12286, 455, 10, 30, "Input",ExpressionUUID->"4717edd2-5164-4d8f-a082-259fc17a14ef"],
+Cell[446486, 12298, 1000, 32, 59, "Output",ExpressionUUID->"c471d1a0-08f6-4e63-8c58-4c380016123b"]
+}, Open  ]],
+Cell[447501, 12333, 254, 6, 30, "Input",ExpressionUUID->"c016de82-2b4d-46da-8883-dca8d81b33b0"],
+Cell[447758, 12341, 395, 7, 30, "Input",ExpressionUUID->"2fb8be8e-1cd2-4ebe-ace8-84dfab624c1d"],
+Cell[CellGroupData[{
+Cell[448178, 12352, 178, 2, 30, "Input",ExpressionUUID->"ea64cda5-c0db-4d48-bd78-995d33d2e89b"],
+Cell[448359, 12356, 285, 8, 54, "Output",ExpressionUUID->"a788202c-d2a1-489b-9a50-5e867195c907"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[448681, 12369, 178, 2, 30, "Input",ExpressionUUID->"63d668d8-464b-44a0-acf7-ed8fa5574d82"],
+Cell[448862, 12373, 307, 9, 54, "Output",ExpressionUUID->"0a77be4d-16d7-4417-9174-3eaeec3d0943"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[449206, 12387, 415, 10, 30, "Input",ExpressionUUID->"7f476354-b099-4fce-95e1-c8e3da1d445d"],
+Cell[449624, 12399, 1232, 40, 59, "Output",ExpressionUUID->"232606ee-180f-4a6b-aae6-1505ac26d9aa"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[450893, 12444, 464, 11, 30, "Input",ExpressionUUID->"3bf9eee7-e9ce-4b9d-b371-a004db7dba36"],
+Cell[451360, 12457, 1279, 42, 59, "Output",ExpressionUUID->"9f6de44a-3816-436f-9eed-c65579e853f2"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[452676, 12504, 371, 9, 30, "Input",ExpressionUUID->"018d3a63-8c00-4393-8f48-5ea31ee4fb47"],
+Cell[453050, 12515, 225, 4, 34, "Output",ExpressionUUID->"8ec26b8c-6895-465b-9a6d-f28a9c1bb157"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[453312, 12524, 419, 10, 30, "Input",ExpressionUUID->"4a04a25c-7a5b-4d1e-9e39-cea69507a2ea"],
+Cell[453734, 12536, 335, 10, 49, "Output",ExpressionUUID->"a324f332-3291-4f3e-984c-5d19e66452d6"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[454106, 12551, 322, 8, 30, "Input",ExpressionUUID->"bb85de51-cb56-4b22-9b3f-72f33e2fe91d"],
+Cell[454431, 12561, 406, 11, 49, "Output",ExpressionUUID->"e34418a3-f287-4a25-be8b-b35bb3ba3b75"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[454874, 12577, 356, 9, 30, "Input",ExpressionUUID->"a15db554-c750-416a-bf8e-43f7fa7fe829"],
+Cell[455233, 12588, 278, 5, 34, "Output",ExpressionUUID->"82c233c3-0b0a-4a45-b5b8-037c03555249"]
+}, Open  ]],
+Cell[455526, 12596, 1356, 32, 94, "Input",ExpressionUUID->"13982953-6398-495a-82b4-9ddfe24a4bd0"],
+Cell[456885, 12630, 152, 3, 30, "Input",ExpressionUUID->"3b604925-2d87-477a-bbab-bc72b933b86f"],
+Cell[CellGroupData[{
+Cell[457062, 12637, 1297, 27, 52, "Input",ExpressionUUID->"be40774a-645c-401d-8678-e778f53524dc"],
+Cell[458362, 12666, 1028, 24, 56, "Output",ExpressionUUID->"d057959b-fd6e-407e-a0d3-91ee53705fdb"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[459427, 12695, 229, 4, 30, "Input",ExpressionUUID->"b635f1ba-43a8-4c64-8caf-41485e8e6349"],
+Cell[459659, 12701, 292, 9, 54, "Output",ExpressionUUID->"ab0d6b89-a1b1-46d4-a6ce-1e0b2b245a9b"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[459988, 12715, 179, 3, 30, "Input",ExpressionUUID->"5b4e5bfd-5043-4c2d-9f8e-3843d808a535"],
+Cell[460170, 12720, 313, 10, 54, "Output",ExpressionUUID->"7c43f9c1-01c0-4b8a-9438-16c48fc51e47"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[460520, 12735, 180, 3, 30, "Input",ExpressionUUID->"309b1dba-9aff-4ed0-af22-d4ab58554b8a"],
+Cell[460703, 12740, 1138, 39, 59, "Output",ExpressionUUID->"f750153f-f59e-4943-8b0c-9ba1d1f0930f"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[461878, 12784, 180, 3, 30, "Input",ExpressionUUID->"a01ded67-4f83-4bf3-a6a9-6a26bb859e2b"],
+Cell[462061, 12789, 1158, 40, 59, "Output",ExpressionUUID->"92916bb6-be68-46d5-9db8-ffc0d29947f0"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[463256, 12834, 244, 5, 30, "Input",ExpressionUUID->"e28d7b30-a554-477f-831b-c87e01beca4d"],
+Cell[463503, 12841, 203, 4, 34, "Output",ExpressionUUID->"0ca7de0d-d882-4ed8-8d04-fc4574b40098"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[463743, 12850, 825, 20, 30, "Input",ExpressionUUID->"04d4dbd7-9c46-485e-9f84-becb80b9d603"],
+Cell[464571, 12872, 341, 9, 34, "Output",ExpressionUUID->"79e04ef4-1b59-4535-992c-e4424203720a"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[464949, 12886, 723, 18, 30, "Input",ExpressionUUID->"6ecab3de-355f-4fd7-a4bd-167b5ec80b28"],
+Cell[465675, 12906, 301, 7, 34, "Output",ExpressionUUID->"858cefaf-42e8-42f3-9ed9-cb66408eea6e"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[466013, 12918, 3318, 99, 304, "Input",ExpressionUUID->"e7aff029-b2d6-497e-8d41-fe171c216a43"],
+Cell[469334, 13019, 495, 13, 54, "Output",ExpressionUUID->"8a0962be-605f-4f68-8afd-f3832246e4b6"],
+Cell[469832, 13034, 476, 12, 54, "Output",ExpressionUUID->"45641c61-b419-4a5d-844e-cda62d80939b"],
+Cell[470311, 13048, 453, 11, 54, "Output",ExpressionUUID->"28740e7a-3602-491c-a46f-a2287e2eb0d6"]
+}, Open  ]]
+}
+]
+*)
+
diff --git a/scripts/X_LoopRefining.nb b/scripts/X_LoopRefining.nb
new file mode 100644
index 0000000000000000000000000000000000000000..66b1387005ad21891579649f58ac5b122a4e5013
--- /dev/null
+++ b/scripts/X_LoopRefining.nb
@@ -0,0 +1,102934 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 11.3' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[       158,          7]
+NotebookDataLength[   4726639,     102926]
+NotebookOptionsPosition[   4684580,     102379]
+NotebookOutlinePosition[   4684933,     102395]
+CellTagsIndexPosition[   4684890,     102392]
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[
+ RowBox[{"(*", " ", 
+  RowBox[{
+   RowBox[{
+    RowBox[{
+     RowBox[{"ggHgg_X", ".", "m"}], "\[IndentingNewLine]", " ", 
+     RowBox[{"Process", ":", " ", 
+      RowBox[{"g", " ", "+", " ", "g"}]}]}], " ", "\[Rule]", " ", 
+    RowBox[{"H", " ", "+", " ", "g", " ", "+", " ", 
+     RowBox[{"g", "\[IndentingNewLine]", 
+      RowBox[{"Model", ":", " ", "SMQCD"}]}]}]}], ",", " ", 
+   RowBox[{
+   "Last", " ", "Modified", " ", "June", " ", "2019", "\[IndentingNewLine]", 
+    "Created", " ", 
+    RowBox[{"by", ":", " ", 
+     RowBox[{
+      RowBox[{"J", ".", "G", ".", "Reyes"}], " ", "Rivera"}]}]}]}], " ", 
+  "*)"}]], "Input",
+ CellChangeTimes->{{3.7483460640690107`*^9, 3.748346128736135*^9}, {
+  3.7505322064466867`*^9, 3.7505322096193037`*^9}, {3.750685818525031*^9, 
+  3.7506858187985888`*^9}, {3.750685862467576*^9, 3.750685862527199*^9}, {
+  3.7513081531132383`*^9, 3.751308157253491*^9}, {3.761295781705222*^9, 
+  3.761295787067747*^9}, {3.7640060179701233`*^9, 3.7640060182815123`*^9}, {
+  3.769416168255188*^9, 
+  3.769416171052967*^9}},ExpressionUUID->"a9eb43f9-c437-4ff0-ae8b-\
+eb31f4d06b38"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{"Needs", "[", "\"\<X`\>\"", "]"}], "\n", 
+ RowBox[{"<<", "FA2X.m"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"SetDirectory", "[", 
+   RowBox[{"NotebookDirectory", "[", "]"}], "]"}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{"NotebookSave", "[", "]"}]}], "Input",
+ CellChangeTimes->{{3.7694157567375174`*^9, 3.7694157651420507`*^9}, {
+  3.7694161379556293`*^9, 3.769416138416831*^9}, {3.7694161826886263`*^9, 
+  3.769416192145475*^9}, {3.769416241287668*^9, 3.769416242139756*^9}, {
+  3.769421884524377*^9, 3.769421889789727*^9}},
+ CellLabel->"In[5]:=",ExpressionUUID->"aa6e76d2-ec10-49c0-b6e0-1dd4d91b1a18"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["\<\"\\!\\(\\*TemplateBox[List[\\\"\\\\\\\"Package-X v2.1.1, by \
+Hiren H. Patel\\\\\\\\nFor more information, see the \\\\\\\"\\\", \
+TemplateBox[List[\\\"\\\\\\\"guide\\\\\\\"\\\", \\\"paclet:X/guide/PackageX\\\
+\"], \\\"HyperlinkPaclet\\\"]], \\\"RowDefault\\\"]\\)\"\>"], "Print",
+ CellChangeTimes->{
+  3.769416150674975*^9, 3.769416194267857*^9, {3.769416231919112*^9, 
+   3.7694162425484037`*^9}, {3.769420646545596*^9, 3.7694206583152533`*^9}, 
+   3.769425025413766*^9, 3.769945290179131*^9, 3.7699517202962923`*^9, 
+   3.7699519650062838`*^9, 3.770010676869535*^9, {3.770096629754195*^9, 
+   3.7700966433220797`*^9}, 3.772884479178385*^9, 3.7728856240450077`*^9, 
+   3.77288581666254*^9, 3.7728886845903807`*^9, 3.772964841769395*^9, 
+   3.773141652951313*^9, 3.773740327500822*^9, 3.774370903034319*^9, 
+   3.774370966666355*^9, 3.7752319005419207`*^9, 3.7752337152035227`*^9, 
+   3.775489088564049*^9, 3.775489245308648*^9, 3.7754897453429413`*^9, 
+   3.7754904657230673`*^9, 3.775821105497553*^9, {3.775823186450994*^9, 
+   3.775823195188353*^9}, 3.775826214916897*^9, 3.775827858966928*^9, 
+   3.7758411073958178`*^9, 3.775926802671126*^9, 3.775927750035071*^9, 
+   3.775932731190497*^9, 3.7759341459918737`*^9, 3.77593515116796*^9, 
+   3.775936044112349*^9, 3.7760066135848923`*^9, 3.7760084074827023`*^9, 
+   3.776163794536191*^9, 3.776164765694577*^9, 3.776165477011409*^9, 
+   3.7761725151431007`*^9, 3.776439045651415*^9, 3.776442806151732*^9, 
+   3.776704970731813*^9, 3.7767651458445473`*^9, 3.776769048440855*^9, 
+   3.7767696718636227`*^9, 3.776769782959084*^9, 3.77677107630024*^9, 
+   3.7767848686859093`*^9, 3.7770392950048313`*^9, 3.778239119647573*^9, 
+   3.77851079981749*^9},
+ CellLabel->
+  "During evaluation of \
+In[5]:=",ExpressionUUID->"9d8d0d32-258e-459a-8da1-f1a084891668"],
+
+Cell[BoxData["\<\"FA2X by Kirtimaan Mohan \\n email: kamohan@msu.edu \\n \
+version 1.1 \\n 10/03/2019 \\n Not optimized! Possibly lots of bugs!!!\"\>"], \
+"Print",
+ CellChangeTimes->{
+  3.769416150674975*^9, 3.769416194267857*^9, {3.769416231919112*^9, 
+   3.7694162425484037`*^9}, {3.769420646545596*^9, 3.7694206583152533`*^9}, 
+   3.769425025413766*^9, 3.769945290179131*^9, 3.7699517202962923`*^9, 
+   3.7699519650062838`*^9, 3.770010676869535*^9, {3.770096629754195*^9, 
+   3.7700966433220797`*^9}, 3.772884479178385*^9, 3.7728856240450077`*^9, 
+   3.77288581666254*^9, 3.7728886845903807`*^9, 3.772964841769395*^9, 
+   3.773141652951313*^9, 3.773740327500822*^9, 3.774370903034319*^9, 
+   3.774370966666355*^9, 3.7752319005419207`*^9, 3.7752337152035227`*^9, 
+   3.775489088564049*^9, 3.775489245308648*^9, 3.7754897453429413`*^9, 
+   3.7754904657230673`*^9, 3.775821105497553*^9, {3.775823186450994*^9, 
+   3.775823195188353*^9}, 3.775826214916897*^9, 3.775827858966928*^9, 
+   3.7758411073958178`*^9, 3.775926802671126*^9, 3.775927750035071*^9, 
+   3.775932731190497*^9, 3.7759341459918737`*^9, 3.77593515116796*^9, 
+   3.775936044112349*^9, 3.7760066135848923`*^9, 3.7760084074827023`*^9, 
+   3.776163794536191*^9, 3.776164765694577*^9, 3.776165477011409*^9, 
+   3.7761725151431007`*^9, 3.776439045651415*^9, 3.776442806151732*^9, 
+   3.776704970731813*^9, 3.7767651458445473`*^9, 3.776769048440855*^9, 
+   3.7767696718636227`*^9, 3.776769782959084*^9, 3.77677107630024*^9, 
+   3.7767848686859093`*^9, 3.7770392950048313`*^9, 3.778239119647573*^9, 
+   3.778510799831684*^9},
+ CellLabel->
+  "During evaluation of \
+In[5]:=",ExpressionUUID->"52438396-54ab-417c-b161-36fd4cadc0e5"]
+}, Open  ]]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"$Assumptions", "=", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{"Element", "[", 
+      RowBox[{
+       RowBox[{"{", 
+        RowBox[{
+        "ki", ",", "k1", ",", "k2", ",", "k3", ",", "k4", ",", " ", 
+         "\[Theta]1", ",", "\[Theta]2", ",", "\[Theta]3", ",", "\[Theta]4", 
+         ",", " ", "\[Phi]1", ",", "\[Phi]2", ",", "\[Phi]3", ",", "\[Phi]4", 
+         ",", "p", ",", "MT2", ",", "GS", ",", "EL", ",", "Alfas", ",", "a1", 
+         ",", "S", ",", "T", ",", "U", ",", "MT", ",", "MH", ",", "MH2", ",", 
+         "\[Eta]4", ",", "\[Eta]3", ",", "\[Beta]"}], "}"}], ",", "Reals"}], 
+      "]"}], ",", 
+     RowBox[{"ki", ">", "0"}], " ", ",", 
+     RowBox[{"MT2", ">", "0"}], ",", 
+     RowBox[{"MT", ">", "0"}], ",", 
+     RowBox[{"MH2", ">", "0"}], ",", " ", 
+     RowBox[{"MH", ">", "0"}], ",", 
+     RowBox[{"k4", ">", "0"}], ",", 
+     RowBox[{"p", ">", "0"}], ",", 
+     RowBox[{"k3", ">", "0"}], ",", 
+     RowBox[{"k1", ">", "0"}], ",", 
+     RowBox[{"k2", ">", "0"}], ",", 
+     RowBox[{"rS", ">", "0"}], ",", 
+     RowBox[{"kT4", ">", "0"}], ",", 
+     RowBox[{"kT3", ">", "0"}], ",", 
+     RowBox[{"\[Beta]", ">", "0"}]}], "}"}]}], ";"}]], "Input",
+ CellChangeTimes->{3.7767696725954723`*^9},
+ CellLabel->"In[9]:=",ExpressionUUID->"1c12ba0e-fd6c-4b7e-8de6-2b784fa72d92"],
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{
+   RowBox[{"SubDen", ":=", 
+    RowBox[{"{", "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"Den", "[", 
+        RowBox[{"a_", ",", "b_"}], "]"}], ":>", 
+       RowBox[{"1", "/", 
+        RowBox[{"(", 
+         RowBox[{"a", "-", "b"}], ")"}]}]}], ",", "\[IndentingNewLine]", 
+      RowBox[{"MH2", "\[Rule]", 
+       RowBox[{"MH", "^", "2"}]}], ",", "\[IndentingNewLine]", 
+      RowBox[{"MT2", "\[Rule]", 
+       RowBox[{"MT", "^", "2"}]}], ",", "\[IndentingNewLine]", 
+      RowBox[{"Alfas2", "\[Rule]", 
+       RowBox[{"Alfas", "^", "2"}]}]}], "\[IndentingNewLine]", "}"}]}], ";"}],
+   "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{
+   RowBox[{"MAT", ":=", 
+    RowBox[{"{", "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"Mat", "[", 
+        RowBox[{"SUNT", "[", 
+         RowBox[{
+         "Glu1", ",", "Glu5", ",", "Glu2", ",", "Glu4", ",", "0", ",", "0"}], 
+         "]"}], "]"}], "\[Rule]", "A"}], ",", "\[IndentingNewLine]", 
+      RowBox[{
+       RowBox[{"Mat", "[", 
+        RowBox[{"SUNT", "[", 
+         RowBox[{
+         "Glu1", ",", "Glu4", ",", "Glu5", ",", "Glu2", ",", "0", ",", "0"}], 
+         "]"}], "]"}], "\[Rule]", "B"}], ",", "\[IndentingNewLine]", 
+      RowBox[{
+       RowBox[{"Mat", "[", 
+        RowBox[{"SUNT", "[", 
+         RowBox[{
+         "Glu1", ",", "Glu2", ",", "Glu5", ",", "Glu4", ",", "0", ",", "0"}], 
+         "]"}], "]"}], "\[Rule]", "C"}], ",", "\[IndentingNewLine]", 
+      RowBox[{
+       RowBox[{"Mat", "[", 
+        RowBox[{"SUNT", "[", 
+         RowBox[{
+         "Glu1", ",", "Glu4", ",", "Glu2", ",", "Glu5", ",", "0", ",", "0"}], 
+         "]"}], "]"}], "\[Rule]", "D"}], ",", "\[IndentingNewLine]", 
+      RowBox[{
+       RowBox[{"Mat", "[", 
+        RowBox[{"SUNT", "[", 
+         RowBox[{
+         "Glu1", ",", "Glu5", ",", "Glu4", ",", "Glu2", ",", "0", ",", "0"}], 
+         "]"}], "]"}], "\[Rule]", "F"}], ",", "\[IndentingNewLine]", 
+      RowBox[{
+       RowBox[{"Mat", "[", 
+        RowBox[{"SUNT", "[", 
+         RowBox[{
+         "Glu1", ",", "Glu2", ",", "Glu4", ",", "Glu5", ",", "0", ",", "0"}], 
+         "]"}], "]"}], "\[Rule]", "G"}]}], "\[IndentingNewLine]", "}"}]}], 
+   ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{
+   RowBox[{"MATColor", ":=", 
+    RowBox[{"{", "\[IndentingNewLine]", "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"A", "\[Rule]", "c3"}], " ", 
+      RowBox[{"(*", 
+       RowBox[{"Mat", "[", 
+        RowBox[{"SUNT", "[", 
+         RowBox[{
+         "Glu1", ",", "Glu5", ",", "Glu2", ",", "Glu4", ",", "0", ",", "0"}], 
+         "]"}], "]"}], "*)"}], ",", "\[IndentingNewLine]", 
+      RowBox[{"B", "\[Rule]", "c2"}], " ", 
+      RowBox[{"(*", 
+       RowBox[{"Mat", "[", 
+        RowBox[{"SUNT", "[", 
+         RowBox[{
+         "Glu1", ",", "Glu4", ",", "Glu5", ",", "Glu2", ",", "0", ",", "0"}], 
+         "]"}], "]"}], "*)"}], ",", "\[IndentingNewLine]", 
+      RowBox[{"C", "\[Rule]", "c2"}], " ", 
+      RowBox[{"(*", 
+       RowBox[{"Mat", "[", 
+        RowBox[{"SUNT", "[", 
+         RowBox[{
+         "Glu1", ",", "Glu2", ",", "Glu5", ",", "Glu4", ",", "0", ",", "0"}], 
+         "]"}], "]"}], "*)"}], ",", "\[IndentingNewLine]", 
+      RowBox[{"D", "\[Rule]", "c3"}], " ", 
+      RowBox[{"(*", 
+       RowBox[{"Mat", "[", 
+        RowBox[{"SUNT", "[", 
+         RowBox[{
+         "Glu1", ",", "Glu4", ",", "Glu2", ",", "Glu5", ",", "0", ",", "0"}], 
+         "]"}], "]"}], "*)"}], ",", "\[IndentingNewLine]", 
+      RowBox[{"F", "\[Rule]", "c1"}], " ", 
+      RowBox[{"(*", 
+       RowBox[{"Mat", "[", 
+        RowBox[{"SUNT", "[", 
+         RowBox[{
+         "Glu1", ",", "Glu5", ",", "Glu4", ",", "Glu2", ",", "0", ",", "0"}], 
+         "]"}], "]"}], "*)"}], ",", "\[IndentingNewLine]", 
+      RowBox[{"G", "\[Rule]", "c1"}]}], 
+     RowBox[{"(*", " ", 
+      RowBox[{"Mat", "[", 
+       RowBox[{"SUNT", "[", 
+        RowBox[{
+        "Glu1", ",", "Glu2", ",", "Glu4", ",", "Glu5", ",", "0", ",", "0"}], 
+        "]"}], "]"}], "*)"}], "\[IndentingNewLine]", "}"}]}], ";"}], 
+  "\[IndentingNewLine]", "\[IndentingNewLine]", 
+  RowBox[{"(*", " ", 
+   RowBox[{
+   "This", " ", "one", " ", "is", " ", "used", " ", "for", " ", "triangle", 
+    " ", "diagrams"}], " ", "*)"}]}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{
+   RowBox[{"LoopRefining", ":=", "\[IndentingNewLine]", 
+    RowBox[{"{", "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"a_", "*", 
+        RowBox[{"PVB", "[", 
+         RowBox[{"r_", ",", "n1_", ",", "s_", ",", "m0_", ",", "m1_"}], 
+         "]"}]}], "\[RuleDelayed]", 
+       RowBox[{"a", "*", 
+        RowBox[{"LoopRefine", "[", 
+         RowBox[{"PVB", "[", 
+          RowBox[{"r", ",", "n1", ",", "s", ",", "m0", ",", "m1"}], "]"}], 
+         "]"}]}]}], ",", 
+      RowBox[{
+       RowBox[{"PVB", "[", 
+        RowBox[{"r_", ",", "n1_", ",", "s_", ",", "m0_", ",", "m1_"}], "]"}], 
+       "\[RuleDelayed]", 
+       RowBox[{"LoopRefine", "[", 
+        RowBox[{"PVB", "[", 
+         RowBox[{"r", ",", "n1", ",", "s", ",", "m0", ",", "m1"}], "]"}], 
+        "]"}]}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", 
+      RowBox[{
+       RowBox[{"a_", "*", 
+        RowBox[{"PVC", "[", 
+         RowBox[{
+         "r_", ",", "n1_", ",", "n2_", ",", "s1_", ",", "s12_", ",", "s2_", 
+          ",", "m0_", ",", "m1_", ",", "m2_"}], "]"}]}], "\[RuleDelayed]", 
+       RowBox[{"a", "*", 
+        RowBox[{"LoopRefine", "[", 
+         RowBox[{"PVC", "[", 
+          RowBox[{
+          "r", ",", "n1", ",", "n2", ",", "s1", ",", "s12", ",", "s2", ",", 
+           "m0", ",", "m1", ",", "m2"}], "]"}], "]"}]}]}], ",", 
+      RowBox[{
+       RowBox[{"PVC", "[", 
+        RowBox[{
+        "r_", ",", "n1_", ",", "n2_", ",", "s1_", ",", "s12_", ",", "s2_", 
+         ",", "m0_", ",", "m1_", ",", "m2_"}], "]"}], "\[RuleDelayed]", 
+       RowBox[{"LoopRefine", "[", 
+        RowBox[{"PVC", "[", 
+         RowBox[{
+         "r", ",", "n1", ",", "n2", ",", "s1", ",", "s12", ",", "s2", ",", 
+          "m0", ",", "m1", ",", "m2"}], "]"}], "]"}]}], ",", 
+      "\[IndentingNewLine]", "\[IndentingNewLine]", 
+      RowBox[{
+       RowBox[{"a_", "*", 
+        RowBox[{"PVD", "[", 
+         RowBox[{
+         "r_", ",", "n1_", ",", "n2_", ",", "n3_", ",", "s1_", ",", "s2_", 
+          ",", "s3_", ",", "s4_", ",", "s12_", ",", "s23_", ",", "m0_", ",", 
+          "m1_", ",", "m2_", ",", "m3_"}], "]"}]}], "\[RuleDelayed]", " ", 
+       RowBox[{"a", "*", 
+        RowBox[{"LoopRefine", "[", 
+         RowBox[{"PVD", "[", 
+          RowBox[{
+          "r", ",", "n1", ",", "n2", ",", "n3", ",", "s1", ",", "s2", ",", 
+           "s3", ",", "s4", ",", "s12", ",", "s23", ",", "m0", ",", "m1", ",",
+            "m2", ",", "m3"}], "]"}], "]"}]}]}], ",", 
+      RowBox[{
+       RowBox[{"PVD", "[", 
+        RowBox[{
+        "r_", ",", "n1_", ",", "n2_", ",", "n3_", ",", "s1_", ",", "s2_", ",",
+          "s3_", ",", "s4_", ",", "s12_", ",", "s23_", ",", "m0_", ",", "m1_",
+          ",", "m2_", ",", "m3_"}], "]"}], "\[RuleDelayed]", " ", 
+       RowBox[{"LoopRefine", "[", 
+        RowBox[{"PVD", "[", 
+         RowBox[{
+         "r", ",", "n1", ",", "n2", ",", "n3", ",", "s1", ",", "s2", ",", 
+          "s3", ",", "s4", ",", "s12", ",", "s23", ",", "m0", ",", "m1", ",", 
+          "m2", ",", "m3"}], "]"}], "]"}]}]}], "\[IndentingNewLine]", "}"}]}],
+    ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
+  RowBox[{"(*", " ", 
+   RowBox[{
+   "This", " ", "one", " ", "is", " ", "used", " ", "for", " ", 
+    "ReplacementRule", " ", 
+    RowBox[{"(", "boxes", ")"}]}], " ", "*)"}]}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"LoopRef", " ", ":=", "\[IndentingNewLine]", 
+   RowBox[{"{", "\[IndentingNewLine]", 
+    RowBox[{
+     RowBox[{
+      RowBox[{
+       RowBox[{"PVC", "[", 
+        RowBox[{
+        "r_", ",", "n1_", ",", "n2_", ",", "s1_", ",", "s12_", ",", "s2_", 
+         ",", "m0_", ",", "m1_", ",", "m2_"}], "]"}], "\[RuleDelayed]", 
+       RowBox[{"LoopRefine", "[", 
+        RowBox[{"PVC", "[", 
+         RowBox[{
+         "r", ",", "n1", ",", "n2", ",", "a", ",", "b", ",", "c", ",", "d", 
+          ",", "e", ",", "f"}], "]"}], "]"}]}], "//.", " ", 
+      RowBox[{"{", 
+       RowBox[{
+        RowBox[{"a", "\[Rule]", "s1"}], ",", 
+        RowBox[{"b", "\[Rule]", "s12"}], ",", 
+        RowBox[{"c", "\[Rule]", "s2"}], ",", 
+        RowBox[{"d", "\[Rule]", "m0"}], ",", 
+        RowBox[{"e", "\[Rule]", "m1"}], ",", 
+        RowBox[{"f", "\[Rule]", "m2"}]}], "}"}]}], ",", "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"PVD", "[", 
+        RowBox[{
+        "r_", ",", "n1_", ",", "n2_", ",", "n3_", ",", "s1_", ",", "s2_", ",",
+          "s3_", ",", "s4_", ",", "s12_", ",", "s23_", ",", "m0_", ",", "m1_",
+          ",", "m2_", ",", "m3_"}], "]"}], "\[RuleDelayed]", " ", 
+       RowBox[{"LoopRefine", "[", 
+        RowBox[{"PVD", "[", 
+         RowBox[{
+         "r", ",", "n1", ",", "n2", ",", "n3", ",", "a", ",", "b", ",", "c", 
+          ",", "d", ",", "e", ",", "f", ",", "g", ",", "g", ",", "g", ",", 
+          "g"}], "]"}], "]"}]}], "//.", " ", 
+      RowBox[{"{", 
+       RowBox[{
+        RowBox[{"a", "->", "s1"}], ",", 
+        RowBox[{"b", "->", "s2"}], ",", 
+        RowBox[{"c", "->", "s3"}], ",", 
+        RowBox[{"d", "->", "s4"}], ",", 
+        RowBox[{"e", "->", "s12"}], ",", 
+        RowBox[{"f", "->", "s23"}], ",", 
+        RowBox[{"g", "->", "m0"}]}], "}"}]}]}], "\[IndentingNewLine]", 
+    "}"}]}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
+ RowBox[{"VelSub", ":=", "\[IndentingNewLine]", 
+  RowBox[{"{", "\[IndentingNewLine]", 
+   RowBox[{"S", "\[Rule]", 
+    RowBox[{"(", 
+     RowBox[{"4", "*", 
+      RowBox[{"MT", "^", "2"}], "*", 
+      RowBox[{"(", 
+       RowBox[{"1", "/", 
+        RowBox[{"(", 
+         RowBox[{"1", "-", 
+          RowBox[{"\[Beta]", "^", "2"}]}], ")"}]}], ")"}]}], ")"}]}], 
+   "\[IndentingNewLine]", "}"}]}]}], "Input",
+ CellChangeTimes->{{3.769416382706212*^9, 3.769416403306004*^9}, {
+   3.7694168727346354`*^9, 3.769416881103343*^9}, {3.769420802600919*^9, 
+   3.769420810995673*^9}, {3.770096644875188*^9, 3.770096645965609*^9}, {
+   3.7758210651486483`*^9, 3.7758210658132687`*^9}, {3.77582111300533*^9, 
+   3.775821113279359*^9}, {3.775821205496907*^9, 3.7758212488675423`*^9}, 
+   3.7758233050860357`*^9, {3.775824239182519*^9, 3.775824245114826*^9}, {
+   3.775825392549559*^9, 3.7758254194463997`*^9}, {3.7758254536359*^9, 
+   3.775825506891447*^9}, {3.776769783675538*^9, 3.7767697849573727`*^9}},
+ CellLabel->"In[10]:=",ExpressionUUID->"a5c5e12e-157e-4719-b09d-930d037e0d1b"],
+
+Cell[BoxData[""], "Input",
+ CellChangeTimes->{{3.7723616669772577`*^9, 3.77236173423746*^9}, {
+   3.772361802632022*^9, 3.772361992535933*^9}, {3.772362060474169*^9, 
+   3.772362061390603*^9}, {3.772363406580842*^9, 3.772363416170678*^9}, {
+   3.77288530089063*^9, 3.772885309640726*^9}, 
+   3.775821111773324*^9},ExpressionUUID->"7741718d-edbc-49e5-a241-\
+fb84c7107f7d"],
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"triangle", " ", "=", " ", 
+   RowBox[{"Import", "[", "\"\<ggHgg_triangle_FeynAmp_38diags.m\>\"", "]"}]}],
+   ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"triangle", " ", "=", " ", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"triangle", " ", "//.", "MAT"}], "//.", " ", "MATColor"}], " ", "//.",
+     " ", "SubDen"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"t", " ", "=", " ", 
+   RowBox[{"Collect", "[", 
+    RowBox[{
+     RowBox[{"ReleaseHold", "[", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{"HoldForm", "[", 
+          RowBox[{"Evaluate", "[", "triangle", "]"}], "]"}], " ", ")"}], "//.",
+         " ", "RIntList"}], ")"}], "]"}], ",", 
+     RowBox[{"Mat", "[", "__", "]"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"ft", "=", 
+   RowBox[{
+    RowBox[{"t", "//.", "LoopRefining"}], "//", "Refine"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"Export", "[", 
+   RowBox[{"\"\<ggHgg_LR_triangle_38diags.m\>\"", ",", "ft"}], "]"}], 
+  ";"}], "\[IndentingNewLine]"}], "Input",
+ CellChangeTimes->{{3.76941678968123*^9, 3.769416834146682*^9}, {
+   3.769418270698312*^9, 3.7694182769864492`*^9}, {3.769420598958762*^9, 
+   3.769420642106495*^9}, {3.769421602470723*^9, 3.769421736756125*^9}, {
+   3.77374127963312*^9, 3.77374128280485*^9}, 3.7737414197690268`*^9, {
+   3.7743709763737383`*^9, 3.774370977433639*^9}, 3.774371636070733*^9, {
+   3.775823239864522*^9, 3.775823240880198*^9}, {3.775823320902609*^9, 
+   3.7758233229064703`*^9}},
+ CellLabel->"In[21]:=",ExpressionUUID->"6f54e202-a28b-4a1d-9e81-76bb7154ddaa"],
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"box", "=", 
+   RowBox[{"{", 
+    RowBox[{"box1", ",", "box2", ",", "box3", ",", "box4"}], "}"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"Do", "[", "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{
+     RowBox[{
+      RowBox[{"box", "[", 
+       RowBox[{"[", "n", "]"}], "]"}], "=", 
+      RowBox[{"Import", "[", 
+       RowBox[{"\"\<ggHgg_box_\>\"", "<>", 
+        RowBox[{"ToString", "[", "n", "]"}], "<>", 
+        "\"\<_FeynAmp_9diags.m\>\""}], "]"}]}], ";", "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"box", "[", 
+       RowBox[{"[", "n", "]"}], "]"}], "=", 
+      RowBox[{
+       RowBox[{
+        RowBox[{
+         RowBox[{"box", "[", 
+          RowBox[{"[", "n", "]"}], "]"}], "//.", " ", "MAT"}], "//.", 
+        "MATColor"}], "//.", "SubDen"}]}], ";", "\[IndentingNewLine]", 
+     RowBox[{"b", " ", "=", " ", 
+      RowBox[{"Collect", "[", 
+       RowBox[{
+        RowBox[{"ReleaseHold", "[", 
+         RowBox[{"(", 
+          RowBox[{
+           RowBox[{"(", 
+            RowBox[{"HoldForm", "[", 
+             RowBox[{"Evaluate", "[", 
+              RowBox[{"box", "[", 
+               RowBox[{"[", "n", "]"}], "]"}], "]"}], "]"}], " ", ")"}], "//.",
+            " ", "RIntList"}], ")"}], "]"}], ",", 
+        RowBox[{"Mat", "[", "__", "]"}]}], "]"}]}], ";", 
+     "\[IndentingNewLine]", 
+     RowBox[{"filename", " ", "=", " ", 
+      RowBox[{"\"\<ggHgg_PV_box_\>\"", "<>", 
+       RowBox[{"ToString", "[", "n", "]"}], "<>", "\"\<_9diags.m\>\""}]}], 
+     ";", "\[IndentingNewLine]", 
+     RowBox[{"Export", "[", 
+      RowBox[{"filename", ",", "b"}], "]"}], ";"}], "\[IndentingNewLine]", 
+    ",", 
+    RowBox[{"{", 
+     RowBox[{"n", ",", 
+      RowBox[{"Length", "[", "box", "]"}]}], "}"}]}], "]"}], ";"}]}], "Input",\
+
+ CellChangeTimes->{{3.7694219183728037`*^9, 3.769422297489303*^9}, {
+  3.769504882360436*^9, 3.769505019090507*^9}, {3.7695050585606737`*^9, 
+  3.769505063515582*^9}, {3.7695052102138042`*^9, 3.769505310153926*^9}, {
+  3.769505369005875*^9, 3.769505412252503*^9}, {3.7695054443825073`*^9, 
+  3.769505451983782*^9}, {3.769945660459434*^9, 3.769945679750164*^9}, {
+  3.769946200836536*^9, 3.769946269671582*^9}, {3.773741404418676*^9, 
+  3.773741405540168*^9}, {3.775825886751739*^9, 3.775825889636293*^9}},
+ CellLabel->"In[11]:=",ExpressionUUID->"51e1abda-d831-4042-bf3b-c17c153412bc"],
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", 
+  RowBox[{"(*", " ", 
+   RowBox[{"Here", " ", "the", " ", "program", " ", 
+    RowBox[{"pv", ".", "py"}], " ", "is", " ", "used", " ", "to", " ", 
+    "produce", " ", "the", " ", "files", " ", "output", 
+    RowBox[{"#", ".", "m"}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{"(*", " ", 
+   RowBox[{"Do", ":", "\[IndentingNewLine]", "      ", 
+    RowBox[{
+     RowBox[{"python", " ", 
+      RowBox[{"pv", ".", "py"}], " ", "\"\<ggHgg_PV_#_9diags.m\>\""}], " ", 
+     "|", " ", 
+     RowBox[{
+      RowBox[{"sort", " ", "-", "u"}], " ", ">", " ", 
+      RowBox[{"output", 
+       RowBox[{"#", ".", "m"}], "       ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"manually", " ", "change", " ", "#", " ", "for", " ", "1"}], 
+         ",", "2", ",", "3", ",", "4"}], ")"}], " ", "\[IndentingNewLine]", 
+       "   ", "cat", " ", 
+       RowBox[{"output1", ".", "m"}], " ", 
+       RowBox[{"output2", ".", "m"}], " ", 
+       RowBox[{"output3", ".", "m"}], " ", 
+       RowBox[{"output4", ".", "m"}]}]}], " ", "|", " ", 
+     RowBox[{
+      RowBox[{"sort", " ", "-", "u"}], " ", ">", " ", 
+      RowBox[{"allPVs", ".", "m"}]}]}]}], "\[IndentingNewLine]", 
+   "*)"}]}]], "Input",
+ CellChangeTimes->{{3.769951408543744*^9, 3.769951516031106*^9}, {
+  3.770009459536234*^9, 3.770009522564651*^9}, {3.775826780721582*^9, 
+  3.775826781197331*^9}, {3.778510819803602*^9, 
+  3.778510820329376*^9}},ExpressionUUID->"476a37c6-482c-4f61-9ced-\
+5d80a625711e"],
+
+Cell[BoxData[
+ RowBox[{"(*", " ", 
+  RowBox[{
+   RowBox[{"438", " ", "unique", " ", "expressions"}], "..."}], " ", 
+  "*)"}]], "Input",
+ CellChangeTimes->{{3.770010869763611*^9, 
+  3.770010879310418*^9}},ExpressionUUID->"705b77c9-9d55-4c91-a174-\
+596c11435d8d"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"listPV", "=", 
+   RowBox[{"ToExpression", "[", 
+    RowBox[{"Import", "[", 
+     RowBox[{"\"\<allPVs.m\>\"", ",", "\"\<Lines\>\""}], "]"}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{"Length", "[", "listPV", "]"}]}], "Input",
+ CellChangeTimes->{{3.769946457030057*^9, 3.769946510878006*^9}, {
+   3.7699501822216883`*^9, 3.769950241652359*^9}, {3.769950448721727*^9, 
+   3.769950557949745*^9}, {3.769950617170197*^9, 3.769950624920703*^9}, {
+   3.769950677394843*^9, 3.769950679542734*^9}, {3.769950710781026*^9, 
+   3.769950747626449*^9}, {3.769951294077387*^9, 3.769951300057988*^9}, {
+   3.7699513329326878`*^9, 3.769951349592226*^9}, {3.770009442006164*^9, 
+   3.770009456522052*^9}, 3.770009533388871*^9, {3.770010860120204*^9, 
+   3.770010860297134*^9}},
+ CellLabel->"In[13]:=",ExpressionUUID->"fd0c50cb-5e3d-46b2-a09e-275f25c954a6"],
+
+Cell[BoxData["438"], "Output",
+ CellChangeTimes->{3.7728886939277277`*^9, 3.7729648477990637`*^9, 
+  3.773141703253175*^9},
+ CellLabel->"Out[14]=",ExpressionUUID->"9f7e9a1a-0e98-444b-a2d6-4f9b40f3790f"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"LRlist", "=", 
+  RowBox[{"Range", "[", "438", "]"}]}]], "Input",
+ CellChangeTimes->{{3.772886836250914*^9, 
+  3.772886843215901*^9}},ExpressionUUID->"69614acb-c767-4819-96b5-\
+beee59afcf6a"],
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", 
+  RowBox[{"(*", 
+   RowBox[{"1", "-", "73"}], "*)"}]}]], "Input",
+ CellChangeTimes->{{3.772360684428249*^9, 3.772360688933934*^9}, 
+   3.772886598217041*^9},ExpressionUUID->"f1052ac6-e6f7-4371-afd6-\
+ad461c58d053"],
+
+Cell[BoxData[
+ RowBox[{"Do", "[", "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{
+     RowBox[{"LRlist", "[", 
+      RowBox[{"[", "n", "]"}], "]"}], "=", 
+     RowBox[{"LoopRefine", "[", 
+      RowBox[{"listPV", "[", 
+       RowBox[{"[", "n", "]"}], "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
+   ",", 
+   RowBox[{"{", 
+    RowBox[{"n", ",", "73"}], "}"}]}], "]"}]], "Input",
+ CellChangeTimes->{{3.7700095396277313`*^9, 3.770009546050956*^9}, {
+   3.770010902307991*^9, 3.770010922003213*^9}, {3.770011069988926*^9, 
+   3.7700110795936203`*^9}, {3.770011149326112*^9, 3.770011156613451*^9}, {
+   3.7700112291788197`*^9, 3.77001124342817*^9}, 3.770092556097802*^9, {
+   3.770096509105474*^9, 3.7700965202949467`*^9}},
+ CellLabel->"In[11]:=",ExpressionUUID->"47c35d70-ef0a-4ee5-9de6-a89da37d395a"],
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", 
+  RowBox[{"(*", 
+   RowBox[{"74", "-", "146"}], "*)"}]}]], "Input",
+ CellChangeTimes->{{3.77236069586174*^9, 3.7723607148337317`*^9}, 
+   3.77288659631328*^9},ExpressionUUID->"e49bfcd0-2790-4662-b260-\
+1251fbf55656"],
+
+Cell[BoxData[
+ RowBox[{"Do", "[", "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{
+     RowBox[{"LRlist", "[", 
+      RowBox[{"[", 
+       RowBox[{"n", "+", "73"}], "]"}], "]"}], "=", 
+     RowBox[{"LoopRefine", "[", 
+      RowBox[{"listPV", "[", 
+       RowBox[{"[", 
+        RowBox[{"n", "+", "73"}], "]"}], "]"}], "]"}]}], ";"}], 
+   "\[IndentingNewLine]", ",", 
+   RowBox[{"{", 
+    RowBox[{"n", ",", "73"}], "}"}]}], "]"}]], "Input",
+ CellChangeTimes->{{3.770092567087772*^9, 3.770092567563299*^9}, {
+  3.770092655295905*^9, 3.770092663038951*^9}, {3.7700951188676767`*^9, 
+  3.770095120205538*^9}, {3.770096692911742*^9, 3.770096696498418*^9}},
+ CellLabel->"In[13]:=",ExpressionUUID->"7c31e5a1-c9d7-4139-bcbf-d567355f68ac"],
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", 
+  RowBox[{"(*", 
+   RowBox[{"147", "-", "219"}], "*)"}]}]], "Input",
+ CellChangeTimes->{{3.772360719354867*^9, 3.772360730955079*^9}, 
+   3.77288661329921*^9},ExpressionUUID->"df0e2446-e8a9-4c0f-ade0-\
+6243ed23f014"],
+
+Cell[BoxData[
+ RowBox[{"Do", "[", "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{
+     RowBox[{"LRlist", "[", 
+      RowBox[{"[", 
+       RowBox[{"n", "+", 
+        RowBox[{"2", "*", "73"}]}], "]"}], "]"}], "=", 
+     RowBox[{"LoopRefine", "[", 
+      RowBox[{"listPV", "[", 
+       RowBox[{"[", 
+        RowBox[{"n", "+", 
+         RowBox[{"2", "*", "73"}]}], "]"}], "]"}], "]"}]}], ";"}], 
+   "\[IndentingNewLine]", ",", 
+   RowBox[{"{", 
+    RowBox[{"n", ",", "73"}], "}"}]}], "]"}]], "Input",
+ CellChangeTimes->{{3.770096924865595*^9, 3.770096925250608*^9}, {
+  3.770097051583521*^9, 3.7700970520991364`*^9}},
+ CellLabel->"In[19]:=",ExpressionUUID->"b7439b12-cb51-47a1-a158-9fa93f157c7d"],
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", 
+  RowBox[{"(*", 
+   RowBox[{"220", "-", "292"}], "*)"}]}]], "Input",
+ CellChangeTimes->{{3.772360753433093*^9, 3.7723607635811663`*^9}, 
+   3.772886615105321*^9},ExpressionUUID->"ba9ecf49-d2ba-4baa-bc4a-\
+47072a88303d"],
+
+Cell[BoxData[
+ RowBox[{"Do", "[", "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{
+     RowBox[{"LRlist", "[", 
+      RowBox[{"[", 
+       RowBox[{"n", "+", 
+        RowBox[{"3", "*", "73"}]}], "]"}], "]"}], "=", 
+     RowBox[{"LoopRefine", "[", 
+      RowBox[{"listPV", "[", 
+       RowBox[{"[", 
+        RowBox[{"n", "+", 
+         RowBox[{"3", "*", "73"}]}], "]"}], "]"}], "]"}]}], ";"}], 
+   "\[IndentingNewLine]", ",", 
+   RowBox[{"{", 
+    RowBox[{"n", ",", "73"}], "}"}]}], "]"}]], "Input",
+ CellChangeTimes->{{3.770098878330305*^9, 3.770098880489415*^9}, 
+   3.771411006149096*^9, 
+   3.771739280516284*^9},ExpressionUUID->"c1cc9921-c84f-4990-9a13-\
+a36935fe08f6"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"LRlist", " ", "=", " ", 
+   RowBox[{"Import", "[", "\"\<analyticPV.m\>\"", "]"}]}], ";"}]], "Input",
+ CellChangeTimes->{3.772885455389707*^9},
+ CellLabel->"In[12]:=",ExpressionUUID->"b325e442-757f-4122-a460-9727e5485960"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{
+   RowBox[{"Export", "[", 
+    RowBox[{"\"\<analyticPV.m\>\"", ",", "LRlist"}], "]"}], ";"}], " ", 
+  RowBox[{"(*", " ", 
+   RowBox[{"Run", " ", "this", " ", "after", " ", "reading", " ", 
+    RowBox[{"analyticPV", ".", "m"}]}], " ", "*)"}]}]], "Input",
+ CellChangeTimes->{{3.772884594249895*^9, 3.7728846089750853`*^9}},
+ CellLabel->"In[64]:=",ExpressionUUID->"64072172-75c1-400c-b4be-a5a76fc27e9f"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{
+   "Copy", " ", "the", " ", "PVs", " ", "to", " ", "a", " ", "new", " ", 
+    "list", " ", "LRlist", " ", "what", " ", "will", " ", "be", " ", "the", 
+    " ", "\"\<LoopRefined\>\"", " ", 
+    RowBox[{"terms", "."}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{"(*", 
+   RowBox[{"293", "-", "365"}], "*)"}]}]], "Input",
+ CellChangeTimes->{{3.7728868675215187`*^9, 3.772886877363283*^9}, {
+  3.7728873184298553`*^9, 3.772887337415292*^9}, {3.775929495403804*^9, 
+  3.775929497245184*^9}},ExpressionUUID->"75ac93f2-7474-4481-b70f-\
+8b3ab1fc4f2c"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Do", "[", "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{
+     RowBox[{"LRlist", "[", 
+      RowBox[{"[", 
+       RowBox[{"n", "+", 
+        RowBox[{"4", "*", "73"}]}], "]"}], "]"}], "=", 
+     RowBox[{
+      RowBox[{"LRlist", "[", 
+       RowBox[{"[", 
+        RowBox[{"n", "+", 
+         RowBox[{"4", "*", "73"}]}], "]"}], "]"}], "//.", "LoopRef"}]}], ";", 
+    "\[IndentingNewLine]", 
+    RowBox[{"Print", "[", 
+     RowBox[{"n", "+", 
+      RowBox[{"4", "*", "73"}]}], "]"}], ";", "\[IndentingNewLine]", 
+    RowBox[{"Export", "[", 
+     RowBox[{"\"\<analyticPV.m\>\"", ",", "LRlist"}], "]"}], ";"}], 
+   "\[IndentingNewLine]", ",", " ", 
+   RowBox[{"{", 
+    RowBox[{"n", ",", "73"}], "}"}]}], "]"}]], "Input",
+ CellChangeTimes->{{3.77288694186665*^9, 3.772887010616581*^9}, {
+  3.772887072326515*^9, 3.7728871220446568`*^9}, {3.772887221297553*^9, 
+  3.772887227658811*^9}, {3.772887452365738*^9, 3.772887453395618*^9}, {
+  3.7728885491822968`*^9, 3.772888550011717*^9}},
+ CellLabel->"In[12]:=",ExpressionUUID->"df43f43c-f3df-4d31-8f47-e316129e404e"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["293"], "Print",
+ CellChangeTimes->{{3.772887221777728*^9, 3.7728872374316874`*^9}, 
+   3.772887315250904*^9, 3.772887359406661*^9, 3.77288745403798*^9, 
+   3.772888041610999*^9, 3.772888092854567*^9, 3.772888665630286*^9, 
+   3.77288870682581*^9, 3.772888739575129*^9, 3.772964867508161*^9},
+ CellLabel->
+  "During evaluation of \
+In[12]:=",ExpressionUUID->"13bb3e84-1aad-451c-9470-217fab9f697f"],
+
+Cell[BoxData["294"], "Print",
+ CellChangeTimes->{{3.772887221777728*^9, 3.7728872374316874`*^9}, 
+   3.772887315250904*^9, 3.772887359406661*^9, 3.77288745403798*^9, 
+   3.772888041610999*^9, 3.772888092854567*^9, 3.772888665630286*^9, 
+   3.77288870682581*^9, 3.772888739575129*^9, 3.7729648755876827`*^9},
+ CellLabel->
+  "During evaluation of \
+In[12]:=",ExpressionUUID->"c6fece5c-a585-4c90-ab33-806fa3705b71"]
+}, Open  ]],
+
+Cell[BoxData["$Aborted"], "Output",
+ CellChangeTimes->{3.772964876523367*^9},
+ CellLabel->"Out[12]=",ExpressionUUID->"829f296d-4387-479f-92bc-7a626dfe607c"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"PV", " ", "300", " ", "was", " ", 
+    RowBox[{"stubborn", "."}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{"LRlist", "[", 
+   RowBox[{"[", "300", "]"}], "]"}]}]], "Input",
+ CellChangeTimes->{{3.772887637509116*^9, 3.77288767378751*^9}, {
+  3.77288804979731*^9, 3.7728880669445*^9}},
+ CellLabel->"In[13]:=",ExpressionUUID->"0d3ce3b6-3c94-4932-a9ed-194cea17f2b9"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"PV300", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"PVD", "[", 
+      RowBox[{"0", ",", "1", ",", "2", ",", "0", ",", "0", ",", "a", ",", 
+       SuperscriptBox["MH", "2"], ",", "b", ",", "0", ",", "T14", ",", "g", 
+       ",", "g", ",", "g", ",", "g"}], "]"}], "//.", "LoopRef"}], "//.", 
+    RowBox[{"{", 
+     RowBox[{
+      RowBox[{"a", "\[Rule]", 
+       RowBox[{
+        SuperscriptBox["MH", "2"], "-", "S", "-", "T24", "-", "U"}]}], ",", 
+      RowBox[{"b", "->", 
+       RowBox[{
+        RowBox[{"2", " ", 
+         SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", "U"}]}], ",", 
+      RowBox[{"g", "\[Rule]", 
+       RowBox[{"Sqrt", "[", 
+        RowBox[{"MT", "^", "2"}], "]"}]}]}], "}"}]}]}], ";"}]], "Input",
+ CellChangeTimes->{{3.772887687307757*^9, 3.7728877045087748`*^9}, {
+  3.772887768481736*^9, 3.772887790741548*^9}, {3.772887834208604*^9, 
+  3.7728878601223297`*^9}, {3.7728879075747433`*^9, 3.772887957264495*^9}},
+ CellLabel->"In[59]:=",ExpressionUUID->"5a89f228-5332-4b40-9dd2-0e3e845f3970"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{
+   RowBox[{"LRlist", "[", 
+    RowBox[{"[", "300", "]"}], "]"}], " ", "=", " ", "PV300"}], 
+  ";"}]], "Input",
+ CellChangeTimes->{{3.772888005864108*^9, 3.772888014449572*^9}},
+ CellLabel->"In[60]:=",ExpressionUUID->"3a874326-a732-49f9-bf3f-018de4fbf690"],
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", 
+  RowBox[{"(*", 
+   RowBox[{"366", "-", "438"}], "*)"}]}]], "Input",
+ CellChangeTimes->{{3.772886684987542*^9, 
+  3.7728867268924503`*^9}},ExpressionUUID->"37adef6f-081e-487c-bd44-\
+ab449560d571"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Do", "[", "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{
+     RowBox[{"LRlist", "[", 
+      RowBox[{"[", 
+       RowBox[{"n", "+", 
+        RowBox[{"5", "*", "73"}]}], "]"}], "]"}], "=", 
+     RowBox[{
+      RowBox[{"LRlist", "[", 
+       RowBox[{"[", 
+        RowBox[{"n", "+", 
+         RowBox[{"5", "*", "73"}]}], "]"}], "]"}], "//.", " ", "LoopRef"}]}], 
+    ";", "\[IndentingNewLine]", 
+    RowBox[{"Print", "[", 
+     RowBox[{"n", "+", 
+      RowBox[{"5", "*", "73"}]}], "]"}], ";", "\[IndentingNewLine]", 
+    RowBox[{"Export", "[", 
+     RowBox[{"\"\<analyticPV.m\>\"", ",", "LRlist"}], "]"}], ";"}], 
+   "\[IndentingNewLine]", ",", 
+   RowBox[{"{", 
+    RowBox[{"n", ",", "73"}], "}"}]}], "]"}]], "Input",
+ CellChangeTimes->{{3.772886718627595*^9, 3.772886720721589*^9}, {
+  3.772887584696403*^9, 3.772887615370928*^9}, {3.7728902380144987`*^9, 
+  3.7728902382758827`*^9}},
+ CellLabel->"In[14]:=",ExpressionUUID->"f3c0843b-be94-4b77-89a7-a517bd2df868"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["366"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772964891668998*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"e2ec887b-8f74-4c58-b508-8180d0a5ab39"],
+
+Cell[BoxData["367"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772964898888381*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"37e2fbaf-ebf4-468b-9e07-64d66403941b"],
+
+Cell[BoxData["368"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.7729649060929813`*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"2e78dfd3-252a-4510-977f-b4f27ff8aa4b"],
+
+Cell[BoxData["369"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772964913212573*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"a0e44cf6-a61f-449f-8a34-2c8ce9d266f3"],
+
+Cell[BoxData["370"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772964920354567*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"a931e414-5259-4e72-acd7-dcee07599a82"],
+
+Cell[BoxData["371"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772964927557357*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"5594c2a5-c197-4faf-9ffb-e7ba76cbc538"],
+
+Cell[BoxData["372"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772964934685068*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"8ecef3ea-5555-4307-bcb5-45617481fea4"],
+
+Cell[BoxData["373"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.7729649417991037`*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"84060125-ad1a-4df3-8ce7-b2dbb52a255e"],
+
+Cell[BoxData["374"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772964949054049*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"ba89847a-a4aa-4bc8-bbdf-fc4fe94626a9"],
+
+Cell[BoxData["375"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772964956219346*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"4ad9a298-9033-4f95-ba31-e459488b2078"],
+
+Cell[BoxData["376"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.7729649633964767`*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"0f51e120-6ffe-40ed-90a9-16ffc4b8cd7b"],
+
+Cell[BoxData["377"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.7729649705714684`*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"55f10a7d-2dd2-42de-9c51-a8b42913981b"],
+
+Cell[BoxData["378"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772964977704796*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"4f770da7-96cd-4cb8-a4d4-ac8321d712cd"],
+
+Cell[BoxData["379"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772964984930636*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"649189dd-7c36-4840-a8f2-e90ccecbefc1"],
+
+Cell[BoxData["380"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772964992039103*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"69c8ff97-a48c-433d-a1af-293c970ff456"],
+
+Cell[BoxData["381"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772964999150893*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"e5097cc9-3fd7-4356-82cc-935a8fd99f37"],
+
+Cell[BoxData["382"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.7729650063531103`*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"2a4fa068-31d2-42b2-8e27-9cd47a215300"],
+
+Cell[BoxData["383"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965013586713*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"d4490842-541b-4159-b08b-37254e2f02ee"],
+
+Cell[BoxData["384"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965020837448*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"0ae6d1ae-d897-40b7-83ac-03676d9405d7"],
+
+Cell[BoxData["385"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965027975287*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"dd1f2688-2c0e-4ed6-aa9d-d7b634519be6"],
+
+Cell[BoxData["386"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.77296503511196*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"28b3e938-3807-4e3b-9426-e708dcec15b0"],
+
+Cell[BoxData["387"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965042224675*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"b68ca497-f2d7-495a-b577-5f5f7cc0b776"],
+
+Cell[BoxData["388"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965049469451*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"d67f7e5b-0500-4072-a004-7f5c73342e3a"],
+
+Cell[BoxData["389"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965056584694*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"ce08a793-ce51-4874-b4c7-0d99e3e47784"],
+
+Cell[BoxData["390"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965063705216*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"fbbc2328-d686-4169-8a45-f2f916e0d9d2"],
+
+Cell[BoxData["391"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.7729650707852077`*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"1cb44eb4-a5e3-4f09-a2dc-7ed04f4bcf1f"],
+
+Cell[BoxData["392"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965078094244*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"622b5b19-decc-4b43-aecb-2a18b830f72c"],
+
+Cell[BoxData["393"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.7729650851741037`*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"f6dc26ef-5813-4857-bfe4-c26b87bc1f7b"],
+
+Cell[BoxData["394"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965092240261*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"2d3735df-91e7-4795-8dfd-6ed011d79107"],
+
+Cell[BoxData["395"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.7729651000320807`*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"50fe601d-1b2b-4d2e-807b-1d249afe001e"],
+
+Cell[BoxData["396"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.7729651072457933`*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"2fdfacbd-80ef-4c9a-b71f-e2cc0d9afe5e"],
+
+Cell[BoxData["397"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965114382185*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"da85be8b-7972-4185-b906-d61dc785a9fd"],
+
+Cell[BoxData["398"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.7729651214583406`*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"1c79d656-868a-4326-8d0a-2659691bbe1c"],
+
+Cell[BoxData["399"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965128592004*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"efa41b92-f275-451a-ac92-19e0f0f8ac9d"],
+
+Cell[BoxData["400"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.7729651357337923`*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"37e28f01-8fd3-4b48-b1b2-21df0a6ba950"],
+
+Cell[BoxData["401"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965142812318*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"e844650c-6ee0-4b56-bc47-625127c32e2b"],
+
+Cell[BoxData["402"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.7729651498997393`*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"29f611a5-3fe6-49ea-ba52-f894c5b962a5"],
+
+Cell[BoxData["403"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965156982112*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"0d1b53d7-40d6-416f-87a6-b7b7a755e497"],
+
+Cell[BoxData["404"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.7729651641069736`*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"dcd3c150-23ea-4f93-8005-bdd7678c1c03"],
+
+Cell[BoxData["405"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965171237117*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"fe002903-a338-4ec6-ab39-693bb8f32eff"],
+
+Cell[BoxData["406"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.7729651784048862`*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"34a03c80-9c4e-4fcb-b5ff-f3ff0cb1f223"],
+
+Cell[BoxData["407"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965185467684*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"6cb0347b-630c-40c9-be5c-e11d214769dc"],
+
+Cell[BoxData["408"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.7729651925712223`*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"0815e5f7-0b7c-4ceb-83e7-8cfc79826245"],
+
+Cell[BoxData["409"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965199745579*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"92f96f11-b3a8-42e5-98e6-6fee3c21c719"],
+
+Cell[BoxData["410"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965206835451*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"f5dc0de3-7380-4b70-b0d3-54def93aedd4"],
+
+Cell[BoxData["411"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.7729652139667263`*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"a1701a3b-5ef3-47a9-95a2-d8e512233777"],
+
+Cell[BoxData["412"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965221097117*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"4097feba-7377-4752-bb38-a0921cc43c71"],
+
+Cell[BoxData["413"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965228246559*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"dd3dbaf1-61f0-453b-9b9a-36874206af99"],
+
+Cell[BoxData["414"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.7729652353241167`*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"40b1ffb0-1c9e-42ee-9160-2930f36cdfaa"],
+
+Cell[BoxData["415"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.7729652423967*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"191f384d-858c-4d19-92a6-40c39817d766"],
+
+Cell[BoxData["416"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.77296524948139*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"0ad5044a-36b0-4d57-a03e-5b3764fa61c2"],
+
+Cell[BoxData["417"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965256898061*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"777e0a58-0441-45aa-bb77-379de521b4ea"],
+
+Cell[BoxData["418"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965264013151*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"26958225-f0de-4b0d-8418-1d0e741744db"],
+
+Cell[BoxData["419"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965271160746*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"aa153189-1719-4ec3-a6c4-faeae6eb825e"],
+
+Cell[BoxData["420"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965278275385*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"ad84b383-b8b6-4501-8354-e87c74b4fe47"],
+
+Cell[BoxData["421"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965285455348*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"fb83c3a6-a8b1-4afc-8465-6456a8260a4f"],
+
+Cell[BoxData["422"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.77296529252765*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"cd5fc969-87ec-41e9-8094-20cb832c0cf2"],
+
+Cell[BoxData["423"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965299605927*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"8f96c2e7-a606-44fd-9bd3-787dbc3507ca"],
+
+Cell[BoxData["424"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965306700017*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"1cb89dfe-425a-4c52-9b55-b4a6014c9852"],
+
+Cell[BoxData["425"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965313880247*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"ef7f8635-cadc-4f02-9e3b-547e00252d2e"],
+
+Cell[BoxData["426"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965321075293*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"4f79ee0d-259f-4d53-809b-53a89f702a3d"],
+
+Cell[BoxData["427"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965328169883*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"886f8afa-5606-4059-8b26-d7d6af479013"],
+
+Cell[BoxData["428"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.77296533642483*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"cd7e7c7e-efdb-40bf-ae88-e79e89aee24f"],
+
+Cell[BoxData["429"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965344088553*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"f3dba259-3e90-4a75-828b-055cb49c87c8"],
+
+Cell[BoxData["430"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.7729653522431707`*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"37b1dcf0-6b49-4eb5-b721-89fc56a828df"],
+
+Cell[BoxData["431"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965360769515*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"5f7c8d38-0599-40f0-9972-0a6d5997ecbf"],
+
+Cell[BoxData["432"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965369070016*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"69c00823-96b0-4daa-9990-36f08fb6ce56"],
+
+Cell[BoxData["433"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965377127087*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"fb97acd4-1d96-4a85-8bc6-3305a839a3da"],
+
+Cell[BoxData["434"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965387417776*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"43bad5b4-c421-419d-9915-1b67c66f1036"],
+
+Cell[BoxData["435"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965394992403*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"f5846949-e47a-4e77-914f-0a8f50e06332"],
+
+Cell[BoxData["436"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965402651409*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"6a5ef075-fa3d-4ad6-b501-a5cb532fd6f5"],
+
+Cell[BoxData["437"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965410672473*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"ee5772c0-100c-4ff4-83b0-096fcfc8e2a6"],
+
+Cell[BoxData["438"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.7729654227478647`*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"fec2f95e-20ad-473c-80c7-bfbc2b46c85f"]
+}, Closed]]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"PV", " ", "406", " ", "was", " ", 
+    RowBox[{"stubborn", "."}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{"LRlist", "[", 
+   RowBox[{"[", "406", "]"}], "]"}]}]], "Input",
+ CellChangeTimes->{{3.772963340774973*^9, 3.772963345560577*^9}, {
+  3.772963519403051*^9, 
+  3.7729635244305058`*^9}},ExpressionUUID->"083fb79c-daba-4277-b94e-\
+78bed80412be"],
+
+Cell[BoxData[
+ RowBox[{"PVD", "[", 
+  RowBox[{"1", ",", "0", ",", "1", ",", "0", ",", "0", ",", 
+   RowBox[{
+    SuperscriptBox["MH", "2"], "-", "S", "-", "T24", "-", "U"}], ",", 
+   SuperscriptBox["MH", "2"], ",", 
+   RowBox[{
+    RowBox[{"2", " ", 
+     SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", "U"}], ",", "0", 
+   ",", "T14", ",", 
+   SqrtBox[
+    SuperscriptBox["MT", "2"]], ",", 
+   SqrtBox[
+    SuperscriptBox["MT", "2"]], ",", 
+   SqrtBox[
+    SuperscriptBox["MT", "2"]], ",", 
+   SqrtBox[
+    SuperscriptBox["MT", "2"]]}], "]"}]], "Output",
+ CellChangeTimes->{{3.772963343468006*^9, 3.772963372862679*^9}},
+ CellLabel->"Out[29]=",ExpressionUUID->"21437e94-a2d0-4030-9577-1fb730a2c01b"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"PV406", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"PVD", "[", 
+      RowBox[{"1", ",", "0", ",", "1", ",", "0", ",", "0", ",", "a", ",", 
+       SuperscriptBox["MH", "2"], ",", "b", ",", "0", ",", "T14", ",", "g", 
+       ",", "g", ",", "g", ",", "g"}], "]"}], "//.", "LoopRef"}], "//.", 
+    RowBox[{"{", 
+     RowBox[{
+      RowBox[{"a", "\[Rule]", 
+       RowBox[{
+        SuperscriptBox["MH", "2"], "-", "S", "-", "T24", "-", "U"}]}], ",", 
+      RowBox[{"b", "->", 
+       RowBox[{
+        RowBox[{"2", " ", 
+         SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", "U"}]}], ",", 
+      RowBox[{"g", "\[Rule]", 
+       RowBox[{"Sqrt", "[", 
+        RowBox[{"MT", "^", "2"}], "]"}]}]}], "}"}]}]}], ";"}]], "Input",
+ CellChangeTimes->{{3.7729633514518003`*^9, 3.772963361873694*^9}},
+ CellLabel->"In[30]:=",ExpressionUUID->"c9749ffe-5ab8-4c9a-aef7-8af3843d725b"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{
+   RowBox[{"LRlist", "[", 
+    RowBox[{"[", "406", "]"}], "]"}], " ", "=", " ", "PV406"}], 
+  ";"}]], "Input",
+ CellChangeTimes->{{3.772963424367772*^9, 3.772963429904943*^9}},
+ CellLabel->"In[32]:=",ExpressionUUID->"2d6ff57e-8bdd-4f5e-9772-e77bcbd1d8d0"],
+
+Cell[BoxData["\[IndentingNewLine]"], "Input",
+ CellChangeTimes->{
+  3.773141712723225*^9},ExpressionUUID->"2239b8d8-532e-4c08-ac3b-\
+e377a166b460"],
+
+Cell[BoxData[
+ RowBox[{"(*", " ", 
+  RowBox[{
+  "Define", " ", "the", " ", "replacement", " ", "of", " ", "al", " ", "PV", 
+   " ", "coefficients", " ", "for", " ", "their", " ", "analytical", " ", 
+   RowBox[{"expansion", "."}]}], " ", "*)"}]], "Input",
+ CellChangeTimes->{{3.773741455033848*^9, 
+  3.77374148857545*^9}},ExpressionUUID->"e40759ab-7c04-4bf0-a25e-\
+f80786106946"],
+
+Cell[BoxData[{
+ RowBox[{"SetAttributes", "[", 
+  RowBox[{"f", ",", "Listable"}], "]"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"f", "[", 
+   RowBox[{"a_", ",", "b_"}], "]"}], ":=", 
+  RowBox[{"a", "\[Rule]", "b"}]}]}], "Input",
+ CellChangeTimes->{{3.773141715006895*^9, 3.7731417742477217`*^9}},
+ CellLabel->"In[15]:=",ExpressionUUID->"007158c3-a206-4cab-88ec-886b70f30fed"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"replacement", "=", 
+  RowBox[{"f", "[", 
+   RowBox[{"listPV", ",", "LRlist"}], "]"}]}]], "Input",
+ CellChangeTimes->{{3.7731417783694973`*^9, 3.773141825995413*^9}},
+ CellLabel->"In[18]:=",ExpressionUUID->"743fd8ff-17f3-49f2-85d6-506c6d73e5ad"],
+
+Cell[BoxData[
+ InterpretationBox[
+  TagBox[
+   FrameBox[GridBox[{
+      {
+       ItemBox[
+        TagBox[
+         RowBox[{"{", 
+          RowBox[{
+           RowBox[{
+            RowBox[{"PVC", "[", 
+             RowBox[{"0", ",", "0", ",", "0", ",", "0", ",", 
+              RowBox[{
+               SuperscriptBox["MH", "2"], "-", "S", "-", "T24", "-", "U"}], 
+              ",", "T", ",", 
+              SqrtBox[
+               SuperscriptBox["MT", "2"]], ",", 
+              SqrtBox[
+               SuperscriptBox["MT", "2"]], ",", 
+              SqrtBox[
+               SuperscriptBox["MT", "2"]]}], "]"}], "\[Rule]", 
+            RowBox[{
+             RowBox[{"-", 
+              FractionBox[
+               SuperscriptBox[
+                RowBox[{"Log", "[", 
+                 FractionBox[
+                  RowBox[{
+                   RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                   SqrtBox[
+                    TemplateBox[{"1"},
+                    "OutputSizeLimit`Skeleton"]]}], 
+                  RowBox[{"2", " ", 
+                   SuperscriptBox["MT", "2"]}]], "]"}], "2"], 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", "T24", 
+                  "-", "U"}], ")"}]}]]}], "+", 
+             FractionBox[
+              SuperscriptBox[
+               RowBox[{"Log", "[", 
+                FractionBox[
+                 RowBox[{
+                  RowBox[{"-", 
+                   SuperscriptBox["MH", "2"]}], "+", 
+                  TemplateBox[{"4"},
+                   "OutputSizeLimit`Skeleton"], "+", 
+                  SqrtBox[
+                   TemplateBox[{"1"},
+                    "OutputSizeLimit`Skeleton"]]}], 
+                 RowBox[{"2", " ", 
+                  SuperscriptBox["MT", "2"]}]], "]"}], "2"], 
+              RowBox[{"2", " ", 
+               RowBox[{"(", 
+                RowBox[{
+                 SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", "T24", 
+                 "-", "U"}], ")"}]}]]}]}], ",", 
+           TemplateBox[{"436"},
+            "OutputSizeLimit`Skeleton"], ",", 
+           RowBox[{
+            RowBox[{"PVD", "[", 
+             RowBox[{"1", ",", "1", ",", "0", ",", "0", ",", 
+              SuperscriptBox["MH", "2"], ",", "T24", ",", "0", ",", "0", ",", 
+              
+              RowBox[{
+               SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", "T14"}], 
+              ",", "T", ",", 
+              SqrtBox[
+               SuperscriptBox["MT", "2"]], ",", 
+              SqrtBox[
+               SuperscriptBox["MT", "2"]], ",", 
+              SqrtBox[
+               SuperscriptBox["MT", "2"]], ",", 
+              SqrtBox[
+               SuperscriptBox["MT", "2"]]}], "]"}], "\[Rule]", 
+            RowBox[{
+             RowBox[{"-", 
+              FractionBox[
+               RowBox[{"T", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", "T14"}],
+                  ")"}], " ", 
+                RowBox[{"DiscB", "[", 
+                 RowBox[{"T", ",", 
+                  SqrtBox[
+                   SuperscriptBox["MT", "2"]], ",", 
+                  SqrtBox[
+                   SuperscriptBox["MT", "2"]]}], "]"}]}], 
+               RowBox[{"4", " ", 
+                RowBox[{"Kibble\[Phi]", "[", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], ",", "T24", ",", "0", ",", "0", 
+                  ",", 
+                  RowBox[{
+                   SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", 
+                   "T14"}], ",", "T"}], "]"}]}]]}], "-", 
+             FractionBox[
+              TemplateBox[{"1"},
+               "OutputSizeLimit`Skeleton"], 
+              TemplateBox[{"1"},
+               "OutputSizeLimit`Skeleton"]], "+", 
+             TemplateBox[{"6"},
+              "OutputSizeLimit`Skeleton"], "+", 
+             TemplateBox[{"1"},
+              "OutputSizeLimit`Skeleton"], "-", 
+             FractionBox[
+              RowBox[{"T", " ", 
+               TemplateBox[{"2"},
+                "OutputSizeLimit`Skeleton"], " ", 
+               RowBox[{"ScalarD0", "[", 
+                RowBox[{"0", ",", 
+                 TemplateBox[{"8"},
+                  "OutputSizeLimit`Skeleton"], ",", 
+                 SqrtBox[
+                  SuperscriptBox["MT", "2"]]}], "]"}]}], 
+              RowBox[{"8", " ", 
+               SuperscriptBox[
+                TemplateBox[{"1"},
+                 "OutputSizeLimit`Skeleton"], "2"]}]]}]}]}], "}"}],
+         Short[#, 5]& ],
+        BaseStyle->{Deployed -> False},
+        StripOnInput->False]},
+      {GridBox[{
+         {
+          TagBox[
+           TooltipBox[
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource[
+                "FEStrings", "sizeBriefExplanation"], StandardForm],
+               ImageSizeCache->{58., {2., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLText",
+             StripOnInput->False],
+            StyleBox[
+             DynamicBox[
+              ToBoxes[
+               FEPrivate`FrontEndResource["FEStrings", "sizeExplanation"], 
+               StandardForm]], DynamicUpdating -> True, StripOnInput -> 
+             False]],
+           Annotation[#, 
+            Style[
+             Dynamic[
+              FEPrivate`FrontEndResource["FEStrings", "sizeExplanation"]], 
+             DynamicUpdating -> True], "Tooltip"]& ], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowLess"], 
+                StandardForm],
+               ImageSizeCache->{50., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowLess"], 
+                StandardForm],
+               ImageSizeCache->{50., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           
+           ButtonFunction:>OutputSizeLimit`ButtonFunction[
+            OutputSizeLimit`Defer, 18, 17463603852504468309, 5/2],
+           Enabled->True,
+           Evaluator->Automatic,
+           Method->"Queued"], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowMore"], 
+                StandardForm],
+               ImageSizeCache->{56., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowMore"], 
+                StandardForm],
+               ImageSizeCache->{56., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           
+           ButtonFunction:>OutputSizeLimit`ButtonFunction[
+            OutputSizeLimit`Defer, 18, 17463603852504468309, 5 2],
+           Enabled->True,
+           Evaluator->Automatic,
+           Method->"Queued"], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowAll"], 
+                StandardForm],
+               ImageSizeCache->{42., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowAll"], 
+                StandardForm],
+               ImageSizeCache->{42., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           
+           ButtonFunction:>OutputSizeLimit`ButtonFunction[
+            OutputSizeLimit`Defer, 18, 17463603852504468309, Infinity],
+           Enabled->True,
+           Evaluator->Automatic,
+           Method->"Queued"], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeChangeLimit"], 
+                StandardForm],
+               ImageSizeCache->{74., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeChangeLimit"], 
+                StandardForm],
+               ImageSizeCache->{74., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           ButtonFunction:>FrontEndExecute[{
+              FrontEnd`SetOptions[
+              FrontEnd`$FrontEnd, 
+               FrontEnd`PreferencesSettings -> {"Page" -> "Advanced"}], 
+              FrontEnd`FrontEndToken["PreferencesDialog"]}],
+           Evaluator->None,
+           Method->"Preemptive"]}
+        },
+        AutoDelete->False,
+        FrameStyle->GrayLevel[0.85],
+        GridBoxDividers->{"Columns" -> {False, {True}}},
+        GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
+        GridBoxSpacings->{"Columns" -> {{2}}}]}
+     },
+     DefaultBaseStyle->"Column",
+     GridBoxAlignment->{
+      "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
+       "RowsIndexed" -> {}},
+     GridBoxDividers->{
+      "Columns" -> {{False}}, "ColumnsIndexed" -> {}, "Rows" -> {{False}}, 
+       "RowsIndexed" -> {}},
+     GridBoxItemSize->{
+      "Columns" -> {{Automatic}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, 
+       "RowsIndexed" -> {}},
+     GridBoxSpacings->{"Columns" -> {
+         Offset[0.27999999999999997`], {
+          Offset[0.5599999999999999]}, 
+         Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+         Offset[0.2], 
+         Offset[1.2], {
+          Offset[0.4]}, 
+         Offset[0.2]}, "RowsIndexed" -> {}}],
+    BaseStyle->"OutputSizeLimit",
+    FrameMargins->{{12, 12}, {0, 15}},
+    FrameStyle->GrayLevel[0.85],
+    RoundingRadius->5,
+    StripOnInput->False],
+   Deploy,
+   DefaultBaseStyle->"Deploy"],
+  If[17463603852504468309 === $SessionID, 
+   Out[18], Message[
+     MessageName[Syntax, "noinfoker"]]; Missing["NotAvailable"]; 
+   Null]]], "Output",
+ CellChangeTimes->{{3.7731418073007402`*^9, 3.773141832563183*^9}},
+ CellLabel->"Out[18]=",ExpressionUUID->"0fce6bb0-45fe-4e6c-a361-d7b5261cb38e"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Export", "[", 
+  RowBox[{"\"\<replacementRule.m\>\"", ",", "replacement"}], "]"}]], "Input",
+ CellChangeTimes->{{3.773141845931491*^9, 3.77314186938391*^9}},
+ CellLabel->"In[19]:=",ExpressionUUID->"f774e49f-9f49-4e9e-8986-5d0680aa1203"],
+
+Cell[BoxData["\<\"replacementRule.m\"\>"], "Output",
+ CellChangeTimes->{3.773141878024766*^9},
+ CellLabel->"Out[19]=",ExpressionUUID->"1a69893c-2615-4d54-91e8-335f2abb5de6"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
+  "\[IndentingNewLine]", "\[IndentingNewLine]"}]], "Input",
+ CellChangeTimes->{{3.775927634314473*^9, 
+  3.775927634901973*^9}},ExpressionUUID->"9a42fe37-6411-44bf-809a-\
+1046a3483503"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"replacement", " ", "=", " ", 
+   RowBox[{"Import", "[", "\"\<replacementRule.m\>\"", "]"}]}], 
+  ";"}]], "Input",
+ CellChangeTimes->{{3.77374035501915*^9, 3.7737403937904577`*^9}},
+ CellLabel->"In[13]:=",ExpressionUUID->"9e2a44fe-0bb9-4f67-9e8b-da5c10ecf6b1"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["replacement"], "Input",
+ CellChangeTimes->{{3.775826665457222*^9, 3.775826666555854*^9}},
+ CellLabel->"In[24]:=",ExpressionUUID->"f396c3bc-ea1b-44d3-a6cc-f7fecc0fffe5"],
+
+Cell[BoxData[
+ InterpretationBox[
+  TagBox[
+   FrameBox[GridBox[{
+      {
+       ItemBox[
+        TagBox[
+         RowBox[{"{", 
+          RowBox[{
+           RowBox[{
+            RowBox[{"PVC", "[", 
+             RowBox[{"0", ",", "0", ",", "0", ",", "0", ",", 
+              RowBox[{
+               SuperscriptBox["MH", "2"], "-", "S", "-", "T24", "-", "U"}], 
+              ",", "T", ",", 
+              SqrtBox[
+               SuperscriptBox["MT", "2"]], ",", 
+              SqrtBox[
+               SuperscriptBox["MT", "2"]], ",", 
+              SqrtBox[
+               SuperscriptBox["MT", "2"]]}], "]"}], "\[Rule]", 
+            RowBox[{
+             RowBox[{"-", 
+              FractionBox[
+               SuperscriptBox[
+                RowBox[{"Log", "[", 
+                 FractionBox[
+                  RowBox[{
+                   RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                   SqrtBox[
+                    TemplateBox[{"1"},
+                    "OutputSizeLimit`Skeleton"]]}], 
+                  RowBox[{"2", " ", 
+                   SuperscriptBox["MT", "2"]}]], "]"}], "2"], 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", "T24", 
+                  "-", "U"}], ")"}]}]]}], "+", 
+             FractionBox[
+              SuperscriptBox[
+               RowBox[{"Log", "[", 
+                FractionBox[
+                 RowBox[{
+                  RowBox[{"-", 
+                   SuperscriptBox["MH", "2"]}], "+", 
+                  TemplateBox[{"4"},
+                   "OutputSizeLimit`Skeleton"], "+", 
+                  SqrtBox[
+                   TemplateBox[{"1"},
+                    "OutputSizeLimit`Skeleton"]]}], 
+                 RowBox[{"2", " ", 
+                  SuperscriptBox["MT", "2"]}]], "]"}], "2"], 
+              RowBox[{"2", " ", 
+               RowBox[{"(", 
+                RowBox[{
+                 SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", "T24", 
+                 "-", "U"}], ")"}]}]]}]}], ",", 
+           TemplateBox[{"436"},
+            "OutputSizeLimit`Skeleton"], ",", 
+           RowBox[{
+            RowBox[{"PVD", "[", 
+             RowBox[{"1", ",", "1", ",", "0", ",", "0", ",", 
+              SuperscriptBox["MH", "2"], ",", "T24", ",", "0", ",", "0", ",", 
+              
+              RowBox[{
+               SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", "T14"}], 
+              ",", "T", ",", 
+              SqrtBox[
+               SuperscriptBox["MT", "2"]], ",", 
+              SqrtBox[
+               SuperscriptBox["MT", "2"]], ",", 
+              SqrtBox[
+               SuperscriptBox["MT", "2"]], ",", 
+              SqrtBox[
+               SuperscriptBox["MT", "2"]]}], "]"}], "\[Rule]", 
+            RowBox[{
+             RowBox[{"-", 
+              FractionBox[
+               RowBox[{"T", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", "T14"}],
+                  ")"}], " ", 
+                RowBox[{"DiscB", "[", 
+                 RowBox[{"T", ",", 
+                  SqrtBox[
+                   SuperscriptBox["MT", "2"]], ",", 
+                  SqrtBox[
+                   SuperscriptBox["MT", "2"]]}], "]"}]}], 
+               RowBox[{"4", " ", 
+                RowBox[{"Kibble\[Phi]", "[", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], ",", "T24", ",", "0", ",", "0", 
+                  ",", 
+                  RowBox[{
+                   SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", 
+                   "T14"}], ",", "T"}], "]"}]}]]}], "-", 
+             FractionBox[
+              TemplateBox[{"1"},
+               "OutputSizeLimit`Skeleton"], 
+              TemplateBox[{"1"},
+               "OutputSizeLimit`Skeleton"]], "+", 
+             TemplateBox[{"6"},
+              "OutputSizeLimit`Skeleton"], "+", 
+             FractionBox[
+              TemplateBox[{"1"},
+               "OutputSizeLimit`Skeleton"], 
+              TemplateBox[{"1"},
+               "OutputSizeLimit`Skeleton"]], "-", 
+             FractionBox[
+              RowBox[{"T", " ", 
+               TemplateBox[{"2"},
+                "OutputSizeLimit`Skeleton"], " ", 
+               RowBox[{"ScalarD0", "[", 
+                RowBox[{"0", ",", 
+                 SuperscriptBox["MH", "2"], ",", 
+                 TemplateBox[{"6"},
+                  "OutputSizeLimit`Skeleton"], ",", 
+                 SqrtBox[
+                  SuperscriptBox["MT", "2"]], ",", 
+                 SqrtBox[
+                  SuperscriptBox["MT", "2"]]}], "]"}]}], 
+              RowBox[{"8", " ", 
+               SuperscriptBox[
+                TemplateBox[{"1"},
+                 "OutputSizeLimit`Skeleton"], "2"]}]]}]}]}], "}"}],
+         Short[#, 5]& ],
+        BaseStyle->{Deployed -> False},
+        StripOnInput->False]},
+      {GridBox[{
+         {
+          TagBox[
+           TooltipBox[
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource[
+                "FEStrings", "sizeBriefExplanation"], StandardForm],
+               ImageSizeCache->{58., {2., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLText",
+             StripOnInput->False],
+            StyleBox[
+             DynamicBox[
+              ToBoxes[
+               FEPrivate`FrontEndResource["FEStrings", "sizeExplanation"], 
+               StandardForm]], DynamicUpdating -> True, StripOnInput -> 
+             False]],
+           Annotation[#, 
+            Style[
+             Dynamic[
+              FEPrivate`FrontEndResource["FEStrings", "sizeExplanation"]], 
+             DynamicUpdating -> True], "Tooltip"]& ], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowLess"], 
+                StandardForm],
+               ImageSizeCache->{50., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowLess"], 
+                StandardForm]],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           
+           ButtonFunction:>OutputSizeLimit`ButtonFunction[
+            OutputSizeLimit`Defer, 24, 17481197693528306459, 5/2],
+           Enabled->True,
+           Evaluator->Automatic,
+           Method->"Queued"], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowMore"], 
+                StandardForm],
+               ImageSizeCache->{56., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowMore"], 
+                StandardForm]],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           
+           ButtonFunction:>OutputSizeLimit`ButtonFunction[
+            OutputSizeLimit`Defer, 24, 17481197693528306459, 5 2],
+           Enabled->True,
+           Evaluator->Automatic,
+           Method->"Queued"], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowAll"], 
+                StandardForm],
+               ImageSizeCache->{42., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowAll"], 
+                StandardForm]],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           
+           ButtonFunction:>OutputSizeLimit`ButtonFunction[
+            OutputSizeLimit`Defer, 24, 17481197693528306459, Infinity],
+           Enabled->True,
+           Evaluator->Automatic,
+           Method->"Queued"], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeChangeLimit"], 
+                StandardForm],
+               ImageSizeCache->{74., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeChangeLimit"], 
+                StandardForm]],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           ButtonFunction:>FrontEndExecute[{
+              FrontEnd`SetOptions[
+              FrontEnd`$FrontEnd, 
+               FrontEnd`PreferencesSettings -> {"Page" -> "Advanced"}], 
+              FrontEnd`FrontEndToken["PreferencesDialog"]}],
+           Evaluator->None,
+           Method->"Preemptive"]}
+        },
+        AutoDelete->False,
+        FrameStyle->GrayLevel[0.85],
+        GridBoxDividers->{"Columns" -> {False, {True}}},
+        GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
+        GridBoxSpacings->{"Columns" -> {{2}}}]}
+     },
+     DefaultBaseStyle->"Column",
+     GridBoxAlignment->{
+      "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
+       "RowsIndexed" -> {}},
+     GridBoxDividers->{
+      "Columns" -> {{False}}, "ColumnsIndexed" -> {}, "Rows" -> {{False}}, 
+       "RowsIndexed" -> {}},
+     GridBoxItemSize->{
+      "Columns" -> {{Automatic}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, 
+       "RowsIndexed" -> {}},
+     GridBoxSpacings->{"Columns" -> {
+         Offset[0.27999999999999997`], {
+          Offset[0.5599999999999999]}, 
+         Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+         Offset[0.2], 
+         Offset[1.2], {
+          Offset[0.4]}, 
+         Offset[0.2]}, "RowsIndexed" -> {}}],
+    BaseStyle->"OutputSizeLimit",
+    FrameMargins->{{12, 12}, {0, 15}},
+    FrameStyle->GrayLevel[0.85],
+    RoundingRadius->5,
+    StripOnInput->False],
+   Deploy,
+   DefaultBaseStyle->"Deploy"],
+  If[17481197693528306459 === $SessionID, 
+   Out[24], Message[
+     MessageName[Syntax, "noinfoker"]]; Missing["NotAvailable"]; 
+   Null]]], "Output",
+ CellChangeTimes->{3.7758269041780863`*^9},
+ CellLabel->"Out[24]=",ExpressionUUID->"1d1b26d3-3d5a-4f24-a113-21f43e2027cf"]
+}, Open  ]],
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"b1", " ", "=", " ", 
+   RowBox[{"Import", "[", "\"\<ggHgg_PV_box_1_9diags.m\>\"", "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"b2", " ", "=", " ", 
+   RowBox[{"Import", "[", "\"\<ggHgg_PV_box_2_9diags.m\>\"", "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"b3", " ", "=", " ", 
+   RowBox[{"Import", "[", "\"\<ggHgg_PV_box_3_9diags.m\>\"", "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"b4", " ", "=", " ", 
+   RowBox[{"Import", "[", "\"\<ggHgg_PV_box_4_9diags.m\>\"", "]"}]}], 
+  ";"}]}], "Input",
+ CellChangeTimes->{{3.7737413218610373`*^9, 3.7737413901038446`*^9}, {
+   3.7737415493403063`*^9, 3.7737415755620737`*^9}, 3.7737416080778503`*^9},
+ CellLabel->"In[14]:=",ExpressionUUID->"0484a78b-7482-4457-ac3e-5762b8c80c69"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"b1a", " ", "=", " ", 
+  RowBox[{"b1", "//.", " ", "replacement"}]}]], "Input",
+ CellChangeTimes->{{3.773741803035206*^9, 3.773741821644495*^9}},
+ CellLabel->"In[18]:=",ExpressionUUID->"6f58dd70-ec76-4b2e-8d7d-ae9f5adae4ca"],
+
+Cell[BoxData[
+ InterpretationBox[
+  TagBox[
+   FrameBox[GridBox[{
+      {
+       ItemBox[
+        TagBox[
+         RowBox[{
+          RowBox[{"Amp", "[", 
+           RowBox[{
+            RowBox[{"{", 
+             RowBox[{
+              RowBox[{"{", 
+               RowBox[{
+                RowBox[{"V", "[", 
+                 RowBox[{"5", ",", 
+                  RowBox[{"{", "Glu1", "}"}]}], "]"}], ",", 
+                RowBox[{"k", "[", "1", "]"}], ",", "0", ",", 
+                RowBox[{"{", 
+                 RowBox[{
+                  SqrtBox["3"], " ", "ColorCharge"}], "}"}]}], "}"}], ",", 
+              RowBox[{"{", 
+               RowBox[{
+                RowBox[{"V", "[", 
+                 RowBox[{"5", ",", 
+                  RowBox[{"{", "Glu2", "}"}]}], "]"}], ",", 
+                RowBox[{"k", "[", "2", "]"}], ",", "0", ",", 
+                RowBox[{"{", 
+                 RowBox[{
+                  SqrtBox["3"], " ", "ColorCharge"}], "}"}]}], "}"}]}], "}"}],
+             "\[Rule]", 
+            RowBox[{"{", 
+             RowBox[{
+              RowBox[{"{", 
+               RowBox[{
+                RowBox[{"S", "[", "1", "]"}], ",", 
+                RowBox[{"k", "[", "3", "]"}], ",", "MH", ",", 
+                RowBox[{"{", "}"}]}], "}"}], ",", 
+              RowBox[{"{", 
+               RowBox[{
+                RowBox[{"V", "[", 
+                 RowBox[{"5", ",", 
+                  RowBox[{"{", "Glu4", "}"}]}], "]"}], ",", 
+                RowBox[{"k", "[", "4", "]"}], ",", "0", ",", 
+                RowBox[{"{", 
+                 RowBox[{
+                  SqrtBox["3"], " ", "ColorCharge"}], "}"}]}], "}"}], ",", 
+              RowBox[{"{", 
+               RowBox[{
+                RowBox[{"V", "[", 
+                 RowBox[{"5", ",", 
+                  RowBox[{"{", "Glu5", "}"}]}], "]"}], ",", 
+                RowBox[{"k", "[", "5", "]"}], ",", "0", ",", 
+                RowBox[{"{", 
+                 RowBox[{
+                  SqrtBox["3"], " ", "ColorCharge"}], "}"}]}], "}"}]}], 
+             "}"}]}], "]"}], "[", 
+          RowBox[{
+           FractionBox[
+            RowBox[{"c3", " ", 
+             RowBox[{"(", 
+              TemplateBox[{"1"},
+               "OutputSizeLimit`Skeleton"], ")"}]}], "T14"], "+", 
+           FractionBox[
+            RowBox[{"c3", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"-", 
+                FractionBox[
+                 TemplateBox[{"1"},
+                  "OutputSizeLimit`Skeleton"], 
+                 RowBox[{"MW", " ", "SW"}]]}], "+", 
+               TemplateBox[{"69"},
+                "OutputSizeLimit`Skeleton"]}], ")"}]}], "T14"], "+", 
+           FractionBox[
+            RowBox[{"2", " ", "c1", " ", 
+             RowBox[{"(", 
+              TemplateBox[{"1"},
+               "OutputSizeLimit`Skeleton"], ")"}]}], "S"], "+", 
+           FractionBox[
+            RowBox[{
+             SuperscriptBox["Alfas", "2"], " ", "c2", " ", "EL", " ", 
+             SuperscriptBox["MT", "2"], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"-", 
+                FractionBox[
+                 TemplateBox[{"1"},
+                  "OutputSizeLimit`Skeleton"], "T14"]}], "+", 
+               FractionBox[
+                TemplateBox[{"1"},
+                 "OutputSizeLimit`Skeleton"], "S"]}], ")"}]}], 
+            RowBox[{"MW", " ", "SW"}]], "+", 
+           FractionBox[
+            RowBox[{
+             SuperscriptBox["Alfas", "2"], " ", "c2", " ", "EL", " ", 
+             SuperscriptBox["MT", "2"], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"-", 
+                FractionBox[
+                 TemplateBox[{"1"},
+                  "OutputSizeLimit`Skeleton"], "T14"]}], "+", 
+               FractionBox[
+                TemplateBox[{"1"},
+                 "OutputSizeLimit`Skeleton"], "S"]}], ")"}]}], 
+            RowBox[{"MW", " ", "SW"}]]}], "]"}],
+         Short[#, 5]& ],
+        BaseStyle->{Deployed -> False},
+        StripOnInput->False]},
+      {GridBox[{
+         {
+          TagBox[
+           TooltipBox[
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource[
+                "FEStrings", "sizeBriefExplanation"], StandardForm],
+               ImageSizeCache->{58., {2., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLText",
+             StripOnInput->False],
+            StyleBox[
+             DynamicBox[
+              ToBoxes[
+               FEPrivate`FrontEndResource["FEStrings", "sizeExplanation"], 
+               StandardForm]], DynamicUpdating -> True, StripOnInput -> 
+             False]],
+           Annotation[#, 
+            Style[
+             Dynamic[
+              FEPrivate`FrontEndResource["FEStrings", "sizeExplanation"]], 
+             DynamicUpdating -> True], "Tooltip"]& ], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowLess"], 
+                StandardForm],
+               ImageSizeCache->{50., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowLess"], 
+                StandardForm],
+               ImageSizeCache->{50., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           
+           ButtonFunction:>OutputSizeLimit`ButtonFunction[
+            OutputSizeLimit`Defer, 18, 17481197693528306459, 5/2],
+           Enabled->True,
+           Evaluator->Automatic,
+           Method->"Queued"], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowMore"], 
+                StandardForm],
+               ImageSizeCache->{56., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowMore"], 
+                StandardForm],
+               ImageSizeCache->{56., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           
+           ButtonFunction:>OutputSizeLimit`ButtonFunction[
+            OutputSizeLimit`Defer, 18, 17481197693528306459, 5 2],
+           Enabled->True,
+           Evaluator->Automatic,
+           Method->"Queued"], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowAll"], 
+                StandardForm],
+               ImageSizeCache->{42., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowAll"], 
+                StandardForm],
+               ImageSizeCache->{42., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           
+           ButtonFunction:>OutputSizeLimit`ButtonFunction[
+            OutputSizeLimit`Defer, 18, 17481197693528306459, Infinity],
+           Enabled->True,
+           Evaluator->Automatic,
+           Method->"Queued"], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeChangeLimit"], 
+                StandardForm],
+               ImageSizeCache->{74., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeChangeLimit"], 
+                StandardForm],
+               ImageSizeCache->{74., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           ButtonFunction:>FrontEndExecute[{
+              FrontEnd`SetOptions[
+              FrontEnd`$FrontEnd, 
+               FrontEnd`PreferencesSettings -> {"Page" -> "Advanced"}], 
+              FrontEnd`FrontEndToken["PreferencesDialog"]}],
+           Evaluator->None,
+           Method->"Preemptive"]}
+        },
+        AutoDelete->False,
+        FrameStyle->GrayLevel[0.85],
+        GridBoxDividers->{"Columns" -> {False, {True}}},
+        GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
+        GridBoxSpacings->{"Columns" -> {{2}}}]}
+     },
+     DefaultBaseStyle->"Column",
+     GridBoxAlignment->{
+      "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
+       "RowsIndexed" -> {}},
+     GridBoxDividers->{
+      "Columns" -> {{False}}, "ColumnsIndexed" -> {}, "Rows" -> {{False}}, 
+       "RowsIndexed" -> {}},
+     GridBoxItemSize->{
+      "Columns" -> {{Automatic}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, 
+       "RowsIndexed" -> {}},
+     GridBoxSpacings->{"Columns" -> {
+         Offset[0.27999999999999997`], {
+          Offset[0.5599999999999999]}, 
+         Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+         Offset[0.2], 
+         Offset[1.2], {
+          Offset[0.4]}, 
+         Offset[0.2]}, "RowsIndexed" -> {}}],
+    BaseStyle->"OutputSizeLimit",
+    FrameMargins->{{12, 12}, {0, 15}},
+    FrameStyle->GrayLevel[0.85],
+    RoundingRadius->5,
+    StripOnInput->False],
+   Deploy,
+   DefaultBaseStyle->"Deploy"],
+  If[17481197693528306459 === $SessionID, 
+   Out[18], Message[
+     MessageName[Syntax, "noinfoker"]]; Missing["NotAvailable"]; 
+   Null]]], "Output",
+ CellChangeTimes->{3.7737419708335533`*^9, 3.775826465540903*^9},
+ CellLabel->"Out[18]=",ExpressionUUID->"b4f39a2e-5da3-4756-9d30-b57a024860f7"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"Export", "[", 
+   RowBox[{
+    RowBox[{"\"\<ggHgg_LR_box_\>\"", "<>", 
+     RowBox[{"ToString", "[", "1", "]"}], "<>", "\"\<_9diags.m\>\""}], ",", 
+    RowBox[{"b1a", "[", 
+     RowBox[{"[", "1", "]"}], "]"}]}], "]"}], ";"}]], "Input",
+ CellChangeTimes->{{3.775826581607827*^9, 3.77582658845979*^9}},
+ CellLabel->"In[22]:=",ExpressionUUID->"6dc8539a-b6fb-45ed-bf01-82aab57aef98"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"b2a", "=", 
+  RowBox[{"b2", "//.", "replacement"}]}]], "Input",
+ CellChangeTimes->{{3.7737418303608932`*^9, 3.7737418362486486`*^9}},
+ CellLabel->"In[23]:=",ExpressionUUID->"cb0ca33d-b1f5-4703-8d8e-8c263a31064a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  TagBox[
+   FrameBox[GridBox[{
+      {
+       ItemBox[
+        TagBox[
+         RowBox[{
+          RowBox[{"Amp", "[", 
+           RowBox[{
+            RowBox[{"{", 
+             RowBox[{
+              RowBox[{"{", 
+               RowBox[{
+                RowBox[{"V", "[", 
+                 RowBox[{"5", ",", 
+                  RowBox[{"{", "Glu1", "}"}]}], "]"}], ",", 
+                RowBox[{"k", "[", "1", "]"}], ",", "0", ",", 
+                RowBox[{"{", 
+                 RowBox[{
+                  SqrtBox["3"], " ", "ColorCharge"}], "}"}]}], "}"}], ",", 
+              RowBox[{"{", 
+               RowBox[{
+                RowBox[{"V", "[", 
+                 RowBox[{"5", ",", 
+                  RowBox[{"{", "Glu2", "}"}]}], "]"}], ",", 
+                RowBox[{"k", "[", "2", "]"}], ",", "0", ",", 
+                RowBox[{"{", 
+                 RowBox[{
+                  SqrtBox["3"], " ", "ColorCharge"}], "}"}]}], "}"}]}], "}"}],
+             "\[Rule]", 
+            RowBox[{"{", 
+             RowBox[{
+              RowBox[{"{", 
+               RowBox[{
+                RowBox[{"S", "[", "1", "]"}], ",", 
+                RowBox[{"k", "[", "3", "]"}], ",", "MH", ",", 
+                RowBox[{"{", "}"}]}], "}"}], ",", 
+              RowBox[{"{", 
+               RowBox[{
+                RowBox[{"V", "[", 
+                 RowBox[{"5", ",", 
+                  RowBox[{"{", "Glu4", "}"}]}], "]"}], ",", 
+                RowBox[{"k", "[", "4", "]"}], ",", "0", ",", 
+                RowBox[{"{", 
+                 RowBox[{
+                  SqrtBox["3"], " ", "ColorCharge"}], "}"}]}], "}"}], ",", 
+              RowBox[{"{", 
+               RowBox[{
+                RowBox[{"V", "[", 
+                 RowBox[{"5", ",", 
+                  RowBox[{"{", "Glu5", "}"}]}], "]"}], ",", 
+                RowBox[{"k", "[", "5", "]"}], ",", "0", ",", 
+                RowBox[{"{", 
+                 RowBox[{
+                  SqrtBox["3"], " ", "ColorCharge"}], "}"}]}], "}"}]}], 
+             "}"}]}], "]"}], "[", 
+          RowBox[{
+           FractionBox[
+            RowBox[{"2", " ", "c1", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               FractionBox[
+                RowBox[{"4", " ", 
+                 TemplateBox[{"5"},
+                  "OutputSizeLimit`Skeleton"], " ", 
+                 RowBox[{"(", 
+                  TemplateBox[{"1"},
+                   "OutputSizeLimit`Skeleton"], ")"}]}], 
+                RowBox[{"MW", " ", "SW"}]], "+", 
+               TemplateBox[{"100"},
+                "OutputSizeLimit`Skeleton"], "+", 
+               TemplateBox[{"1"},
+                "OutputSizeLimit`Skeleton"], "+", 
+               FractionBox[
+                TemplateBox[{"1"},
+                 "OutputSizeLimit`Skeleton"], 
+                RowBox[{"MW", " ", "SW"}]]}], ")"}]}], "T24"], "+", 
+           FractionBox[
+            RowBox[{"c2", " ", 
+             RowBox[{"(", 
+              TemplateBox[{"1"},
+               "OutputSizeLimit`Skeleton"], ")"}]}], "T14"], "+", 
+           FractionBox[
+            RowBox[{"c2", " ", 
+             TemplateBox[{"1"},
+              "OutputSizeLimit`Skeleton"]}], "T14"], "-", 
+           FractionBox[
+            RowBox[{
+             SuperscriptBox["Alfas", "2"], " ", 
+             TemplateBox[{"3"},
+              "OutputSizeLimit`Skeleton"], " ", 
+             RowBox[{"(", 
+              TemplateBox[{"1"},
+               "OutputSizeLimit`Skeleton"], ")"}]}], 
+            RowBox[{"MW", " ", "SW"}]], "-", 
+           FractionBox[
+            RowBox[{
+             SuperscriptBox["Alfas", "2"], " ", "c3", " ", "EL", " ", 
+             SuperscriptBox["MT", "2"], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"-", 
+                FractionBox[
+                 TemplateBox[{"1"},
+                  "OutputSizeLimit`Skeleton"], "T24"]}], "+", 
+               FractionBox[
+                TemplateBox[{"1"},
+                 "OutputSizeLimit`Skeleton"], "T14"]}], ")"}]}], 
+            RowBox[{"MW", " ", "SW"}]]}], "]"}],
+         Short[#, 5]& ],
+        BaseStyle->{Deployed -> False},
+        StripOnInput->False]},
+      {GridBox[{
+         {
+          TagBox[
+           TooltipBox[
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource[
+                "FEStrings", "sizeBriefExplanation"], StandardForm],
+               ImageSizeCache->{58., {2., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLText",
+             StripOnInput->False],
+            StyleBox[
+             DynamicBox[
+              ToBoxes[
+               FEPrivate`FrontEndResource["FEStrings", "sizeExplanation"], 
+               StandardForm]], DynamicUpdating -> True, StripOnInput -> 
+             False]],
+           Annotation[#, 
+            Style[
+             Dynamic[
+              FEPrivate`FrontEndResource["FEStrings", "sizeExplanation"]], 
+             DynamicUpdating -> True], "Tooltip"]& ], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowLess"], 
+                StandardForm],
+               ImageSizeCache->{50., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowLess"], 
+                StandardForm]],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           
+           ButtonFunction:>OutputSizeLimit`ButtonFunction[
+            OutputSizeLimit`Defer, 23, 17481197693528306459, 5/2],
+           Enabled->True,
+           Evaluator->Automatic,
+           Method->"Queued"], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowMore"], 
+                StandardForm],
+               ImageSizeCache->{56., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowMore"], 
+                StandardForm]],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           
+           ButtonFunction:>OutputSizeLimit`ButtonFunction[
+            OutputSizeLimit`Defer, 23, 17481197693528306459, 5 2],
+           Enabled->True,
+           Evaluator->Automatic,
+           Method->"Queued"], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowAll"], 
+                StandardForm],
+               ImageSizeCache->{42., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowAll"], 
+                StandardForm]],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           
+           ButtonFunction:>OutputSizeLimit`ButtonFunction[
+            OutputSizeLimit`Defer, 23, 17481197693528306459, Infinity],
+           Enabled->True,
+           Evaluator->Automatic,
+           Method->"Queued"], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeChangeLimit"], 
+                StandardForm],
+               ImageSizeCache->{74., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeChangeLimit"], 
+                StandardForm],
+               ImageSizeCache->{74., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           ButtonFunction:>FrontEndExecute[{
+              FrontEnd`SetOptions[
+              FrontEnd`$FrontEnd, 
+               FrontEnd`PreferencesSettings -> {"Page" -> "Advanced"}], 
+              FrontEnd`FrontEndToken["PreferencesDialog"]}],
+           Evaluator->None,
+           Method->"Preemptive"]}
+        },
+        AutoDelete->False,
+        FrameStyle->GrayLevel[0.85],
+        GridBoxDividers->{"Columns" -> {False, {True}}},
+        GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
+        GridBoxSpacings->{"Columns" -> {{2}}}]}
+     },
+     DefaultBaseStyle->"Column",
+     GridBoxAlignment->{
+      "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
+       "RowsIndexed" -> {}},
+     GridBoxDividers->{
+      "Columns" -> {{False}}, "ColumnsIndexed" -> {}, "Rows" -> {{False}}, 
+       "RowsIndexed" -> {}},
+     GridBoxItemSize->{
+      "Columns" -> {{Automatic}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, 
+       "RowsIndexed" -> {}},
+     GridBoxSpacings->{"Columns" -> {
+         Offset[0.27999999999999997`], {
+          Offset[0.5599999999999999]}, 
+         Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+         Offset[0.2], 
+         Offset[1.2], {
+          Offset[0.4]}, 
+         Offset[0.2]}, "RowsIndexed" -> {}}],
+    BaseStyle->"OutputSizeLimit",
+    FrameMargins->{{12, 12}, {0, 15}},
+    FrameStyle->GrayLevel[0.85],
+    RoundingRadius->5,
+    StripOnInput->False],
+   Deploy,
+   DefaultBaseStyle->"Deploy"],
+  If[17481197693528306459 === $SessionID, 
+   Out[23], Message[
+     MessageName[Syntax, "noinfoker"]]; Missing["NotAvailable"]; 
+   Null]]], "Output",
+ CellChangeTimes->{3.7737423072521887`*^9, 3.775826897885051*^9},
+ CellLabel->"Out[23]=",ExpressionUUID->"1d5fa8ad-833f-46d5-a1dc-a4179db033a8"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"Export", "[", 
+   RowBox[{
+    RowBox[{"\"\<ggHgg_LR_box_\>\"", "<>", 
+     RowBox[{"ToString", "[", "2", "]"}], "<>", "\"\<_9diags.m\>\""}], ",", 
+    RowBox[{"b2a", "[", 
+     RowBox[{"[", "1", "]"}], "]"}]}], "]"}], ";"}]], "Input",
+ CellChangeTimes->{{3.775826642706215*^9, 3.7758266432387667`*^9}},
+ CellLabel->"In[25]:=",ExpressionUUID->"5eff98d5-542a-4fb2-8a57-8b5bb386d93b"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"b3a", "=", 
+  RowBox[{"b3", "//.", "replacement"}]}]], "Input",
+ CellChangeTimes->{{3.773741839578579*^9, 3.7737418466102*^9}},
+ CellLabel->"In[26]:=",ExpressionUUID->"6b8a882a-c4d7-48c9-bd9a-89d690e1775f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  TagBox[
+   FrameBox[GridBox[{
+      {
+       ItemBox[
+        TagBox[
+         RowBox[{
+          RowBox[{"Amp", "[", 
+           RowBox[{
+            RowBox[{"{", 
+             RowBox[{
+              RowBox[{"{", 
+               RowBox[{
+                RowBox[{"V", "[", 
+                 RowBox[{"5", ",", 
+                  RowBox[{"{", "Glu1", "}"}]}], "]"}], ",", 
+                RowBox[{"k", "[", "1", "]"}], ",", "0", ",", 
+                RowBox[{"{", 
+                 RowBox[{
+                  SqrtBox["3"], " ", "ColorCharge"}], "}"}]}], "}"}], ",", 
+              RowBox[{"{", 
+               RowBox[{
+                RowBox[{"V", "[", 
+                 RowBox[{"5", ",", 
+                  RowBox[{"{", "Glu2", "}"}]}], "]"}], ",", 
+                RowBox[{"k", "[", "2", "]"}], ",", "0", ",", 
+                RowBox[{"{", 
+                 RowBox[{
+                  SqrtBox["3"], " ", "ColorCharge"}], "}"}]}], "}"}]}], "}"}],
+             "\[Rule]", 
+            RowBox[{"{", 
+             RowBox[{
+              RowBox[{"{", 
+               RowBox[{
+                RowBox[{"S", "[", "1", "]"}], ",", 
+                RowBox[{"k", "[", "3", "]"}], ",", "MH", ",", 
+                RowBox[{"{", "}"}]}], "}"}], ",", 
+              RowBox[{"{", 
+               RowBox[{
+                RowBox[{"V", "[", 
+                 RowBox[{"5", ",", 
+                  RowBox[{"{", "Glu4", "}"}]}], "]"}], ",", 
+                RowBox[{"k", "[", "4", "]"}], ",", "0", ",", 
+                RowBox[{"{", 
+                 RowBox[{
+                  SqrtBox["3"], " ", "ColorCharge"}], "}"}]}], "}"}], ",", 
+              RowBox[{"{", 
+               RowBox[{
+                RowBox[{"V", "[", 
+                 RowBox[{"5", ",", 
+                  RowBox[{"{", "Glu5", "}"}]}], "]"}], ",", 
+                RowBox[{"k", "[", "5", "]"}], ",", "0", ",", 
+                RowBox[{"{", 
+                 RowBox[{
+                  SqrtBox["3"], " ", "ColorCharge"}], "}"}]}], "}"}]}], 
+             "}"}]}], "]"}], "[", 
+          RowBox[{
+           FractionBox[
+            RowBox[{"c2", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               TemplateBox[{"36"},
+                "OutputSizeLimit`Skeleton"], "+", 
+               FractionBox[
+                TemplateBox[{"1"},
+                 "OutputSizeLimit`Skeleton"], 
+                RowBox[{"MW", " ", "SW"}]]}], ")"}]}], 
+            RowBox[{
+             SuperscriptBox["MH", "2"], "-", "S", "-", "T24", "-", "U"}]], 
+           "+", 
+           FractionBox[
+            RowBox[{"c2", " ", 
+             RowBox[{"(", 
+              TemplateBox[{"1"},
+               "OutputSizeLimit`Skeleton"], ")"}]}], 
+            RowBox[{
+             SuperscriptBox["MH", "2"], "-", "S", "-", "T24", "-", "U"}]], 
+           "+", 
+           FractionBox[
+            RowBox[{"2", " ", "c1", " ", 
+             RowBox[{"(", 
+              TemplateBox[{"1"},
+               "OutputSizeLimit`Skeleton"], ")"}]}], 
+            RowBox[{
+             SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", "T14"}]], 
+           "-", 
+           FractionBox[
+            TemplateBox[{"1"},
+             "OutputSizeLimit`Skeleton"], 
+            RowBox[{"MW", " ", "SW"}]], "-", 
+           FractionBox[
+            RowBox[{
+             SuperscriptBox["Alfas", "2"], " ", "c3", " ", "EL", " ", 
+             SuperscriptBox["MT", "2"], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"-", 
+                FractionBox[
+                 TemplateBox[{"1"},
+                  "OutputSizeLimit`Skeleton"], 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], "-", "S", "-", "T24", "-", 
+                  "U"}]]}], "+", 
+               FractionBox[
+                TemplateBox[{"1"},
+                 "OutputSizeLimit`Skeleton"], 
+                TemplateBox[{"1"},
+                 "OutputSizeLimit`Skeleton"]]}], ")"}]}], 
+            RowBox[{"MW", " ", "SW"}]]}], "]"}],
+         Short[#, 5]& ],
+        BaseStyle->{Deployed -> False},
+        StripOnInput->False]},
+      {GridBox[{
+         {
+          TagBox[
+           TooltipBox[
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource[
+                "FEStrings", "sizeBriefExplanation"], StandardForm],
+               ImageSizeCache->{58., {2., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLText",
+             StripOnInput->False],
+            StyleBox[
+             DynamicBox[
+              ToBoxes[
+               FEPrivate`FrontEndResource["FEStrings", "sizeExplanation"], 
+               StandardForm]], DynamicUpdating -> True, StripOnInput -> 
+             False]],
+           Annotation[#, 
+            Style[
+             Dynamic[
+              FEPrivate`FrontEndResource["FEStrings", "sizeExplanation"]], 
+             DynamicUpdating -> True], "Tooltip"]& ], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowLess"], 
+                StandardForm],
+               ImageSizeCache->{50., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowLess"], 
+                StandardForm],
+               ImageSizeCache->{50., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           
+           ButtonFunction:>OutputSizeLimit`ButtonFunction[
+            OutputSizeLimit`Defer, 26, 17481197693528306459, 5/2],
+           Enabled->True,
+           Evaluator->Automatic,
+           Method->"Queued"], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowMore"], 
+                StandardForm],
+               ImageSizeCache->{56., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowMore"], 
+                StandardForm],
+               ImageSizeCache->{56., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           
+           ButtonFunction:>OutputSizeLimit`ButtonFunction[
+            OutputSizeLimit`Defer, 26, 17481197693528306459, 5 2],
+           Enabled->True,
+           Evaluator->Automatic,
+           Method->"Queued"], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowAll"], 
+                StandardForm],
+               ImageSizeCache->{42., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowAll"], 
+                StandardForm]],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           
+           ButtonFunction:>OutputSizeLimit`ButtonFunction[
+            OutputSizeLimit`Defer, 26, 17481197693528306459, Infinity],
+           Enabled->True,
+           Evaluator->Automatic,
+           Method->"Queued"], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeChangeLimit"], 
+                StandardForm],
+               ImageSizeCache->{74., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeChangeLimit"], 
+                StandardForm],
+               ImageSizeCache->{74., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           ButtonFunction:>FrontEndExecute[{
+              FrontEnd`SetOptions[
+              FrontEnd`$FrontEnd, 
+               FrontEnd`PreferencesSettings -> {"Page" -> "Advanced"}], 
+              FrontEnd`FrontEndToken["PreferencesDialog"]}],
+           Evaluator->None,
+           Method->"Preemptive"]}
+        },
+        AutoDelete->False,
+        FrameStyle->GrayLevel[0.85],
+        GridBoxDividers->{"Columns" -> {False, {True}}},
+        GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
+        GridBoxSpacings->{"Columns" -> {{2}}}]}
+     },
+     DefaultBaseStyle->"Column",
+     GridBoxAlignment->{
+      "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
+       "RowsIndexed" -> {}},
+     GridBoxDividers->{
+      "Columns" -> {{False}}, "ColumnsIndexed" -> {}, "Rows" -> {{False}}, 
+       "RowsIndexed" -> {}},
+     GridBoxItemSize->{
+      "Columns" -> {{Automatic}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, 
+       "RowsIndexed" -> {}},
+     GridBoxSpacings->{"Columns" -> {
+         Offset[0.27999999999999997`], {
+          Offset[0.5599999999999999]}, 
+         Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+         Offset[0.2], 
+         Offset[1.2], {
+          Offset[0.4]}, 
+         Offset[0.2]}, "RowsIndexed" -> {}}],
+    BaseStyle->"OutputSizeLimit",
+    FrameMargins->{{12, 12}, {0, 15}},
+    FrameStyle->GrayLevel[0.85],
+    RoundingRadius->5,
+    StripOnInput->False],
+   Deploy,
+   DefaultBaseStyle->"Deploy"],
+  If[17481197693528306459 === $SessionID, 
+   Out[26], Message[
+     MessageName[Syntax, "noinfoker"]]; Missing["NotAvailable"]; 
+   Null]]], "Output",
+ CellChangeTimes->{3.773742529237939*^9, 3.775827007230092*^9},
+ CellLabel->"Out[26]=",ExpressionUUID->"0dd69f7f-556b-4cf0-903b-9a63338f9b78"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"Export", "[", 
+   RowBox[{
+    RowBox[{"\"\<ggHgg_LR_box_\>\"", "<>", 
+     RowBox[{"ToString", "[", "3", "]"}], "<>", "\"\<_9diags.m\>\""}], ",", 
+    RowBox[{"b3a", "[", 
+     RowBox[{"[", "1", "]"}], "]"}]}], "]"}], ";"}]], "Input",
+ CellChangeTimes->{{3.77582665388268*^9, 3.77582665463208*^9}},
+ CellLabel->"In[27]:=",ExpressionUUID->"786a397e-8276-4b59-936c-1058b86fa2b4"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"b4a", "=", 
+  RowBox[{"b4", "//.", "replacement"}]}]], "Input",
+ CellChangeTimes->{{3.773741848534903*^9, 3.773741852401463*^9}},
+ CellLabel->"In[28]:=",ExpressionUUID->"cac28fd3-e795-47f1-a77e-e5a2fe196f33"],
+
+Cell[BoxData[
+ InterpretationBox[
+  TagBox[
+   FrameBox[GridBox[{
+      {
+       ItemBox[
+        TagBox[
+         RowBox[{
+          RowBox[{"Amp", "[", 
+           RowBox[{
+            RowBox[{"{", 
+             RowBox[{
+              RowBox[{"{", 
+               RowBox[{
+                RowBox[{"V", "[", 
+                 RowBox[{"5", ",", 
+                  RowBox[{"{", "Glu1", "}"}]}], "]"}], ",", 
+                RowBox[{"k", "[", "1", "]"}], ",", "0", ",", 
+                RowBox[{"{", 
+                 RowBox[{
+                  SqrtBox["3"], " ", "ColorCharge"}], "}"}]}], "}"}], ",", 
+              RowBox[{"{", 
+               RowBox[{
+                RowBox[{"V", "[", 
+                 RowBox[{"5", ",", 
+                  RowBox[{"{", "Glu2", "}"}]}], "]"}], ",", 
+                RowBox[{"k", "[", "2", "]"}], ",", "0", ",", 
+                RowBox[{"{", 
+                 RowBox[{
+                  SqrtBox["3"], " ", "ColorCharge"}], "}"}]}], "}"}]}], "}"}],
+             "\[Rule]", 
+            RowBox[{"{", 
+             RowBox[{
+              RowBox[{"{", 
+               RowBox[{
+                RowBox[{"S", "[", "1", "]"}], ",", 
+                RowBox[{"k", "[", "3", "]"}], ",", "MH", ",", 
+                RowBox[{"{", "}"}]}], "}"}], ",", 
+              RowBox[{"{", 
+               RowBox[{
+                RowBox[{"V", "[", 
+                 RowBox[{"5", ",", 
+                  RowBox[{"{", "Glu4", "}"}]}], "]"}], ",", 
+                RowBox[{"k", "[", "4", "]"}], ",", "0", ",", 
+                RowBox[{"{", 
+                 RowBox[{
+                  SqrtBox["3"], " ", "ColorCharge"}], "}"}]}], "}"}], ",", 
+              RowBox[{"{", 
+               RowBox[{
+                RowBox[{"V", "[", 
+                 RowBox[{"5", ",", 
+                  RowBox[{"{", "Glu5", "}"}]}], "]"}], ",", 
+                RowBox[{"k", "[", "5", "]"}], ",", "0", ",", 
+                RowBox[{"{", 
+                 RowBox[{
+                  SqrtBox["3"], " ", "ColorCharge"}], "}"}]}], "}"}]}], 
+             "}"}]}], "]"}], "[", 
+          RowBox[{
+           FractionBox[
+            RowBox[{"2", " ", "c1", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               FractionBox[
+                RowBox[{"4", " ", 
+                 TemplateBox[{"5"},
+                  "OutputSizeLimit`Skeleton"], " ", 
+                 RowBox[{"(", 
+                  TemplateBox[{"1"},
+                   "OutputSizeLimit`Skeleton"], ")"}]}], 
+                RowBox[{"MW", " ", "SW"}]], "+", 
+               TemplateBox[{"92"},
+                "OutputSizeLimit`Skeleton"], "+", 
+               TemplateBox[{"1"},
+                "OutputSizeLimit`Skeleton"], "+", 
+               FractionBox[
+                TemplateBox[{"1"},
+                 "OutputSizeLimit`Skeleton"], 
+                RowBox[{"MW", " ", "SW"}]]}], ")"}]}], 
+            RowBox[{
+             SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", "T24"}]],
+            "+", 
+           FractionBox[
+            RowBox[{"c3", " ", 
+             RowBox[{"(", 
+              TemplateBox[{"1"},
+               "OutputSizeLimit`Skeleton"], ")"}]}], 
+            RowBox[{
+             SuperscriptBox["MH", "2"], "-", "S", "-", "T24", "-", "U"}]], 
+           "+", 
+           FractionBox[
+            RowBox[{"c3", " ", 
+             TemplateBox[{"1"},
+              "OutputSizeLimit`Skeleton"]}], 
+            RowBox[{
+             SuperscriptBox["MH", "2"], "-", "S", "-", 
+             TemplateBox[{"3"},
+              "OutputSizeLimit`Skeleton"], "-", "U"}]], "+", 
+           FractionBox[
+            TemplateBox[{"1"},
+             "OutputSizeLimit`Skeleton"], 
+            RowBox[{"MW", " ", "SW"}]], "+", 
+           FractionBox[
+            RowBox[{
+             SuperscriptBox["Alfas", "2"], " ", "c2", " ", "EL", " ", 
+             SuperscriptBox["MT", "2"], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               FractionBox[
+                TemplateBox[{"1"},
+                 "OutputSizeLimit`Skeleton"], 
+                TemplateBox[{"1"},
+                 "OutputSizeLimit`Skeleton"]], "+", 
+               TemplateBox[{"1"},
+                "OutputSizeLimit`Skeleton"]}], ")"}]}], 
+            RowBox[{"MW", " ", "SW"}]]}], "]"}],
+         Short[#, 5]& ],
+        BaseStyle->{Deployed -> False},
+        StripOnInput->False]},
+      {GridBox[{
+         {
+          TagBox[
+           TooltipBox[
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource[
+                "FEStrings", "sizeBriefExplanation"], StandardForm],
+               ImageSizeCache->{58., {2., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLText",
+             StripOnInput->False],
+            StyleBox[
+             DynamicBox[
+              ToBoxes[
+               FEPrivate`FrontEndResource["FEStrings", "sizeExplanation"], 
+               StandardForm]], DynamicUpdating -> True, StripOnInput -> 
+             False]],
+           Annotation[#, 
+            Style[
+             Dynamic[
+              FEPrivate`FrontEndResource["FEStrings", "sizeExplanation"]], 
+             DynamicUpdating -> True], "Tooltip"]& ], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowLess"], 
+                StandardForm],
+               ImageSizeCache->{50., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowLess"], 
+                StandardForm],
+               ImageSizeCache->{50., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           
+           ButtonFunction:>OutputSizeLimit`ButtonFunction[
+            OutputSizeLimit`Defer, 28, 17481197693528306459, 5/2],
+           Enabled->True,
+           Evaluator->Automatic,
+           Method->"Queued"], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowMore"], 
+                StandardForm],
+               ImageSizeCache->{56., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowMore"], 
+                StandardForm],
+               ImageSizeCache->{56., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           
+           ButtonFunction:>OutputSizeLimit`ButtonFunction[
+            OutputSizeLimit`Defer, 28, 17481197693528306459, 5 2],
+           Enabled->True,
+           Evaluator->Automatic,
+           Method->"Queued"], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowAll"], 
+                StandardForm],
+               ImageSizeCache->{42., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowAll"], 
+                StandardForm]],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           
+           ButtonFunction:>OutputSizeLimit`ButtonFunction[
+            OutputSizeLimit`Defer, 28, 17481197693528306459, Infinity],
+           Enabled->True,
+           Evaluator->Automatic,
+           Method->"Queued"], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeChangeLimit"], 
+                StandardForm],
+               ImageSizeCache->{74., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeChangeLimit"], 
+                StandardForm]],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           ButtonFunction:>FrontEndExecute[{
+              FrontEnd`SetOptions[
+              FrontEnd`$FrontEnd, 
+               FrontEnd`PreferencesSettings -> {"Page" -> "Advanced"}], 
+              FrontEnd`FrontEndToken["PreferencesDialog"]}],
+           Evaluator->None,
+           Method->"Preemptive"]}
+        },
+        AutoDelete->False,
+        FrameStyle->GrayLevel[0.85],
+        GridBoxDividers->{"Columns" -> {False, {True}}},
+        GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
+        GridBoxSpacings->{"Columns" -> {{2}}}]}
+     },
+     DefaultBaseStyle->"Column",
+     GridBoxAlignment->{
+      "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
+       "RowsIndexed" -> {}},
+     GridBoxDividers->{
+      "Columns" -> {{False}}, "ColumnsIndexed" -> {}, "Rows" -> {{False}}, 
+       "RowsIndexed" -> {}},
+     GridBoxItemSize->{
+      "Columns" -> {{Automatic}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, 
+       "RowsIndexed" -> {}},
+     GridBoxSpacings->{"Columns" -> {
+         Offset[0.27999999999999997`], {
+          Offset[0.5599999999999999]}, 
+         Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+         Offset[0.2], 
+         Offset[1.2], {
+          Offset[0.4]}, 
+         Offset[0.2]}, "RowsIndexed" -> {}}],
+    BaseStyle->"OutputSizeLimit",
+    FrameMargins->{{12, 12}, {0, 15}},
+    FrameStyle->GrayLevel[0.85],
+    RoundingRadius->5,
+    StripOnInput->False],
+   Deploy,
+   DefaultBaseStyle->"Deploy"],
+  If[17481197693528306459 === $SessionID, 
+   Out[28], Message[
+     MessageName[Syntax, "noinfoker"]]; Missing["NotAvailable"]; 
+   Null]]], "Output",
+ CellChangeTimes->{3.773742742516061*^9, 3.775827111056859*^9},
+ CellLabel->"Out[28]=",ExpressionUUID->"fdf26c39-191c-4b8f-8ed6-4f24a3f9beeb"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{
+   RowBox[{"Export", "[", 
+    RowBox[{
+     RowBox[{"\"\<ggHgg_LR_box_\>\"", "<>", 
+      RowBox[{"ToString", "[", "4", "]"}], "<>", "\"\<_9diags.m\>\""}], ",", 
+     RowBox[{"b4a", "[", 
+      RowBox[{"[", "1", "]"}], "]"}]}], "]"}], ";"}], 
+  "\[IndentingNewLine]"}]], "Input",
+ CellChangeTimes->{{3.7758266582866173`*^9, 3.775826658808209*^9}},
+ CellLabel->"In[29]:=",ExpressionUUID->"c7feecf3-f47a-423b-924d-e06efe08d9d2"],
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
+  "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
+  RowBox[{"(*", " ", 
+   RowBox[{
+    RowBox[{"Section", " ", "for", " ", "gg"}], "\[Rule]", "H"}], " ", 
+   "*)"}]}]], "Input",
+ CellChangeTimes->{{3.775231998315331*^9, 
+  3.775232007604499*^9}},ExpressionUUID->"7e7b9f75-0ed1-4382-a7dd-\
+99907c1473ac"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ggHamp", "=", 
+  RowBox[{"Import", "[", "\"\<ggH.m\>\"", "]"}]}]], "Input",
+ CellChangeTimes->{{3.7752319134417143`*^9, 3.7752319328594646`*^9}},
+ CellLabel->"In[12]:=",ExpressionUUID->"ae98646f-6aec-43fc-bc4c-76b34b9d8371"],
+
+Cell[BoxData[
+ RowBox[{
+  FractionBox["1", 
+   RowBox[{"MW", " ", "\[Pi]", " ", "SW"}]], 
+  RowBox[{"Alfas", " ", "EL", " ", "MT2", " ", 
+   RowBox[{"Mat", "[", 
+    RowBox[{"SUNT", "[", 
+     RowBox[{"Glu1", ",", "Glu2", ",", "0", ",", "0"}], "]"}], "]"}], " ", 
+   RowBox[{"(", 
+    RowBox[{
+     RowBox[{
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"B0i", "[", 
+         RowBox[{"bb0", ",", "MH2", ",", "MT2", ",", "MT2"}], "]"}], "-", 
+        RowBox[{"4", " ", 
+         RowBox[{"C0i", "[", 
+          RowBox[{
+          "cc00", ",", "0", ",", "MH2", ",", "0", ",", "MT2", ",", "MT2", ",",
+            "MT2"}], "]"}]}]}], ")"}], " ", 
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"e", "[", "1", "]"}], ",", 
+        RowBox[{"e", "[", "2", "]"}]}], "]"}]}], "+", 
+     RowBox[{"4", " ", 
+      RowBox[{"C0i", "[", 
+       RowBox[{
+       "cc12", ",", "0", ",", "MH2", ",", "0", ",", "MT2", ",", "MT2", ",", 
+        "MT2"}], "]"}], " ", 
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"e", "[", "1", "]"}], ",", 
+        RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"e", "[", "2", "]"}], ",", 
+        RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+     RowBox[{
+      FractionBox["1", "2"], " ", 
+      RowBox[{"C0i", "[", 
+       RowBox[{
+       "cc0", ",", "0", ",", "MH2", ",", "0", ",", "MT2", ",", "MT2", ",", 
+        "MT2"}], "]"}], " ", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"-", "MH2"}], " ", 
+         RowBox[{"Pair", "[", 
+          RowBox[{
+           RowBox[{"e", "[", "1", "]"}], ",", 
+           RowBox[{"e", "[", "2", "]"}]}], "]"}]}], "+", 
+        RowBox[{"2", " ", 
+         RowBox[{"Pair", "[", 
+          RowBox[{
+           RowBox[{"e", "[", "1", "]"}], ",", 
+           RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+         RowBox[{"Pair", "[", 
+          RowBox[{
+           RowBox[{"e", "[", "2", "]"}], ",", 
+           RowBox[{"k", "[", "1", "]"}]}], "]"}]}]}], ")"}]}]}], 
+    ")"}]}]}]], "Output",
+ CellChangeTimes->{3.775231935723737*^9},
+ CellLabel->"Out[12]=",ExpressionUUID->"b03d30ad-4939-46cf-b5fe-8b765a9784a2"]
+}, Open  ]],
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"ggHamp", " ", "=", " ", 
+   RowBox[{
+    RowBox[{"ggHamp", " ", "//.", " ", "MAT"}], " ", "//.", " ", "SubDen"}]}],
+   ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"d", " ", "=", " ", 
+   RowBox[{"Collect", "[", 
+    RowBox[{
+     RowBox[{"ReleaseHold", "[", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{"HoldForm", "[", 
+          RowBox[{"Evaluate", "[", "ggHamp", "]"}], "]"}], " ", ")"}], "//.", 
+        " ", "RIntList"}], ")"}], "]"}], ",", 
+     RowBox[{"Mat", "[", "__", "]"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"fd", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"d", "//.", "LoopRefining"}], "//", "Refine"}], "//", 
+    "Simplify"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"Export", "[", 
+   RowBox[{"\"\<ggH_LR.m\>\"", ",", "fd"}], "]"}], 
+  ";"}], "\[IndentingNewLine]"}], "Input",
+ CellChangeTimes->{{3.7752320210741873`*^9, 3.775232083331502*^9}},
+ CellLabel->"In[20]:=",ExpressionUUID->"24b1d6d5-8138-410c-bad0-4688d4069032"],
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
+  "\[IndentingNewLine]", "\[IndentingNewLine]", 
+  RowBox[{"(*", " ", 
+   RowBox[{
+    RowBox[{"Section", " ", "for", " ", "gg"}], "\[Rule]", "Hg"}], " ", 
+   "*)"}]}]], "Input",
+ CellChangeTimes->{{3.775233725799533*^9, 
+  3.77523374355394*^9}},ExpressionUUID->"1f278cce-b737-471d-abb8-\
+571bd986d464"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"ggHgamp", "=", 
+   RowBox[{"Import", "[", "\"\<ggHg.m\>\"", "]"}]}], ";"}]], "Input",
+ CellChangeTimes->{{3.775233745909586*^9, 3.775233763976185*^9}},
+ CellLabel->"In[10]:=",ExpressionUUID->"9a2e8cfd-31b0-4513-b860-e5717141a96f"],
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"ggHgamp", "=", 
+   RowBox[{"ggHgamp", "//.", "SubDen"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"d", " ", "=", " ", 
+   RowBox[{"Collect", "[", 
+    RowBox[{
+     RowBox[{"ReleaseHold", "[", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{"HoldForm", "[", 
+          RowBox[{"Evaluate", "[", "ggHgamp", "]"}], "]"}], " ", ")"}], "//.",
+         " ", "RIntList"}], ")"}], "]"}], ",", 
+     RowBox[{"Mat", "[", "__", "]"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"fd", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"d", "//.", "LoopRefining"}], "//", "Refine"}], "//", 
+    "Simplify"}]}], ";"}]}], "Input",
+ CellChangeTimes->{{3.775233767887505*^9, 3.7752338144243193`*^9}},
+ CellLabel->"In[15]:=",ExpressionUUID->"f2581317-15ac-431d-858d-1506de0ee6ea"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"Export", "[", 
+   RowBox[{"\"\<ggHg_LR.m\>\"", ",", "fd"}], "]"}], ";"}]], "Input",
+ CellChangeTimes->{3.775233824527708*^9},
+ CellLabel->"In[19]:=",ExpressionUUID->"935c66bf-fd6a-4022-88ef-839267449906"],
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
+  "\[IndentingNewLine]"}]], "Input",
+ CellChangeTimes->{{3.775489103187828*^9, 
+  3.775489103852584*^9}},ExpressionUUID->"e4eda86f-c0c1-4ed1-b09c-\
+a197bbc299c9"],
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"triangle", " ", "=", " ", 
+   RowBox[{"Import", "[", "\"\<ggHgg_triangle_FeynAmp_2diags.m\>\"", "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"triangle", " ", "=", " ", 
+   RowBox[{
+    RowBox[{"triangle", " ", "//.", " ", "MAT"}], " ", "//.", " ", 
+    "SubDen"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"t", " ", "=", " ", 
+   RowBox[{"Collect", "[", 
+    RowBox[{
+     RowBox[{"ReleaseHold", "[", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{"HoldForm", "[", 
+          RowBox[{"Evaluate", "[", "triangle", "]"}], "]"}], " ", ")"}], "//.",
+         " ", "RIntList"}], ")"}], "]"}], ",", 
+     RowBox[{"Mat", "[", "__", "]"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"ft", "=", 
+   RowBox[{
+    RowBox[{"t", "//.", "LoopRefining"}], "//", "Refine"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"Export", "[", 
+   RowBox[{"\"\<ggHgg_LR_triangle_2diags.m\>\"", ",", "ft"}], "]"}], 
+  ";"}], "\[IndentingNewLine]"}], "Input",
+ CellChangeTimes->{{3.775489112120273*^9, 3.775489119038488*^9}},
+ CellLabel->"In[12]:=",ExpressionUUID->"e7549059-0b03-41c9-afd1-97986dde3359"],
+
+Cell[BoxData[""], "Input",
+ CellChangeTimes->{{3.7754904767164803`*^9, 
+  3.775490483960333*^9}},ExpressionUUID->"75c75df4-ee72-49af-9630-\
+1cf0eef74f43"],
+
+Cell[BoxData[""], "Input",
+ CellChangeTimes->{
+  3.775821061411274*^9},ExpressionUUID->"a4013e44-a682-4c70-a84f-\
+f4695f7dd230"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"triangle", " ", "=", " ", 
+   RowBox[{"Import", "[", "\"\<ggHgg_triangle_FeynAmp_2diags.m\>\"", "]"}]}], 
+  ";"}]], "Input",
+ CellLabel->"In[17]:=",ExpressionUUID->"73dfc6d7-5c31-463e-8864-6b5bef17b11d"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"triangle", "=", 
+  RowBox[{
+   RowBox[{
+    RowBox[{
+     RowBox[{
+      RowBox[{"triangle", "//.", 
+       RowBox[{"{", 
+        RowBox[{
+         RowBox[{"C0i", "[", "___", "]"}], "\[Rule]", "0"}], "}"}]}], "//.", 
+      "SubDen"}], "//.", "MAT"}], "//.", "MATColor"}], "//", 
+   "Simplify"}]}]], "Input",
+ CellChangeTimes->{{3.775490489071643*^9, 3.77549054704373*^9}, {
+  3.775490578383366*^9, 3.775490608694393*^9}},
+ CellLabel->"In[25]:=",ExpressionUUID->"b4100299-10f3-4c3c-90b5-db96319fb7d9"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"Amp", "[", 
+   RowBox[{
+    RowBox[{"{", 
+     RowBox[{
+      RowBox[{"{", 
+       RowBox[{
+        RowBox[{"V", "[", 
+         RowBox[{"5", ",", 
+          RowBox[{"{", "Glu1", "}"}]}], "]"}], ",", 
+        RowBox[{"k", "[", "1", "]"}], ",", "0", ",", 
+        RowBox[{"{", 
+         RowBox[{
+          SqrtBox["3"], " ", "ColorCharge"}], "}"}]}], "}"}], ",", 
+      RowBox[{"{", 
+       RowBox[{
+        RowBox[{"V", "[", 
+         RowBox[{"5", ",", 
+          RowBox[{"{", "Glu2", "}"}]}], "]"}], ",", 
+        RowBox[{"k", "[", "2", "]"}], ",", "0", ",", 
+        RowBox[{"{", 
+         RowBox[{
+          SqrtBox["3"], " ", "ColorCharge"}], "}"}]}], "}"}]}], "}"}], 
+    "\[Rule]", 
+    RowBox[{"{", 
+     RowBox[{
+      RowBox[{"{", 
+       RowBox[{
+        RowBox[{"S", "[", "1", "]"}], ",", 
+        RowBox[{"k", "[", "3", "]"}], ",", "MH", ",", 
+        RowBox[{"{", "}"}]}], "}"}], ",", 
+      RowBox[{"{", 
+       RowBox[{
+        RowBox[{"V", "[", 
+         RowBox[{"5", ",", 
+          RowBox[{"{", "Glu4", "}"}]}], "]"}], ",", 
+        RowBox[{"k", "[", "4", "]"}], ",", "0", ",", 
+        RowBox[{"{", 
+         RowBox[{
+          SqrtBox["3"], " ", "ColorCharge"}], "}"}]}], "}"}], ",", 
+      RowBox[{"{", 
+       RowBox[{
+        RowBox[{"V", "[", 
+         RowBox[{"5", ",", 
+          RowBox[{"{", "Glu5", "}"}]}], "]"}], ",", 
+        RowBox[{"k", "[", "5", "]"}], ",", "0", ",", 
+        RowBox[{"{", 
+         RowBox[{
+          SqrtBox["3"], " ", "ColorCharge"}], "}"}]}], "}"}]}], "}"}]}], 
+   "]"}], "[", 
+  RowBox[{"-", 
+   RowBox[{
+    FractionBox["1", 
+     RowBox[{"MW", " ", "SW", " ", "T"}]], 
+    RowBox[{"8", " ", 
+     SuperscriptBox["Alfas", "2"], " ", "EL", " ", 
+     SuperscriptBox["MT", "2"], " ", 
+     RowBox[{"B0i", "[", 
+      RowBox[{"bb0", ",", "T", ",", 
+       SuperscriptBox["MT", "2"], ",", 
+       SuperscriptBox["MT", "2"]}], "]"}], " ", 
+     RowBox[{"(", 
+      RowBox[{
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{"c1", "-", 
+          RowBox[{"2", " ", "c2"}], "+", "c3"}], ")"}], " ", 
+        RowBox[{"Pair", "[", 
+         RowBox[{
+          RowBox[{"e", "[", "1", "]"}], ",", 
+          RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+        RowBox[{"Pair", "[", 
+         RowBox[{
+          RowBox[{"e", "[", "2", "]"}], ",", 
+          RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{
+           RowBox[{"-", "2"}], " ", "c1"}], "+", "c2", "+", "c3"}], ")"}], 
+        " ", 
+        RowBox[{"Pair", "[", 
+         RowBox[{
+          RowBox[{"e", "[", "1", "]"}], ",", 
+          RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+        RowBox[{"Pair", "[", 
+         RowBox[{
+          RowBox[{"e", "[", "2", "]"}], ",", 
+          RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{"c1", "+", "c2", "-", 
+          RowBox[{"2", " ", "c3"}]}], ")"}], " ", 
+        RowBox[{"Pair", "[", 
+         RowBox[{
+          RowBox[{"e", "[", "1", "]"}], ",", 
+          RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+        RowBox[{"Pair", "[", 
+         RowBox[{
+          RowBox[{"ec", "[", "4", "]"}], ",", 
+          RowBox[{"ec", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}]}], 
+  "]"}]], "Output",
+ CellChangeTimes->{{3.7754905181011047`*^9, 3.775490547530642*^9}, {
+   3.7754905806927757`*^9, 3.775490609286749*^9}, 3.7754907803036346`*^9},
+ CellLabel->"Out[25]=",ExpressionUUID->"227ac9fd-122f-4bdd-8ce6-0421fc3101b9"]
+}, Open  ]],
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"t", " ", "=", " ", 
+   RowBox[{"Collect", "[", 
+    RowBox[{
+     RowBox[{"ReleaseHold", "[", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{"HoldForm", "[", 
+          RowBox[{"Evaluate", "[", "triangle", "]"}], "]"}], " ", ")"}], "//.",
+         " ", "RIntList"}], ")"}], "]"}], ",", 
+     RowBox[{"Mat", "[", "__", "]"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"ft", "=", 
+   RowBox[{
+    RowBox[{"t", "//.", "LoopRefining"}], "//", "Refine"}]}], ";"}]}], "Input",\
+
+ CellLabel->"In[26]:=",ExpressionUUID->"d027658a-37f9-489d-a307-4d535ae073b9"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ft", "//", "Simplify"}]], "Input",
+ CellChangeTimes->{{3.775490801911936*^9, 3.775490806703685*^9}},
+ CellLabel->"In[29]:=",ExpressionUUID->"55e4d6af-838f-45bf-ab25-da03c1c1d848"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"Amp", "[", 
+   RowBox[{
+    RowBox[{"{", 
+     RowBox[{
+      RowBox[{"{", 
+       RowBox[{
+        RowBox[{"V", "[", 
+         RowBox[{"5", ",", 
+          RowBox[{"{", "Glu1", "}"}]}], "]"}], ",", 
+        RowBox[{"k", "[", "1", "]"}], ",", "0", ",", 
+        RowBox[{"{", 
+         RowBox[{
+          SqrtBox["3"], " ", "ColorCharge"}], "}"}]}], "}"}], ",", 
+      RowBox[{"{", 
+       RowBox[{
+        RowBox[{"V", "[", 
+         RowBox[{"5", ",", 
+          RowBox[{"{", "Glu2", "}"}]}], "]"}], ",", 
+        RowBox[{"k", "[", "2", "]"}], ",", "0", ",", 
+        RowBox[{"{", 
+         RowBox[{
+          SqrtBox["3"], " ", "ColorCharge"}], "}"}]}], "}"}]}], "}"}], 
+    "\[Rule]", 
+    RowBox[{"{", 
+     RowBox[{
+      RowBox[{"{", 
+       RowBox[{
+        RowBox[{"S", "[", "1", "]"}], ",", 
+        RowBox[{"k", "[", "3", "]"}], ",", "MH", ",", 
+        RowBox[{"{", "}"}]}], "}"}], ",", 
+      RowBox[{"{", 
+       RowBox[{
+        RowBox[{"V", "[", 
+         RowBox[{"5", ",", 
+          RowBox[{"{", "Glu4", "}"}]}], "]"}], ",", 
+        RowBox[{"k", "[", "4", "]"}], ",", "0", ",", 
+        RowBox[{"{", 
+         RowBox[{
+          SqrtBox["3"], " ", "ColorCharge"}], "}"}]}], "}"}], ",", 
+      RowBox[{"{", 
+       RowBox[{
+        RowBox[{"V", "[", 
+         RowBox[{"5", ",", 
+          RowBox[{"{", "Glu5", "}"}]}], "]"}], ",", 
+        RowBox[{"k", "[", "5", "]"}], ",", "0", ",", 
+        RowBox[{"{", 
+         RowBox[{
+          SqrtBox["3"], " ", "ColorCharge"}], "}"}]}], "}"}]}], "}"}]}], 
+   "]"}], "[", 
+  RowBox[{"-", 
+   RowBox[{
+    FractionBox["1", 
+     RowBox[{"MW", " ", "SW", " ", "T"}]], 
+    RowBox[{"8", " ", 
+     SuperscriptBox["Alfas", "2"], " ", "EL", " ", 
+     SuperscriptBox["MT", "2"], " ", 
+     RowBox[{"(", 
+      RowBox[{"2", "+", 
+       FractionBox["1", "\[Epsilon]"], "+", 
+       RowBox[{"DiscB", "[", 
+        RowBox[{"T", ",", 
+         SqrtBox[
+          SuperscriptBox["MT", "2"]], ",", 
+         SqrtBox[
+          SuperscriptBox["MT", "2"]]}], "]"}], "+", 
+       RowBox[{"Log", "[", 
+        FractionBox[
+         SuperscriptBox["\[Micro]", "2"], 
+         SuperscriptBox["MT", "2"]], "]"}]}], ")"}], " ", 
+     RowBox[{"(", 
+      RowBox[{
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{"c1", "-", 
+          RowBox[{"2", " ", "c2"}], "+", "c3"}], ")"}], " ", 
+        RowBox[{"Pair", "[", 
+         RowBox[{
+          RowBox[{"e", "[", "1", "]"}], ",", 
+          RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+        RowBox[{"Pair", "[", 
+         RowBox[{
+          RowBox[{"e", "[", "2", "]"}], ",", 
+          RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{
+           RowBox[{"-", "2"}], " ", "c1"}], "+", "c2", "+", "c3"}], ")"}], 
+        " ", 
+        RowBox[{"Pair", "[", 
+         RowBox[{
+          RowBox[{"e", "[", "1", "]"}], ",", 
+          RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+        RowBox[{"Pair", "[", 
+         RowBox[{
+          RowBox[{"e", "[", "2", "]"}], ",", 
+          RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{"c1", "+", "c2", "-", 
+          RowBox[{"2", " ", "c3"}]}], ")"}], " ", 
+        RowBox[{"Pair", "[", 
+         RowBox[{
+          RowBox[{"e", "[", "1", "]"}], ",", 
+          RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+        RowBox[{"Pair", "[", 
+         RowBox[{
+          RowBox[{"ec", "[", "4", "]"}], ",", 
+          RowBox[{"ec", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}]}], 
+  "]"}]], "Output",
+ CellChangeTimes->{{3.775490802450275*^9, 3.775490807137723*^9}},
+ CellLabel->"Out[29]=",ExpressionUUID->"f7adf7fb-3d44-404a-b9d8-8367ef825cc7"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
+  "\[IndentingNewLine]"}]], "Input",
+ CellChangeTimes->{{3.775928007733971*^9, 3.775928050142716*^9}, 
+   3.775928158644534*^9, {3.776093459682819*^9, 
+   3.776093460132823*^9}},ExpressionUUID->"a9b9ca57-f825-4517-8b39-\
+8ebebaffad8a"],
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
+  "\[IndentingNewLine]", 
+  RowBox[{"(*", " ", 
+   RowBox[{"VELOCITY", " ", "SERIES"}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{"(*", 
+   RowBox[{"--", 
+    RowBox[{"--", 
+     RowBox[{"--", 
+      RowBox[{"--", 
+       RowBox[{"--", 
+        RowBox[{"--", 
+         RowBox[{"--", 
+          RowBox[{"--", 
+           RowBox[{"--", 
+            RowBox[{"--", 
+             RowBox[{"--", 
+              RowBox[{"--", 
+               RowBox[{"--", 
+                RowBox[{"--", 
+                 RowBox[{"--", 
+                  RowBox[{"--", 
+                   RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{
+                    "--", "--"}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]\
+}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}], "*)"}]}]], "Input",
+ CellChangeTimes->{{3.778422396725979*^9, 
+  3.778422453872706*^9}},ExpressionUUID->"f261cfc3-9a94-4830-9195-\
+aa48c3328d0f"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"MakeRefineSeriesOf", "[", 
+   RowBox[{"i_", ",", "f_", ",", "string_"}], "]"}], ":=", 
+  "\[IndentingNewLine]", 
+  RowBox[{"{", "\[IndentingNewLine]", 
+   RowBox[{"Do", "[", "\[IndentingNewLine]", 
+    RowBox[{
+     RowBox[{
+      RowBox[{
+       RowBox[{"Serieslist", "[", 
+        RowBox[{"[", "n", "]"}], "]"}], "=", 
+       RowBox[{"LoopRefineSeries", "[", 
+        RowBox[{
+         RowBox[{"LRlistVelSub", "[", 
+          RowBox[{"[", "n", "]"}], "]"}], ",", 
+         RowBox[{"{", 
+          RowBox[{"\[Beta]", ",", "0", ",", "2"}], "}"}]}], "]"}]}], ";", 
+      "\[IndentingNewLine]", 
+      RowBox[{"Print", "[", "n", "]"}], ";", "\[IndentingNewLine]", 
+      RowBox[{"Export", "[", 
+       RowBox[{"string", ",", "Serieslist"}], "]"}], ";"}], 
+     "\[IndentingNewLine]", ",", 
+     RowBox[{"{", 
+      RowBox[{"n", ",", "i", ",", "f"}], "}"}]}], "]"}], 
+   "\[IndentingNewLine]", "}"}]}]], "Input",
+ CellLabel->"In[47]:=",ExpressionUUID->"5fb9542c-66c2-4b59-b6c0-3d1e3db1842f"],
+
+Cell[BoxData[
+ RowBox[{"(*", " ", "TRIANGLES", " ", "*)"}]], "Input",
+ CellChangeTimes->{{3.778510730293254*^9, 
+  3.778510735378016*^9}},ExpressionUUID->"ce77b5bd-ebce-4c42-9263-\
+53392240007e"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{
+   "Translate", " ", "from", " ", "FormCalc", " ", "to", " ", "Package", " ", 
+    "X", " ", 
+    RowBox[{"format", "."}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"triangle", " ", "=", " ", 
+     RowBox[{
+     "Import", "[", "\"\<ggHgg_triangle_FeynAmp_38diags.m\>\"", "]"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"triangle", " ", "=", " ", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"triangle", " ", "//.", "MAT"}], "//.", " ", "MATColor"}], " ",
+       "//.", " ", "SubDen"}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"t", " ", "=", " ", 
+     RowBox[{"Collect", "[", 
+      RowBox[{
+       RowBox[{"ReleaseHold", "[", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"(", 
+           RowBox[{"HoldForm", "[", 
+            RowBox[{"Evaluate", "[", "triangle", "]"}], "]"}], " ", ")"}], "//.",
+           " ", "RIntList"}], ")"}], "]"}], ",", 
+       RowBox[{"Mat", "[", "__", "]"}]}], "]"}]}], ";"}], 
+   "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{"\"\<ggHgg_PV_triangle_38diags.m\>\"", ",", "t"}], "]"}], 
+    ";"}]}]}]], "Input",
+ CellChangeTimes->{{3.778510715046095*^9, 3.7785107796040277`*^9}},
+ CellLabel->"In[16]:=",ExpressionUUID->"9997d1a8-9d83-430a-8554-6cfc2a974c27"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{
+   "Loop", " ", "refine", " ", "each", " ", "term", " ", "to", " ", "get", 
+    " ", "analytical", " ", 
+    RowBox[{"expressions", "."}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"listPV", " ", "=", " ", 
+     RowBox[{"ToExpression", "[", 
+      RowBox[{"Import", "[", 
+       RowBox[{"\"\<trianglePVs.m\>\"", ",", "\"\<Lines\>\""}], "]"}], 
+      "]"}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"LRlist", " ", "=", " ", 
+     RowBox[{"Range", "[", 
+      RowBox[{"Length", "[", "listPV", "]"}], "]"}]}], ";"}], 
+   "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Do", "[", "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{
+       RowBox[{
+        RowBox[{"LRlist", "[", 
+         RowBox[{"[", "n", "]"}], "]"}], "=", 
+        RowBox[{"LoopRefine", "[", 
+         RowBox[{"listPV", "[", 
+          RowBox[{"[", "n", "]"}], "]"}], "]"}]}], ";"}], 
+      "\[IndentingNewLine]", ",", 
+      RowBox[{"{", 
+       RowBox[{"n", ",", 
+        RowBox[{"Range", "[", 
+         RowBox[{"Length", "[", "listPV", "]"}], "]"}]}], "}"}]}], "]"}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"LRlist", "=", 
+     RowBox[{
+      RowBox[{"LRlist", " ", "//", "Refine"}], "//", "Simplify"}]}], ";"}], 
+   "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{"\"\<analyticPV_triangles.m\>\"", ",", "LRlist"}], "]"}], 
+    ";"}]}]}]], "Input",
+ CellChangeTimes->{{3.77851101564491*^9, 3.778511062594967*^9}, {
+  3.7785111136692533`*^9, 3.778511191309515*^9}, {3.778511261373001*^9, 
+  3.778511275963592*^9}, {3.7785113263462954`*^9, 3.778511340801446*^9}, {
+  3.7785119479302187`*^9, 3.778511963435474*^9}},
+ CellLabel->"In[73]:=",ExpressionUUID->"3e8bf30c-17cd-43d9-b2c2-32aaac3fabf4"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"Sub", " ", 
+    RowBox[{"velocities", "."}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"LRlist", "=", 
+     RowBox[{"Import", "[", "\"\<analyticPV_triangles.m\>\"", "]"}]}], ";"}], 
+   "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"LRlistVelSub", "=", 
+     RowBox[{"LRlist", "//.", "VelSub"}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{"\"\<analyticPVwVel_triangles.m\>\"", ",", "LRlistVelSub"}], 
+     "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Serieslist", "=", "LRlistVelSub"}], ";"}]}]}]], "Input",
+ CellChangeTimes->{{3.778511450788786*^9, 3.7785114862093163`*^9}, {
+  3.7785117654748707`*^9, 3.778511797626837*^9}, {3.7785119836535892`*^9, 
+  3.7785119907167*^9}},
+ CellLabel->"In[78]:=",ExpressionUUID->"0faeac76-b8a2-41ff-a322-8a7cc20f5cdc"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"Make", " ", "velocity", " ", 
+    RowBox[{"series", "."}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{"MakeRefineSeriesOf", "[", 
+   RowBox[{"1", ",", 
+    RowBox[{"Length", "[", "LRlistVelSub", "]"}], ",", 
+    "\"\<SeriesPV_triangles.m\>\""}], "]"}]}]], "Input",
+ CellChangeTimes->{{3.7785115750348883`*^9, 3.778511599881691*^9}, 
+   3.778511760474266*^9, {3.778511968570036*^9, 3.778511982216249*^9}},
+ CellLabel->"In[82]:=",ExpressionUUID->"0aeaadd3-5332-4530-a274-2d257367f236"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["1"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512382902973*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"941d2971-0756-46af-bbfa-35b438dd0e63"],
+
+Cell[BoxData["2"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.7785123829155407`*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"7f9fc3c9-6ddc-47d5-af72-107027ebb276"],
+
+Cell[BoxData["3"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512382931138*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"da3f0120-fdef-4857-aa25-2ee29cd3ae1a"],
+
+Cell[BoxData["4"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.7785123829400806`*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"b6c871c9-430f-4950-8ffa-bdb5d1f09ffe"],
+
+Cell[BoxData["5"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512382949741*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"08b8650b-700a-4a81-98cd-762915822ac6"],
+
+Cell[BoxData["6"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512382958762*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"dc323011-3d7c-4c71-98f9-fc651ab59bcd"],
+
+Cell[BoxData["7"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512383041127*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"dcbc9173-996e-4615-8934-be1437da9dbc"],
+
+Cell[BoxData["8"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512383054595*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"5235f72f-1e09-460f-a972-86c8776de7bf"],
+
+Cell[BoxData["9"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512383069906*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"51d0dc87-3144-4105-a8ae-a650d049a319"],
+
+Cell[BoxData["10"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512383500832*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"61f11d61-f008-44dc-96d0-db1dad10327b"],
+
+Cell[BoxData["11"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.7785123835765142`*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"f3db9187-5fb7-4179-9d5d-fee11f151b8a"],
+
+Cell[BoxData["12"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512383592807*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"55143390-2218-4242-8577-41b5b68bf26f"],
+
+Cell[BoxData["13"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512383605513*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"de5e700a-5013-445e-b472-25d383ca5cf3"],
+
+Cell[BoxData["14"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512384074768*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"04316d54-f297-424b-9b49-acfd45d21630"],
+
+Cell[BoxData["15"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.7785123841633387`*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"017b3ad1-2b25-45a4-8b9d-111686161236"],
+
+Cell[BoxData["16"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.7785123857490664`*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"cf381b0c-ac88-40ab-b951-874fcfdfa6c6"],
+
+Cell[BoxData["17"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512385808852*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"67e161ed-8390-46fa-a181-f56c98936077"],
+
+Cell[BoxData["18"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512387347632*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"12eddb76-c821-45d5-9119-d5d357f2d4eb"],
+
+Cell[BoxData["19"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512387423924*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"f42cca31-6f52-49bc-b356-94d57c78fd27"],
+
+Cell[BoxData["20"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512387488948*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"812113fc-a308-46fd-b058-9e34214fc722"],
+
+Cell[BoxData["21"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512389090189*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"5f1deb06-8268-41a5-84bd-e5a8ada699a5"],
+
+Cell[BoxData["22"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.7785123892488117`*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"28c127e4-f366-4435-9db7-8b114a82b320"],
+
+Cell[BoxData["23"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.7785123893298607`*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"db1f8f22-c844-4e1e-892c-73ca3a41eaee"],
+
+Cell[BoxData["24"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512389413691*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"ae692077-c31d-43f0-a099-c52e179f8dea"],
+
+Cell[BoxData["25"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.77851239078407*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"8f0af9a8-1bc7-4b92-a518-3b7fb75be3ae"],
+
+Cell[BoxData["26"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512390869191*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"60b61b67-6c61-4599-a20d-463c308eb270"],
+
+Cell[BoxData["27"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512390930818*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"60c27d5d-d770-45b4-8b6e-611a3c03ef79"],
+
+Cell[BoxData["28"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512394937373*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"e5c01ae9-55fc-47f8-9c3d-6f54b4b00756"],
+
+Cell[BoxData["29"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.77851239595619*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"7f11c8de-f7aa-4313-ab85-f0bc8404662d"],
+
+Cell[BoxData["30"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.7785123961155777`*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"9e154613-6e9c-4d11-8ddd-6170705528ab"],
+
+Cell[BoxData["31"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512396272484*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"2f8e02d9-a5b4-4bd9-b9d9-aec02153dd7c"],
+
+Cell[BoxData["32"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.7785124016781063`*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"650def7c-a65f-44fb-811b-1fa0b5a45d15"],
+
+Cell[BoxData["33"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.7785124017895813`*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"6474532b-9599-4489-88db-58d38314ab6f"],
+
+Cell[BoxData["34"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512406577866*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"226a40c4-f169-42d2-8ab6-1f67a2f873ea"],
+
+Cell[BoxData["35"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.77851240750906*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"a1944f0f-52a8-49d8-b9c3-20fec2f3235a"],
+
+Cell[BoxData["36"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512407615101*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"3b4b9b10-ab7e-4de6-ab0f-e0018abf925b"],
+
+Cell[BoxData["37"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.77851240772073*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"6c480e69-9121-408a-8dec-f908c61e8d42"],
+
+Cell[BoxData["38"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.7785124137636633`*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"cba40a3e-274e-4ca6-acca-4f9780f8640b"],
+
+Cell[BoxData["39"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512413888442*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"e62616bb-5c74-4eeb-afa2-bb439d81b80e"],
+
+Cell[BoxData["40"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512414033155*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"52e54f32-ac58-4414-93fa-68fcf6f14698"],
+
+Cell[BoxData["41"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512415469339*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"50d0b363-2b99-4f39-bfc0-29a59ae13c83"],
+
+Cell[BoxData["42"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512415986779*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"5dca03fa-6242-4056-b5c8-360525f873d4"],
+
+Cell[BoxData["43"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512416119038*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"91a05c83-f424-4d73-8df9-fd9365c15c65"],
+
+Cell[BoxData["44"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512416251133*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"e35ff97f-1b31-4eec-84d3-b936608c353c"],
+
+Cell[BoxData["45"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512417701735*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"45f0eca5-0ad3-474d-8922-cc6c393a259f"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"{", "Null", "}"}]], "Output",
+ CellChangeTimes->{3.778511859290827*^9, 3.778512417825062*^9},
+ CellLabel->"Out[82]=",ExpressionUUID->"cfcdfb24-b305-466a-a1bb-a332ab352a9e"]
+}, Closed]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"Serieslist", "=", 
+   RowBox[{
+    RowBox[{"Import", "[", "\"\<SeriesPV_triangles.m\>\"", "]"}], "//", 
+    "Simplify"}]}], ";"}]], "Input",
+ CellChangeTimes->{{3.7785118753455553`*^9, 3.778511898085145*^9}, {
+  3.778512429633429*^9, 3.778512431084112*^9}},
+ CellLabel->"In[83]:=",ExpressionUUID->"09576c11-deed-4e65-b168-19d328941f7e"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"Define", " ", "replacemente", " ", 
+    RowBox[{"rule", "."}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"SetAttributes", "[", 
+     RowBox[{"f", ",", "Listable"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"f", "[", 
+      RowBox[{"a_", ",", "b_"}], "]"}], ":=", 
+     RowBox[{"a", "\[Rule]", "b"}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"replacement", "=", 
+     RowBox[{"f", "[", 
+      RowBox[{"listPV", ",", "Serieslist"}], "]"}]}], ";"}], 
+   "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+     "\"\<replacementRule_triangles_velocity.m\>\"", ",", "replacement"}], 
+     "]"}], ";"}]}]}]], "Input",
+ CellChangeTimes->{{3.7785121633002787`*^9, 3.778512185802937*^9}, {
+  3.778512231802353*^9, 3.778512308738598*^9}, {3.778512611400076*^9, 
+  3.7785126155855703`*^9}, {3.778512712549934*^9, 
+  3.778512714813554*^9}},ExpressionUUID->"e9cb917d-6bce-4b94-a047-\
+15b919e9e4cc"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"Sub", " ", "back", " ", "into", " ", "the", " ", 
+    RowBox[{"amplitude", "."}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"t", "=", 
+     RowBox[{"Import", "[", "\"\<ggHgg_PV_triangle_38diags.m\>\"", "]"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"replacement", "=", 
+     RowBox[{
+     "Import", "[", "\"\<replacementRule_triangles_velocity.m\>\"", "]"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{"tvel", "=", 
+    RowBox[{"t", "//.", "replacement"}]}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{"\"\<ggHgg_VSeries_triangles.m\>\"", ",", "tvel"}], "]"}], 
+    ";"}]}]}]], "Input",
+ CellChangeTimes->{{3.778512663505072*^9, 3.778512822513528*^9}},
+ CellLabel->"In[98]:=",ExpressionUUID->"58da36ab-d8d7-464f-a677-c4ffb3b43015"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"tvelSeries", "=", 
+  RowBox[{"LoopRefineSeries", "[", 
+   RowBox[{"tvel", ",", 
+    RowBox[{"{", 
+     RowBox[{"\[Beta]", ",", "0", ",", "2"}], "}"}]}], "]"}]}]], "Input",
+ CellChangeTimes->{{3.778513234373919*^9, 3.77851323517974*^9}, {
+  3.778513335636904*^9, 3.778513337021649*^9}, {3.778513385435795*^9, 
+  3.778513408995431*^9}},
+ CellLabel->
+  "In[102]:=",ExpressionUUID->"93d22a91-7738-43f2-ae38-e21755ca22f1"],
+
+Cell[BoxData[
+ TemplateBox[{
+  "Simplify","time",
+   "\"Time spent on a transformation exceeded \
+\\!\\(\\*RowBox[{\\\"300.`\\\"}]\\) seconds, and the transformation was \
+aborted. Increasing the value of TimeConstraint option may improve the result \
+of simplification.\"",2,102,18,17498789627688163568,"Alternate Kernel"},
+  "MessageTemplate"]], "Message", "MSG",
+ CellChangeTimes->{3.7785140277805433`*^9},
+ CellLabel->
+  "During evaluation of \
+In[102]:=",ExpressionUUID->"dc04a919-7e52-45e2-bb44-a344b5d1d308"],
+
+Cell[BoxData[
+ TemplateBox[{
+  "Simplify","time",
+   "\"Time spent on a transformation exceeded \
+\\!\\(\\*RowBox[{\\\"300.`\\\"}]\\) seconds, and the transformation was \
+aborted. Increasing the value of TimeConstraint option may improve the result \
+of simplification.\"",2,102,19,17498789627688163568,"Alternate Kernel"},
+  "MessageTemplate"]], "Message", "MSG",
+ CellChangeTimes->{3.778514355993286*^9},
+ CellLabel->
+  "During evaluation of \
+In[102]:=",ExpressionUUID->"99a74ed9-9abc-451d-8242-fd4078fd5891"],
+
+Cell[BoxData[
+ TemplateBox[{
+  "Simplify","time",
+   "\"Time spent on a transformation exceeded \
+\\!\\(\\*RowBox[{\\\"300.`\\\"}]\\) seconds, and the transformation was \
+aborted. Increasing the value of TimeConstraint option may improve the result \
+of simplification.\"",2,102,20,17498789627688163568,"Alternate Kernel"},
+  "MessageTemplate"]], "Message", "MSG",
+ CellChangeTimes->{3.7785147038057737`*^9},
+ CellLabel->
+  "During evaluation of \
+In[102]:=",ExpressionUUID->"1070ad89-c66d-4906-aa54-fd4ac95964d8"],
+
+Cell[BoxData[
+ TemplateBox[{
+  "General","stop",
+   "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"Simplify\\\", \
+\\\"::\\\", \\\"time\\\"}], \\\"MessageName\\\"]\\) will be suppressed during \
+this calculation.\"",2,102,21,17498789627688163568,"Alternate Kernel"},
+  "MessageTemplate"]], "Message", "MSG",
+ CellChangeTimes->{3.7785147039936247`*^9},
+ CellLabel->
+  "During evaluation of \
+In[102]:=",ExpressionUUID->"9dbf4032-8c2f-4bba-9001-aa2649499b6f"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[""], "Input",
+ CellChangeTimes->{{3.778513238312398*^9, 
+  3.7785132395692987`*^9}},ExpressionUUID->"6e5f5a2d-f8d8-41cc-b7f7-\
+193907c772e2"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(", 
+   InterpretationBox[
+    RowBox[{
+     RowBox[{"-", 
+      RowBox[{
+       FractionBox["1", 
+        RowBox[{"MW", " ", "SW"}]], 
+       RowBox[{"2", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["Alfas", "2"], " ", "c3", " ", "EL", " ", 
+          SuperscriptBox["MT", "2"], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             FractionBox["1", "T"], 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "-", 
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}]], 
+                   RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    FractionBox["T", "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                    ")"}]}]}]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+               
+               RowBox[{
+                FractionBox["1", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], "-", "T"}]], 
+                RowBox[{
+                 RowBox[{"(", 
+                  RowBox[{
+                   SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                   SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                   RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                   RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                  ")"}]}]}], "-", 
+               RowBox[{"16", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], "2"]}]], 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}]}], ")"}]}]}], "+", 
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}]}]], 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                    
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}]}], 
+                 ")"}]}], "+", 
+               RowBox[{
+                FractionBox["1", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], "-", "T"}]], 
+                RowBox[{"4", " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                   "-", 
+                   RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    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", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                   RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    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[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}]}], ")"}]}], "+", 
+            RowBox[{
+             FractionBox["1", 
+              RowBox[{
+               RowBox[{"2", " ", 
+                SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+               "U"}]], 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "+", 
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}]], 
+                   RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}]}], "+", 
+                    FractionBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], "\[Epsilon]"], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                    ")"}]}]}]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+               
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}]], 
+                   RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], "-", 
+                  RowBox[{
+                   FractionBox["1", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], "2"]], 
+                   RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    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[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}]}], 
+                 ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+               RowBox[{
+                FractionBox["1", 
+                 RowBox[{
+                  RowBox[{"-", 
+                   SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                  "U"}]], 
+                RowBox[{"4", " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                   RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    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["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                   RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                  ")"}]}]}], "-", 
+               RowBox[{
+                FractionBox["1", 
+                 RowBox[{
+                  RowBox[{"-", 
+                   SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                  "U"}]], 
+                RowBox[{
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"-", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                   SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    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["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                   RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                  ")"}]}]}], "+", 
+               RowBox[{
+                FractionBox["1", "T24"], 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "8"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"3", " ", "S34"}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "T14"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", "S34", "+", "T", "-", 
+                    RowBox[{"3", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "+", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "+", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    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[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}]}], "-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], "2"]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"3", " ", "S34"}], "+", "T", "-", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "T14"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", "S34", "+", "T", "-", 
+                    RowBox[{"2", " ", "T24"}], "-", 
+                    RowBox[{"3", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "+", "T", "-", 
+                    RowBox[{"2", " ", "T24"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "+", "T", "-", 
+                    RowBox[{"2", " ", "T24"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    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[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}]}], ")"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}]], 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}]}], "+", 
+                    FractionBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], "\[Epsilon]"], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                    ")"}]}]}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "S"}], "+", "T14"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    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", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    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[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}]], 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "T14"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    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", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    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[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T24", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T24", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "T14"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T", "-", "T24", "-", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "S34"}], "+", "T", "-", "T24", "+", "U"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "+", 
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}]], 
+                   RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "T14"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    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", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    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[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"3", " ", "S34"}], "+", "T", "-", 
+                    RowBox[{"2", " ", "T24"}], "-", 
+                    RowBox[{"3", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"3", " ", "S34"}], "+", "T", "-", 
+                    RowBox[{"2", " ", "T24"}], "-", 
+                    RowBox[{"3", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "T14"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", 
+                    RowBox[{"3", " ", "S34"}], "+", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T24"}], "-", 
+                    RowBox[{"5", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"5", " ", "S34"}], "+", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T24"}], "+", 
+                    RowBox[{"3", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}]}], ")"}]}], "+", 
+               RowBox[{
+                FractionBox["1", "T14"], 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"8", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    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[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"3", " ", "S34"}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", "S34", "-", 
+                    RowBox[{"3", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    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[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    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[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}]}], "-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], "2"]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    RowBox[{"2", " ", "T14"}], "+", "U"}], ")"}], " ", 
+                    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[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", 
+                    RowBox[{"4", " ", "S34"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", 
+                    RowBox[{"4", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    RowBox[{"2", " ", "T14"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    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[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    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[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}]}], ")"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}]], 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}]}], "+", 
+                    FractionBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], "\[Epsilon]"], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                    ")"}]}]}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    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", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    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", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    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[{"-", "S"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    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", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}]], 
+                   RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    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", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    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", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    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[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    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[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    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", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "+", "U"}], ")"}], " ", 
+                    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[{"S", "-", "T24"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "S"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "7"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"3", " ", "S"}], "+", 
+                    RowBox[{"8", " ", "T"}], "+", 
+                    RowBox[{"5", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "7"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"3", " ", "S"}], "+", 
+                    RowBox[{"8", " ", "S34"}], "+", 
+                    RowBox[{"5", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "+", 
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}]], 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    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", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    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", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    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[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    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[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}]}], " ", 
+                    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", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    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[{"S", "-", "T24"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", 
+                    RowBox[{"2", " ", "S34"}], "+", "T24", "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", 
+                    RowBox[{"2", " ", "T"}], "+", "T24", "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}]}], ")"}]}]}], ")"}]}], 
+            "+", 
+            RowBox[{
+             FractionBox["1", "S34"], 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "-", 
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                   RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    FractionBox["S34", "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                    ")"}]}]}]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+               
+               RowBox[{
+                FractionBox["1", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                RowBox[{"4", " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                   "-", 
+                   RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                 " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    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[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                   RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                   RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", 
+                   RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                    " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}]}], 
+                  "+", 
+                  RowBox[{
+                   FractionBox["1", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], "2"]], 
+                   RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}]}], 
+                 ")"}]}], "+", 
+               RowBox[{
+                FractionBox["1", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                RowBox[{
+                 RowBox[{"(", 
+                  RowBox[{
+                   SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                   SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"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[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                   RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                  ")"}]}]}], "-", 
+               RowBox[{
+                FractionBox["1", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", 
+                  "T14"}]], 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    FractionBox["S34", "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                    ")"}]}]}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    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[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "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[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", "T24", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    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[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                  RowBox[{"8", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], "2"]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", 
+                    RowBox[{"4", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"4", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", 
+                    RowBox[{"2", " ", "S"}], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "+", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S"}], "+", "S34", "-", 
+                    RowBox[{"2", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"4", " ", "T"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}]}], ")"}]}], "-", 
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S"}], "-", "T24", "-", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", "S", "-", "S34", "-", "T",
+                     "+", "T14"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    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[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}], "-", 
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                   RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                    " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S"}], "-", "T24", "-", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "-", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    RowBox[{"6", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S"}], "+", "S34", "-", 
+                    RowBox[{"2", " ", "T"}], "+", 
+                    RowBox[{"6", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "+", 
+                    RowBox[{"2", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    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[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "+", 
+                    RowBox[{"2", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "+", 
+                    RowBox[{"2", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}]}], ")"}]}]}], ")"}]}], 
+            "+", 
+            RowBox[{
+             FractionBox["1", "U"], 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                FractionBox["1", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], "-", "U"}]], 
+                RowBox[{
+                 RowBox[{"(", 
+                  RowBox[{
+                   SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                   SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                   RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                   RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                  ")"}]}]}], "-", 
+               RowBox[{"16", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}]}]], 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                    RowBox[{"3", " ", "U"}], "-", 
+                    FractionBox["U", "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                  "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], "2"]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U", "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    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", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], "+", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                    
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    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[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+               RowBox[{"4", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                  
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}]], 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                    
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    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[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}]}], ")"}]}], "+", 
+               RowBox[{
+                FractionBox["1", "T14"], 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", 
+                   RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "S34", "+", "T", "-", "T24"}], ")"}], 
+                    " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "S34", "-", "T", "+", "T24"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    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", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}]], 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                    RowBox[{"3", " ", "U"}], "-", 
+                    FractionBox["U", "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                    ")"}]}]}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "S"}], "+", "S34", "-", "T", "+", "T24"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "-", 
+                  RowBox[{"8", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], "2"]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U", "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    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", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], "+", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                    
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", 
+                    RowBox[{"2", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", 
+                    RowBox[{"2", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    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", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "S34"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "S34", "+", "T", "-", "T24"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}]}], ")"}]}], "-", 
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}]], 
+                   RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                    
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "S34"}], "+", 
+                    RowBox[{"4", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "T14"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "S34"}], "+", 
+                    RowBox[{"4", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "T14"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    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", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "S34", "+", "T", "-", "T24"}], ")"}], 
+                    " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"8", " ", "S34"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "-", 
+                    RowBox[{"3", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", "T14", "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"8", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "-", 
+                    RowBox[{"3", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    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", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}]}], ")"}]}], "+", 
+               RowBox[{
+                FractionBox["1", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", 
+                  "T14"}]], 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}]], 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                    RowBox[{"3", " ", "U"}], "-", 
+                    FractionBox["U", "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                    ")"}]}]}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    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", "[", "5", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", "T14"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    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", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                  RowBox[{"8", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                    
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", "U"}], ")"}], " ", 
+                    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[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "S34"}], "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"4", " ", "T"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", 
+                    RowBox[{"2", " ", "S"}], "-", 
+                    RowBox[{"2", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    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", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    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", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "+", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], "2"]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U", "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    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[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"2", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "S"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    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", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    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", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}]}], ")"}]}], "-", 
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}]], 
+                   RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                    
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T14"}], "-", "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S34"}], "+", 
+                    RowBox[{"2", " ", "T24"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"6", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", 
+                    RowBox[{"6", " ", "S"}], "-", 
+                    RowBox[{"2", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "-", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    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", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "-", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    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", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    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", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    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", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}], "-", 
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}]], 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T14"}], "-", "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", "T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", "S", "-", "T", "+", "T14",
+                     "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    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", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    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", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    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", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    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", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}]}], ")"}]}]}], ")"}]}], 
+            "+", 
+            RowBox[{
+             FractionBox["1", "T24"], 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"-", 
+                RowBox[{
+                 FractionBox["1", "T"], 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "S34", "-", "T14", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "S34", "+", "T14", "-", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    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[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}]}], "+", 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}]], 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    FractionBox["T", "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                    ")"}]}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "S34", "-", "T14", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+                   RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                    
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", "T", "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", "T", "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "S34"}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "S34", "-", "T14", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], "+", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], "2"]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", "T", "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", "T", "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    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", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "S34"}], "+", "T", "+", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "S34", "-", "T14", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", 
+                    RowBox[{"2", " ", "T24"}], "+", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}]}], ")"}]}], "-", 
+                   RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}]], 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                    
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "S34"}], "+", "T", "+", 
+                    RowBox[{"2", " ", "T24"}], "+", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "S34"}], "+", "T", "+", 
+                    RowBox[{"2", " ", "T24"}], "+", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "S34", "-", "T14", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{"16", " ", 
+                    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[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"8", " ", "S34"}], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", "T", "+", 
+                    RowBox[{"2", " ", "T14"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T24"}], "-", 
+                    RowBox[{"8", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}]}], ")"}]}]}], "-", 
+               RowBox[{
+                FractionBox["1", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", 
+                  "T14"}]], 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "2"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "S34"}], " ", "T"}], "+", 
+                    RowBox[{"S34", " ", "T14"}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "U"}], ")"}]}], "+", 
+                    RowBox[{"T", " ", "U"}], "+", 
+                    RowBox[{"T14", " ", "U"}], "-", 
+                    RowBox[{"S", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["S34", "2"]}], "-", 
+                    RowBox[{"4", " ", "S34", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "S34", " ", "T14"}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "U"}], ")"}]}], "+", 
+                    RowBox[{"4", " ", "T", " ", "U"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "U"}], "+", 
+                    SuperscriptBox["U", "2"], "-", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"4", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"4", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"32", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", "S34"}], "+", "U"}], ")"}], " ", 
+                    
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", "S34"}], "+", "U"}], ")"}], " ", 
+                    
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], 
+                    ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}]}], 
+                    ")"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "S"}], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T14"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    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", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], ")"}]}],
+                     "+", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], 
+                    "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", "T24", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}]}], 
+                    ")"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "-", 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["S34", "2"]}], "-", 
+                    RowBox[{"2", " ", "S34", " ", "T"}], "-", 
+                    RowBox[{"S34", " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "S34"}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "-", 
+                    RowBox[{"3", " ", "U"}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "T", " ", "U"}], "+", 
+                    RowBox[{"4", " ", "T14", " ", "U"}], "+", 
+                    RowBox[{"T24", " ", "U"}], "+", 
+                    SuperscriptBox["U", "2"]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T24", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "S34"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "S34", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T", " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T24", " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}]}], 
+                    ")"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], ")"}]}],
+                     "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "U"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    SuperscriptBox["T", "2"], "-", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "-", 
+                    SuperscriptBox["T24", "2"], "-", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], ")"}]}],
+                     "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "+", 
+                    RowBox[{"5", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"80", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"10", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"7", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"7", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"10", " ", "T"}], "+", 
+                    RowBox[{"10", " ", "T14"}], "+", 
+                    RowBox[{"7", " ", "T24"}]}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14"}], 
+                    ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "192"}], " ", 
+                    SuperscriptBox["MT", "6"]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "3"]}], "-", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T", "2"], " ", "T14"}], "-", 
+                    RowBox[{"9", " ", "T", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "3"]}], "-", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", "T"}], "+", 
+                    RowBox[{"9", " ", "T14"}], "-", "T24"}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T24"}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"5", " ", "T", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"5", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    SuperscriptBox["T24", "3"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"18", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"2", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", "T14"}], "+", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", "T"}], "+", 
+                    RowBox[{"8", " ", "T14"}], "-", 
+                    RowBox[{"4", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"T", " ", "T24"}], "-", 
+                    RowBox[{"T14", " ", "T24"}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T24"}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14"}], 
+                    ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", "T14"}], "+", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "-", "T24"}], ")"}]}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}]}], 
+                    ")"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], ")"}], 
+                    "2"]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "U"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    SuperscriptBox["T", "2"], "-", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "-", 
+                    SuperscriptBox["T24", "2"], "-", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], ")"}]}],
+                     "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "80"}], " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T", "2"]}], "-", 
+                    RowBox[{"10", " ", "T", " ", "T14"}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"4", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"4", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "+", "T24"}], ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T"}], "+", 
+                    RowBox[{"5", " ", "T14"}], "+", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"24", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"6", " ", "T"}], "+", 
+                    RowBox[{"6", " ", "T14"}], "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "-", 
+                    "T24"}], ")"}], "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T24"}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14"}], 
+                    ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "6"], " ", "T24"}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "3"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", "T14"}], "+", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "T14"}], "-", 
+                    RowBox[{"5", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"3", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"3", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "T14"}], "-", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"10", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"8", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"8", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", "T14"}], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"T", " ", "T24"}], "-", 
+                    RowBox[{"T14", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}]}], 
+                    ")"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], ")"}], 
+                    "2"]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "+", 
+            RowBox[{
+             FractionBox["1", 
+              RowBox[{
+               SuperscriptBox["MH", "2"], "-", "S", "-", "T24", "-", "U"}]], 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"-", 
+                RowBox[{
+                 FractionBox["1", "S34"], 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    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[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    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[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    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[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    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[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    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", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    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[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    FractionBox["S34", "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    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[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    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[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    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[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    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[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    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", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    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[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", 
+                    RowBox[{"4", " ", "T"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S"}], "+", "S34", "+", 
+                    RowBox[{"2", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", "T"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", "T"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    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[{
+                    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[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "+", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], "2"]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", 
+                    RowBox[{"4", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"4", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", 
+                    RowBox[{"2", " ", "S"}], "-", "S34", "+", 
+                    RowBox[{"2", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    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[{
+                    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[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}]}], ")"}]}], "-", 
+                   RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                    " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    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[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "-", 
+                    RowBox[{"3", " ", "S34"}], "+", 
+                    RowBox[{"2", " ", "T24"}], "-", 
+                    RowBox[{"6", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S"}], "+", "S34", "+", 
+                    RowBox[{"6", " ", "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[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S"}], "-", "T", "-", "T14"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    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[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "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[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "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[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    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[{"-", 
+                    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[{
+                    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[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}], "-", 
+                   RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S"}], "-", "T", "-", "T14"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    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[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "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[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"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", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", "S", "-", "S34", "+", 
+                    "T24", "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "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[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    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[{"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[{
+                    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[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}]}], ")"}]}]}], "+", 
+               RowBox[{
+                FractionBox["1", "T"], 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                    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[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    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[{"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[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    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[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T14", "+", 
+                    
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    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[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "-", 
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}]], 
+                   RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    FractionBox["T", "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                    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[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    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[{"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[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    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[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T14", "+", 
+                    
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    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[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "-", 
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}]], 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"T14", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "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[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    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[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    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", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", "S34", "+", "T14", "+", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"T14", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"T14", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "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[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    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[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    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[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    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[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], ")"}],
+                     " ", 
+                    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", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    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[{
+                    SuperscriptBox["MH", "2"], "-", "T"}]], 
+                   RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                    
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", "T", "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "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[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    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[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    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", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", 
+                    RowBox[{"5", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "-", 
+                    RowBox[{"8", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", "T", "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"8", " ", "S"}], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", "T", "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "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[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    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[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    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[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    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", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    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", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "-", 
+                  RowBox[{"8", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], "2"]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    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[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", "T", "-", 
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T14", "+", 
+                    
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "-", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    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[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                    
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", "T"}], ")"}], " ", 
+                    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[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "S34"}], "+", 
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T14", "+", 
+                    
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "T", "-", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    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", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    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", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}]}], ")"}]}]}], ")"}]}], "+", 
+               RowBox[{
+                FractionBox["1", "T14"], 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"4", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    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[{"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[{"8", " ", 
+                    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[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    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[{"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[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T14", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T24", " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "U", " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}]}], ")"}]}], ")"}], 
+                   "/", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}], "-", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", "S", " ", "S34"}], "-", 
+                    SuperscriptBox["S34", "2"], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    RowBox[{"2", " ", "S34", " ", "T14"}], "-", 
+                    RowBox[{"2", " ", "T", " ", "T14"}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "S"}], "-", "S34", "+", "T", "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "S34", " ", "U"}], "+", 
+                    RowBox[{"2", " ", "T", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "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[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    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[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "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[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    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[{"32", " ", 
+                    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", "[", "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", "[", "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[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "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[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}]}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T14", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", "T14", " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"T14", " ", "T24", " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"T14", " ", "U", " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}]}], ")"}]}], ")"}], 
+                   "/", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    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[{"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[{"8", " ", 
+                    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[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    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[{"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[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}], "+", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T14", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}]}], ")"}]}], ")"}], 
+                   "/", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}], "-", 
+                  RowBox[{"2", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    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[{"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[{"8", " ", 
+                    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[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    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[{"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[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", "S", " ", "S34"}], "-", 
+                    RowBox[{"S34", " ", "T14"}], "+", 
+                    RowBox[{"T", " ", "T14"}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "T24"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "T", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "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[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    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[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "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[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    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[{
+                    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", "[", "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", "[", "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[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "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[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}]}], ")"}]}], "+", 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "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[{"16", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    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[{
+                    RowBox[{"2", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T14"}], "+", 
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "10"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"10", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T14", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "6"]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"5", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    SuperscriptBox["T24", "3"], "+", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], " ", "U"}], "+", 
+                    RowBox[{"10", " ", "T14", " ", "T24", " ", "U"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T24", "2"], " ", "U"}], "+", 
+                    RowBox[{"5", " ", "T14", " ", 
+                    SuperscriptBox["U", "2"]}], "+", 
+                    RowBox[{"3", " ", "T24", " ", 
+                    SuperscriptBox["U", "2"]}], "+", 
+                    SuperscriptBox["U", "3"], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T14"}], "-", 
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "10"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"10", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"6", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], ")"}]}], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MH", "4"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}]}], ")"}]}], ")"}], 
+                    "/", 
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}], "2"]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "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[{"16", " ", 
+                    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", "[", "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", "[", "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[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"4", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "-", 
+                    RowBox[{"4", " ", "T14", " ", "U"}], "+", 
+                    RowBox[{"2", " ", "T24", " ", "U"}], "+", 
+                    SuperscriptBox["U", "2"], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "2"], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T14", "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T14", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    RowBox[{"T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"10", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}]}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "3"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}]}], ")"}]}], ")"}], 
+                    "/", 
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}], "2"]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}],
+            ")"}]}], ")"}]}]}]}], "-", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"2", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         SuperscriptBox["Alfas", "2"], " ", "c3", " ", "EL", " ", 
+         SuperscriptBox["MT", "2"], " ", 
+         RowBox[{"(", 
+          RowBox[{
+           RowBox[{"-", 
+            RowBox[{
+             FractionBox["1", 
+              RowBox[{
+               RowBox[{"(", 
+                RowBox[{
+                 SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", "T14"}], 
+                ")"}], " ", "T24"}]], 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"8", " ", 
+                  SuperscriptBox["MT", "2"], " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "S"}], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T14"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    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", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "-", 
+                    RowBox[{"4", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T24"}], "+", 
+                    RowBox[{"T24", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", 
+                    RowBox[{"5", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "-", 
+                    RowBox[{"5", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"10", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "-", "T24"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24"}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"T14", " ", "T24"}], "-", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", "T"}], "-", 
+                    RowBox[{"3", " ", "T14"}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", "T14"}], "+", "T24"}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "3"], "+", 
+                    SuperscriptBox["T14", "3"], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"T14", " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "20"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MH", "4"]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"6", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "20"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}]}], 
+                   ")"}]}], ")"}], "/", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], ")"}], 
+                  " ", 
+                  RowBox[{"Kallen\[Lambda]", "[", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24"}], "]"}]}], ")"}]}], "-", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "S34"}], " ", "T"}], "+", 
+                    RowBox[{"S34", " ", "T14"}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "U"}], ")"}]}], "+", 
+                    RowBox[{"T", " ", "U"}], "+", 
+                    RowBox[{"T14", " ", "U"}], "-", 
+                    RowBox[{"S", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", "T24", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "8"]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "T14"}], 
+                    ")"}], "2"], " ", "T24"}], "+", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"6", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"6", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "20"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "3"], "+", 
+                    SuperscriptBox["T14", "3"], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"T14", " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "28"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"24", " ", 
+                    SuperscriptBox["MH", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"6", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "28"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "-", 
+                    "T24"}], ")"}], " ", "T24", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}]}], 
+                    ")"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24"}], "]"}]}], ")"}]}], ")"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["S34", "2"]}], "-", 
+                    RowBox[{"4", " ", "S34", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "S34", " ", "T14"}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "U"}], ")"}]}], "+", 
+                    RowBox[{"4", " ", "T", " ", "U"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "U"}], "+", 
+                    SuperscriptBox["U", "2"], "-", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"4", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"4", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"32", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", "S34"}], "+", "U"}], ")"}], " ", 
+                    
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", "S34"}], "+", "U"}], ")"}], " ", 
+                    
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MT", "2"]}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "4"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "6"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"96", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"8", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"3", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"3", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"10", " ", "T"}], "+", 
+                    RowBox[{"10", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "-", "T24"}], ")"}], " ", 
+                    "T24"}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "-", "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "3"]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"112", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"10", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}]}], "-", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"96", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"6", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"22", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"22", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"T14", " ", "T24"}], "-", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", "T14"}], "+", "T24"}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "3"], "+", 
+                    SuperscriptBox["T14", "3"], "+", 
+                    RowBox[{"17", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"7", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T14"}], "+", 
+                    RowBox[{"17", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"34", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "10"]}], "+", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "T14"}], "-", "T24"}], ")"}]}], "-", 
+                    RowBox[{"T14", " ", "T24"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24"}], ")"}], " ", 
+                    "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"6", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "3"], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox["T14", "3"], "-", 
+                    RowBox[{"3", " ", "T14", " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "-", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "+", 
+                    RowBox[{"3", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "4"], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["T", "3"], " ", "T14"}], "+", 
+                    SuperscriptBox["T14", "4"], "-", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T24", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "40"}], " ", 
+                    SuperscriptBox["MH", "4"]}], "+", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "-", 
+                    RowBox[{"8", " ", "T14", " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "+", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"4", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "3"], "-", 
+                    RowBox[{"3", " ", "T14", " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}]}], "-", 
+                    RowBox[{"2", " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24"}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MH", "4"], " ", "T24"}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "-", "T24"}], ")"}]}], "-", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "-", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}]}], 
+                    ")"}]}], ")"}], "/", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24"}], "]"}]}], ")"}]}]}], ")"}]}], "-", 
+               RowBox[{"4", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "U"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "8"], " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "4"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "6"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"176", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"22", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"11", " ", "T"}], "+", 
+                    RowBox[{"11", " ", "T14"}], "-", 
+                    RowBox[{"23", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"30", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"30", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"13", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "1408"}], " ", 
+                    SuperscriptBox["MT", "6"]}], "-", 
+                    RowBox[{"17", " ", 
+                    SuperscriptBox["T", "3"]}], "-", 
+                    RowBox[{"17", " ", 
+                    SuperscriptBox["T14", "3"]}], "-", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"61", " ", "T"}], "+", 
+                    RowBox[{"61", " ", "T14"}], "-", 
+                    RowBox[{"30", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"19", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "51"}], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"28", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"56", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"28", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"19", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"19", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"17", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "51"}], " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"16", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"19", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"144", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"6", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "-", "T24"}], ")"}], " ", 
+                    "T24"}], "+", 
+                    RowBox[{"24", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "+", 
+                    RowBox[{"5", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"54", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"55", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"18", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MH", "10"], " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "5"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "8"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"176", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"22", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"11", " ", "T"}], "+", 
+                    RowBox[{"11", " ", "T14"}], "-", 
+                    RowBox[{"32", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"48", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"48", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "6"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"400", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"35", " ", "T"}], "+", 
+                    RowBox[{"35", " ", "T14"}], "-", 
+                    RowBox[{"38", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"65", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"65", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"65", " ", "T14"}], "-", 
+                    RowBox[{"58", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"116", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"45", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"10", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", "T24"}], ")"}]}], "-", 
+                    RowBox[{"10", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", "T"}], "+", 
+                    RowBox[{"16", " ", "T14"}], "-", 
+                    RowBox[{"11", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "-", "T24"}], ")"}], " ", 
+                    "T24"}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"16", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"9", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"9", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4608", " ", 
+                    SuperscriptBox["MT", "10"]}], "+", 
+                    RowBox[{"1536", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "+", 
+                    RowBox[{"5", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"54", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"109", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"109", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"58", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"18", " ", 
+                    SuperscriptBox["T", "3"]}], "+", 
+                    RowBox[{"18", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"147", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "-", 
+                    RowBox[{"130", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"93", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"18", " ", "T14"}], "+", 
+                    RowBox[{"49", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"147", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"65", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T", "4"]}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "4"]}], "+", 
+                    RowBox[{"174", " ", 
+                    SuperscriptBox["T14", "3"], " ", "T24"}], "-", 
+                    RowBox[{"172", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"254", " ", "T14", " ", 
+                    SuperscriptBox["T24", "3"]}], "-", 
+                    RowBox[{"21", " ", 
+                    SuperscriptBox["T24", "4"]}], "+", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", "T14"}], "+", 
+                    RowBox[{"29", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"261", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"86", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"36", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"522", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "-", 
+                    RowBox[{"344", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"254", " ", 
+                    SuperscriptBox["T24", "3"]}]}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "19"}], " ", 
+                    SuperscriptBox["T", "4"]}], "-", 
+                    RowBox[{"19", " ", 
+                    SuperscriptBox["T14", "4"]}], "+", 
+                    RowBox[{"14", " ", 
+                    SuperscriptBox["T14", "3"], " ", "T24"}], "+", 
+                    RowBox[{"34", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    SuperscriptBox["T24", "4"], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "76"}], " ", "T14"}], "+", 
+                    RowBox[{"14", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "114"}], " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"42", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"34", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "76"}], " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"42", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"68", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T24", "3"]}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"36", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"9", " ", "T"}], "+", 
+                    RowBox[{"9", " ", "T14"}], "-", "T24"}], ")"}], " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "5"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "6"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"192", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "3"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", "T"}], "+", 
+                    RowBox[{"9", " ", "T14"}], "-", 
+                    RowBox[{"50", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", "T14"}], "-", 
+                    RowBox[{"32", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "-", 
+                    RowBox[{"9", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"64", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"18", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"82", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"82", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", "T"}], "+", 
+                    RowBox[{"4", " ", "T14"}], "-", 
+                    RowBox[{"11", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "-", "T24"}], ")"}], " ", 
+                    "T24"}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"4", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"9", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"9", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "512"}], " ", 
+                    SuperscriptBox["MT", "8"]}], "-", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T", "4"]}], "-", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T14", "4"]}], "-", 
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"13", " ", "T"}], "+", 
+                    RowBox[{"13", " ", "T14"}], "-", 
+                    RowBox[{"69", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"26", " ", 
+                    SuperscriptBox["T14", "3"], " ", "T24"}], "+", 
+                    RowBox[{"22", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"10", " ", "T14", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    SuperscriptBox["T24", "4"], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "28"}], " ", "T14"}], "+", 
+                    RowBox[{"26", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"54", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"164", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"164", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"49", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "42"}], " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"78", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"22", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "28"}], " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"78", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"44", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"10", " ", 
+                    SuperscriptBox["T24", "3"]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"23", " ", 
+                    SuperscriptBox["T", "3"]}], "+", 
+                    RowBox[{"23", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"69", " ", "T14"}], "-", 
+                    RowBox[{"121", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"121", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "-", 
+                    RowBox[{"71", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"21", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"69", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"242", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"71", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"20", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"5", " ", "T"}], "+", 
+                    RowBox[{"5", " ", "T14"}], "-", "T24"}], ")"}]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24"}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"36", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"9", " ", "T"}], "+", 
+                    RowBox[{"9", " ", "T14"}], "-", "T24"}], ")"}], " ", 
+                    "T24"}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "4"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T"}], "+", 
+                    RowBox[{"5", " ", "T14"}], "-", 
+                    RowBox[{"21", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"192", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "3"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", "T"}], "+", 
+                    RowBox[{"9", " ", "T14"}], "-", 
+                    RowBox[{"29", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", "T14"}], "-", 
+                    RowBox[{"23", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"23", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "-", 
+                    RowBox[{"13", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    SuperscriptBox["T24", "3"], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"18", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"52", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"52", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"15", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"46", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"13", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}]}], 
+                    ")"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], ")"}], 
+                    "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24"}], "]"}]}], ")"}]}], ")"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "U"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MH", "10"], " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "-", "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "5"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "8"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"176", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"22", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"11", " ", "T"}], "+", 
+                    RowBox[{"11", " ", "T14"}], "-", 
+                    RowBox[{"24", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"32", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"32", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"320", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T"}], "+", 
+                    RowBox[{"5", " ", "T14"}], "-", "T24"}], ")"}], " ", 
+                    "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"20", " ", "T"}], "+", 
+                    RowBox[{"20", " ", "T14"}], "+", 
+                    RowBox[{"7", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"10", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"20", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"10", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"17", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"17", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "6"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"464", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"41", " ", "T"}], "+", 
+                    RowBox[{"41", " ", "T14"}], "-", 
+                    RowBox[{"18", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"14", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"4", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"4", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"6", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"T", " ", "T24"}], "-", 
+                    RowBox[{"T14", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4608", " ", 
+                    SuperscriptBox["MT", "10"]}], "+", 
+                    RowBox[{"512", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", "T"}], "+", 
+                    RowBox[{"9", " ", "T14"}], "+", 
+                    RowBox[{"25", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"54", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"181", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"181", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"10", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"18", " ", 
+                    SuperscriptBox["T", "3"]}], "+", 
+                    RowBox[{"18", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"243", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"50", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"41", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"9", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"54", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"486", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"50", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T", "4"]}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "4"]}], "+", 
+                    RowBox[{"286", " ", 
+                    SuperscriptBox["T14", "3"], " ", "T24"}], "+", 
+                    RowBox[{"140", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"78", " ", "T14", " ", 
+                    SuperscriptBox["T24", "3"]}], "-", 
+                    RowBox[{"13", " ", 
+                    SuperscriptBox["T24", "4"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"36", " ", "T14"}], "+", 
+                    RowBox[{"286", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"429", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"70", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"36", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"858", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"280", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"78", " ", 
+                    SuperscriptBox["T24", "3"]}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"31", " ", 
+                    SuperscriptBox["T", "4"]}], "+", 
+                    RowBox[{"31", " ", 
+                    SuperscriptBox["T14", "4"]}], "+", 
+                    RowBox[{"30", " ", 
+                    SuperscriptBox["T14", "3"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    SuperscriptBox["T24", "3"]}], "-", 
+                    SuperscriptBox["T24", "4"], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"62", " ", "T14"}], "+", 
+                    RowBox[{"15", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"93", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"45", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"62", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"45", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    SuperscriptBox["T24", "3"]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "8"], " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"4", " ", "T"}], "+", 
+                    RowBox[{"4", " ", "T14"}], "-", 
+                    RowBox[{"5", " ", "T24"}]}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "4"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "6"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"176", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"22", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"11", " ", "T"}], "+", 
+                    RowBox[{"11", " ", "T14"}], "-", 
+                    RowBox[{"25", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"34", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"34", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"13", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"144", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T"}], "+", 
+                    RowBox[{"5", " ", "T14"}], "-", 
+                    RowBox[{"6", " ", "T24"}]}], ")"}], " ", "T24"}], "+", 
+                    RowBox[{"72", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"18", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"38", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"38", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"55", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"672", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["T", "3"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"29", " ", "T"}], "+", 
+                    RowBox[{"29", " ", "T14"}], "-", 
+                    RowBox[{"20", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"24", " ", "T14"}], "-", 
+                    RowBox[{"7", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "-", 
+                    RowBox[{"10", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"53", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"106", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"53", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"54", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"54", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"35", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"7", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "8"], " ", 
+                    SuperscriptBox["T24", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"36", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"9", " ", "T"}], "+", 
+                    RowBox[{"9", " ", "T14"}], "+", "T24"}], ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"6", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "-", 
+                    RowBox[{"7", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"14", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"14", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "6"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"192", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "3"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", "T"}], "+", 
+                    RowBox[{"9", " ", "T14"}], "-", 
+                    RowBox[{"58", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", "T14"}], "-", 
+                    RowBox[{"40", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"40", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "-", 
+                    RowBox[{"17", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"18", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"98", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"98", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"19", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"80", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"17", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "1536"}], " ", 
+                    SuperscriptBox["MT", "8"]}], "-", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T", "4"]}], "-", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T14", "4"]}], "-", 
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"29", " ", "T"}], "+", 
+                    RowBox[{"29", " ", "T14"}], "-", 
+                    RowBox[{"115", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"50", " ", 
+                    SuperscriptBox["T14", "3"], " ", "T24"}], "+", 
+                    RowBox[{"56", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"26", " ", "T14", " ", 
+                    SuperscriptBox["T24", "3"]}], "-", 
+                    SuperscriptBox["T24", "4"], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "44"}], " ", "T14"}], "+", 
+                    RowBox[{"50", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"51", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"102", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"51", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"280", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"280", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"95", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "66"}], " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"150", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"56", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "44"}], " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"150", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"112", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"26", " ", 
+                    SuperscriptBox["T24", "3"]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"39", " ", 
+                    SuperscriptBox["T", "3"]}], "+", 
+                    RowBox[{"39", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"117", " ", "T14"}], "-", 
+                    RowBox[{"215", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"215", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "-", 
+                    RowBox[{"151", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"37", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"117", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"430", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"151", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", "T"}], "+", 
+                    RowBox[{"6", " ", "T14"}], "-", 
+                    RowBox[{"7", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"6", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"2", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"37", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T14"}], "-", 
+                    RowBox[{"8", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"16", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T", "3"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"13", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "-", 
+                    RowBox[{"106", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    SuperscriptBox["T24", "3"], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", "T14"}], "+", 
+                    RowBox[{"13", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"13", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"53", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "64"}], " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["T", "2"]}], "-", 
+                    RowBox[{"8", " ", "T", " ", "T14"}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"3", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"3", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"20", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"5", " ", "T"}], "+", 
+                    RowBox[{"5", " ", "T14"}], "+", "T24"}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", "T"}], "+", 
+                    RowBox[{"8", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24"}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", "T"}], "+", 
+                    RowBox[{"4", " ", "T14"}], "-", 
+                    RowBox[{"6", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}]}]}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "3"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "6"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"36", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"9", " ", "T"}], "+", 
+                    RowBox[{"9", " ", "T14"}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"192", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "3"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", "T"}], "+", 
+                    RowBox[{"9", " ", "T14"}], "-", 
+                    RowBox[{"37", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", "T14"}], "-", 
+                    RowBox[{"31", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"31", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "-", 
+                    RowBox[{"19", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    SuperscriptBox["T24", "3"], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"62", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"19", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"18", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"68", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"68", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"17", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"320", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T", "4"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T14", "4"]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"23", " ", "T"}], "+", 
+                    RowBox[{"23", " ", "T14"}], "-", 
+                    RowBox[{"37", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", "T14"}], "-", 
+                    RowBox[{"6", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T14", "3"], " ", "T24"}], "-", 
+                    RowBox[{"10", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"3", " ", "T14", " ", 
+                    SuperscriptBox["T24", "3"]}], "-", 
+                    SuperscriptBox["T24", "4"], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"39", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"78", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"39", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"98", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"98", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"45", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"9", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["T14", "3"]}], "-", 
+                    RowBox[{"18", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "-", 
+                    RowBox[{"20", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T24", "3"]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"29", " ", 
+                    SuperscriptBox["T", "3"]}], "+", 
+                    RowBox[{"29", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"87", " ", "T14"}], "-", 
+                    RowBox[{"85", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"85", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "-", 
+                    RowBox[{"85", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"87", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"170", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"85", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}]}], 
+                    ")"}]}], ")"}], "/", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], ")"}], 
+                    "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24"}], "]"}]}], ")"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["S34", "2"]}], "-", 
+                    RowBox[{"2", " ", "S34", " ", "T"}], "-", 
+                    RowBox[{"S34", " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "S34"}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "-", 
+                    RowBox[{"3", " ", "U"}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "T", " ", "U"}], "+", 
+                    RowBox[{"4", " ", "T14", " ", "U"}], "+", 
+                    RowBox[{"T24", " ", "U"}], "+", 
+                    SuperscriptBox["U", "2"]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T24", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "S34"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "S34", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14"}]], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"192", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", 
+                    SuperscriptBox["T", "2"]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"4", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "+", "T24"}], ")"}]}], "-", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T14"}], "+", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "3"], "+", 
+                    SuperscriptBox["T14", "3"], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"T14", " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "14"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MH", "4"]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"6", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "14"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24"}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "10"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "-", "T24"}], ")"}], " ", 
+                    "T24"}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "8"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"464", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"19", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"38", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"19", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"24", " ", "T"}], "+", 
+                    RowBox[{"24", " ", "T14"}], "-", "T24"}], ")"}]}], "-", 
+                    RowBox[{"4", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"4", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"40", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], "2"], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", "T"}], "+", 
+                    RowBox[{"7", " ", "T14"}], "+", "T24"}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"832", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], "3"], " ", "T24"}], "+", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"11", " ", "T"}], "+", 
+                    RowBox[{"11", " ", "T14"}], "+", 
+                    RowBox[{"10", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"14", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"26", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"26", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"54", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"52", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"52", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"192", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", 
+                    RowBox[{"17", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"14", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"6", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"119", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"119", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"13", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "3"], "+", 
+                    SuperscriptBox["T14", "3"], "+", 
+                    RowBox[{"89", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"9", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T14"}], "+", 
+                    RowBox[{"89", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"178", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3584", " ", 
+                    SuperscriptBox["MT", "10"]}], "+", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"13", " ", "T"}], "+", 
+                    RowBox[{"13", " ", "T14"}], "+", 
+                    RowBox[{"40", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], "2"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"18", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"4", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"4", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"18", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"60", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"60", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"14", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T", "3"]}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"129", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"51", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"11", " ", "T14"}], "+", 
+                    RowBox[{"43", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"3", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"86", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"17", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T", "4"]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "4"]}], "+", 
+                    RowBox[{"116", " ", 
+                    SuperscriptBox["T14", "3"], " ", "T24"}], "+", 
+                    RowBox[{"54", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"28", " ", "T14", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    SuperscriptBox["T24", "4"], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["T", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T14"}], "+", 
+                    RowBox[{"29", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"58", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"87", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"27", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T24", "3"]}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], "+", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], "2"], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14"}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24"}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "10"]}], "+", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "-", "T24"}], ")"}], "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T24"}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}], "2"]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"6", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"6", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "4"], "+", 
+                    SuperscriptBox["T14", "4"], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["T14", "3"], " ", "T24"}], "+", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"4", " ", "T14", " ", "T24", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}], "2"]}], 
+                    "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["T", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T24", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "32"}], " ", 
+                    SuperscriptBox["MH", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "+", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"4", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "3"], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"3", " ", "T14", " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}], 
+                    "2"]}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "3"], "+", 
+                    SuperscriptBox["T14", "3"], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"3", " ", "T14", " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "4"]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "+", 
+                    RowBox[{"3", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                    "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24"}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", "T14"}], "+", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", "T"}], "+", 
+                    RowBox[{"8", " ", "T14"}], "-", 
+                    RowBox[{"4", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "-", 
+                    RowBox[{"T", " ", "T24"}], "-", 
+                    RowBox[{"T14", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                    "/", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24"}], "]"}]}]}], ")"}]}], ")"}], "/", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}], "+", 
+           RowBox[{
+            FractionBox["1", 
+             RowBox[{"T14", " ", 
+              RowBox[{"(", 
+               RowBox[{
+                SuperscriptBox["MH", "2"], "-", "S", "-", "T24", "-", "U"}], 
+               ")"}]}]], 
+            RowBox[{"(", 
+             RowBox[{
+              RowBox[{"-", 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{"(", 
+                  RowBox[{"8", " ", 
+                   SuperscriptBox["MT", "2"], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    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[{"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[{"8", " ", 
+                    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[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    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[{"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[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"4", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "-", 
+                    RowBox[{"4", " ", "T14", " ", "U"}], "+", 
+                    RowBox[{"2", " ", "T24", " ", "U"}], "+", 
+                    SuperscriptBox["U", "2"], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "2"], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T14", "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T14", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    RowBox[{"T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"10", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}]}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "3"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}]}], ")"}]}], ")"}], 
+                 "/", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}], " ", 
+                   RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}], ")"}]}], "+", 
+              RowBox[{
+               RowBox[{"(", 
+                RowBox[{"8", " ", 
+                 SuperscriptBox["MT", "2"], " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", "S", " ", "S34"}], "-", 
+                    SuperscriptBox["S34", "2"], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    RowBox[{"2", " ", "S34", " ", "T14"}], "-", 
+                    RowBox[{"2", " ", "T", " ", "T14"}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "S"}], "-", "S34", "+", "T", "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "S34", " ", "U"}], "+", 
+                    RowBox[{"2", " ", "T", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                   RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "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[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    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[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                   RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "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[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    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[{"32", " ", 
+                    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", "[", "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", "[", "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[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "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[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   FractionBox[
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T14", "+", "T24", "+", 
+                    "U"}], 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}]], "-", 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "10"]}], "+", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "3"], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "4"], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", "T24", "-", "U"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"6", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}], "+", 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"192", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "3"], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", "T14"}], "+", 
+                    RowBox[{"7", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T14", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                    "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}], "+", 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "10"], " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "8"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"28", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "20"}], " ", "T14"}], "+", "T24", "+", "U"}],
+                     ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "6"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "256"}], " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"72", " ", "T14"}], "-", 
+                    RowBox[{"11", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"14", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"52", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"12", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"160", " ", 
+                    SuperscriptBox["MT", "6"]}], "-", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", "T14"}], "-", 
+                    RowBox[{"6", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"22", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"4", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "10"]}], "+", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}], "-", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"115", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"36", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"15", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"20", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"49", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"129", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"24", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "11"}], " ", 
+                    SuperscriptBox["T14", "4"]}], "-", 
+                    RowBox[{"232", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"366", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"56", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3072", " ", 
+                    SuperscriptBox["MT", "12"]}], "+", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "10"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"11", " ", "T14"}], "+", 
+                    RowBox[{"14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"45", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"22", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"13", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"4", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], ")"}]}], "-", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"61", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"134", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"35", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"25", " ", 
+                    SuperscriptBox["T14", "4"]}], "+", 
+                    RowBox[{"236", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"282", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"56", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "-", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["T14", "5"]}], "-", 
+                    RowBox[{"18", " ", 
+                    SuperscriptBox["T14", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"134", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"120", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"23", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "5"]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], "+", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}], "+", 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "2"], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}], ")"}], "/", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}]}], ")"}]}], ")"}], "/", 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{"16", " ", 
+                  SuperscriptBox["MT", "4"]}], "-", 
+                 RowBox[{"4", " ", 
+                  SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                 RowBox[{"8", " ", 
+                  SuperscriptBox["MT", "2"], " ", 
+                  RowBox[{"(", 
+                   RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                 SuperscriptBox[
+                  RowBox[{"(", 
+                   RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                ")"}]}], "-", 
+              RowBox[{
+               RowBox[{"(", 
+                RowBox[{"16", " ", 
+                 SuperscriptBox["MT", "2"], " ", "T14", " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    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[{"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[{"8", " ", 
+                    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[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    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[{"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[{"(", 
+                  RowBox[{
+                   FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}]], "+", 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"192", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "3"], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", "T14"}], "+", 
+                    RowBox[{"7", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}], "-", 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "10"]}], "+", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T14"}], "+", "T24", "+", "U"}], ")"}], 
+                    "2"]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "3"], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "4"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"4", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T14", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                    "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}], "-", 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "10"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T14", "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "8"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"464", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"19", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", 
+                    RowBox[{"24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"40", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", 
+                    RowBox[{"7", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"832", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"10", " ", "T14"}], "+", 
+                    RowBox[{"11", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"26", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"52", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"27", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"192", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"17", " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"13", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"119", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"3", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"89", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3584", " ", 
+                    SuperscriptBox["MT", "10"]}], "+", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"40", " ", "T14"}], "+", 
+                    RowBox[{"13", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"4", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"14", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"60", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"51", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"129", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "4"], "+", 
+                    RowBox[{"28", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"54", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"116", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], "+", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}], "+", 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "-", 
+                    RowBox[{"T14", " ", "U"}], "+", 
+                    RowBox[{"2", " ", "T24", " ", "U"}], "+", 
+                    SuperscriptBox["U", "2"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}], ")"}], "/", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}]}], ")"}]}], ")"}], "/", 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{"16", " ", 
+                  SuperscriptBox["MT", "4"]}], "-", 
+                 RowBox[{"4", " ", 
+                  SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                 RowBox[{"8", " ", 
+                  SuperscriptBox["MT", "2"], " ", 
+                  RowBox[{"(", 
+                   RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                 SuperscriptBox[
+                  RowBox[{"(", 
+                   RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                ")"}]}], "-", 
+              RowBox[{"2", " ", 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{"-", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U", "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    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[{"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[{"8", " ", 
+                    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[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    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[{"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[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+                    ")"}]}], ")"}]}], ")"}]}], "-", 
+                 RowBox[{
+                  RowBox[{"(", 
+                   RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", "S", " ", "S34"}], "-", 
+                    RowBox[{"S34", " ", "T14"}], "+", 
+                    RowBox[{"T", " ", "T14"}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "T24"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "T", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "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[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    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[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "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[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    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[{
+                    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", "[", "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", "[", "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[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "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[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T14", "-", "T24", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T14", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "8"]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24", "+", "U"}], 
+                    ")"}], "2"]}], "+", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "20"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"24", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "3"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", 
+                    RowBox[{"7", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}]}], ")"}]}], ")"}], 
+                  "/", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}]}], ")"}]}], "+", 
+              RowBox[{"4", " ", 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{
+                  RowBox[{"(", 
+                   RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "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[{"16", " ", 
+                    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", "[", "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", "[", "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[{
+                    RowBox[{"-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}]], 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"6", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"1024", " ", 
+                    SuperscriptBox["MT", "12"]}], "-", 
+                    RowBox[{"1280", " ", 
+                    SuperscriptBox["MT", "10"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", "T24", "-", "U"}], ")"}]}], "+", 
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "-", 
+                    RowBox[{"15", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"10", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "-", 
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T14"}], "-", "T24", "-", "U"}], ")"}], 
+                    " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"19", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", "T14"}], "-", "T24", "-", "U"}], ")"}], 
+                    " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"55", " ", "T14"}], "-", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"91", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"130", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"15", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T14"}], "+", 
+                    RowBox[{"13", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"10", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", 
+                    SuperscriptBox["T14", "3"]}], "-", 
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"33", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"104", " ", 
+                    SuperscriptBox["MH", "6"], " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", "T14"}], "-", "T24", "-", "U"}], ")"}], 
+                    " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"37", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"88", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"39", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"127", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"89", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "12"}], " ", 
+                    SuperscriptBox["MH", "8"], " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "5"]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"40", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", "T14"}], "+", 
+                    RowBox[{"10", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "6"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"96", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"9", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "60"}], " ", "T14"}], "+", 
+                    RowBox[{"48", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"608", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    SuperscriptBox["T14", "3"], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "64"}], " ", "T14"}], "+", 
+                    RowBox[{"400", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"25", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"8", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"43", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T14", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                    "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "12"], " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"52", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    RowBox[{"3", " ", "T14"}], "+", 
+                    RowBox[{"13", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "5"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"14", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "10"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"97", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2320"}], " ", "T14"}], "+", 
+                    RowBox[{"48", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"242", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"512", " ", 
+                    SuperscriptBox["MT", "10"]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "-", 
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"46", " ", "T14"}], "-", 
+                    RowBox[{"7", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"26", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"114", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"45", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"90", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["T14", "3"]}], "-", 
+                    RowBox[{"23", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"22", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "8"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    SuperscriptBox["T14", "4"], "+", 
+                    RowBox[{"96", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"203", " ", "T14"}], "-", "T24", "-", "U"}], 
+                    ")"}]}], "-", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"30", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"136", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"157", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"1446", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"15", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"33", " ", 
+                    SuperscriptBox["T14", "3"]}], "-", 
+                    RowBox[{"205", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"1109", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"17", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"1024", " ", 
+                    SuperscriptBox["MT", "12"]}], "-", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "10"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"51", " ", "T14"}], "-", 
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"609", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"87", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"381", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"1892", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"102", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "4"]}], "-", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"86", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "4"], "-", 
+                    RowBox[{"1566", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"4258", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"78", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "19"}], " ", 
+                    SuperscriptBox["T14", "5"]}], "+", 
+                    RowBox[{"43", " ", 
+                    SuperscriptBox["T14", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"996", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"2036", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"15", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "5"]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "12288"}], " ", 
+                    SuperscriptBox["MT", "14"]}], "+", 
+                    RowBox[{"1024", " ", 
+                    SuperscriptBox["MT", "12"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"80", " ", "T14"}], "-", 
+                    RowBox[{"17", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "10"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"621", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"361", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"40", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"325", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"1187", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"320", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"25", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"157", " ", 
+                    SuperscriptBox["T14", "4"]}], "+", 
+                    RowBox[{"1832", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"3484", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"550", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "-", 
+                    RowBox[{"35", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "4"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"24", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"22", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"46", " ", 
+                    SuperscriptBox["T14", "5"]}], "+", 
+                    RowBox[{"263", " ", 
+                    SuperscriptBox["T14", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"1810", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"2418", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"220", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}], "-", 
+                    RowBox[{"13", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "5"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "6"], "+", 
+                    RowBox[{"43", " ", 
+                    SuperscriptBox["T14", "5"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"122", " ", 
+                    SuperscriptBox["T14", "4"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"724", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"775", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}], "+", 
+                    RowBox[{"25", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "5"]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "6"]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], "+", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "10"]}], "+", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "3"], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "4"], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"14", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"19", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", "T24", "-", "U"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}], ")"}], "/", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}]}], ")"}]}], ")"}], "/", 
+                  SuperscriptBox[
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}], "2"]}], "+", 
+                 RowBox[{
+                  RowBox[{"(", 
+                   RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "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[{"16", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    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[{
+                    RowBox[{"-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}]], 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "6"]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"9", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    SuperscriptBox["T24", "3"], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"], " ", "U"}], "+", 
+                    RowBox[{"18", " ", "T14", " ", "T24", " ", "U"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T24", "2"], " ", "U"}], "+", 
+                    RowBox[{"9", " ", "T14", " ", 
+                    SuperscriptBox["U", "2"]}], "+", 
+                    RowBox[{"3", " ", "T24", " ", 
+                    SuperscriptBox["U", "2"]}], "+", 
+                    SuperscriptBox["U", "3"], "+", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", 
+                    RowBox[{"7", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "14"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"18", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}]}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4096", " ", 
+                    SuperscriptBox["MT", "14"]}], "+", 
+                    RowBox[{"2048", " ", 
+                    SuperscriptBox["MT", "12"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"25", " ", "T14"}], "+", 
+                    RowBox[{"27", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "-", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "10"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"26", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "-", 
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"10", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"11", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"34", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"83", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"43", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "5"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MH", "6"], " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"10", " ", "T14"}], "-", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"56", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"21", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"14", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"21", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"36", " ", 
+                    SuperscriptBox["MH", "6"], " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"13", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"15", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"17", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"84", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"99", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MH", "6"], " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"12", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"5", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T14", "4"]}], "+", 
+                    RowBox[{"26", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"26", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "4"]}], "-", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MH", "6"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"20", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", 
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"104", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T14"}], "+", 
+                    RowBox[{"10", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"86", " ", "T14"}], "+", 
+                    RowBox[{"26", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"1040", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"28", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"39", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"19", " ", "T14"}], "+", 
+                    RowBox[{"52", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T14", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                    "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MH", "12"], " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "10"], " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"144", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"130", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "744"}], " ", "T14"}], "+", 
+                    RowBox[{"72", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "8"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"]}], "-", 
+                    RowBox[{"17", " ", 
+                    SuperscriptBox["T14", "4"]}], "-", 
+                    RowBox[{"190", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"400", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"62", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"], "+", 
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"43", " ", "T14"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"404", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"117", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"159", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"580", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"105", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"640", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"27", " ", "T14"}], "+", 
+                    RowBox[{"17", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"24", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"19", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"22", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["T14", "3"]}], "-", 
+                    RowBox[{"15", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"6", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "7"}], " ", 
+                    SuperscriptBox["T14", "3"]}], "-", 
+                    RowBox[{"87", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"51", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "6"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9728", " ", 
+                    SuperscriptBox["MT", "10"]}], "+", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"148", " ", "T14"}], "+", 
+                    RowBox[{"41", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"192", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"273", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"172", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"23", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"326", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"905", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"333", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"28", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "51"}], " ", 
+                    SuperscriptBox["T14", "4"]}], "-", 
+                    RowBox[{"246", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"280", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"78", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "221"}], " ", 
+                    SuperscriptBox["T14", "4"]}], "-", 
+                    RowBox[{"1664", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"2542", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"752", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"43", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3072", " ", 
+                    SuperscriptBox["MT", "12"]}], "+", 
+                    RowBox[{"512", " ", 
+                    SuperscriptBox["MT", "10"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"43", " ", "T14"}], "+", 
+                    RowBox[{"7", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "17"}], " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"6", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], ")"}]}], "+", 
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"155", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"13", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"208", " ", 
+                    SuperscriptBox["T14", "3"]}], "-", 
+                    RowBox[{"24", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"209", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "83"}], " ", 
+                    SuperscriptBox["T14", "4"]}], "-", 
+                    RowBox[{"782", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"108", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"254", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["T14", "5"]}], "-", 
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T14", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"217", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"44", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"32", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "5"]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4096", " ", 
+                    SuperscriptBox["MT", "14"]}], "+", 
+                    RowBox[{"2048", " ", 
+                    SuperscriptBox["MT", "12"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"49", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"1280", " ", 
+                    SuperscriptBox["MT", "10"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"95", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"96", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"401", " ", 
+                    SuperscriptBox["T14", "3"]}], "-", 
+                    RowBox[{"497", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"238", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2297", " ", 
+                    SuperscriptBox["T14", "4"]}], "+", 
+                    RowBox[{"4760", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"3282", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"968", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "-", 
+                    RowBox[{"15", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "51"}], " ", 
+                    SuperscriptBox["T14", "4"]}], "-", 
+                    RowBox[{"138", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"80", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"42", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"431", " ", 
+                    SuperscriptBox["T14", "5"]}], "+", 
+                    RowBox[{"2349", " ", 
+                    SuperscriptBox["T14", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"2514", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"1334", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "-", 
+                    RowBox[{"261", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "5"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "35"}], " ", 
+                    SuperscriptBox["T14", "6"]}], "-", 
+                    RowBox[{"920", " ", 
+                    SuperscriptBox["T14", "5"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"2953", " ", 
+                    SuperscriptBox["T14", "4"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"2192", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"1067", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}], "+", 
+                    RowBox[{"136", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "5"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "6"]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], "+", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"6", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"20", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}], "-", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "20"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"4", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "3"], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", 
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"5", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}], ")"}], "/", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}]}], ")"}]}], ")"}], "/", 
+                  SuperscriptBox[
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}], "2"]}]}], ")"}]}]}], ")"}]}]}], ")"}]}], ")"}], 
+       " ", 
+       SuperscriptBox["\[Beta]", "2"]}]}], "+", 
+     InterpretationBox[
+      SuperscriptBox[
+       RowBox[{"O", "[", "\[Beta]", "]"}], "3"],
+      SeriesData[$CellContext`\[Beta], 0, {}, 0, 3, 1],
+      Editable->False]}],
+    SeriesData[$CellContext`\[Beta], 
+     0, {(-2) $CellContext`Alfas^2 $CellContext`c3 $CellContext`EL \
+$CellContext`MT^2 $CellContext`MW^(-1) $CellContext`SW^(-1) \
+($CellContext`T^(-1) ((
+           4 (2 + X`Eps^(-1) + 
+             X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT] + 
+             Log[$CellContext`MT^(-2) X`Mu^2]) - 
+           4 ($CellContext`MH^2 - $CellContext`T)^(-1) (3 $CellContext`MH^2 + 
+            X`Eps^(-1) $CellContext`MH^2 - 3 $CellContext`T - 
+            X`Eps^(-1) $CellContext`T + $CellContext`MH^2 
+             X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+$CellContext`T 
+            X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MT^2 
+             Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                 2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                   Rational[1, 2])]^2 + $CellContext`MH^2 
+             Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`T 
+            Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`MT^2 
+            Log[Rational[1, 2] $CellContext`MT^(-2) (
+                2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T ((-4) \
+$CellContext`MT^2 + $CellContext`T))^Rational[1, 2])]^2)) ($CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`ec[5]] $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`ec[4]] + $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`ec[4]] $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`ec[5]] - 2 $CellContext`Pair[
+             $CellContext`e[1], 
+             $CellContext`e[2]] $CellContext`Pair[
+             $CellContext`ec[4], 
+             $CellContext`ec[
+             5]]) + ($CellContext`MH^2 - $CellContext`T)^(-1) (
+           Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+               2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                  4 $CellContext`MT^2)^Rational[1, 2])]^2 - 
+           Log[Rational[1, 2] $CellContext`MT^(-2) (
+              2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T ((-4) \
+$CellContext`MT^2 + $CellContext`T))^Rational[1, 2])]^2) (
+           2 ((-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[2]] + 2 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[3]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[1]]) $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`ec[5]] - $CellContext`Pair[
+             $CellContext`e[2], 
+             $CellContext`ec[
+             5]] ((-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[4]] + 2 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[3]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[1]]) - $CellContext`Pair[
+             $CellContext`e[2], 
+             $CellContext`ec[
+             4]] ((-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[5]] + 2 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[3]] $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[1]])) - 16 $CellContext`Pair[
+           $CellContext`e[1], 
+           $CellContext`k[3]] (
+          Rational[
+            1, 2] ($CellContext`MH^2 - $CellContext`T)^(-2) \
+(-$CellContext`MH^2 + $CellContext`T - $CellContext`MH^2 
+            X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MH^2 
+             X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MT^2 
+            Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                   4 $CellContext`MT^2)^
+                  Rational[1, 2])]^2 + $CellContext`MT^2 
+             Log[Rational[1, 2] $CellContext`MT^(-2) (
+                 2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T ((-4) \
+$CellContext`MT^2 + $CellContext`T))^
+                  Rational[1, 2])]^2) ((-2) $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[1]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`ec[5]] + $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[5]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[1]] + $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[4]] $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[1]]) + 
+          Rational[
+            1, 2] ($CellContext`MH^2 - $CellContext`T)^(-1) (-
+             X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+            X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT]) ((-2) \
+$CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[3]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`ec[5]] + $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[5]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[3]] + $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[4]] $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[3]])) + 
+         4 ($CellContext`MH^2 - $CellContext`T)^(-1) (
+           X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+           X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT]) (
+           2 ((-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[2]] + 2 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[3]] ($CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[1]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]])) $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`ec[5]] - $CellContext`Pair[
+             $CellContext`e[2], 
+             $CellContext`ec[
+             5]] ((-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[4]] + 2 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[3]] ($CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[1]] + $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[3]])) - $CellContext`Pair[
+             $CellContext`e[2], 
+             $CellContext`ec[
+             4]] ((-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[5]] + 2 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[3]] ($CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[1]] + $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[3]])))) + (
+          2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U)^(-1) ((
+           4 (2 + X`Eps^(-1) + 
+             X`DiscB[2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] + 
+             Log[$CellContext`MT^(-2) X`Mu^2]) + 
+           4 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (
+             3 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) + 
+             X`Eps^(-1) ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) - $CellContext`MH^2 
+             X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + (
+               
+               2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) 
+              X`DiscB[2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] - $CellContext`MT^2 
+             Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                 2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                   Rational[
+                    1, 2])]^2 + ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) 
+              Log[$CellContext`MT^(-2) X`Mu^2] + $CellContext`MT^2 
+              Log[Rational[1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                  2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[1, 2])]^2)) ($CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`ec[5]] $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`ec[4]] + $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`ec[4]] $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`ec[5]] - 2 $CellContext`Pair[
+             $CellContext`e[1], 
+             $CellContext`e[2]] $CellContext`Pair[
+             $CellContext`ec[4], 
+             $CellContext`ec[5]]) + (
+           8 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (
+             X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+             X`DiscB[2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT]) ($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[3]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[3]] - 2 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`e[2]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[3]]) - 
+           8 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-2) (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + $CellContext`MH^2 
+             X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MH^2 
+            X`DiscB[2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] + $CellContext`MT^2 
+             Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                 2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                   Rational[1, 2])]^2 - $CellContext`MT^2 
+            Log[Rational[1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                   4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[1, 2])]^2) ($CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[5]] $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[4]] + $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[4]] $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[5]] - 2 $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`e[2]] $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`k[5]])) $CellContext`Pair[
+            $CellContext`ec[5], 
+            $CellContext`k[3]] - 
+         4 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (-
+           X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+          X`DiscB[2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT]) ($CellContext`Pair[
+             $CellContext`e[2], 
+             $CellContext`ec[
+             4]] ((-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[5]] - 2 ($CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[3]] - $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`k[5]]) $CellContext`Pair[
+              $CellContext`ec[5], 
+              $CellContext`k[3]]) + $CellContext`Pair[
+             $CellContext`e[1], 
+             $CellContext`ec[
+             4]] ((-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[5]] - 2 ($CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[3]] - $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`k[5]]) $CellContext`Pair[
+              $CellContext`ec[5], 
+              $CellContext`k[3]]) - 2 $CellContext`Pair[
+            $CellContext`e[1], 
+            $CellContext`e[
+            2]] ((-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`ec[5]] - 2 ($CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`k[3]] - $CellContext`Pair[
+             $CellContext`ec[4], 
+             $CellContext`k[5]]) $CellContext`Pair[
+             $CellContext`ec[5], 
+             $CellContext`k[
+             3]])) - (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (-
+           Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+               2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                  4 $CellContext`MT^2)^Rational[1, 2])]^2 + 
+          Log[Rational[1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+              2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                 4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[1, 2])]^2) ($CellContext`Pair[
+             $CellContext`e[2], 
+             $CellContext`ec[
+             4]] ((-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[5]] + 2 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[5]] $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[3]]) + $CellContext`Pair[
+             $CellContext`e[1], 
+             $CellContext`ec[
+             4]] ((-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[5]] + 2 $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[5]] $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[3]]) - 2 $CellContext`Pair[
+            $CellContext`e[1], 
+            $CellContext`e[
+            2]] ((-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`ec[5]] + 2 $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`k[5]] $CellContext`Pair[
+              $CellContext`ec[5], 
+              $CellContext`k[3]])) + $CellContext`T24^(-1) ((-8) (
+             Rational[-1, 
+                
+                2] (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+               X`DiscB[
+               2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT]) (-(($CellContext`MH^2 - 
+                   3 $CellContext`S34 + $CellContext`T + $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] + 
+                 2 ($CellContext`S - $CellContext`T14) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    3]] + ($CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T - 3 $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] + 
+               2 ($CellContext`MH^2 - $CellContext`S34 + $CellContext`T - \
+$CellContext`U) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]] + 
+               2 ($CellContext`MH^2 - $CellContext`S34 + $CellContext`T - \
+$CellContext`U) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] + 8 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]))) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[3]] + 
+             Rational[-1, 
+                2] (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-2) (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + $CellContext`MH^2 
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MH^2 
+               X`DiscB[
+                2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] + $CellContext`MT^2 
+                Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 - $CellContext`MT^2 
+               Log[Rational[
+                   1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                   2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[1, 2])]^2) (-(($CellContext`MH^2 - 
+                   3 $CellContext`S34 + $CellContext`T - 
+                   2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] + 
+                 2 ($CellContext`S - $CellContext`T14) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    3]] + ($CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T - 2 $CellContext`T24 - 3 $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] + 
+               2 ($CellContext`MH^2 - $CellContext`S34 + $CellContext`T - 
+                 2 $CellContext`T24 - $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]] + 
+               2 ($CellContext`MH^2 - $CellContext`S34 + $CellContext`T - 
+                 2 $CellContext`T24 - $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] + 8 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]))) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[3]]) + (
+             4 (2 + X`Eps^(-1) + 
+               X`DiscB[
+                2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] + 
+               Log[$CellContext`MT^(-2) X`Mu^2]) + 
+             4 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (
+               3 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) + 
+               X`Eps^(-1) ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) - $CellContext`MH^2 
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+(2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - $CellContext`U) 
+                X`DiscB[
+                 2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] - $CellContext`MT^2 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                   2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[
+                    1, 2])]^2 + ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) 
+                Log[$CellContext`MT^(-2) X`Mu^2] + $CellContext`MT^2 
+                Log[Rational[
+                    1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[1, 2])]^2)) ($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                5]] ((-$CellContext`S + $CellContext`T14) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] + 4 ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]])) - 2 (2 ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] - $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]]) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] + $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] (2 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]]) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`e[2]] (2 $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]])) + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[4]] (2 $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]])) + $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] ((-4) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] ($CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]] + 4 $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]]))) + (-$CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T + $CellContext`U)^(-1) (-
+              Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                  2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 + 
+             Log[Rational[1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                 2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[
+                   1, 2])]^2) ((-4) ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[2]] - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[4]]) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[4]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`ec[5]] - 
+             4 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) ($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[2]] - $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[4]]) $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[5]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[2]] + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                5]] (-($CellContext`S - $CellContext`T14) (-$CellContext`MH^2 + \
+$CellContext`S + $CellContext`T14 + $CellContext`T24) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] + 
+               4 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]])) + 8 (-$CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[3]] + 4 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[
+                4]] ((-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[
+                  1]] + ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T24 - $CellContext`U) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]]) + 4 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[2]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[
+                2]] ((-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[
+                  1]] + ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T24 - $CellContext`U) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]]) - 2 $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[
+               4]] (($CellContext`S - $CellContext`T14) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]] (
+                2 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[
+                   2]] + ($CellContext`S34 + $CellContext`T - \
+$CellContext`T24 - $CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[
+                 
+                 2]] ((-$CellContext`S34 + $CellContext`T - $CellContext`T24 + \
+$CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]] + 
+                2 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]]))) + 
+           4 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (-
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+             X`DiscB[2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT]) ($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                5]] (-($CellContext`S - $CellContext`T14) (-$CellContext`MH^2 + \
+$CellContext`S + $CellContext`T14 + $CellContext`T24) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] + 
+               4 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]])) + 
+             2 ((-2) ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] - $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]]) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] - 
+               
+               2 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] - $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]]) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] + 8 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]] (
+                 2 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + (3 $CellContext`MH^2 - 
+                   3 $CellContext`S34 + $CellContext`T - 2 $CellContext`T24 - 
+                   3 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] (
+                 2 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + (3 $CellContext`MH^2 - 
+                   3 $CellContext`S34 + $CellContext`T - 2 $CellContext`T24 - 
+                   3 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])) - $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[4]] (
+              4 ($CellContext`S - $CellContext`T14) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]] (
+                4 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] + ($CellContext`MH^2 + 
+                  3 $CellContext`S34 + 3 $CellContext`T - 2 $CellContext`T24 - 
+                  5 $CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[
+                 2]] (($CellContext`MH^2 - 5 $CellContext`S34 + 
+                  3 $CellContext`T - 2 $CellContext`T24 + 
+                  3 $CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]] + 
+                4 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]])))) + $CellContext`T14^(-1) (
+           8 (Rational[-1, 
+                2] (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+               X`DiscB[
+               2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT]) ((-2) ($CellContext`MH^2 - \
+$CellContext`S34 - $CellContext`T + $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[
+                  4]] (($CellContext`MH^2 - 
+                   3 $CellContext`S34 + $CellContext`T + $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + 
+                 2 ($CellContext`S - $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    3]] + ($CellContext`MH^2 + $CellContext`S34 - 
+                   3 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) - 
+               2 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`e[2]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] + 8 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]))) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[3]] + 
+             Rational[-1, 
+                2] (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-2) (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + $CellContext`MH^2 
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MH^2 
+               X`DiscB[
+                2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] + $CellContext`MT^2 
+                Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 - $CellContext`MT^2 
+               Log[Rational[
+                   1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                   2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[
+                    1, 2])]^2) ((-2) ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - 2 $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] - $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[
+                 4]] (((-3) $CellContext`MH^2 + $CellContext`S + 
+                  4 $CellContext`S34 + 
+                  3 $CellContext`T14 + $CellContext`T24) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] - 
+                2 ($CellContext`S - $CellContext`T24) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[
+                  3]] + ((-3) $CellContext`MH^2 + $CellContext`S + 
+                  4 $CellContext`T + 
+                  3 $CellContext`T14 + $CellContext`T24) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]]) - 
+               2 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - 
+                2 $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`e[2]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] + 8 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]))) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[3]]) + (
+             4 (2 + X`Eps^(-1) + 
+               X`DiscB[
+                2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] + 
+               Log[$CellContext`MT^(-2) X`Mu^2]) + 
+             4 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (
+               3 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) + 
+               X`Eps^(-1) ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) - $CellContext`MH^2 
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+(2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - $CellContext`U) 
+                X`DiscB[
+                 2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] - $CellContext`MT^2 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                   2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[
+                    1, 2])]^2 + ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) 
+                Log[$CellContext`MT^(-2) X`Mu^2] + $CellContext`MT^2 
+                Log[Rational[
+                    1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[1, 2])]^2)) ((-2) ((-2) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) + $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] (2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] (2 $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])) + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] (2 ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] (2 $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]))) + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                4]] ((-$CellContext`S + $CellContext`T24) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]] ((-4) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[1]] ($CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]] + 4 $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) + 
+           4 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (-
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+             X`DiscB[2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT]) (
+             2 ((-2) ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]]) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] + 
+               2 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) - 8 (-$CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] (
+                 2 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + (3 $CellContext`MH^2 - 
+                   3 $CellContext`S34 - 3 $CellContext`T - 
+                   2 $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[
+                  4]] ((-2) ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] (
+                   2 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + (3 $CellContext`MH^2 - 
+                    3 $CellContext`S34 - 3 $CellContext`T - 
+                    2 $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]))) + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                4]] (-($CellContext`S - $CellContext`T24) (-$CellContext`MH^2 + \
+$CellContext`S + $CellContext`T14 + $CellContext`T24) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] + 
+               4 (-$CellContext`S + $CellContext`T24) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]] (
+                 4 ($CellContext`MH^2 - $CellContext`S - $CellContext`T14 - \
+$CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + ((-7) $CellContext`MH^2 + 
+                   3 $CellContext`S + 8 $CellContext`T + 5 $CellContext`T14 + 
+                   3 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[
+                  1]] (((-7) $CellContext`MH^2 + 3 $CellContext`S + 
+                   8 $CellContext`S34 + 5 $CellContext`T14 + 
+                   3 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + 
+                 4 (-$CellContext`MH^2 + $CellContext`S + $CellContext`T14 + \
+$CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]]))) + (-$CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T + $CellContext`U)^(-1) (-
+              Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                  2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 + 
+             Log[Rational[1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                 2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[1, 2])]^2) (
+             4 (-($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]]) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[
+                  1]] + ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) - 2 (-$CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[
+                  1]] ((-$CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    2]] + (-$CellContext`MH^2 + $CellContext`S + \
+$CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[
+                  4]] (-($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[
+                    4]] ((-$CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    2]] + (-$CellContext`MH^2 + $CellContext`S + \
+$CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]))) + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                4]] (-($CellContext`S - $CellContext`T24) (-$CellContext`MH^2 + \
+$CellContext`S + $CellContext`T14 + $CellContext`T24) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] - 
+               2 (($CellContext`S - $CellContext`T24) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] (
+                  2 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    1]] + ((-2) $CellContext`MH^2 + $CellContext`S + 
+                    2 $CellContext`S34 + $CellContext`T24 + 
+                    2 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[
+                   1]] (((-2) $CellContext`MH^2 + $CellContext`S + 
+                    2 $CellContext`T + $CellContext`T24 + 
+                    2 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + 
+                  2 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])))))) + $CellContext`S34^(-1) ((
+           4 (2 + X`Eps^(-1) + 
+             X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT] + 
+             Log[$CellContext`MT^(-2) X`Mu^2]) - 
+           4 ($CellContext`MH^2 - $CellContext`S34)^(-1) (3 $CellContext`MH^2 + 
+            X`Eps^(-1) $CellContext`MH^2 - 3 $CellContext`S34 - 
+            X`Eps^(-1) $CellContext`S34 + $CellContext`MH^2 
+             X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+$CellContext`S34 
+            X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MT^2 
+             Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                 2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                   Rational[1, 2])]^2 + $CellContext`MH^2 
+             Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`S34 
+            Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`MT^2 
+            Log[Rational[1, 2] $CellContext`MT^(-2) (
+                2 $CellContext`MT^2 - $CellContext`S34 + ($CellContext`S34 \
+((-4) $CellContext`MT^2 + $CellContext`S34))^
+                 Rational[1, 2])]^2)) ($CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`ec[5]] $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`ec[4]] + $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`ec[4]] $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`ec[5]] - 2 $CellContext`Pair[
+             $CellContext`e[1], 
+             $CellContext`e[2]] $CellContext`Pair[
+             $CellContext`ec[4], 
+             $CellContext`ec[5]]) - 
+         4 ($CellContext`MH^2 - $CellContext`S34)^(-1) (
+          X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+          X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT]) \
+($CellContext`Pair[
+             $CellContext`e[2], 
+             $CellContext`ec[
+             5]] ((-$CellContext`MH^2 + $CellContext`S34) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[4]] + 2 ($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[3]] - $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[4]]) $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[3]]) + $CellContext`Pair[
+             $CellContext`e[1], 
+             $CellContext`ec[
+             5]] ((-$CellContext`MH^2 + $CellContext`S34) $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[4]] + 2 ($CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[3]] - $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[4]]) $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[3]]) - 2 $CellContext`Pair[
+            $CellContext`e[1], 
+            $CellContext`e[
+            2]] ((-$CellContext`MH^2 + $CellContext`S34) $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`ec[5]] + 2 $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`k[3]] ($CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[3]] - $CellContext`Pair[
+              $CellContext`ec[5], 
+              $CellContext`k[4]]))) + $CellContext`Pair[
+            $CellContext`ec[4], 
+            $CellContext`k[
+            3]] ((-8) ($CellContext`MH^2 - $CellContext`S34)^(-1) (-
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+             X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT]) \
+($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[3]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[5]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[3]] - 2 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`e[2]] $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[3]]) + 
+           8 ($CellContext`MH^2 - $CellContext`S34)^(-2) (-$CellContext`MH^2 + \
+$CellContext`S34 - $CellContext`MH^2 
+             X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MH^2 
+              X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MT^2 
+             Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                 2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                   Rational[1, 2])]^2 + $CellContext`MT^2 
+              Log[Rational[1, 2] $CellContext`MT^(-2) (
+                  2 $CellContext`MT^2 - $CellContext`S34 + ($CellContext`S34 \
+((-4) $CellContext`MT^2 + $CellContext`S34))^
+                   Rational[1, 2])]^2) ($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[5]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[4]] - 2 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`e[2]] $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[
+               4]])) + ($CellContext`MH^2 - $CellContext`S34)^(-1) (
+           Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+               2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                  4 $CellContext`MT^2)^Rational[1, 2])]^2 - 
+           Log[Rational[1, 2] $CellContext`MT^(-2) (
+              2 $CellContext`MT^2 - $CellContext`S34 + ($CellContext`S34 \
+((-4) $CellContext`MT^2 + $CellContext`S34))^
+               Rational[1, 2])]^2) ($CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`ec[
+              5]] (($CellContext`MH^2 - $CellContext`S34) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[4]] + 2 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[4]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[3]]) + $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`ec[
+              5]] (($CellContext`MH^2 - $CellContext`S34) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] + 2 $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[4]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[3]]) - 2 $CellContext`Pair[
+             $CellContext`e[1], 
+             $CellContext`e[
+             2]] (($CellContext`MH^2 - $CellContext`S34) $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`ec[5]] + 2 $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[3]] $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[
+               4]])) - ($CellContext`MH^2 - $CellContext`S - $CellContext`T - \
+$CellContext`T14)^(-1) ((
+            4 (2 + X`Eps^(-1) + 
+              X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT] + 
+              Log[$CellContext`MT^(-2) X`Mu^2]) - 
+            4 ($CellContext`MH^2 - $CellContext`S34)^(-1) (
+             3 $CellContext`MH^2 + X`Eps^(-1) $CellContext`MH^2 - 
+             3 $CellContext`S34 - 
+             X`Eps^(-1) $CellContext`S34 + $CellContext`MH^2 
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+$CellContext`S34 
+             X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MT^2 
+              Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                  2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MH^2 
+              Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`S34 
+             Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`MT^2 
+             Log[Rational[1, 2] $CellContext`MT^(-2) (
+                 2 $CellContext`MT^2 - $CellContext`S34 + ($CellContext`S34 \
+((-4) $CellContext`MT^2 + $CellContext`S34))^Rational[1, 2])]^2)) (
+            4 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[5]] ($CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[1]] - $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[5]]) $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`ec[5]] + 2 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[5]] $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[5]] (2 $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] - $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[3]]) + $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               5]] ((-$CellContext`MH^2 + 
+                2 $CellContext`S + $CellContext`T24 + $CellContext`U) \
+$CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] - $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[5]] ((-4) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]]) - $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[1]] ($CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]] + 4 $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[5]])) + 4 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[4]] ($CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[1]] - $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[5]]) $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[1]] + 2 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`e[2]] (2 $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] - $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[3]]) $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[1]] - 4 $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`ec[4]] ($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[2]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[1]] + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[2]])) - 
+          8 (Rational[
+             1, 2] ($CellContext`MH^2 - $CellContext`S34)^(-2) \
+(-$CellContext`MH^2 + $CellContext`S34 - $CellContext`MH^2 
+             X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MH^2 
+              X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MT^2 
+             Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                 2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                   Rational[1, 2])]^2 + $CellContext`MT^2 
+              Log[Rational[1, 2] $CellContext`MT^(-2) (
+                  2 $CellContext`MT^2 - $CellContext`S34 + ($CellContext`S34 \
+((-4) $CellContext`MT^2 + $CellContext`S34))^
+                   Rational[1, 2])]^2) $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`k[3]] (
+             2 (-$CellContext`MH^2 + $CellContext`S34 + 
+               2 $CellContext`T24) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] - $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               5]] (((-2) $CellContext`MH^2 + 2 $CellContext`S34 + 
+                4 $CellContext`T24) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[1]] + (-$CellContext`MH^2 + $CellContext`S34 + 
+                4 $CellContext`T14) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] + ($CellContext`MH^2 + 
+                2 $CellContext`S - $CellContext`S34 - 2 $CellContext`T + 
+                2 $CellContext`T14) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[4]]) + 
+             2 (-$CellContext`MH^2 + $CellContext`S34 + 
+               2 $CellContext`T24) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[2]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[1]] + 8 (-$CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]]))) + 
+           Rational[
+             1, 2] ($CellContext`MH^2 - $CellContext`S34)^(-1) (-
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+             X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT]) \
+$CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`k[3]] (
+             2 ($CellContext`MH^2 - $CellContext`S34 - 
+               2 $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                5]] (((-2) $CellContext`MH^2 + 2 $CellContext`S34 + 
+                 4 $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[1]] - ($CellContext`MH^2 - 
+                2 $CellContext`S + $CellContext`S34 - 2 $CellContext`T + 
+                2 $CellContext`T14) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[
+                 3]] + ((-3) $CellContext`MH^2 + $CellContext`S34 + 
+                 4 $CellContext`T) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]]) + 
+             2 ($CellContext`MH^2 - $CellContext`S34 - 
+               2 $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[2]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[1]] + 8 (-$CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[
+                   4]])))) - ($CellContext`MH^2 - $CellContext`S34)^(-1) (
+           Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+               2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                  4 $CellContext`MT^2)^Rational[1, 2])]^2 - 
+           Log[Rational[1, 2] $CellContext`MT^(-2) (
+              2 $CellContext`MT^2 - $CellContext`S34 + ($CellContext`S34 \
+((-4) $CellContext`MT^2 + $CellContext`S34))^
+               Rational[1, 2])]^2) ($CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`ec[
+              5]] (($CellContext`MH^2 - $CellContext`S34) ($CellContext`MH^2 - 
+               2 $CellContext`S - $CellContext`T24 - $CellContext`U) \
+$CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] - 2 ($CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[
+                 3]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + 2 $CellContext`T14 $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[
+                 4]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[
+                   1]] + ($CellContext`MH^2 + $CellContext`S - \
+$CellContext`S34 - $CellContext`T + $CellContext`T14) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) + 2 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[
+                 1]] ((-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + $CellContext`T24 $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]))) + 4 ($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[
+                5]] (-($CellContext`MH^2 - $CellContext`S34) \
+($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]]) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[
+                  5]] ((-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`T24 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    3]])) - ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[4]] ($CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[1]] - $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[5]]) $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[1]] + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[
+                2]] ((-$CellContext`MH^2 + $CellContext`S34) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] + $CellContext`T24 $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[
+                1]] + ($CellContext`MH^2 - $CellContext`S34) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]]) + 2 $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[3]] (-$CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]])))) - 
+          4 ($CellContext`MH^2 - $CellContext`S34)^(-1) (
+           X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+           X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT]) \
+(-$CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`ec[
+              5]] (-($CellContext`MH^2 - $CellContext`S34) ($CellContext`MH^2 - 
+               2 $CellContext`S - $CellContext`T24 - $CellContext`U) \
+$CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] + $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[
+                4]] ((-4) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] + (5 $CellContext`MH^2 + 
+                 2 $CellContext`S - 3 $CellContext`S34 - 6 $CellContext`T + 
+                 2 $CellContext`T14) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) + $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[
+                3]] ((-4) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] + ($CellContext`MH^2 - 
+                 2 $CellContext`S + $CellContext`S34 - 2 $CellContext`T + 
+                 6 $CellContext`T14) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) + 2 $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[
+                1]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] + ($CellContext`MH^2 - $CellContext`S34 + 
+                 2 $CellContext`T24 - 2 $CellContext`U) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]])) + 2 ($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[
+                5]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]]) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[
+                  5]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    2]] + ($CellContext`MH^2 - $CellContext`S34 + 
+                   2 $CellContext`T24 - 2 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) - 
+             2 ($CellContext`MH^2 - $CellContext`S34) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[4]] ($CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[1]] - $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[5]]) $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[1]] + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[
+                2]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] + ($CellContext`MH^2 - $CellContext`S34 + 
+                 2 $CellContext`T24 - 2 $CellContext`U) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[1]] + 
+             2 ($CellContext`MH^2 - $CellContext`S34) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]]) + 8 $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[3]] (-$CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[
+                   4]])))))) + $CellContext`U^(-1) (($CellContext`MH^2 - \
+$CellContext`U)^(-1) (
+           Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+               2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                  4 $CellContext`MT^2)^Rational[1, 2])]^2 - 
+           Log[Rational[1, 2] $CellContext`MT^(-2) (
+              2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U ((-4) \
+$CellContext`MT^2 + $CellContext`U))^Rational[1, 2])]^2) (
+           2 ((-$CellContext`MH^2 + $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[2]] + 2 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[2]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[3]]) $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`ec[5]] - $CellContext`Pair[
+             $CellContext`e[1], 
+             $CellContext`ec[
+             5]] ((-$CellContext`MH^2 + $CellContext`U) $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[4]] + 2 $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[3]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[2]]) - $CellContext`Pair[
+             $CellContext`e[1], 
+             $CellContext`ec[
+             4]] ((-$CellContext`MH^2 + $CellContext`U) $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[5]] + 2 $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[3]] $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[2]])) - 
+         16 (Rational[1, 4] ($CellContext`MH^2 - $CellContext`U)^(-1) (
+            3 $CellContext`MH^2 + X`Eps^(-1) $CellContext`MH^2 - 
+            3 $CellContext`U - 
+            X`Eps^(-1) $CellContext`U + $CellContext`MH^2 
+             X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+$CellContext`U 
+            X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MT^2 
+             Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                 2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                   Rational[1, 2])]^2 + $CellContext`MH^2 
+             Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`U 
+            Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`MT^2 
+            Log[Rational[1, 2] $CellContext`MT^(-2) (
+                2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U ((-4) \
+$CellContext`MT^2 + $CellContext`U))^Rational[1, 2])]^2) ($CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[5]] $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[4]] + $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[4]] $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[5]] - 2 $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`e[2]] $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`ec[5]]) + $CellContext`Pair[
+             $CellContext`e[2], 
+             $CellContext`k[3]] (
+            Rational[
+              1, 2] ($CellContext`MH^2 - $CellContext`U)^(-2) \
+(-$CellContext`MH^2 + $CellContext`U - $CellContext`MH^2 
+              
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MH^2 
+               X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MT^2 
+              Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                  2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MT^2 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (
+                   2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U \
+((-4) $CellContext`MT^2 + $CellContext`U))^
+                    Rational[1, 2])]^2) ((-2) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[2]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]]) + 
+            Rational[
+              1, 2] ($CellContext`MH^2 - $CellContext`U)^(-1) (-
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+              X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT]) \
+((-2) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]]))) + 
+         4 ((2 + X`Eps^(-1) + 
+             X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] + 
+             Log[$CellContext`MT^(-2) X`Mu^2]) ($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[5]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] - 2 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`e[2]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`ec[
+               5]]) + ($CellContext`MH^2 - $CellContext`U)^(-1) (
+             X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+             X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT]) (
+             2 ((-$CellContext`MH^2 + $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] + 2 ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]]) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]]) $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`ec[5]] - $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               5]] ((-$CellContext`MH^2 + $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] + 2 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] ($CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]])) - $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               4]] ((-$CellContext`MH^2 + $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] + 2 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] ($CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[
+                  3]])))) + $CellContext`T14^(-1) (-($CellContext`MH^2 - \
+$CellContext`U)^(-1) (
+             Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                 2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 - 
+             Log[Rational[1, 2] $CellContext`MT^(-2) (
+                2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U ((-4) \
+$CellContext`MT^2 + $CellContext`U))^Rational[1, 2])]^2) ($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                4]] (($CellContext`S - $CellContext`S34 + $CellContext`T - \
+$CellContext`T24) ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] + 
+               2 (2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - 
+                 2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] (
+                   2 ($CellContext`S + $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    1]] + ($CellContext`S + $CellContext`S34 - $CellContext`T + \
+$CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - 2 $CellContext`S $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]))) - 4 ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[
+                 5]] ((-$CellContext`MH^2 + $CellContext`U) \
+$CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[
+                   1]] + ($CellContext`S + $CellContext`T24) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[
+                   3]] + ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]]) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[
+                 1]] + ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[5]]) + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[
+                 4]] (((-$CellContext`MH^2 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] + ($CellContext`S + $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    3]] + ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[
+                   5]] + ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[4]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]])) - 2 $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[3]] ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] ($CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[
+                  4]])) + ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`e[2]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] ($CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] - $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[4]]))) + (
+             4 (2 + X`Eps^(-1) + 
+               X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] + 
+               Log[$CellContext`MT^(-2) X`Mu^2]) - 
+             4 ($CellContext`MH^2 - $CellContext`U)^(-1) (3 $CellContext`MH^2 + 
+              X`Eps^(-1) $CellContext`MH^2 - 3 $CellContext`U - 
+              X`Eps^(-1) $CellContext`U + $CellContext`MH^2 
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+$CellContext`U 
+              X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MT^2 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                   2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MH^2 
+               Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`U 
+              Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`MT^2 
+              Log[Rational[1, 2] $CellContext`MT^(-2) (
+                  2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U \
+((-4) $CellContext`MT^2 + $CellContext`U))^
+                   Rational[1, 2])]^2)) ((-2) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[5]] ($CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] + 2 $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]]) $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[1]] + 4 $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[5]]) + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[4]] ((-2) ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] + 2 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] + 4 $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] ($CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[4]])) + 4 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[2]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[1]] ($CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] - $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[4]]) + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                4]] ((-$CellContext`S + $CellContext`S34 - $CellContext`T + \
+$CellContext`T24) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] - 4 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] + 4 $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[1]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[4]] - $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] ($CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[4]]))) - 
+           8 (Rational[
+              1, 2] ($CellContext`MH^2 - $CellContext`U)^(-2) \
+(-$CellContext`MH^2 + $CellContext`U - $CellContext`MH^2 
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MH^2 
+               X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MT^2 
+              Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                  2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MT^2 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (
+                   2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U \
+((-4) $CellContext`MT^2 + $CellContext`U))^
+                    Rational[1, 2])]^2) $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[
+               3]] ((-2) (-$CellContext`MH^2 + 2 $CellContext`S + 
+                2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] - 
+              2 (-$CellContext`MH^2 + 2 $CellContext`S + 
+               2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[5]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[1]] + 8 ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]])) + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[
+                 4]] ((-$CellContext`MH^2 + 2 $CellContext`S + 
+                  2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + 
+                2 ($CellContext`S34 - $CellContext`T) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] - 2 $CellContext`S $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]] + 2 $CellContext`T24 $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]] - $CellContext`MH^2 $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[4]] + 2 $CellContext`S $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]] + 2 $CellContext`T24 $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]] + $CellContext`U $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]])) + 
+            Rational[
+              1, 2] ($CellContext`MH^2 - $CellContext`U)^(-1) (-
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+              X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT]) \
+$CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[3]] (
+              2 ((-3) $CellContext`MH^2 + 2 $CellContext`S34 + 
+                2 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] + 
+              2 ((-3) $CellContext`MH^2 + 2 $CellContext`S34 + 
+                2 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] + 8 ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]])) - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                4]] (((-3) $CellContext`MH^2 + 
+                 4 $CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + 
+               2 ($CellContext`S - $CellContext`S34 + $CellContext`T - \
+$CellContext`T24) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]] + ((-3) $CellContext`MH^2 + 
+                 4 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[4]]))) - 
+           4 ($CellContext`MH^2 - $CellContext`U)^(-1) (
+            X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+            X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT]) (
+            2 ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[
+                 5]] (((-5) $CellContext`MH^2 + 4 $CellContext`S34 + 
+                  4 $CellContext`T + 
+                  2 $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] + 
+                2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]]) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] - 
+              2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[5]]) + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[
+                 4]] ((((-5) $CellContext`MH^2 + 4 $CellContext`S34 + 
+                    4 $CellContext`T + 
+                    2 $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 
+                  2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] - 
+                2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] ($CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[4]])) + 8 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]])) - 
+              2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[2]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[1]] ($CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] - $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[4]])) + $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               4]] (($CellContext`S - $CellContext`S34 + $CellContext`T - \
+$CellContext`T24) ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[
+                 3]] ((7 $CellContext`MH^2 - 8 $CellContext`S34 - 
+                  2 $CellContext`T14 - 3 $CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + 
+                4 ((-2) $CellContext`MH^2 + 
+                  2 $CellContext`S34 + $CellContext`T14 + 
+                  2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]] + (7 $CellContext`MH^2 - 
+                  8 $CellContext`T - 2 $CellContext`T14 - 
+                  3 $CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]]) + 
+              4 ($CellContext`MH^2 - $CellContext`U) ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[1]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[
+                  4]])))) + ($CellContext`MH^2 - $CellContext`S - \
+$CellContext`T - $CellContext`T14)^(-1) ((
+             4 (2 + X`Eps^(-1) + 
+               X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] + 
+               Log[$CellContext`MT^(-2) X`Mu^2]) - 
+             4 ($CellContext`MH^2 - $CellContext`U)^(-1) (3 $CellContext`MH^2 + 
+              X`Eps^(-1) $CellContext`MH^2 - 3 $CellContext`U - 
+              X`Eps^(-1) $CellContext`U + $CellContext`MH^2 
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+$CellContext`U 
+              X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MT^2 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                   2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MH^2 
+               Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`U 
+              Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`MT^2 
+              Log[Rational[1, 2] $CellContext`MT^(-2) (
+                  2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U \
+((-4) $CellContext`MT^2 + $CellContext`U))^
+                   Rational[1, 2])]^2)) ((-2) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]] ($CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] + 2 $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]]) $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`ec[5]] + 4 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] ($CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] - $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[5]]) + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                5]] ((-$CellContext`MH^2 + $CellContext`S34 + 
+                 2 $CellContext`T14 + $CellContext`T24) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] - 4 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] + 4 $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[1]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[5]] - $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] ($CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[5]])) - 2 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[4]] ($CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[3]] + 2 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[4]]) $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[1]] + 4 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[2]] ($CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] - $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[5]]) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[1]] + 4 $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[4]])) - 
+           8 (Rational[
+              1, 2] ($CellContext`MH^2 - $CellContext`U)^(-1) (-
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+              X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT]) \
+$CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[3]] (
+              2 ($CellContext`MH^2 - 
+                2 $CellContext`S34 - $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[
+                 5]] (((-2) $CellContext`MH^2 + 4 $CellContext`S34 + 
+                  2 $CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + (3 $CellContext`MH^2 - 
+                  4 $CellContext`T - $CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] - ($CellContext`MH^2 + 2 $CellContext`S - 
+                 2 $CellContext`T - 
+                 2 $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) + 
+              2 ($CellContext`MH^2 - 
+                2 $CellContext`S34 - $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] + 8 ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[5]]) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) + 
+            Rational[
+              1, 2] ($CellContext`MH^2 - $CellContext`U)^(-2) \
+(-$CellContext`MH^2 + $CellContext`U - $CellContext`MH^2 
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MH^2 
+               X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MT^2 
+              Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                  2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MT^2 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (
+                   2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U \
+((-4) $CellContext`MT^2 + $CellContext`U))^
+                    Rational[1, 2])]^2) $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[3]] (
+              2 (-$CellContext`MH^2 + 
+                2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                5]] (((-2) $CellContext`MH^2 + 4 $CellContext`T24 + 
+                 2 $CellContext`U) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] + (-$CellContext`MH^2 - 2 $CellContext`S + 
+                 2 $CellContext`T - 
+                 2 $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] + (-$CellContext`MH^2 + 
+                 4 $CellContext`S + $CellContext`U) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) + 
+              2 (-$CellContext`MH^2 + 
+                2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] + 8 ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[5]]) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])))) - 
+           4 ($CellContext`MH^2 - $CellContext`U)^(-1) (
+            X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+            X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT]) \
+($CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               5]] (($CellContext`MH^2 - $CellContext`S34 - 
+                2 $CellContext`T14 - $CellContext`T24) ($CellContext`MH^2 - \
+$CellContext`U) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] - 
+              4 ($CellContext`MH^2 - $CellContext`U) ($CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[1]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] - $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]])) - $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[3]] (
+               2 ($CellContext`MH^2 - 2 $CellContext`S34 + 
+                 2 $CellContext`T24 - $CellContext`U) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] + ((-5) $CellContext`MH^2 - 
+                 2 $CellContext`S + 6 $CellContext`T - 2 $CellContext`T14 + 
+                 3 $CellContext`U) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] + ($CellContext`MH^2 + 6 $CellContext`S - 
+                 2 $CellContext`T - 
+                 2 $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]])) - 2 ($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[
+                5]] (((-$CellContext`MH^2 + 2 $CellContext`S34 - 
+                   2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 
+                 2 (-$CellContext`MH^2 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] + 
+               2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[5]])) + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                4]] ((-$CellContext`MH^2 + 2 $CellContext`S34 - 
+                 2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] + 
+               2 (-$CellContext`MH^2 + $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]]) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[1]] + 
+             2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[2]] ($CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] - $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[5]]) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[1]] + 
+             2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[4]]) - 8 $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[3]] ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] ($CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] - $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[5]]) $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]] - $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]] + $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[
+                   4]])))) - ($CellContext`MH^2 - $CellContext`U)^(-1) (
+            Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                   4 $CellContext`MT^2)^Rational[1, 2])]^2 - 
+            Log[Rational[1, 2] $CellContext`MT^(-2) (
+               2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U ((-4) \
+$CellContext`MT^2 + $CellContext`U))^Rational[1, 2])]^2) ($CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               5]] (($CellContext`MH^2 - $CellContext`S34 - 
+                2 $CellContext`T14 - $CellContext`T24) ($CellContext`MH^2 - \
+$CellContext`U) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] + 
+              2 ((-2) ($CellContext`MH^2 - $CellContext`U) \
+($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] ((-2) $CellContext`T24 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    1]] + ($CellContext`MH^2 + $CellContext`S - \
+$CellContext`T + $CellContext`T14 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] - 2 $CellContext`S $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]))) + 4 ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] (($CellContext`T24 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    3]] + ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[
+                   5]] - ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[5]])) + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] ($CellContext`T24 $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[
+                   3]] + ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]]) $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[
+                 1]] - ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[2]] ($CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] - $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[5]]) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[
+                1]] - ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[4]]) + 2 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[5]]) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]])))))) + $CellContext`T24^(-1) (-$CellContext`T^(-1) \
+(-($CellContext`MH^2 - $CellContext`T)^(-1) (
+             Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                 2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 - 
+             Log[Rational[1, 2] $CellContext`MT^(-2) (
+                2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T ((-4) \
+$CellContext`MT^2 + $CellContext`T))^Rational[1, 2])]^2) ($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                5]] (-($CellContext`MH^2 - $CellContext`T) ($CellContext`S - \
+$CellContext`S34 - $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] + 
+               4 ($CellContext`MH^2 - $CellContext`T) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) - 
+             2 ((-2) ((-$CellContext`MH^2 + $CellContext`T) \
+$CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[
+                   2]] + ($CellContext`S + $CellContext`T14) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[
+                   3]] + ($CellContext`MH^2 - $CellContext`T) \
+$CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]]) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] - 
+              2 ((-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[
+                  2]] + ($CellContext`S + $CellContext`T14) \
+$CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[
+                  3]] + ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]]) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[2]] + 
+              2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[4]] ($CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] - $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]]) + 
+              2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`e[2]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] ($CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] - $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]]) + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] (
+                2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] - 
+                2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] ($CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] - $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]]) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[
+                   3]] (($CellContext`S + $CellContext`S34 + $CellContext`T14 - \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + 
+                  2 ($CellContext`S + $CellContext`T14) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - 2 $CellContext`S $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])) + 4 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]])))) + (
+             4 (2 + X`Eps^(-1) + 
+               X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT] + 
+               Log[$CellContext`MT^(-2) X`Mu^2]) - 
+             4 ($CellContext`MH^2 - $CellContext`T)^(-1) (3 $CellContext`MH^2 + 
+              X`Eps^(-1) $CellContext`MH^2 - 3 $CellContext`T - 
+              X`Eps^(-1) $CellContext`T + $CellContext`MH^2 
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+$CellContext`T 
+              X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MT^2 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                   2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MH^2 
+               Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`T 
+              Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`MT^2 
+              Log[Rational[1, 2] $CellContext`MT^(-2) (
+                  2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T \
+((-4) $CellContext`MT^2 + $CellContext`T))^Rational[1, 2])]^2)) (
+             2 ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] + 2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]]) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[4]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`ec[5]] + 2 ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] + 2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]]) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[2]] + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                5]] (($CellContext`S - $CellContext`S34 - $CellContext`T14 + \
+$CellContext`U) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] - 4 ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[5]])) + 4 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[4]] ($CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] - $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[3]]) + 4 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[2]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[2]] ($CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] - $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[3]]) - $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[4]] ((-4) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]] + 4 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[2]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[4]] - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[3]] ($CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[4]]))) + 
+           8 (Rational[
+               1, 2] ($CellContext`MH^2 - $CellContext`T)^(-1) (-
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+               X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT]) \
+$CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[3]] (
+               2 ((-3) $CellContext`MH^2 + 
+                 2 $CellContext`S34 + $CellContext`T + 
+                 2 $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] + 
+               2 ((-3) $CellContext`MH^2 + 
+                 2 $CellContext`S34 + $CellContext`T + 
+                 2 $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] + 8 ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) - $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[
+                 4]] (((-3) $CellContext`MH^2 + 
+                  4 $CellContext`S34 + $CellContext`T) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] + 
+                2 ($CellContext`S - $CellContext`S34 - $CellContext`T14 + \
+$CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[
+                   3]] + ((-3) $CellContext`MH^2 + $CellContext`T + 
+                  4 $CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]])) + 
+             Rational[
+               1, 2] ($CellContext`MH^2 - $CellContext`T)^(-2) \
+(-$CellContext`MH^2 + $CellContext`T - $CellContext`MH^2 
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MH^2 
+                X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MT^2 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                   2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MT^2 
+                Log[Rational[1, 2] $CellContext`MT^(-2) (
+                    2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T \
+((-4) $CellContext`MT^2 + $CellContext`T))^
+                    Rational[1, 2])]^2) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[
+                3]] ((-2) (-$CellContext`MH^2 + 
+                 2 $CellContext`S + $CellContext`T + 
+                 2 $CellContext`T14) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] - 
+               2 (-$CellContext`MH^2 + 2 $CellContext`S + $CellContext`T + 
+                2 $CellContext`T14) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] + 8 (-$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] (-$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])) - $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[
+                 4]] (((-3) $CellContext`MH^2 + 
+                  4 $CellContext`S34 + $CellContext`T + 
+                  2 $CellContext`T24) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] + 
+                2 ($CellContext`S - $CellContext`S34 - $CellContext`T14 + \
+$CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[
+                   3]] + ((-3) $CellContext`MH^2 + $CellContext`T + 
+                  2 $CellContext`T24 + 4 $CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]]))) - 
+           4 ($CellContext`MH^2 - $CellContext`T)^(-1) (
+            X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+            X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT]) ((-2) \
+(((-5) $CellContext`MH^2 + 4 $CellContext`S34 + $CellContext`T + 
+                2 $CellContext`T24 + 4 $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] + 
+              2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]]) $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[4]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`ec[5]] - 
+            2 (((-5) $CellContext`MH^2 + 4 $CellContext`S34 + $CellContext`T + 
+               2 $CellContext`T24 + 4 $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[3]] + 
+             2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]]) $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`ec[5]] $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`k[2]] + $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               5]] (-($CellContext`MH^2 - $CellContext`T) ($CellContext`S - \
+$CellContext`S34 - $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] + 
+              4 ($CellContext`MH^2 - $CellContext`T) ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[5]])) - 
+            4 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`ec[4]] $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`k[4]] ($CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[1]] - $CellContext`Pair[
+              $CellContext`ec[5], 
+              $CellContext`k[3]]) - 
+            4 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`e[2]] $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`k[2]] ($CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[1]] - $CellContext`Pair[
+              $CellContext`ec[5], 
+              $CellContext`k[3]]) - 16 $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`k[3]] ($CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[2]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[3]] + $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[4]] ($CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]] + $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]] ($CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] - $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[4]])) + $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[3]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[2]] ($CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]] - $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[4]])) - $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`ec[4]] ($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[
+                3]] ((7 $CellContext`MH^2 - 8 $CellContext`S34 - 
+                 3 $CellContext`T - 2 $CellContext`T24) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + 
+               4 ((-2) $CellContext`MH^2 + 
+                 2 $CellContext`S34 + $CellContext`T + 
+                 2 $CellContext`T14 + $CellContext`T24) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]] + (7 $CellContext`MH^2 - 
+                 3 $CellContext`T - 2 $CellContext`T24 - 
+                 8 $CellContext`U) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[4]]) + 
+             4 ($CellContext`MH^2 - $CellContext`T) ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] - $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[2]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[
+                 4]])))) - ($CellContext`MH^2 - $CellContext`S - \
+$CellContext`T - $CellContext`T14)^(-1) ((-2) (((-$CellContext`S34 \
+$CellContext`T + $CellContext`S34 $CellContext`T14 + $CellContext`MH^2 \
+($CellContext`S34 - $CellContext`U) + $CellContext`T $CellContext`U + \
+$CellContext`T14 $CellContext`U - $CellContext`S ($CellContext`S34 + \
+$CellContext`U)) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] - 
+              4 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[4]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`ec[5]] - 
+              4 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[2]] + 4 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[
+                 5]] ((($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] + (-$CellContext`MH^2 + $CellContext`T) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]]) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[
+                   4]] (($CellContext`S34 + $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    1]] + (-$CellContext`MH^2 + $CellContext`T) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) - 
+              4 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[4]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[1]] - 
+              4 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[2]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[2]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[1]] + 8 ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]]) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + 4 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] ($CellContext`U $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`S34 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] ($CellContext`U $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`S34 $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) 
+             X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT] + (
+               16 $CellContext`MT^4 + $CellContext`T^2 + $CellContext`T14^2 - 
+               4 $CellContext`MH^2 $CellContext`T24 + 
+               2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+               2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+               
+               8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24))^(-1) ((-$CellContext`S34^2 - 
+                4 $CellContext`S34 $CellContext`T + 
+                2 $CellContext`S34 $CellContext`T14 + 
+                4 $CellContext`MH^2 ($CellContext`S34 - $CellContext`U) + 
+                4 $CellContext`T $CellContext`U + 
+                2 $CellContext`T14 $CellContext`U + $CellContext`U^2 - 
+                2 $CellContext`S ($CellContext`S34 + $CellContext`U)) \
+$CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] - 
+              8 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[4]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`ec[5]] - 
+              8 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[2]] + 4 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[
+                 5]] ((2 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] + ((-4) $CellContext`MH^2 + $CellContext`S34 + 
+                    4 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]]) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] (
+                  2 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    1]] + ((-4) $CellContext`MH^2 + $CellContext`S34 + 
+                    4 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) - 
+              8 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[4]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[1]] - 
+              8 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[2]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[2]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[1]] + 32 ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]]) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + 4 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] (
+                2 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[
+                   1]] + ((-3) $CellContext`S34 + $CellContext`U) \
+$CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] (
+                  2 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    2]] + ((-3) $CellContext`S34 + $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]))) ((2 $CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14 - \
+$CellContext`T24) 
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+              2 ($CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14) 
+              X`DiscB[$CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`MT, $CellContext`MT] - (
+               4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 - \
+$CellContext`T24) 
+              X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] + \
+($CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14) (
+                4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24) 
+               X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+                 4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT])) + (
+            8 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[5]] ($CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]]) + $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               5]] ((2 $CellContext`S - $CellContext`S34 - 
+                2 $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] - 4 (($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]]) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[5]]))) + 8 ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[4]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`e[2]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]]) $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[1]] - 4 $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`ec[4]] ($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[2]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[1]] + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[4]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[1]] + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]] ($CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[4]]))) (
+            2 (2 + X`Eps^(-1) + 
+              X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] + 
+              Log[$CellContext`MT^(-2) X`Mu^2]) - 
+            2 (16 $CellContext`MT^4 + $CellContext`T^2 + $CellContext`T14^2 - 
+              4 $CellContext`MH^2 $CellContext`T24 + 
+              2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+              2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+              8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24))^(-1) (
+             3 (16 $CellContext`MT^4 + $CellContext`T^2 + $CellContext`T14^2 - 
+               4 $CellContext`MH^2 $CellContext`T24 + 
+               2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+               2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+               8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24)) + 
+             X`Eps^(-1) (
+               16 $CellContext`MT^4 + $CellContext`T^2 + $CellContext`T14^2 - 
+               4 $CellContext`MH^2 $CellContext`T24 + 
+               2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+               2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+               8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24)) + $CellContext`MH^2 (
+               4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 - \
+$CellContext`T24) 
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+($CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14) (
+              4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24) 
+             X`DiscB[$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`MT, $CellContext`MT] - (2 $CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14 - \
+$CellContext`T24) $CellContext`T24 
+             X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] + (
+               16 $CellContext`MT^4 + $CellContext`T^2 + $CellContext`T14^2 - 
+               4 $CellContext`MH^2 $CellContext`T24 + 
+               2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+               2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+               8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24)) Log[$CellContext`MT^(-2) X`Mu^2] + 
+             2 (16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+               8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+                 8 $CellContext`MH^2 $CellContext`T24 + 
+                 2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                 2 $CellContext`T ($CellContext`T14 + $CellContext`T24))) 
+              X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT])) - 
+          4 ((16 $CellContext`MT^4 + $CellContext`T^2 + $CellContext`T14^2 - 
+              4 $CellContext`MH^2 $CellContext`T24 + 
+              2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+              2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+              8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24))^(-1) ((-$CellContext`S34^2 - 
+               2 $CellContext`S34 $CellContext`T - $CellContext`S34 \
+$CellContext`T24 + 2 $CellContext`T14 $CellContext`T24 - 
+               2 $CellContext`S (
+                2 $CellContext`S34 + $CellContext`T24) + $CellContext`MH^2 (
+                 2 $CellContext`S + 3 $CellContext`S34 - 2 $CellContext`T14 - 
+                 3 $CellContext`U) + 2 $CellContext`T $CellContext`U + 
+               
+               4 $CellContext`T14 $CellContext`U + $CellContext`T24 \
+$CellContext`U + $CellContext`U^2) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[5]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] - 
+             8 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T24 + \
+$CellContext`U) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[5]] $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[4]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`ec[5]] - 
+             8 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T24 + \
+$CellContext`U) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[5]] $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[5]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[2]] - 
+             4 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T24 - \
+$CellContext`U) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[5]] ((2 $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]]) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[4]] (2 $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]])) - 
+             8 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T24 + \
+$CellContext`U) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[4]] $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[4]] $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[1]] - 
+             8 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T24 + \
+$CellContext`U) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`e[2]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[2]] $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[1]] + 4 $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[
+                4]] ((-$CellContext`MH^2 + 
+                 2 $CellContext`S34 + $CellContext`T24) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[
+                  1]] + (-$CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] - $CellContext`MH^2 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] + $CellContext`T24 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + 2 $CellContext`U $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] - $CellContext`MH^2 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]] + 2 $CellContext`S34 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + $CellContext`T24 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] - $CellContext`S34 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]] + $CellContext`U $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]] - $CellContext`MH^2 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[4]] + $CellContext`T24 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[4]] + 2 $CellContext`U $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[4]])) ((-2) $CellContext`MH^2 
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + (
+               2 $CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14 - \
+$CellContext`T24) 
+              X`DiscB[$CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`MT, $CellContext`MT] + 
+             4 $CellContext`MT^2 
+              X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] + \
+$CellContext`T 
+              X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] + \
+$CellContext`T14 
+              X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] + \
+$CellContext`T24 X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] - 
+             4 $CellContext`MH^2 $CellContext`MT^2 
+             X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MH^2 $CellContext`T 
+             X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MH^2 $CellContext`T14 
+             X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MH^2 $CellContext`T24 
+              X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT]) + 
+           Rational[
+             1, 2] (16 $CellContext`MT^4 + $CellContext`T^2 + \
+$CellContext`T14^2 - 4 $CellContext`MH^2 $CellContext`T24 + 
+              2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+              2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+              8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24))^(-2) (-($CellContext`S34 - $CellContext`U) ((-2) \
+$CellContext`MH^2 + $CellContext`S34 + 
+               2 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[5]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] - 
+             4 (2 $CellContext`MH^2 - $CellContext`S34 - 
+              2 $CellContext`T - $CellContext`U) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[5]] ($CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]]) - 
+             4 ($CellContext`S34 - $CellContext`U) $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[4]] ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]]) + 16 ($CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]])) ((-2) ($CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14) \
+((-16) $CellContext`MT^4 - $CellContext`T^2 - $CellContext`T14^2 + 
+               4 $CellContext`MH^2 $CellContext`T24 - 
+               2 $CellContext`T14 $CellContext`T24 - $CellContext`T24^2 - 
+               2 $CellContext`T ($CellContext`T14 + $CellContext`T24) - 
+               8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24)) + ((
+                  4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2 (12 $CellContext`MT^2 + 3 $CellContext`T + 
+                 3 $CellContext`T14 + $CellContext`T24) + 
+               2 $CellContext`MH^4 (12 $CellContext`MT^2 + 3 $CellContext`T + 
+                 3 $CellContext`T14 + 5 $CellContext`T24) - 
+               2 $CellContext`MH^2 (80 $CellContext`MT^4 + 5 $CellContext`T^2 + 
+                10 $CellContext`T $CellContext`T14 + 5 $CellContext`T14^2 + 
+                7 $CellContext`T $CellContext`T24 + 
+                7 $CellContext`T14 $CellContext`T24 + 4 $CellContext`T24^2 + 
+                4 $CellContext`MT^2 (10 $CellContext`T + 10 $CellContext`T14 + 
+                  7 $CellContext`T24))) 
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+             6 (-$CellContext`MH^2 + 
+               4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14)^2 (
+              4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24) 
+             X`DiscB[$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`MT, $CellContext`MT] - ((-192) $CellContext`MT^6 - 
+              3 $CellContext`T^3 - 9 $CellContext`T^2 $CellContext`T14 - 
+              9 $CellContext`T $CellContext`T14^2 - 3 $CellContext`T14^3 - 
+              16 $CellContext`MT^4 (9 $CellContext`T + 
+               9 $CellContext`T14 - $CellContext`T24) + 
+              4 $CellContext`MH^4 $CellContext`T24 + $CellContext`T^2 \
+$CellContext`T24 + 
+              2 $CellContext`T $CellContext`T14 $CellContext`T24 + \
+$CellContext`T14^2 $CellContext`T24 + 5 $CellContext`T $CellContext`T24^2 + 
+              5 $CellContext`T14 $CellContext`T24^2 + $CellContext`T24^3 - 
+              4 $CellContext`MT^2 (9 $CellContext`T^2 + 
+               18 $CellContext`T $CellContext`T14 + 9 $CellContext`T14^2 - 
+               2 $CellContext`T $CellContext`T24 - 
+               2 $CellContext`T14 $CellContext`T24 - 5 $CellContext`T24^2) + 
+              2 $CellContext`MH^2 (16 $CellContext`MT^4 + $CellContext`T^2 + 
+                2 $CellContext`T $CellContext`T14 + $CellContext`T14^2 + \
+$CellContext`MT^2 (8 $CellContext`T + 8 $CellContext`T14 - 
+                  4 $CellContext`T24) - $CellContext`T $CellContext`T24 - \
+$CellContext`T14 $CellContext`T24 - 4 $CellContext`T24^2)) 
+             X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] + 
+             2 ($CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14) (
+               2 $CellContext`MH^4 $CellContext`T24 - (
+                2 $CellContext`MT^2 + $CellContext`T + $CellContext`T14) (
+                 4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2 + $CellContext`MH^2 (
+                 16 $CellContext`MT^4 + $CellContext`T^2 + 
+                 2 $CellContext`T $CellContext`T14 + $CellContext`T14^2 + 
+                 8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 - \
+$CellContext`T24) + $CellContext`T24^2)) 
+              X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT]) + 
+           Rational[
+             1, 2] (16 $CellContext`MT^4 + $CellContext`T^2 + \
+$CellContext`T14^2 - 4 $CellContext`MH^2 $CellContext`T24 + 
+              2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+              2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+              8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24))^(-2) (-($CellContext`S34 - $CellContext`U) ((-2) \
+$CellContext`MH^2 + $CellContext`S34 + 
+               2 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[5]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] - 
+             4 (2 $CellContext`MH^2 - $CellContext`S34 - 
+              2 $CellContext`T - $CellContext`U) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[5]] ($CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]]) + 16 ($CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] ($CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]]) + ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] - $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]]) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]]) - 
+             4 ($CellContext`S34 - $CellContext`U) $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[4]] ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]])) ((2 $CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14 - \
+$CellContext`T24) ((-16) $CellContext`MT^4 - $CellContext`T^2 - \
+$CellContext`T14^2 + 4 $CellContext`MH^2 $CellContext`T24 - 
+               2 $CellContext`T14 $CellContext`T24 - $CellContext`T24^2 - 
+               2 $CellContext`T ($CellContext`T14 + $CellContext`T24) - 
+               8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24)) - $CellContext`MH^2 ((-80) $CellContext`MT^4 - 
+              5 $CellContext`T^2 - 10 $CellContext`T $CellContext`T14 - 
+              5 $CellContext`T14^2 - 4 $CellContext`T $CellContext`T24 - 
+              4 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+              2 $CellContext`MH^2 (12 $CellContext`MT^2 + 3 $CellContext`T + 
+                3 $CellContext`T14 + $CellContext`T24) - 
+              8 $CellContext`MT^2 (5 $CellContext`T + 5 $CellContext`T14 + 
+               2 $CellContext`T24)) 
+             X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+($CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14) \
+($CellContext`MH^2 (24 $CellContext`MT^2 + 6 $CellContext`T + 
+                 6 $CellContext`T14 - 2 $CellContext`T24) - (
+                4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2) 
+              X`DiscB[$CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`MT, $CellContext`MT] + (
+               2 $CellContext`MH^2 (
+                  4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 - \
+$CellContext`T24)^2 + 
+               4 $CellContext`MH^4 $CellContext`T24 - (
+                4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14) (
+                 4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2) 
+              X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] - 
+             2 (2 $CellContext`MH^6 $CellContext`T24 - $CellContext`MT^2 (
+                4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^3 + $CellContext`MH^4 (
+                16 $CellContext`MT^4 + $CellContext`T^2 + 
+                2 $CellContext`T $CellContext`T14 + $CellContext`T14^2 + 
+                4 $CellContext`MT^2 (2 $CellContext`T + 2 $CellContext`T14 - 
+                  5 $CellContext`T24) - 3 $CellContext`T $CellContext`T24 - 
+                3 $CellContext`T14 $CellContext`T24 - 
+                2 $CellContext`T24^2) - $CellContext`MH^2 (
+               32 $CellContext`MT^6 + 
+               16 $CellContext`MT^4 (2 $CellContext`T + 2 $CellContext`T14 - 
+                 3 $CellContext`T24) + 
+               2 $CellContext`MT^2 (5 $CellContext`T^2 + 
+                 10 $CellContext`T $CellContext`T14 + 5 $CellContext`T14^2 - 
+                 8 $CellContext`T $CellContext`T24 - 
+                 8 $CellContext`T14 $CellContext`T24 - 
+                 7 $CellContext`T24^2) + ($CellContext`T + $CellContext`T14) \
+($CellContext`T^2 + 
+                 2 $CellContext`T $CellContext`T14 + $CellContext`T14^2 - \
+$CellContext`T $CellContext`T24 - $CellContext`T14 $CellContext`T24 - 
+                 2 $CellContext`T24^2))) 
+             X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT])))) + \
+($CellContext`MH^2 - $CellContext`S - $CellContext`T24 - $CellContext`U)^(-1) \
+(-$CellContext`S34^(-1) (
+           4 (2 + X`Eps^(-1) + 
+             X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT] + 
+             Log[$CellContext`MT^(-2) X`Mu^2]) (4 ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[2]] - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]]) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`ec[5]] + 2 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[5]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[5]] (2 $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] - $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[3]]) - $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[5]] ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] ((-4) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[2]] ($CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]] + 4 $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[5]])) + 4 ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[2]] - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]]) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[2]] + 2 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[2]] (2 $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] - $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[3]]) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[2]] + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                4]] ((-$CellContext`MH^2 + 
+                 2 $CellContext`S + $CellContext`T + $CellContext`T14) \
+$CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] - 4 ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]]))) - 
+           4 ($CellContext`MH^2 - $CellContext`S34)^(-1) (3 $CellContext`MH^2 + 
+            X`Eps^(-1) $CellContext`MH^2 - 3 $CellContext`S34 - 
+            X`Eps^(-1) $CellContext`S34 + $CellContext`MH^2 
+             X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+$CellContext`S34 
+            X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MT^2 
+             Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                 2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                   Rational[1, 2])]^2 + $CellContext`MH^2 
+             Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`S34 
+            Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`MT^2 
+            Log[Rational[1, 2] $CellContext`MT^(-2) (
+                2 $CellContext`MT^2 - $CellContext`S34 + ($CellContext`S34 \
+((-4) $CellContext`MT^2 + $CellContext`S34))^Rational[1, 2])]^2) (
+            4 ($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[2]] - $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[5]]) $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[5]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`ec[5]] + 2 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[5]] $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[5]] (2 $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] - $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[3]]) - $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`ec[5]] ($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]] ((-4) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]]) + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[2]] ($CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]] + 4 $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[5]])) + 4 ($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[2]] - $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[5]]) $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[4]] $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[2]] + 2 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`e[2]] (2 $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] - $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[3]]) $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[2]] + $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               4]] ((-$CellContext`MH^2 + 
+                2 $CellContext`S + $CellContext`T + $CellContext`T14) \
+$CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] - 4 ($CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[1]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]]))) + 
+           8 (Rational[
+               1, 2] ($CellContext`MH^2 - $CellContext`S34)^(-1) (-
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+               X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT]) \
+$CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[
+                3]] (-(((-2) $CellContext`MH^2 + 2 $CellContext`S34 + 
+                   4 $CellContext`T) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - ($CellContext`MH^2 - 
+                  2 $CellContext`S + $CellContext`S34 + 2 $CellContext`T24 - 
+                  2 $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[
+                   3]] + ((-3) $CellContext`MH^2 + $CellContext`S34 + 
+                   4 $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] + 
+               2 (-$CellContext`MH^2 + $CellContext`S34 + 
+                 2 $CellContext`T) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] + 
+               2 (-$CellContext`MH^2 + $CellContext`S34 + 
+                 2 $CellContext`T) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + 8 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) + 
+             Rational[
+               1, 2] ($CellContext`MH^2 - $CellContext`S34)^(-2) \
+(-$CellContext`MH^2 + $CellContext`S34 - $CellContext`MH^2 
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MH^2 
+                X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MT^2 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                   2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MT^2 
+                Log[Rational[1, 2] $CellContext`MT^(-2) (
+                    2 $CellContext`MT^2 - $CellContext`S34 + \
+($CellContext`S34 ((-4) $CellContext`MT^2 + $CellContext`S34))^
+                    Rational[1, 2])]^2) $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[
+                3]] ((((-2) $CellContext`MH^2 + 2 $CellContext`S34 + 
+                   4 $CellContext`T14) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    2]] + (-$CellContext`MH^2 + $CellContext`S34 + 
+                   4 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] + ($CellContext`MH^2 + 
+                   2 $CellContext`S - $CellContext`S34 + 2 $CellContext`T24 - 
+                   2 $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] + 
+               2 ($CellContext`MH^2 - $CellContext`S34 - 
+                 2 $CellContext`T14) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] + 
+               2 ($CellContext`MH^2 - $CellContext`S34 - 
+                 2 $CellContext`T14) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + 8 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])))) - 
+           4 ($CellContext`MH^2 - $CellContext`S34)^(-1) (
+            X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+            X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT]) \
+(-$CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[5]] ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[
+                 2]] ((-4) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + 
+                2 ($CellContext`MH^2 - $CellContext`S34 - 2 $CellContext`T + 
+                  2 $CellContext`T14) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[
+                 4]] ((-4) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + (5 $CellContext`MH^2 + 
+                  2 $CellContext`S - 3 $CellContext`S34 + 2 $CellContext`T24 - 
+                  6 $CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[
+                 3]] ((-4) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + ($CellContext`MH^2 - 
+                  2 $CellContext`S + $CellContext`S34 + 6 $CellContext`T24 - 
+                  2 $CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]])) + $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               4]] (($CellContext`MH^2 - $CellContext`S34) ($CellContext`MH^2 - 
+                2 $CellContext`S - $CellContext`T - $CellContext`T14) \
+$CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] + 
+              4 ($CellContext`MH^2 - $CellContext`S34) ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]])) + 
+            2 ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] - $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]]) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[
+                 5]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + ($CellContext`MH^2 - $CellContext`S34 - 
+                  2 $CellContext`T + 2 $CellContext`T14) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) - 
+              2 ($CellContext`MH^2 - $CellContext`S34) ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[2]] - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]]) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`e[
+                 2]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + ($CellContext`MH^2 - $CellContext`S34 - 
+                  2 $CellContext`T + 2 $CellContext`T14) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]] - 8 $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[3]] (-$CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]])))) - ($CellContext`MH^2 - $CellContext`S34)^(-1) (
+            Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                   4 $CellContext`MT^2)^Rational[1, 2])]^2 - 
+            Log[Rational[1, 2] $CellContext`MT^(-2) (
+               2 $CellContext`MT^2 - $CellContext`S34 + ($CellContext`S34 \
+((-4) $CellContext`MT^2 + $CellContext`S34))^
+                Rational[1, 2])]^2) ($CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               4]] (($CellContext`MH^2 - $CellContext`S34) ($CellContext`MH^2 - 
+                2 $CellContext`S - $CellContext`T - $CellContext`T14) \
+$CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] + 
+              4 ($CellContext`MH^2 - $CellContext`S34) ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]])) - 
+            2 (2 ($CellContext`MH^2 - $CellContext`S34) ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[2]] - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]]) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`ec[5]] - 2 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[5]] $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[
+               5]] ((-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] + $CellContext`T14 $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]]) + $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[
+                  2]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + 
+                 2 $CellContext`T14 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[
+                  3]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + 
+                 2 $CellContext`T24 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[
+                  4]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    2]] + ($CellContext`MH^2 + $CellContext`S - \
+$CellContext`S34 + $CellContext`T24 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) + 
+             2 ($CellContext`MH^2 - $CellContext`S34) ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[2]] - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]]) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[2]] - 2 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`e[
+               2]] ((-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] + $CellContext`T14 $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]]) $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[2]] + 4 $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[3]] (-$CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))))) + $CellContext`T^(-1) (
+           4 (2 + X`Eps^(-1) + 
+             X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT] + 
+             Log[$CellContext`MT^(-2) X`Mu^2]) ($CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] ((-4) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] + 4 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[5]] - $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] ($CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[5]])) - 2 (($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] + 2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]]) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] + 2 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[5]] ($CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] - $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]]) + (($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] + 2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[4]] + 2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`e[2]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]])) $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]]) + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                4]] ((-$CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T14 + 2 $CellContext`T24) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] + 4 ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) - 
+           4 ($CellContext`MH^2 - $CellContext`T)^(-1) (3 $CellContext`MH^2 + 
+            X`Eps^(-1) $CellContext`MH^2 - 3 $CellContext`T - 
+            X`Eps^(-1) $CellContext`T + $CellContext`MH^2 
+             X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+$CellContext`T 
+            X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MT^2 
+             Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                 2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                   Rational[1, 2])]^2 + $CellContext`MH^2 
+             Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`T 
+            Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`MT^2 
+            Log[Rational[1, 2] $CellContext`MT^(-2) (
+                2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T ((-4) \
+$CellContext`MT^2 + $CellContext`T))^Rational[1, 2])]^2) ($CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[5]] ((-4) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] + 4 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[2]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[5]] - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[3]] ($CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[5]])) - 2 (($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] + 2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]]) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`ec[5]] + 2 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[5]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[5]] ($CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] - $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[3]]) + (($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] + 2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] + 2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]])) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[2]]) + $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               4]] ((-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T14 + 
+                2 $CellContext`T24) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] + 4 ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[
+                   4]]))) - ($CellContext`MH^2 - $CellContext`T)^(-1) (
+            Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                   4 $CellContext`MT^2)^Rational[1, 2])]^2 - 
+            Log[Rational[1, 2] $CellContext`MT^(-2) (
+               2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T ((-4) \
+$CellContext`MT^2 + $CellContext`T))^Rational[1, 2])]^2) (
+            4 ($CellContext`T14 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[
+                 3]] + ($CellContext`MH^2 - $CellContext`T) \
+$CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]]) $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[5]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`ec[5]] + 
+            4 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[5]] $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[5]] ($CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[1]] - $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[3]]) + 2 $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[5]] (
+              2 (-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] - 
+              2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[2]] ($CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] - $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[3]]) + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[
+                 3]] ((-$CellContext`MH^2 + 
+                  2 $CellContext`S + $CellContext`S34 + $CellContext`T14 + 
+                  2 $CellContext`T24) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] - 
+                2 ($CellContext`T14 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`S $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]))) + 
+            4 ($CellContext`T14 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[
+                 3]] + ($CellContext`MH^2 - $CellContext`T) \
+$CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]]) $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[4]] $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[2]] + 
+            4 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`e[2]] ($CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[1]] - $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[3]]) $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[2]] + $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               4]] (($CellContext`MH^2 - $CellContext`T) ($CellContext`MH^2 - \
+$CellContext`S34 - $CellContext`T14 - 2 $CellContext`T24) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] - 
+              4 ($CellContext`MH^2 - $CellContext`T) ($CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[4]])) + 8 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[3]] (($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[5]])) $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[5]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]]))) - 
+           4 ($CellContext`MH^2 - $CellContext`T)^(-1) (
+            X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+            X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT]) (
+            2 (($CellContext`MH^2 - 2 $CellContext`S34 - $CellContext`T + 
+                2 $CellContext`T14) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] + 
+              2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]]) $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[5]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`ec[5]] + 
+            4 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[5]] $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[5]] ($CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[1]] - $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[3]]) + $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[5]] (
+              4 (-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] - 
+              4 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[2]] ($CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] - $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[3]]) + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[
+                 3]] ((9 $CellContext`MH^2 - 2 $CellContext`S34 - 
+                  5 $CellContext`T - 2 $CellContext`T14 - 
+                  8 $CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] - 
+                2 ($CellContext`MH^2 - 2 $CellContext`S34 - $CellContext`T + 
+                 2 $CellContext`T14) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] + (3 $CellContext`MH^2 - 
+                  8 $CellContext`S - 2 $CellContext`S34 - 3 $CellContext`T - 
+                  2 $CellContext`T14) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]])) + 
+            2 (($CellContext`MH^2 - 2 $CellContext`S34 - $CellContext`T + 
+                2 $CellContext`T14) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] + 
+              2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]]) $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[4]] $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[2]] + 
+            4 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`e[2]] ($CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[1]] - $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[3]]) $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[2]] + $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               4]] (($CellContext`MH^2 - $CellContext`T) ($CellContext`MH^2 - \
+$CellContext`S34 - $CellContext`T14 - 2 $CellContext`T24) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] - 
+              4 ($CellContext`MH^2 - $CellContext`T) ($CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[4]])) + 16 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[3]] ($CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] ($CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] - $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[5]]) $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[5]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]] - $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]] + $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]]))) - 
+           8 (Rational[
+              1, 2] ($CellContext`MH^2 - $CellContext`T)^(-2) \
+(-$CellContext`MH^2 + $CellContext`T - $CellContext`MH^2 
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MH^2 
+               X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MT^2 
+              Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                  2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MT^2 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (
+                   2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T \
+((-4) $CellContext`MT^2 + $CellContext`T))^
+                    Rational[1, 2])]^2) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[3]] (
+              2 (-$CellContext`MH^2 + $CellContext`T + 
+                2 $CellContext`T14) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[
+                 5]] (((-3) $CellContext`MH^2 + 
+                  2 $CellContext`S34 + $CellContext`T - 2 $CellContext`T14 + 
+                  4 $CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + 
+                2 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T14 + 
+                  2 $CellContext`T24) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]] + (5 $CellContext`MH^2 - 
+                  2 $CellContext`S34 - 3 $CellContext`T - 2 $CellContext`T14 - 
+                  4 $CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[5]]) + 
+              2 (-$CellContext`MH^2 + $CellContext`T + 
+                2 $CellContext`T14) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]] + 8 ((-$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]))) + 
+            Rational[
+              1, 2] ($CellContext`MH^2 - $CellContext`T)^(-1) (-
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+              X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT]) \
+$CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[3]] (
+              2 ($CellContext`MH^2 - 
+                2 $CellContext`S34 - $CellContext`T) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[
+                 5]] (((-5) $CellContext`MH^2 + 4 $CellContext`S34 + 
+                  3 $CellContext`T + 4 $CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + 
+                2 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T14 + 
+                  2 $CellContext`T24) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]] + (3 $CellContext`MH^2 - $CellContext`T - 
+                  4 $CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[5]]) + 
+              2 ($CellContext`MH^2 - 
+                2 $CellContext`S34 - $CellContext`T) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]] + 8 ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[5]]) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))))) + $CellContext`T14^(-1) (
+           4 $CellContext`T14 (16 $CellContext`MT^4 - 
+              4 $CellContext`MH^2 $CellContext`T14 + 
+              8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2)^(-1) ((-4) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[5]])) + 8 $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[1]] ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]]) + 8 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[4]] ($CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]]) + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                4]] ((2 $CellContext`S - $CellContext`S34 + $CellContext`T - 
+                 2 $CellContext`T24) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] - 4 (($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])))) (
+             2 $CellContext`MH^2 
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - (
+              
+              4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) X`DiscB[$CellContext`T14, $CellContext`MT, $CellContext`MT] - 
+             2 $CellContext`MH^2 
+             X`DiscB[$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] + 
+             4 $CellContext`MT^2 
+              X`DiscB[$CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] + $CellContext`T14 
+              X`DiscB[$CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] + $CellContext`T24 
+              X`DiscB[$CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] + $CellContext`U 
+              X`DiscB[$CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] + 
+             4 $CellContext`MH^2 $CellContext`MT^2 
+              X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT] - $CellContext`MH^2 \
+$CellContext`T14 
+             X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT] + $CellContext`MH^2 \
+$CellContext`T24 
+              X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT] + $CellContext`MH^2 \
+$CellContext`U 
+              X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT]) - 
+           2 (16 $CellContext`MT^4 - 4 $CellContext`MH^2 $CellContext`T14 + 
+             8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2)^(-1) ((
+              4 $CellContext`S $CellContext`S34 - $CellContext`S34^2 + \
+$CellContext`T^2 + 2 $CellContext`S34 $CellContext`T14 - 
+              2 $CellContext`T $CellContext`T14 - 
+              2 $CellContext`MH^2 (
+               2 $CellContext`S - $CellContext`S34 + $CellContext`T - 
+               2 $CellContext`T24) - 4 $CellContext`T $CellContext`T24 - 
+              2 $CellContext`S34 $CellContext`U + 
+              2 $CellContext`T $CellContext`U) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[4]] $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[5]] + 
+            8 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[4]] $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[5]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`ec[5]] + 
+            8 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[5]] $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[5]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[1]] - 4 $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`ec[5]] (
+             2 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[2]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[1]] + (6 $CellContext`MH^2 - 
+               3 $CellContext`S34 - 3 $CellContext`T - 
+               4 $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[3]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[1]] + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[4]] (
+               2 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] + (6 $CellContext`MH^2 - 
+                 3 $CellContext`S34 - 3 $CellContext`T - 
+                 4 $CellContext`U) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]])) + 
+            8 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[4]] $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[4]] $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[2]] + 
+            8 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`e[2]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[1]] $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[2]] + 32 ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] ($CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] - $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]]) + ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] - $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]]) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]]) ($CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]]) - 4 $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`ec[
+              4]] (((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[
+                  1]] + ($CellContext`S34 - $CellContext`T) \
+$CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] + 
+               2 (-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]]) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[2]] + $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[
+                5]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[
+                  1]] + ($CellContext`S34 - $CellContext`T) \
+$CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]] + 
+               2 (-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[4]]))) (-(
+              4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+            2 $CellContext`T14 
+             X`DiscB[$CellContext`T14, $CellContext`MT, $CellContext`MT] + 
+            4 $CellContext`MT^2 
+             X`DiscB[$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] - $CellContext`T14 
+            X`DiscB[$CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] + $CellContext`T24 
+             X`DiscB[$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] + $CellContext`U 
+             X`DiscB[$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] - 2 $CellContext`MH^2 $CellContext`T14 
+            X`ScalarC0[$CellContext`MH^2, $CellContext`T14, $CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT] + 
+            4 $CellContext`MT^2 $CellContext`T14 
+             X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT] + $CellContext`T14^2 
+             X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT] + $CellContext`T14 \
+$CellContext`T24 
+             X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT] + $CellContext`T14 \
+$CellContext`U 
+             X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT]) + 
+           2 (16 $CellContext`MT^4 - 4 $CellContext`MH^2 $CellContext`T14 + 
+              8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2)^(-1) ((-4) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[5]])) + 8 $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[1]] ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]]) + 8 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[4]] ($CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]]) + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                4]] ((2 $CellContext`S - $CellContext`S34 + $CellContext`T - 
+                 2 $CellContext`T24) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] - 4 (($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])))) (
+             3 (16 $CellContext`MT^4 - 4 $CellContext`MH^2 $CellContext`T14 + 
+               8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2) + 
+             X`Eps^(-1) (16 $CellContext`MT^4 - 
+               4 $CellContext`MH^2 $CellContext`T14 + 
+               8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2) + \
+$CellContext`MH^2 (
+               4 $CellContext`MT^2 - $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) 
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`T14 ((-2) $CellContext`MH^2 + 
+               4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) 
+              X`DiscB[$CellContext`T14, $CellContext`MT, $CellContext`MT] - \
+($CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U) (
+              4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) 
+             X`DiscB[$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] + (16 $CellContext`MT^4 - 
+               4 $CellContext`MH^2 $CellContext`T14 + 
+               8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2) 
+              Log[$CellContext`MT^(-2) X`Mu^2] + 
+             2 (16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+               8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2)) 
+              X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT]) - 
+           2 ((2 + X`Eps^(-1) + 
+              X`DiscB[$CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] + 
+              Log[$CellContext`MT^(-2) X`Mu^2]) ((-4) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) + 8 $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[5]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`e[2]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]]) + 8 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]] ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[4]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]]) + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[
+                 4]] ((2 $CellContext`S - $CellContext`S34 + $CellContext`T - 
+                  2 $CellContext`T24) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] - 4 (($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]])))) + (((-2) $CellContext`S $CellContext`S34 - \
+$CellContext`S34 $CellContext`T14 + $CellContext`T $CellContext`T14 + 
+                2 $CellContext`MH^2 ($CellContext`S - $CellContext`T24) + 
+                2 $CellContext`T $CellContext`T24) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] - 
+              4 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`ec[5]] - 
+              4 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[5]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[1]] + 4 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[
+                 5]] (((-2) $CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[
+                   1]] + ($CellContext`S + $CellContext`T14 + \
+$CellContext`T24) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[
+                   4]] (((-2) $CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    2]] + ($CellContext`S + $CellContext`T14 + \
+$CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) - 
+              4 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[2]] - 
+              4 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[2]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[1]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[2]] - 8 ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) + ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] - $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]]) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) ($CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]]) + 4 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[
+                 4]] (((-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] + (-$CellContext`MH^2 + $CellContext`T) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[
+                   5]] ((-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    1]] + (-$CellContext`MH^2 + $CellContext`T) \
+$CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) 
+             X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT]) + 
+           4 (Rational[
+               1, 2] (16 $CellContext`MT^4 - 
+                4 $CellContext`MH^2 $CellContext`T14 + 
+                8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2)^(-2) (-($CellContext`S34 - $CellContext`T) ((-2) \
+$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + 
+                 2 $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] - 
+               4 (2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - 
+                2 $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) - 
+               4 ($CellContext`S34 - $CellContext`T) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + 16 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])) (
+               2 $CellContext`T14 (16 $CellContext`MT^4 - 
+                 4 $CellContext`MH^2 $CellContext`T14 + 
+                 8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2) - \
+(64 $CellContext`MT^6 + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 (3 $CellContext`T14 + $CellContext`T24 + $CellContext`U) + 
+                16 $CellContext`MT^4 (5 $CellContext`T14 + 
+                  3 ($CellContext`T24 + $CellContext`U)) - 
+                2 $CellContext`MH^2 $CellContext`T14 (3 $CellContext`T14 + 
+                 5 ($CellContext`T24 + $CellContext`U)) + 
+                4 $CellContext`MT^2 ((-10) $CellContext`MH^2 $CellContext`T14 + 
+                  7 $CellContext`T14^2 + 
+                  10 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                  3 ($CellContext`T24 + $CellContext`U)^2)) 
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+               6 $CellContext`T14^2 ((-2) $CellContext`MH^2 + 
+                 4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) 
+                X`DiscB[$CellContext`T14, $CellContext`MT, $CellContext`MT] + \
+(64 $CellContext`MT^6 - 
+                 3 $CellContext`T14^3 + $CellContext`T14^2 $CellContext`T24 + 
+                 5 $CellContext`T14 $CellContext`T24^2 + $CellContext`T24^3 + \
+$CellContext`T14^2 $CellContext`U + 
+                 10 $CellContext`T14 $CellContext`T24 $CellContext`U + 
+                 3 $CellContext`T24^2 $CellContext`U + 
+                 5 $CellContext`T14 $CellContext`U^2 + 
+                 3 $CellContext`T24 $CellContext`U^2 + $CellContext`U^3 + 
+                 2 $CellContext`MH^2 $CellContext`T14 (3 $CellContext`T14 - 
+                   5 ($CellContext`T24 + $CellContext`U)) + 
+                 16 $CellContext`MT^4 (5 $CellContext`T14 + 
+                   3 ($CellContext`T24 + $CellContext`U)) + 
+                 4 $CellContext`MT^2 ((-10) $CellContext`MH^2 \
+$CellContext`T14 + $CellContext`T14^2 + 
+                   10 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                   3 ($CellContext`T24 + $CellContext`U)^2)) 
+                X`DiscB[$CellContext`MH^2 - 
+                  4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] + 
+               2 $CellContext`T14 (32 $CellContext`MT^6 + 
+                 16 $CellContext`MT^4 (
+                   2 $CellContext`T14 + $CellContext`T24 + $CellContext`U) + 
+                 2 $CellContext`MT^2 ((-16) $CellContext`MH^2 \
+$CellContext`T14 + 5 $CellContext`T14^2 + 
+                   6 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2) + $CellContext`T14 (
+                   6 $CellContext`MH^4 + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 - 2 $CellContext`MH^2 (2 $CellContext`T14 + 
+                    3 ($CellContext`T24 + $CellContext`U)))) 
+                X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                  4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT]) + 
+             Rational[-1, 2] (16 $CellContext`MT^4 - 
+                4 $CellContext`MH^2 $CellContext`T14 + 
+                8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2)^(-2) (-($CellContext`S34 - $CellContext`T) ((-2) \
+$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + 
+                 2 $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] - 
+               4 (2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - 
+                2 $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) - 
+               4 ($CellContext`S34 - $CellContext`T) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + 16 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])) ((
+                 4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) (16 $CellContext`MT^4 - 4 $CellContext`MH^2 $CellContext`T14 + 
+                 8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2) + \
+$CellContext`MH^2 (16 $CellContext`MT^4 + 
+                 8 $CellContext`MH^2 $CellContext`T14 - 5 $CellContext`T14^2 - 
+                 4 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 - 
+                 4 $CellContext`T14 $CellContext`U + 
+                 2 $CellContext`T24 $CellContext`U + $CellContext`U^2 + 
+                 8 $CellContext`MT^2 ((-2) $CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)) 
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`T14 ((
+                   4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 - 
+                 2 $CellContext`MH^2 (12 $CellContext`MT^2 - $CellContext`T14 + 
+                  3 ($CellContext`T24 + $CellContext`U))) 
+                X`DiscB[$CellContext`T14, $CellContext`MT, $CellContext`MT] - \
+(8 $CellContext`MH^4 $CellContext`T14 + $CellContext`T14 (
+                   4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 + $CellContext`MH^2 (16 $CellContext`MT^4 - 
+                  3 $CellContext`T14^2 - 
+                  10 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 + 
+                  8 $CellContext`MT^2 ((-5) $CellContext`T14 + \
+$CellContext`T24 + $CellContext`U))) 
+               X`DiscB[$CellContext`MH^2 - 
+                 4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] + 
+               2 (64 $CellContext`MT^8 + 
+                 48 $CellContext`MT^6 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + 
+                 12 $CellContext`MT^4 ((-4) $CellContext`MH^2 \
+$CellContext`T14 + ($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2) - \
+$CellContext`MH^2 $CellContext`T14 (-$CellContext`T14^2 + $CellContext`T14 \
+($CellContext`T24 + $CellContext`U) + 
+                  2 ($CellContext`T24 + $CellContext`U)^2 + $CellContext`MH^2 \
+($CellContext`T14 - 
+                    3 ($CellContext`T24 + $CellContext`U))) + \
+$CellContext`MT^2 (
+                   12 $CellContext`MH^4 $CellContext`T14 + ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^3 - 
+                   4 $CellContext`MH^2 $CellContext`T14 (2 $CellContext`T14 + 
+                    5 ($CellContext`T24 + $CellContext`U)))) 
+                X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                  4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT]))))), 
+      0, (-2) $CellContext`Alfas^2 $CellContext`c3 $CellContext`EL \
+$CellContext`MT^2 $CellContext`MW^(-1) $CellContext`SW^(-1) \
+(-($CellContext`MH^2 - $CellContext`S - $CellContext`T - \
+$CellContext`T14)^(-1) $CellContext`T24^(-1) (
+         8 $CellContext`MT^2 (
+            16 $CellContext`MT^4 + $CellContext`T^2 + $CellContext`T14^2 - 
+            4 $CellContext`MH^2 $CellContext`T24 + 
+            2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+            2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+            8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24))^(-1) 
+          X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+             4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24]^(-1) (8 $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`k[5]] ($CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[4]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`ec[5]] + $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[2]]) + $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`ec[
+              5]] ((2 $CellContext`S - $CellContext`S34 - 
+               2 $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] - 4 (($CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]]) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[4]] ($CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[5]]))) + 8 ($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[4]] + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[2]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[2]]) $CellContext`Pair[
+              $CellContext`ec[5], 
+              $CellContext`k[1]] - 4 $CellContext`Pair[
+             $CellContext`e[2], 
+             $CellContext`ec[4]] ($CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[2]] $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[1]] + $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[4]] $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[1]] + $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[5]] ($CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[2]] + $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[4]]))) ($CellContext`MH^2 (
+             16 $CellContext`MT^4 + $CellContext`T^2 + $CellContext`T14^2 + 
+             2 $CellContext`T ($CellContext`T14 - 2 $CellContext`T24) + 
+             8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 - 
+               2 $CellContext`T24) + 8 $CellContext`MH^2 $CellContext`T24 - 
+             4 $CellContext`T14 $CellContext`T24 - 5 $CellContext`T24^2) 
+            X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - (
+            8 $CellContext`MH^4 $CellContext`T24 + $CellContext`T24 (
+               4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2 + $CellContext`MH^2 (
+              16 $CellContext`MT^4 + $CellContext`T^2 + $CellContext`T14^2 + 
+              2 $CellContext`T ($CellContext`T14 - 5 $CellContext`T24) + 
+              8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 - 
+                5 $CellContext`T24) - 10 $CellContext`T14 $CellContext`T24 - 
+              3 $CellContext`T24^2)) 
+           X`DiscB[$CellContext`MH^2 - 
+             4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`MT, $CellContext`MT] + $CellContext`T24 ((-2) $CellContext`MH^2 (
+               12 $CellContext`MT^2 + 3 $CellContext`T + 
+               3 $CellContext`T14 - $CellContext`T24) + (
+               4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2) 
+            X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] + (
+             4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24) 
+            X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24] + 
+           2 (64 $CellContext`MT^8 + 
+             48 $CellContext`MT^6 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + 
+             12 $CellContext`MT^4 ($CellContext`T^2 + $CellContext`T14^2 + 
+               2 $CellContext`T14 $CellContext`T24 + $CellContext`T24 ((-4) \
+$CellContext`MH^2 + $CellContext`T24) + 
+               2 $CellContext`T ($CellContext`T14 + $CellContext`T24)) - \
+$CellContext`MH^2 $CellContext`T24 (2 $CellContext`T^2 + 
+              2 $CellContext`T14^2 + $CellContext`T14 $CellContext`T24 - \
+$CellContext`T24^2 + $CellContext`MH^2 ((-3) $CellContext`T - 
+                3 $CellContext`T14 + $CellContext`T24) + $CellContext`T (
+                4 $CellContext`T14 + $CellContext`T24)) + $CellContext`MT^2 \
+($CellContext`T^3 + $CellContext`T14^3 + 
+               3 $CellContext`T14^2 $CellContext`T24 + 
+               3 $CellContext`T^2 ($CellContext`T14 + $CellContext`T24) + \
+$CellContext`T14 $CellContext`T24 ((-20) $CellContext`MH^2 + 
+                 3 $CellContext`T24) + $CellContext`T24 (12 $CellContext`MH^4 - 
+                 8 $CellContext`MH^2 $CellContext`T24 + $CellContext`T24^2) + \
+$CellContext`T (3 $CellContext`T14^2 + 
+                 6 $CellContext`T14 $CellContext`T24 + $CellContext`T24 \
+((-20) $CellContext`MH^2 + 3 $CellContext`T24)))) 
+            X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT]) - 
+         2 ((-4) $CellContext`MT^2 (-$CellContext`MH^2 + 
+             8 $CellContext`MT^2 + $CellContext`T + $CellContext`T14)^(-1) (
+             16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+             8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+               8 $CellContext`MH^2 $CellContext`T24 + 
+               2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+               2 $CellContext`T ($CellContext`T14 + $CellContext`T24)))^(-1) 
+           X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24]^(-1) ((-$CellContext`S34 $CellContext`T + $CellContext`S34 \
+$CellContext`T14 + $CellContext`MH^2 ($CellContext`S34 - $CellContext`U) + \
+$CellContext`T $CellContext`U + $CellContext`T14 $CellContext`U - \
+$CellContext`S ($CellContext`S34 + $CellContext`U)) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[5]] $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[4]] - 
+            4 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`k[5]] $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`k[4]] $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`ec[5]] - 
+            4 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`k[5]] $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`ec[5]] $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`k[2]] + 4 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               5]] ((($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[
+                   1]] + (-$CellContext`MH^2 + $CellContext`T) \
+$CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]]) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[
+                 4]] (($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[
+                   1]] + (-$CellContext`MH^2 + $CellContext`T) \
+$CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]])) - 
+            4 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`ec[4]] $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`k[4]] $CellContext`Pair[
+              $CellContext`ec[5], 
+              $CellContext`k[1]] - 
+            4 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`e[2]] $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`k[2]] $CellContext`Pair[
+              $CellContext`ec[5], 
+              $CellContext`k[1]] + 8 ($CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]]) ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] ($CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] - $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]]) + ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] - $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]]) $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]]) + 4 $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[4]] ($CellContext`U $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[2]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] + $CellContext`S34 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] ($CellContext`U $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] + $CellContext`S34 $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[
+                   4]]))) (-$CellContext`MH^2 ($CellContext`MH^2 - 
+              8 $CellContext`MT^2 - $CellContext`T - $CellContext`T14) (
+              2 $CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14 - \
+$CellContext`T24) $CellContext`T24 
+             X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - (
+             64 $CellContext`MT^8 - 
+             2 $CellContext`MH^2 (-$CellContext`MH^2 + $CellContext`T + \
+$CellContext`T14)^2 $CellContext`T24 + 
+             48 $CellContext`MT^6 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + 
+             4 $CellContext`MT^4 (3 $CellContext`T^2 + 3 $CellContext`T14^2 + 
+               6 $CellContext`T14 $CellContext`T24 + 
+               6 $CellContext`T ($CellContext`T14 + $CellContext`T24) + \
+$CellContext`T24 ((-20) $CellContext`MH^2 + 
+                 3 $CellContext`T24)) + $CellContext`MT^2 ($CellContext`T^3 + \
+$CellContext`T14^3 + 3 $CellContext`T14^2 $CellContext`T24 + 
+               3 $CellContext`T^2 ($CellContext`T14 + $CellContext`T24) + \
+$CellContext`T14 $CellContext`T24 ((-28) $CellContext`MH^2 + 
+                 3 $CellContext`T24) + $CellContext`T24 (24 $CellContext`MH^4 - 
+                 4 $CellContext`MH^2 $CellContext`T24 + $CellContext`T24^2) + \
+$CellContext`T (3 $CellContext`T14^2 + 
+                 6 $CellContext`T14 $CellContext`T24 + $CellContext`T24 \
+((-28) $CellContext`MH^2 + 3 $CellContext`T24)))) 
+            X`DiscB[$CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`MT, $CellContext`MT] + $CellContext`MH^2 ($CellContext`MH^2 - 
+              8 $CellContext`MT^2 - $CellContext`T - $CellContext`T14) (
+              4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 - \
+$CellContext`T24) $CellContext`T24 
+             X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] - \
+($CellContext`MH^2 - 
+             8 $CellContext`MT^2 - $CellContext`T - $CellContext`T14) (
+             4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24) (
+             16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+             8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+               8 $CellContext`MH^2 $CellContext`T24 + 
+               2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+               2 $CellContext`T ($CellContext`T14 + $CellContext`T24))) 
+            X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT]) + 
+          4 $CellContext`MT^2 (
+             16 $CellContext`MT^4 + $CellContext`T^2 + $CellContext`T14^2 - 
+             4 $CellContext`MH^2 $CellContext`T24 + 
+             2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+             2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+             8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24))^(-1) (
+             16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+             8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+               8 $CellContext`MH^2 $CellContext`T24 + 
+               2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+               2 $CellContext`T ($CellContext`T14 + $CellContext`T24)))^(-1) 
+           X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24]^(-1) ((-$CellContext`S34^2 - 
+              4 $CellContext`S34 $CellContext`T + 
+              2 $CellContext`S34 $CellContext`T14 + 
+              4 $CellContext`MH^2 ($CellContext`S34 - $CellContext`U) + 
+              4 $CellContext`T $CellContext`U + 
+              2 $CellContext`T14 $CellContext`U + $CellContext`U^2 - 
+              2 $CellContext`S ($CellContext`S34 + $CellContext`U)) \
+$CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[5]] $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[4]] - 
+            8 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`k[5]] $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`k[4]] $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`ec[5]] - 
+            8 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`k[5]] $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`ec[5]] $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`k[2]] + 4 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               5]] ((2 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[
+                   1]] + ((-4) $CellContext`MH^2 + $CellContext`S34 + 
+                  4 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]]) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[4]] (
+                2 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[
+                   1]] + ((-4) $CellContext`MH^2 + $CellContext`S34 + 
+                  4 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]])) - 
+            8 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`ec[4]] $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`k[4]] $CellContext`Pair[
+              $CellContext`ec[5], 
+              $CellContext`k[1]] - 
+            8 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`e[2]] $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`k[2]] $CellContext`Pair[
+              $CellContext`ec[5], 
+              $CellContext`k[1]] + 32 ($CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]]) ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] ($CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] - $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]]) + ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] - $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]]) $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]]) + 4 $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[4]] (
+              2 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[2]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[
+                 1]] + ((-3) $CellContext`S34 + $CellContext`U) \
+$CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] (
+                2 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[
+                   2]] + ((-3) $CellContext`S34 + $CellContext`U) \
+$CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]))) (-(-$CellContext`MT^2 (
+                 4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^4 + 
+              2 $CellContext`MH^6 $CellContext`T24 (12 $CellContext`MT^2 + 
+                3 $CellContext`T + 3 $CellContext`T14 + $CellContext`T24) + 
+              2 $CellContext`MH^2 (
+                 4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2 (
+                8 $CellContext`MT^4 + ($CellContext`T + $CellContext`T14) \
+$CellContext`T24 + 
+                2 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + 
+                  3 $CellContext`T24)) - 
+              2 $CellContext`MH^4 $CellContext`T24 (96 $CellContext`MT^4 + 
+               4 $CellContext`T^2 + 8 $CellContext`T $CellContext`T14 + 
+               4 $CellContext`T14^2 + 3 $CellContext`T $CellContext`T24 + 
+               3 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+               4 $CellContext`MT^2 (10 $CellContext`T + 10 $CellContext`T14 + 
+                 3 $CellContext`T24))) 
+             X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + (
+              2 $CellContext`MH^6 (12 $CellContext`MT^2 + 3 $CellContext`T + 
+                3 $CellContext`T14 - $CellContext`T24) $CellContext`T24 - \
+$CellContext`MT^2 (12 $CellContext`MT^2 + 3 $CellContext`T + 
+               3 $CellContext`T14 - $CellContext`T24) (
+                4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^3 - 
+              2 $CellContext`MH^4 $CellContext`T24 (112 $CellContext`MT^4 + 
+               5 $CellContext`T^2 + 10 $CellContext`T $CellContext`T14 + 
+               5 $CellContext`T14^2 + 
+               48 $CellContext`MT^2 ($CellContext`T + $CellContext`T14) - \
+$CellContext`T24^2) + 
+              2 $CellContext`MH^2 (128 $CellContext`MT^8 + 
+                96 $CellContext`MT^6 ($CellContext`T + $CellContext`T14 + 
+                  3 $CellContext`T24) + 
+                8 $CellContext`MT^4 (3 $CellContext`T^2 + 
+                  6 $CellContext`T $CellContext`T14 + 3 $CellContext`T14^2 + 
+                  22 $CellContext`T $CellContext`T24 + 
+                  22 $CellContext`T14 $CellContext`T24 + 
+                  5 $CellContext`T24^2) + ($CellContext`T + $CellContext`T14) \
+$CellContext`T24 (2 $CellContext`T^2 + 
+                  2 $CellContext`T14^2 + $CellContext`T14 $CellContext`T24 - \
+$CellContext`T24^2 + $CellContext`T (4 $CellContext`T14 + $CellContext`T24)) + 
+                2 $CellContext`MT^2 ($CellContext`T^3 + $CellContext`T14^3 + 
+                  17 $CellContext`T14^2 $CellContext`T24 + 
+                  7 $CellContext`T14 $CellContext`T24^2 - 
+                  3 $CellContext`T24^3 + $CellContext`T^2 (3 $CellContext`T14 + 
+                    17 $CellContext`T24) + $CellContext`T (
+                    3 $CellContext`T14^2 + 
+                    34 $CellContext`T14 $CellContext`T24 + 
+                    7 $CellContext`T24^2)))) 
+             X`DiscB[$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`MT, $CellContext`MT] + (256 $CellContext`MT^10 + 
+              256 $CellContext`MT^8 ($CellContext`T + $CellContext`T14) + 
+              2 $CellContext`MH^2 ($CellContext`MH^2 - $CellContext`T - \
+$CellContext`T14) $CellContext`T24 ($CellContext`T^2 + $CellContext`T14^2 + \
+$CellContext`T (
+                  2 $CellContext`T14 - $CellContext`T24) - $CellContext`T14 \
+$CellContext`T24 + 2 ($CellContext`MH^2 - $CellContext`T24) $CellContext`T24) + 
+              32 $CellContext`MT^6 (3 $CellContext`T^2 + 
+                6 $CellContext`T $CellContext`T14 + 
+                3 $CellContext`T14^2 - $CellContext`T24 (4 $CellContext`MH^2 + 
+                 3 $CellContext`T24)) + 
+              16 $CellContext`MT^4 ($CellContext`T^3 + 
+                3 $CellContext`T^2 $CellContext`T14 + $CellContext`T14^3 - 
+                3 $CellContext`T14 $CellContext`T24 (
+                 2 $CellContext`MH^2 + $CellContext`T24) + 
+                2 $CellContext`T24 ($CellContext`MH^4 + 
+                  3 $CellContext`MH^2 $CellContext`T24 - $CellContext`T24^2) + 
+                3 $CellContext`T ($CellContext`T14^2 - $CellContext`T24 (
+                   2 $CellContext`MH^2 + $CellContext`T24))) + \
+$CellContext`MT^2 ($CellContext`T^4 + 
+                4 $CellContext`T^3 $CellContext`T14 + $CellContext`T14^4 - 
+                6 $CellContext`T14^2 $CellContext`T24 (
+                 4 $CellContext`MH^2 + $CellContext`T24) + $CellContext`T24^2 \
+((-40) $CellContext`MH^4 + 32 $CellContext`MH^2 $CellContext`T24 - 
+                  3 $CellContext`T24^2) - 
+                8 $CellContext`T14 $CellContext`T24 ((-2) $CellContext`MH^4 - 
+                 4 $CellContext`MH^2 $CellContext`T24 + $CellContext`T24^2) + 
+                6 $CellContext`T^2 ($CellContext`T14^2 - $CellContext`T24 (
+                   4 $CellContext`MH^2 + $CellContext`T24)) + 
+                4 $CellContext`T ($CellContext`T14^3 - 
+                  3 $CellContext`T14 $CellContext`T24 (
+                   4 $CellContext`MH^2 + $CellContext`T24) - 
+                  2 $CellContext`T24 ((-2) $CellContext`MH^4 - 
+                   4 $CellContext`MH^2 $CellContext`T24 + \
+$CellContext`T24^2)))) 
+             X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] - 
+            2 (16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+             8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+               8 $CellContext`MH^2 $CellContext`T24 + 
+               2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+               2 $CellContext`T ($CellContext`T14 + $CellContext`T24))) 
+            X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24] + ((-4) $CellContext`MH^4 $CellContext`T24 + (
+                4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 - \
+$CellContext`T24) (
+                 4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2 - 
+              2 $CellContext`MH^2 (
+               16 $CellContext`MT^4 + $CellContext`T^2 + $CellContext`T14^2 + 
+               2 $CellContext`T ($CellContext`T14 - $CellContext`T24) + 
+               8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 - \
+$CellContext`T24) - 
+               2 $CellContext`T14 $CellContext`T24 - $CellContext`T24^2)) (
+              16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+              8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+                8 $CellContext`MH^2 $CellContext`T24 + 
+                2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                2 $CellContext`T ($CellContext`T14 + $CellContext`T24))) 
+             X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT])) - 
+         4 ((-2) $CellContext`MT^2 (
+             16 $CellContext`MT^4 + $CellContext`T^2 + $CellContext`T14^2 - 
+             4 $CellContext`MH^2 $CellContext`T24 + 
+             2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+             2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+             8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24))^(-2) (
+             16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+             8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+               8 $CellContext`MH^2 $CellContext`T24 + 
+               2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+               2 $CellContext`T ($CellContext`T14 + $CellContext`T24)))^(-1) 
+           X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24]^(-1) (-($CellContext`S34 - $CellContext`U) ((-2) \
+$CellContext`MH^2 + $CellContext`S34 + 
+              2 $CellContext`T + $CellContext`U) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[5]] $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[4]] - 
+            4 (2 $CellContext`MH^2 - $CellContext`S34 - 
+             2 $CellContext`T - $CellContext`U) $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`ec[5]] ($CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[3]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[2]] + $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[4]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[3]]) + 16 ($CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]]) ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] ($CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] - $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]]) + ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] - $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]]) $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]]) - 
+            4 ($CellContext`S34 - $CellContext`U) $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`ec[4]] ($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[3]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[1]] + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[3]])) ((-2) $CellContext`MH^2 (
+              16 $CellContext`MH^8 $CellContext`T24^2 - 
+              5 $CellContext`MT^2 (
+               4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 - \
+$CellContext`T24) (
+                
+                4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^4 + $CellContext`MH^6 $CellContext`T24 (
+                176 $CellContext`MT^4 + 11 $CellContext`T^2 + 
+                22 $CellContext`T $CellContext`T14 + 11 $CellContext`T14^2 + 
+                8 $CellContext`MT^2 (11 $CellContext`T + 11 $CellContext`T14 - 
+                  23 $CellContext`T24) - 30 $CellContext`T $CellContext`T24 - 
+                30 $CellContext`T14 $CellContext`T24 - 
+                13 $CellContext`T24^2) + $CellContext`MH^4 $CellContext`T24 \
+((-1408) $CellContext`MT^6 - 17 $CellContext`T^3 - 17 $CellContext`T14^3 - 
+                16 $CellContext`MT^4 (61 $CellContext`T + 61 $CellContext`T14 - 
+                 30 $CellContext`T24) + 8 $CellContext`T14^2 $CellContext`T24 + 
+                19 $CellContext`T14 $CellContext`T24^2 + 
+                6 $CellContext`T24^3 + $CellContext`T^2 ((-51) \
+$CellContext`T14 + 8 $CellContext`T24) - 
+                8 $CellContext`MT^2 (28 $CellContext`T^2 + 
+                 56 $CellContext`T $CellContext`T14 + 28 $CellContext`T14^2 - 
+                 19 $CellContext`T $CellContext`T24 - 
+                 19 $CellContext`T14 $CellContext`T24 - 
+                 17 $CellContext`T24^2) + $CellContext`T ((-51) \
+$CellContext`T14^2 + 16 $CellContext`T14 $CellContext`T24 + 
+                  19 $CellContext`T24^2)) + $CellContext`MH^2 (
+                 4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2 (144 $CellContext`MT^6 + 
+                6 ($CellContext`T + $CellContext`T14) ($CellContext`T + \
+$CellContext`T14 - $CellContext`T24) $CellContext`T24 + 
+                24 $CellContext`MT^4 (3 $CellContext`T + 3 $CellContext`T14 + 
+                  5 $CellContext`T24) + $CellContext`MT^2 (9 $CellContext`T^2 + 
+                  9 $CellContext`T14^2 + 54 $CellContext`T14 $CellContext`T24 - 
+                  55 $CellContext`T24^2 + 
+                  18 $CellContext`T ($CellContext`T14 + 3 $CellContext`T24))))
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+(32 $CellContext`MH^10 $CellContext`T24^2 + $CellContext`MT^2 (
+                4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 - \
+$CellContext`T24) (
+                 4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^5 + 
+              2 $CellContext`MH^8 $CellContext`T24 (176 $CellContext`MT^4 + 
+                11 $CellContext`T^2 + 22 $CellContext`T $CellContext`T14 + 
+                11 $CellContext`T14^2 + 
+                8 $CellContext`MT^2 (11 $CellContext`T + 11 $CellContext`T14 - 
+                  32 $CellContext`T24) - 48 $CellContext`T $CellContext`T24 - 
+                48 $CellContext`T14 $CellContext`T24 - 11 $CellContext`T24^2) - 
+              8 $CellContext`MH^6 $CellContext`T24 (400 $CellContext`MT^6 + 
+               8 $CellContext`MT^4 (35 $CellContext`T + 35 $CellContext`T14 - 
+                 38 $CellContext`T24) + $CellContext`MT^2 (
+                 65 $CellContext`T^2 + 65 $CellContext`T14^2 + 
+                 2 $CellContext`T (65 $CellContext`T14 - 58 $CellContext`T24) - 
+                 116 $CellContext`T14 $CellContext`T24 - 
+                 45 $CellContext`T24^2) + ($CellContext`T + $CellContext`T14) \
+(5 $CellContext`T^2 + 5 $CellContext`T14^2 + 
+                 10 $CellContext`T ($CellContext`T14 - $CellContext`T24) - 
+                 10 $CellContext`T14 $CellContext`T24 - 
+                 7 $CellContext`T24^2)) - $CellContext`MH^2 (
+                4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^3 (256 $CellContext`MT^6 + 
+               8 $CellContext`MT^4 (16 $CellContext`T + 16 $CellContext`T14 - 
+                 11 $CellContext`T24) + ($CellContext`T + $CellContext`T14) \
+($CellContext`T + $CellContext`T14 - $CellContext`T24) $CellContext`T24 + 
+               2 $CellContext`MT^2 (8 $CellContext`T^2 + 
+                 16 $CellContext`T $CellContext`T14 + 8 $CellContext`T14^2 - 
+                 9 $CellContext`T $CellContext`T24 - 
+                 9 $CellContext`T14 $CellContext`T24 - 
+                 5 $CellContext`T24^2)) + $CellContext`MH^4 (
+                4608 $CellContext`MT^10 + 
+                1536 $CellContext`MT^8 (3 $CellContext`T + 3 $CellContext`T14 + 
+                  5 $CellContext`T24) + 
+                64 $CellContext`MT^6 (27 $CellContext`T^2 + 
+                  54 $CellContext`T $CellContext`T14 + 27 $CellContext`T14^2 + 
+                  109 $CellContext`T $CellContext`T24 + 
+                  109 $CellContext`T14 $CellContext`T24 - 
+                  58 $CellContext`T24^2) + 
+                16 $CellContext`MT^4 (18 $CellContext`T^3 + 
+                  18 $CellContext`T14^3 + 
+                  147 $CellContext`T14^2 $CellContext`T24 - 
+                  130 $CellContext`T14 $CellContext`T24^2 - 
+                  93 $CellContext`T24^3 + 
+                  3 $CellContext`T^2 (18 $CellContext`T14 + 
+                    49 $CellContext`T24) + 
+                  2 $CellContext`T (27 $CellContext`T14^2 + 
+                    147 $CellContext`T14 $CellContext`T24 - 
+                    65 $CellContext`T24^2)) + 
+                2 $CellContext`MT^2 (9 $CellContext`T^4 + 
+                  9 $CellContext`T14^4 + 
+                  174 $CellContext`T14^3 $CellContext`T24 - 
+                  172 $CellContext`T14^2 $CellContext`T24^2 - 
+                  254 $CellContext`T14 $CellContext`T24^3 - 
+                  21 $CellContext`T24^4 + 
+                  6 $CellContext`T^3 (6 $CellContext`T14 + 
+                    29 $CellContext`T24) + 
+                  2 $CellContext`T^2 (27 $CellContext`T14^2 + 
+                    261 $CellContext`T14 $CellContext`T24 - 
+                    86 $CellContext`T24^2) + $CellContext`T (
+                    36 $CellContext`T14^3 + 
+                    522 $CellContext`T14^2 $CellContext`T24 - 
+                    344 $CellContext`T14 $CellContext`T24^2 - 
+                    254 $CellContext`T24^3)) - $CellContext`T24 ((-19) \
+$CellContext`T^4 - 19 $CellContext`T14^4 + 
+                 14 $CellContext`T14^3 $CellContext`T24 + 
+                 34 $CellContext`T14^2 $CellContext`T24^2 + 
+                 2 $CellContext`T14 $CellContext`T24^3 + $CellContext`T24^4 + \
+$CellContext`T^3 ((-76) $CellContext`T14 + 
+                   14 $CellContext`T24) + $CellContext`T^2 ((-114) \
+$CellContext`T14^2 + 42 $CellContext`T14 $CellContext`T24 + 
+                   34 $CellContext`T24^2) + $CellContext`T ((-76) \
+$CellContext`T14^3 + 42 $CellContext`T14^2 $CellContext`T24 + 
+                   68 $CellContext`T14 $CellContext`T24^2 + 
+                   2 $CellContext`T24^3)))) 
+             X`DiscB[$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`MT, $CellContext`MT] + (
+              4 $CellContext`MH^8 (36 $CellContext`MT^2 + 9 $CellContext`T + 
+                9 $CellContext`T14 - $CellContext`T24) $CellContext`T24^2 - \
+$CellContext`MT^2 (
+               4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 - \
+$CellContext`T24) (
+                4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^5 + 
+              2 $CellContext`MH^6 $CellContext`T24 (192 $CellContext`MT^6 + 
+                3 $CellContext`T^3 + 3 $CellContext`T14^3 + 
+                16 $CellContext`MT^4 (9 $CellContext`T + 9 $CellContext`T14 - 
+                  50 $CellContext`T24) + $CellContext`T^2 (9 $CellContext`T14 - 
+                  32 $CellContext`T24) - 
+                32 $CellContext`T14^2 $CellContext`T24 - 
+                9 $CellContext`T14 $CellContext`T24^2 + 
+                6 $CellContext`T24^3 + $CellContext`T (9 $CellContext`T14^2 - 
+                  64 $CellContext`T14 $CellContext`T24 - 
+                  9 $CellContext`T24^2) + 
+                4 $CellContext`MT^2 (9 $CellContext`T^2 + 
+                  18 $CellContext`T $CellContext`T14 + 9 $CellContext`T14^2 - 
+                  82 $CellContext`T $CellContext`T24 - 
+                  82 $CellContext`T14 $CellContext`T24 - 
+                  7 $CellContext`T24^2)) + $CellContext`MH^2 (
+                 4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^3 (64 $CellContext`MT^6 + 
+                8 $CellContext`MT^4 (4 $CellContext`T + 4 $CellContext`T14 - 
+                  11 $CellContext`T24) + ($CellContext`T + $CellContext`T14) \
+($CellContext`T + $CellContext`T14 - $CellContext`T24) $CellContext`T24 + 
+                2 $CellContext`MT^2 (2 $CellContext`T^2 + 
+                  4 $CellContext`T $CellContext`T14 + 2 $CellContext`T14^2 - 
+                  9 $CellContext`T $CellContext`T24 - 
+                  9 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2)) + \
+$CellContext`MH^4 $CellContext`T24 ((-512) $CellContext`MT^8 - 
+                7 $CellContext`T^4 - 7 $CellContext`T14^4 - 
+                64 $CellContext`MT^6 (13 $CellContext`T + 13 $CellContext`T14 - 
+                 69 $CellContext`T24) + 
+                26 $CellContext`T14^3 $CellContext`T24 + 
+                22 $CellContext`T14^2 $CellContext`T24^2 - 
+                10 $CellContext`T14 $CellContext`T24^3 + $CellContext`T24^4 + \
+$CellContext`T^3 ((-28) $CellContext`T14 + 26 $CellContext`T24) - 
+                16 $CellContext`MT^4 (27 $CellContext`T^2 + 
+                 54 $CellContext`T $CellContext`T14 + 27 $CellContext`T14^2 - 
+                 164 $CellContext`T $CellContext`T24 - 
+                 164 $CellContext`T14 $CellContext`T24 - 
+                 49 $CellContext`T24^2) + $CellContext`T^2 ((-42) \
+$CellContext`T14^2 + 78 $CellContext`T14 $CellContext`T24 + 
+                  22 $CellContext`T24^2) + $CellContext`T ((-28) \
+$CellContext`T14^3 + 78 $CellContext`T14^2 $CellContext`T24 + 
+                  44 $CellContext`T14 $CellContext`T24^2 - 
+                  10 $CellContext`T24^3) - 
+                4 $CellContext`MT^2 (23 $CellContext`T^3 + 
+                 23 $CellContext`T14^3 + $CellContext`T^2 (
+                   69 $CellContext`T14 - 121 $CellContext`T24) - 
+                 121 $CellContext`T14^2 $CellContext`T24 - 
+                 71 $CellContext`T14 $CellContext`T24^2 + 
+                 21 $CellContext`T24^3 + $CellContext`T (
+                   69 $CellContext`T14^2 - 
+                   242 $CellContext`T14 $CellContext`T24 - 
+                   71 $CellContext`T24^2)))) 
+             X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] - 
+            2 ($CellContext`MH^2 (20 $CellContext`MT^2 + 5 $CellContext`T + 
+               5 $CellContext`T14 - $CellContext`T24) - (
+              4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2) (
+             16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+             8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+               8 $CellContext`MH^2 $CellContext`T24 + 
+               2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+               2 $CellContext`T ($CellContext`T14 + $CellContext`T24))) 
+            X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24] + 
+            2 (16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+              8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+                8 $CellContext`MH^2 $CellContext`T24 + 
+                2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                2 $CellContext`T ($CellContext`T14 + $CellContext`T24))) \
+((-2) $CellContext`MH^6 (36 $CellContext`MT^2 + 9 $CellContext`T + 
+                9 $CellContext`T14 - $CellContext`T24) $CellContext`T24 + 
+              2 $CellContext`MT^2 (
+                 4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^4 + 
+              2 $CellContext`MH^2 (
+                 4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2 (
+                4 $CellContext`MT^4 + $CellContext`T^2 + $CellContext`T14^2 + \
+$CellContext`MT^2 (5 $CellContext`T + 5 $CellContext`T14 - 
+                  21 $CellContext`T24) + 
+                2 $CellContext`T ($CellContext`T14 - 2 $CellContext`T24) - 
+                4 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2) - \
+$CellContext`MH^4 (192 $CellContext`MT^6 + 3 $CellContext`T^3 + 
+               3 $CellContext`T14^3 + 
+               16 $CellContext`MT^4 (9 $CellContext`T + 9 $CellContext`T14 - 
+                 29 $CellContext`T24) + $CellContext`T^2 (9 $CellContext`T14 - 
+                 23 $CellContext`T24) - 
+               23 $CellContext`T14^2 $CellContext`T24 - 
+               13 $CellContext`T14 $CellContext`T24^2 + $CellContext`T24^3 + 
+               4 $CellContext`MT^2 (9 $CellContext`T^2 + 
+                 18 $CellContext`T $CellContext`T14 + 9 $CellContext`T14^2 - 
+                 52 $CellContext`T $CellContext`T24 - 
+                 52 $CellContext`T14 $CellContext`T24 - 
+                 15 $CellContext`T24^2) + $CellContext`T (
+                 9 $CellContext`T14^2 - 46 $CellContext`T14 $CellContext`T24 - 
+                 13 $CellContext`T24^2))) 
+             X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT]) + 
+          2 $CellContext`MT^2 (
+             16 $CellContext`MT^4 + $CellContext`T^2 + $CellContext`T14^2 - 
+             4 $CellContext`MH^2 $CellContext`T24 + 
+             2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+             2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+             8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24))^(-2) (
+             16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+             8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+               8 $CellContext`MH^2 $CellContext`T24 + 
+               2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+               2 $CellContext`T ($CellContext`T14 + $CellContext`T24)))^(-1) 
+           X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+              
+              4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24]^(-1) (-($CellContext`S34 - $CellContext`U) ((-2) \
+$CellContext`MH^2 + $CellContext`S34 + 
+              2 $CellContext`T + $CellContext`U) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[5]] $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[4]] - 
+            4 (2 $CellContext`MH^2 - $CellContext`S34 - 
+             2 $CellContext`T - $CellContext`U) $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`ec[5]] ($CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[3]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[2]] + $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[4]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[3]]) - 
+            4 ($CellContext`S34 - $CellContext`U) $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`ec[4]] ($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[3]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[1]] + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[3]]) + 16 ($CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]]) ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]])) (-(
+              32 $CellContext`MH^10 $CellContext`T24^2 + $CellContext`MT^2 (
+                12 $CellContext`MT^2 + 3 $CellContext`T + 
+                3 $CellContext`T14 - $CellContext`T24) (
+                 4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^5 + 
+              2 $CellContext`MH^8 $CellContext`T24 (176 $CellContext`MT^4 + 
+                11 $CellContext`T^2 + 22 $CellContext`T $CellContext`T14 + 
+                11 $CellContext`T14^2 + 
+                8 $CellContext`MT^2 (11 $CellContext`T + 11 $CellContext`T14 - 
+                  24 $CellContext`T24) - 32 $CellContext`T $CellContext`T24 - 
+                32 $CellContext`T14 $CellContext`T24 - 
+                11 $CellContext`T24^2) - $CellContext`MH^2 (
+                4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^3 (
+               320 $CellContext`MT^6 + ($CellContext`T + $CellContext`T14) (
+                 5 $CellContext`T + 
+                 5 $CellContext`T14 - $CellContext`T24) $CellContext`T24 + 
+               8 $CellContext`MT^4 (20 $CellContext`T + 20 $CellContext`T14 + 
+                 7 $CellContext`T24) + 
+               2 $CellContext`MT^2 (10 $CellContext`T^2 + 
+                 20 $CellContext`T $CellContext`T14 + 10 $CellContext`T14^2 + 
+                 17 $CellContext`T $CellContext`T24 + 
+                 17 $CellContext`T14 $CellContext`T24 - 
+                 5 $CellContext`T24^2)) - 
+              8 $CellContext`MH^6 $CellContext`T24 (464 $CellContext`MT^6 + 
+               8 $CellContext`MT^4 (41 $CellContext`T + 41 $CellContext`T14 - 
+                 18 $CellContext`T24) + 
+               11 $CellContext`MT^2 (7 $CellContext`T^2 + 
+                 14 $CellContext`T $CellContext`T14 + 7 $CellContext`T14^2 - 
+                 4 $CellContext`T $CellContext`T24 - 
+                 4 $CellContext`T14 $CellContext`T24 - 3 $CellContext`T24^2) + 
+               2 ($CellContext`T + $CellContext`T14) (3 $CellContext`T^2 + 
+                 6 $CellContext`T $CellContext`T14 + 
+                 3 $CellContext`T14^2 - $CellContext`T $CellContext`T24 - \
+$CellContext`T14 $CellContext`T24 - 
+                 2 $CellContext`T24^2)) + $CellContext`MH^4 (
+                4608 $CellContext`MT^10 + 
+                512 $CellContext`MT^8 (9 $CellContext`T + 9 $CellContext`T14 + 
+                  25 $CellContext`T24) + 
+                64 $CellContext`MT^6 (27 $CellContext`T^2 + 
+                  54 $CellContext`T $CellContext`T14 + 27 $CellContext`T14^2 + 
+                  181 $CellContext`T $CellContext`T24 + 
+                  181 $CellContext`T14 $CellContext`T24 + 
+                  10 $CellContext`T24^2) + 
+                16 $CellContext`MT^4 (18 $CellContext`T^3 + 
+                  18 $CellContext`T14^3 + 
+                  243 $CellContext`T14^2 $CellContext`T24 + 
+                  50 $CellContext`T14 $CellContext`T24^2 - 
+                  41 $CellContext`T24^3 + 
+                  27 $CellContext`T^2 (2 $CellContext`T14 + 
+                    9 $CellContext`T24) + $CellContext`T (
+                    54 $CellContext`T14^2 + 
+                    486 $CellContext`T14 $CellContext`T24 + 
+                    50 $CellContext`T24^2)) + 
+                2 $CellContext`MT^2 (9 $CellContext`T^4 + 
+                  9 $CellContext`T14^4 + 
+                  286 $CellContext`T14^3 $CellContext`T24 + 
+                  140 $CellContext`T14^2 $CellContext`T24^2 - 
+                  78 $CellContext`T14 $CellContext`T24^3 - 
+                  13 $CellContext`T24^4 + $CellContext`T^3 (
+                    36 $CellContext`T14 + 286 $CellContext`T24) + 
+                  2 $CellContext`T^2 (27 $CellContext`T14^2 + 
+                    429 $CellContext`T14 $CellContext`T24 + 
+                    70 $CellContext`T24^2) + $CellContext`T (
+                    36 $CellContext`T14^3 + 
+                    858 $CellContext`T14^2 $CellContext`T24 + 
+                    280 $CellContext`T14 $CellContext`T24^2 - 
+                    78 $CellContext`T24^3)) + $CellContext`T24 (
+                  31 $CellContext`T^4 + 31 $CellContext`T14^4 + 
+                  30 $CellContext`T14^3 $CellContext`T24 + 
+                  2 $CellContext`T14^2 $CellContext`T24^2 + 
+                  2 $CellContext`T14 $CellContext`T24^3 - $CellContext`T24^4 + 
+                  2 $CellContext`T^3 (62 $CellContext`T14 + 
+                    15 $CellContext`T24) + 
+                  2 $CellContext`T^2 (93 $CellContext`T14^2 + 
+                    45 $CellContext`T14 $CellContext`T24 + \
+$CellContext`T24^2) + 
+                  2 $CellContext`T (62 $CellContext`T14^3 + 
+                    45 $CellContext`T14^2 $CellContext`T24 + 
+                    2 $CellContext`T14 $CellContext`T24^2 + \
+$CellContext`T24^3)))) 
+             X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+            2 ($CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14) (
+              16 $CellContext`MH^8 $CellContext`T24^2 - $CellContext`MT^2 (
+               16 $CellContext`MT^2 + 4 $CellContext`T + 4 $CellContext`T14 - 
+               5 $CellContext`T24) (
+                4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^4 + $CellContext`MH^6 $CellContext`T24 (
+                176 $CellContext`MT^4 + 11 $CellContext`T^2 + 
+                22 $CellContext`T $CellContext`T14 + 11 $CellContext`T14^2 + 
+                8 $CellContext`MT^2 (11 $CellContext`T + 11 $CellContext`T14 - 
+                  25 $CellContext`T24) - 34 $CellContext`T $CellContext`T24 - 
+                34 $CellContext`T14 $CellContext`T24 - 
+                13 $CellContext`T24^2) + $CellContext`MH^2 (
+                 4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2 (
+                144 $CellContext`MT^6 + ($CellContext`T + $CellContext`T14) (
+                  5 $CellContext`T + 5 $CellContext`T14 - 
+                  6 $CellContext`T24) $CellContext`T24 + 
+                72 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 (9 $CellContext`T^2 + 
+                  18 $CellContext`T $CellContext`T14 + 9 $CellContext`T14^2 + 
+                  38 $CellContext`T $CellContext`T24 + 
+                  38 $CellContext`T14 $CellContext`T24 - 
+                  55 $CellContext`T24^2)) - 
+              2 $CellContext`MH^4 $CellContext`T24 (672 $CellContext`MT^6 + 
+               8 $CellContext`T^3 + 8 $CellContext`T14^3 + 
+               16 $CellContext`MT^4 (29 $CellContext`T + 29 $CellContext`T14 - 
+                 20 $CellContext`T24) + $CellContext`T^2 (24 $CellContext`T14 - 
+                 7 $CellContext`T24) - 7 $CellContext`T14^2 $CellContext`T24 - 
+               10 $CellContext`T14 $CellContext`T24^2 - 3 $CellContext`T24^3 + 
+               2 $CellContext`MT^2 (53 $CellContext`T^2 + 
+                 106 $CellContext`T $CellContext`T14 + 53 $CellContext`T14^2 - 
+                 54 $CellContext`T $CellContext`T24 - 
+                 54 $CellContext`T14 $CellContext`T24 - 
+                 35 $CellContext`T24^2) + 
+               2 $CellContext`T (12 $CellContext`T14^2 - 
+                 7 $CellContext`T14 $CellContext`T24 - 5 $CellContext`T24^2)))
+               X`DiscB[$CellContext`MH^2 - 
+               
+               4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`MT, $CellContext`MT] + (
+              4 $CellContext`MH^8 $CellContext`T24^2 (36 $CellContext`MT^2 + 
+                9 $CellContext`T + 
+                9 $CellContext`T14 + $CellContext`T24) - $CellContext`MT^2 (
+                4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^4 (48 $CellContext`MT^4 + 3 $CellContext`T^2 + 
+               6 $CellContext`T $CellContext`T14 + 3 $CellContext`T14^2 + 
+               8 $CellContext`MT^2 (3 $CellContext`T + 3 $CellContext`T14 - 
+                 7 $CellContext`T24) - 14 $CellContext`T $CellContext`T24 - 
+               14 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2) + 
+              2 $CellContext`MH^6 $CellContext`T24 (192 $CellContext`MT^6 + 
+                3 $CellContext`T^3 + 3 $CellContext`T14^3 + 
+                16 $CellContext`MT^4 (9 $CellContext`T + 9 $CellContext`T14 - 
+                  58 $CellContext`T24) + $CellContext`T^2 (9 $CellContext`T14 - 
+                  40 $CellContext`T24) - 
+                40 $CellContext`T14^2 $CellContext`T24 - 
+                17 $CellContext`T14 $CellContext`T24^2 - 6 $CellContext`T24^3 + 
+                4 $CellContext`MT^2 (9 $CellContext`T^2 + 
+                  18 $CellContext`T $CellContext`T14 + 9 $CellContext`T14^2 - 
+                  98 $CellContext`T $CellContext`T24 - 
+                  98 $CellContext`T14 $CellContext`T24 - 
+                  19 $CellContext`T24^2) + $CellContext`T (
+                  9 $CellContext`T14^2 - 80 $CellContext`T14 $CellContext`T24 - 
+                  17 $CellContext`T24^2)) + $CellContext`MH^4 \
+$CellContext`T24 ((-1536) $CellContext`MT^8 - 11 $CellContext`T^4 - 
+                11 $CellContext`T14^4 - 
+                64 $CellContext`MT^6 (29 $CellContext`T + 29 $CellContext`T14 - 
+                 115 $CellContext`T24) + 
+                50 $CellContext`T14^3 $CellContext`T24 + 
+                56 $CellContext`T14^2 $CellContext`T24^2 + 
+                26 $CellContext`T14 $CellContext`T24^3 - $CellContext`T24^4 + \
+$CellContext`T^3 ((-44) $CellContext`T14 + 50 $CellContext`T24) - 
+                16 $CellContext`MT^4 (51 $CellContext`T^2 + 
+                 102 $CellContext`T $CellContext`T14 + 51 $CellContext`T14^2 - 
+                 280 $CellContext`T $CellContext`T24 - 
+                 280 $CellContext`T14 $CellContext`T24 - 
+                 
+                 95 $CellContext`T24^2) + $CellContext`T^2 ((-66) \
+$CellContext`T14^2 + 150 $CellContext`T14 $CellContext`T24 + 
+                  56 $CellContext`T24^2) + $CellContext`T ((-44) \
+$CellContext`T14^3 + 150 $CellContext`T14^2 $CellContext`T24 + 
+                  112 $CellContext`T14 $CellContext`T24^2 + 
+                  26 $CellContext`T24^3) - 
+                4 $CellContext`MT^2 (39 $CellContext`T^3 + 
+                 39 $CellContext`T14^3 + $CellContext`T^2 (
+                   117 $CellContext`T14 - 215 $CellContext`T24) - 
+                 215 $CellContext`T14^2 $CellContext`T24 - 
+                 151 $CellContext`T14 $CellContext`T24^2 - 
+                 37 $CellContext`T24^3 + $CellContext`T (
+                   117 $CellContext`T14^2 - 
+                   430 $CellContext`T14 $CellContext`T24 - 
+                   151 $CellContext`T24^2))) + $CellContext`MH^2 (
+                 4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2 (256 $CellContext`MT^8 + 
+                32 $CellContext`MT^6 (6 $CellContext`T + 6 $CellContext`T14 - 
+                  7 $CellContext`T24) + 
+                16 $CellContext`MT^4 (3 $CellContext`T^2 + 
+                  6 $CellContext`T $CellContext`T14 + 3 $CellContext`T14^2 - 
+                  2 $CellContext`T $CellContext`T24 - 
+                  2 $CellContext`T14 $CellContext`T24 - 
+                  37 $CellContext`T24^2) + ($CellContext`T + \
+$CellContext`T14) $CellContext`T24 (5 $CellContext`T^2 + 5 $CellContext`T14^2 + 
+                  2 $CellContext`T (5 $CellContext`T14 - 8 $CellContext`T24) - 
+                  16 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2) + 
+                2 $CellContext`MT^2 (2 $CellContext`T^3 + 
+                  2 $CellContext`T14^3 + 
+                  13 $CellContext`T14^2 $CellContext`T24 - 
+                  106 $CellContext`T14 $CellContext`T24^2 - \
+$CellContext`T24^3 + $CellContext`T^2 (6 $CellContext`T14 + 
+                    13 $CellContext`T24) + 
+                  2 $CellContext`T (3 $CellContext`T14^2 + 
+                    13 $CellContext`T14 $CellContext`T24 - 
+                    53 $CellContext`T24^2)))) 
+             X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] - 
+            2 ((-64) $CellContext`MT^4 - 4 $CellContext`T^2 - 
+             8 $CellContext`T $CellContext`T14 - 4 $CellContext`T14^2 - 
+             3 $CellContext`T $CellContext`T24 - 
+             3 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + \
+$CellContext`MH^2 (20 $CellContext`MT^2 + 5 $CellContext`T + 
+               5 $CellContext`T14 + $CellContext`T24) - 
+             4 $CellContext`MT^2 (8 $CellContext`T + 8 $CellContext`T14 + 
+              3 $CellContext`T24)) (
+             16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+             8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+               8 $CellContext`MH^2 $CellContext`T24 + 
+               2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+               2 $CellContext`T ($CellContext`T14 + $CellContext`T24))) 
+            X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24] - 
+            2 (16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+             8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+               8 $CellContext`MH^2 $CellContext`T24 + 
+               2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+               2 $CellContext`T ($CellContext`T14 + $CellContext`T24))) \
+(($CellContext`MT^2 (4 $CellContext`T + 4 $CellContext`T14 - 
+                 6 $CellContext`T24) + ($CellContext`T + $CellContext`T14) \
+($CellContext`T + $CellContext`T14 - 2 $CellContext`T24)) (
+                4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^3 + 
+             2 $CellContext`MH^6 $CellContext`T24 (36 $CellContext`MT^2 + 
+               9 $CellContext`T + 
+               9 $CellContext`T14 + $CellContext`T24) + $CellContext`MH^4 (
+               192 $CellContext`MT^6 + 3 $CellContext`T^3 + 
+               3 $CellContext`T14^3 + 
+               16 $CellContext`MT^4 (9 $CellContext`T + 9 $CellContext`T14 - 
+                 37 $CellContext`T24) + $CellContext`T^2 (9 $CellContext`T14 - 
+                 31 $CellContext`T24) - 
+               31 $CellContext`T14^2 $CellContext`T24 - 
+               19 $CellContext`T14 $CellContext`T24^2 - $CellContext`T24^3 + \
+$CellContext`T (9 $CellContext`T14^2 - 62 $CellContext`T14 $CellContext`T24 - 
+                 19 $CellContext`T24^2) + 
+               4 $CellContext`MT^2 (9 $CellContext`T^2 + 
+                 18 $CellContext`T $CellContext`T14 + 9 $CellContext`T14^2 - 
+                 68 $CellContext`T $CellContext`T24 - 
+                 68 $CellContext`T14 $CellContext`T24 - 
+                 17 $CellContext`T24^2)) - 
+             2 $CellContext`MH^2 (320 $CellContext`MT^8 + 2 $CellContext`T^4 + 
+              2 $CellContext`T14^4 + 
+              16 $CellContext`MT^6 (23 $CellContext`T + 23 $CellContext`T14 - 
+                37 $CellContext`T24) + $CellContext`T^3 (8 $CellContext`T14 - 
+                6 $CellContext`T24) - 6 $CellContext`T14^3 $CellContext`T24 - 
+              10 $CellContext`T14^2 $CellContext`T24^2 - 
+              3 $CellContext`T14 $CellContext`T24^3 - $CellContext`T24^4 + 
+              4 $CellContext`MT^4 (39 $CellContext`T^2 + 
+                78 $CellContext`T $CellContext`T14 + 39 $CellContext`T14^2 - 
+                98 $CellContext`T $CellContext`T24 - 
+                98 $CellContext`T14 $CellContext`T24 - 45 $CellContext`T24^2) + 
+              2 $CellContext`T^2 (6 $CellContext`T14^2 - 
+                9 $CellContext`T14 $CellContext`T24 - 
+                5 $CellContext`T24^2) + $CellContext`T (8 $CellContext`T14^3 - 
+                18 $CellContext`T14^2 $CellContext`T24 - 
+                20 $CellContext`T14 $CellContext`T24^2 - 
+                3 $CellContext`T24^3) + $CellContext`MT^2 (
+                29 $CellContext`T^3 + 
+                29 $CellContext`T14^3 + $CellContext`T^2 (87 $CellContext`T14 - 
+                  85 $CellContext`T24) - 
+                85 $CellContext`T14^2 $CellContext`T24 - 
+                85 $CellContext`T14 $CellContext`T24^2 - 
+                7 $CellContext`T24^3 + $CellContext`T (87 $CellContext`T14^2 - 
+                  170 $CellContext`T14 $CellContext`T24 - 
+                  85 $CellContext`T24^2)))) 
+            X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT]) + 
+          4 $CellContext`MT^2 (
+             16 $CellContext`MT^4 + $CellContext`T^2 + $CellContext`T14^2 - 
+             4 $CellContext`MH^2 $CellContext`T24 + 
+             2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+             2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+             
+             8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24))^(-1) ((-$CellContext`S34^2 - 
+              2 $CellContext`S34 $CellContext`T - $CellContext`S34 \
+$CellContext`T24 + 2 $CellContext`T14 $CellContext`T24 - 
+              2 $CellContext`S (
+               2 $CellContext`S34 + $CellContext`T24) + $CellContext`MH^2 (
+                2 $CellContext`S + 3 $CellContext`S34 - 2 $CellContext`T14 - 
+                3 $CellContext`U) + 2 $CellContext`T $CellContext`U + 
+              4 $CellContext`T14 $CellContext`U + $CellContext`T24 \
+$CellContext`U + $CellContext`U^2) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[5]] $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[4]] - 
+            8 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T24 + \
+$CellContext`U) $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`k[5]] $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`k[4]] $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`ec[5]] - 
+            8 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T24 + \
+$CellContext`U) $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`k[5]] $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`ec[5]] $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`k[2]] - 
+            4 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T24 - \
+$CellContext`U) $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`ec[5]] ((2 $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[1]] - $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[3]]) $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[2]] + $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[4]] (2 $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] - $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[3]])) - 
+            8 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T24 + \
+$CellContext`U) $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`ec[4]] $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`k[4]] $CellContext`Pair[
+              $CellContext`ec[5], 
+              $CellContext`k[1]] - 
+            8 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T24 + \
+$CellContext`U) $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`e[2]] $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`k[2]] $CellContext`Pair[
+              $CellContext`ec[5], 
+              $CellContext`k[1]] + 4 $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[
+               4]] ((-$CellContext`MH^2 + 
+                2 $CellContext`S34 + $CellContext`T24) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[2]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[
+                 1]] + (-$CellContext`S34 + $CellContext`U) \
+$CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] - $CellContext`MH^2 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[4]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[1]] + $CellContext`T24 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] + 2 $CellContext`U $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] - $CellContext`MH^2 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[2]] + 2 $CellContext`S34 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]] + $CellContext`T24 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]] - $CellContext`S34 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[3]] + $CellContext`U $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]] - $CellContext`MH^2 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[4]] + $CellContext`T24 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[4]] + 2 $CellContext`U $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[4]])) ((-$CellContext`MH^2 + 
+               4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14)^(-1) \
+((-2) $CellContext`MH^2 + 
+              4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MH^2 (
+               16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+               8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+                 8 $CellContext`MH^2 $CellContext`T24 + 
+                 2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                 2 $CellContext`T ($CellContext`T14 + \
+$CellContext`T24)))^(-1) (256 $CellContext`MT^8 + 
+              192 $CellContext`MT^6 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + 
+              48 $CellContext`MT^4 ($CellContext`T^2 + $CellContext`T14^2 + 
+                2 $CellContext`T14 $CellContext`T24 + $CellContext`T24 ((-3) \
+$CellContext`MH^2 + $CellContext`T24) + 
+                2 $CellContext`T ($CellContext`T14 + $CellContext`T24)) + \
+$CellContext`MH^2 $CellContext`T24 ((-5) $CellContext`T^2 - 
+                5 $CellContext`T14^2 - 
+                4 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                2 $CellContext`MH^2 (3 $CellContext`T + 
+                  3 $CellContext`T14 + $CellContext`T24) - 
+                2 $CellContext`T (5 $CellContext`T14 + 2 $CellContext`T24)) + 
+              4 $CellContext`MT^2 ($CellContext`T^3 + $CellContext`T14^3 + 
+                3 $CellContext`T14^2 $CellContext`T24 + 
+                3 $CellContext`T^2 ($CellContext`T14 + $CellContext`T24) + \
+$CellContext`T14 $CellContext`T24 ((-14) $CellContext`MH^2 + 
+                  3 $CellContext`T24) + $CellContext`T24 (6 $CellContext`MH^4 - 
+                  8 $CellContext`MH^2 $CellContext`T24 + $CellContext`T24^2) + \
+$CellContext`T (3 $CellContext`T14^2 + 
+                  6 $CellContext`T14 $CellContext`T24 + $CellContext`T24 \
+((-14) $CellContext`MH^2 + 3 $CellContext`T24)))) 
+             X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT]/
+             X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24] - ($CellContext`MH^4 + 32 $CellContext`MT^4 + 
+              
+              12 $CellContext`MT^2 ($CellContext`T + $CellContext`T14) + \
+($CellContext`T + $CellContext`T14)^2 - 
+              2 $CellContext`MH^2 (
+               6 $CellContext`MT^2 + $CellContext`T + $CellContext`T14))^(-1) \
+(16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - $CellContext`T - \
+$CellContext`T14) $CellContext`T24 + 
+              8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+                8 $CellContext`MH^2 $CellContext`T24 + 
+                2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                2 $CellContext`T ($CellContext`T14 + $CellContext`T24)))^(-1) \
+(2 $CellContext`MH^10 (12 $CellContext`MT^2 + 3 $CellContext`T + 
+               3 $CellContext`T14 - $CellContext`T24) $CellContext`T24 - \
+$CellContext`MH^8 $CellContext`T24 (464 $CellContext`MT^4 + 
+              19 $CellContext`T^2 + 38 $CellContext`T $CellContext`T14 + 
+              19 $CellContext`T14^2 + 
+              8 $CellContext`MT^2 (24 $CellContext`T + 
+                24 $CellContext`T14 - $CellContext`T24) - 
+              4 $CellContext`T $CellContext`T24 - 
+              4 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2) - \
+$CellContext`MT^2 (
+               4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^4 (
+              40 $CellContext`MT^4 + ($CellContext`T + $CellContext`T14)^2 + 
+              2 $CellContext`MT^2 (7 $CellContext`T + 
+                7 $CellContext`T14 + $CellContext`T24)) + $CellContext`MH^2 (
+                4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2 (
+               832 $CellContext`MT^8 + ($CellContext`T + $CellContext`T14)^3 \
+$CellContext`T24 + 
+               48 $CellContext`MT^6 (11 $CellContext`T + 11 $CellContext`T14 + 
+                 10 $CellContext`T24) + $CellContext`MT^2 ($CellContext`T + \
+$CellContext`T14) (7 $CellContext`T^2 + 14 $CellContext`T $CellContext`T14 + 
+                 7 $CellContext`T14^2 + 26 $CellContext`T $CellContext`T24 + 
+                 26 $CellContext`T14 $CellContext`T24 + 3 $CellContext`T24^2) + 
+               4 $CellContext`MT^4 (27 $CellContext`T^2 + 
+                 54 $CellContext`T $CellContext`T14 + 27 $CellContext`T14^2 + 
+                 52 $CellContext`T $CellContext`T24 + 
+                 52 $CellContext`T14 $CellContext`T24 + 
+                 9 $CellContext`T24^2)) + $CellContext`MH^6 (
+               256 $CellContext`MT^8 + 
+               192 $CellContext`MT^6 ($CellContext`T + $CellContext`T14 + 
+                 17 $CellContext`T24) + 
+               3 ($CellContext`T + $CellContext`T14) $CellContext`T24 (
+                 7 $CellContext`T^2 + 14 $CellContext`T $CellContext`T14 + 
+                 7 $CellContext`T14^2 + $CellContext`T24^2) + 
+               16 $CellContext`MT^4 (3 $CellContext`T^2 + 
+                 6 $CellContext`T $CellContext`T14 + 3 $CellContext`T14^2 + 
+                 119 $CellContext`T $CellContext`T24 + 
+                 119 $CellContext`T14 $CellContext`T24 + 
+                 13 $CellContext`T24^2) + 
+               4 $CellContext`MT^2 ($CellContext`T^3 + $CellContext`T14^3 + 
+                 89 $CellContext`T14^2 $CellContext`T24 + 
+                 9 $CellContext`T14 $CellContext`T24^2 + 
+                 7 $CellContext`T24^3 + $CellContext`T^2 (3 $CellContext`T14 + 
+                   89 $CellContext`T24) + $CellContext`T (
+                   3 $CellContext`T14^2 + 
+                   178 $CellContext`T14 $CellContext`T24 + 
+                   9 $CellContext`T24^2))) - $CellContext`MH^4 (
+              3584 $CellContext`MT^10 + 
+              256 $CellContext`MT^8 (13 $CellContext`T + 13 $CellContext`T14 + 
+                40 $CellContext`T24) + ($CellContext`T + $CellContext`T14)^2 \
+$CellContext`T24 (9 $CellContext`T^2 + 18 $CellContext`T $CellContext`T14 + 
+                9 $CellContext`T14^2 + 4 $CellContext`T $CellContext`T24 + 
+                4 $CellContext`T14 $CellContext`T24 + 3 $CellContext`T24^2) + 
+              128 $CellContext`MT^6 (9 $CellContext`T^2 + 
+                18 $CellContext`T $CellContext`T14 + 9 $CellContext`T14^2 + 
+                60 $CellContext`T $CellContext`T24 + 
+                60 $CellContext`T14 $CellContext`T24 + 14 $CellContext`T24^2) + 
+              16 $CellContext`MT^4 (11 $CellContext`T^3 + 
+                11 $CellContext`T14^3 + 
+                129 $CellContext`T14^2 $CellContext`T24 + 
+                51 $CellContext`T14 $CellContext`T24^2 + 
+                16 $CellContext`T24^3 + 
+                3 $CellContext`T^2 (11 $CellContext`T14 + 
+                  43 $CellContext`T24) + 
+                3 $CellContext`T (11 $CellContext`T14^2 + 
+                  86 $CellContext`T14 $CellContext`T24 + 
+                  17 $CellContext`T24^2)) + 
+              2 $CellContext`MT^2 (5 $CellContext`T^4 + 5 $CellContext`T14^4 + 
+                116 $CellContext`T14^3 $CellContext`T24 + 
+                54 $CellContext`T14^2 $CellContext`T24^2 + 
+                28 $CellContext`T14 $CellContext`T24^3 + $CellContext`T24^4 + 
+                4 $CellContext`T^3 (5 $CellContext`T14 + 29 $CellContext`T24) + 
+                6 $CellContext`T^2 (5 $CellContext`T14^2 + 
+                  58 $CellContext`T14 $CellContext`T24 + 
+                  9 $CellContext`T24^2) + 
+                4 $CellContext`T (5 $CellContext`T14^3 + 
+                  87 $CellContext`T14^2 $CellContext`T24 + 
+                  27 $CellContext`T14 $CellContext`T24^2 + 
+                  7 $CellContext`T24^3)))) 
+            X`DiscB[$CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`MT, $CellContext`MT]/
+            X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+             4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24] - (
+              16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+              8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+                8 $CellContext`MH^2 $CellContext`T24 + 
+                2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                2 $CellContext`T ($CellContext`T14 + $CellContext`T24)))^(-1) \
+(256 $CellContext`MT^10 + 
+             256 $CellContext`MT^8 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MH^2 $CellContext`T24 (
+               2 $CellContext`MH^2 ($CellContext`T + $CellContext`T14 - \
+$CellContext`T24)^2 + 
+               4 $CellContext`MH^4 $CellContext`T24 - ($CellContext`T + \
+$CellContext`T14) ($CellContext`T + $CellContext`T14 + $CellContext`T24)^2) + 
+             32 $CellContext`MT^6 (3 $CellContext`T^2 + 3 $CellContext`T14^2 + 
+               6 $CellContext`T14 $CellContext`T24 + 
+               6 $CellContext`T ($CellContext`T14 + $CellContext`T24) + \
+$CellContext`T24 ((-2) $CellContext`MH^2 + 
+                 3 $CellContext`T24)) + $CellContext`MT^2 ($CellContext`T^4 + \
+$CellContext`T14^4 + 4 $CellContext`T14^3 $CellContext`T24 + 
+               6 $CellContext`T14^2 $CellContext`T24 ((-2) $CellContext`MH^2 + \
+$CellContext`T24) + 
+               4 $CellContext`T14 $CellContext`T24 ((-2) $CellContext`MH^2 + \
+$CellContext`T24)^2 + 
+               4 $CellContext`T^3 ($CellContext`T14 + $CellContext`T24) + \
+$CellContext`T24^2 ((-32) $CellContext`MH^4 - 
+                 4 $CellContext`MH^2 $CellContext`T24 + $CellContext`T24^2) + 
+               6 $CellContext`T^2 ($CellContext`T14^2 + 
+                 2 $CellContext`T14 $CellContext`T24 + $CellContext`T24 ((-2) \
+$CellContext`MH^2 + $CellContext`T24)) + 
+               4 $CellContext`T ($CellContext`T14^3 + 
+                 3 $CellContext`T14^2 $CellContext`T24 + 
+                 3 $CellContext`T14 $CellContext`T24 ((-2) $CellContext`MH^2 + \
+$CellContext`T24) + $CellContext`T24 ((-2) $CellContext`MH^2 + \
+$CellContext`T24)^2)) + 
+             16 $CellContext`MT^4 ($CellContext`T^3 + $CellContext`T14^3 + 
+               3 $CellContext`T14^2 $CellContext`T24 + 
+               3 $CellContext`T14 $CellContext`T24 (-$CellContext`MH^2 + \
+$CellContext`T24) + 
+               3 $CellContext`T^2 ($CellContext`T14 + $CellContext`T24) + \
+$CellContext`T24 (2 $CellContext`MH^4 - 
+                 2 $CellContext`MH^2 $CellContext`T24 + $CellContext`T24^2) + 
+               3 $CellContext`T ($CellContext`T14^2 + 
+                 2 $CellContext`T14 $CellContext`T24 + $CellContext`T24 \
+(-$CellContext`MH^2 + $CellContext`T24)))) 
+            X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT]/
+            X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+             4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24] + 
+            2 $CellContext`MH^2 (16 $CellContext`MT^4 + $CellContext`T^2 + 
+              2 $CellContext`T $CellContext`T14 + $CellContext`T14^2 + \
+$CellContext`MT^2 (8 $CellContext`T + 8 $CellContext`T14 - 
+                4 $CellContext`T24) + 
+              2 $CellContext`MH^2 $CellContext`T24 - $CellContext`T \
+$CellContext`T24 - $CellContext`T14 $CellContext`T24 - 2 $CellContext`T24^2) 
+             X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24]^(-1) 
+             X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT]))) + \
+$CellContext`T14^(-1) ($CellContext`MH^2 - $CellContext`S - $CellContext`T24 - \
+$CellContext`U)^(-1) ((-8) $CellContext`MT^2 (16 $CellContext`MT^4 - 
+            4 $CellContext`MH^2 $CellContext`T14 + 
+            8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2)^(-1) 
+          X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+             4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U]^(-1) \
+((-4) $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`ec[5]] ($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[2]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[1]] + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[1]] + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[4]] ($CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[5]])) + 8 $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`k[1]] ($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[5]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[5]] + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[2]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[2]]) + 8 $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`k[4]] ($CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`ec[5]] + $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[2]]) + $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`ec[
+              4]] ((2 $CellContext`S - $CellContext`S34 + $CellContext`T - 
+               2 $CellContext`T24) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] - 4 (($CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]]) $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[5]] ($CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[4]])))) ($CellContext`MH^2 (
+             16 $CellContext`MT^4 + 8 $CellContext`MH^2 $CellContext`T14 - 
+             5 $CellContext`T14^2 - 
+             4 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 - 
+             4 $CellContext`T14 $CellContext`U + 
+             2 $CellContext`T24 $CellContext`U + $CellContext`U^2 + 
+             8 $CellContext`MT^2 ((-2) $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)) 
+            X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`T14 ((
+               4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 - 
+             2 $CellContext`MH^2 (12 $CellContext`MT^2 - $CellContext`T14 + 
+              3 ($CellContext`T24 + $CellContext`U))) 
+            X`DiscB[$CellContext`T14, $CellContext`MT, $CellContext`MT] - (
+            8 $CellContext`MH^4 $CellContext`T14 + $CellContext`T14 (
+               
+               4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 + $CellContext`MH^2 (16 $CellContext`MT^4 - 
+              3 $CellContext`T14^2 - 
+              10 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 + 
+              8 $CellContext`MT^2 ((-5) $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U))) 
+           X`DiscB[$CellContext`MH^2 - 
+             4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] + (
+             4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) 
+            X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] + 
+           2 (64 $CellContext`MT^8 + 
+             48 $CellContext`MT^6 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + 
+             12 $CellContext`MT^4 ((-4) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2) - $CellContext`MH^2 \
+$CellContext`T14 (-$CellContext`T14^2 + $CellContext`T14 ($CellContext`T24 + \
+$CellContext`U) + 
+              2 ($CellContext`T24 + $CellContext`U)^2 + $CellContext`MH^2 \
+($CellContext`T14 - 
+                3 ($CellContext`T24 + $CellContext`U))) + $CellContext`MT^2 (
+               12 $CellContext`MH^4 $CellContext`T14 + ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^3 - 
+               4 $CellContext`MH^2 $CellContext`T14 (2 $CellContext`T14 + 
+                5 ($CellContext`T24 + $CellContext`U)))) 
+            X`ScalarC0[$CellContext`MH^2, $CellContext`T14, $CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT]) + 
+         8 $CellContext`MT^2 (16 $CellContext`MT^4 - 
+            4 $CellContext`MH^2 $CellContext`T14 + 
+            8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2)^(-1) ((
+             4 $CellContext`S $CellContext`S34 - $CellContext`S34^2 + \
+$CellContext`T^2 + 2 $CellContext`S34 $CellContext`T14 - 
+             2 $CellContext`T $CellContext`T14 - 
+             2 $CellContext`MH^2 (
+              2 $CellContext`S - $CellContext`S34 + $CellContext`T - 
+              2 $CellContext`T24) - 4 $CellContext`T $CellContext`T24 - 
+             2 $CellContext`S34 $CellContext`U + 
+             2 $CellContext`T $CellContext`U) $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`ec[4]] $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`ec[5]] + 
+           8 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`k[4]] $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`k[5]] $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`ec[5]] + 
+           8 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`ec[5]] $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`k[5]] $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`k[1]] - 4 $CellContext`Pair[
+             $CellContext`e[2], 
+             $CellContext`ec[5]] (
+            2 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[2]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[1]] + (6 $CellContext`MH^2 - 3 $CellContext`S34 - 
+              3 $CellContext`T - 4 $CellContext`U) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[3]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[1]] + $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[4]] (
+              2 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] + (6 $CellContext`MH^2 - 
+                3 $CellContext`S34 - 3 $CellContext`T - 
+                4 $CellContext`U) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]])) + 
+           8 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`k[4]] $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`ec[4]] $CellContext`Pair[
+              $CellContext`ec[5], 
+              $CellContext`k[2]] + 
+           8 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`e[2]] $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`k[1]] $CellContext`Pair[
+              $CellContext`ec[5], 
+              $CellContext`k[2]] + 32 ($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[3]] ($CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] - $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[3]]) + ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[2]] - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]]) $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[3]]) ($CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[3]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[2]] + $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[3]]) - 4 $CellContext`Pair[
+             $CellContext`e[1], 
+             $CellContext`ec[
+             4]] (((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[
+                 1]] + ($CellContext`S34 - $CellContext`T) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] + 
+              2 (-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[4]]) $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[2]] + $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[
+               5]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[
+                 1]] + ($CellContext`S34 - $CellContext`T) $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]] + 
+              2 (-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[4]]))) ((-$CellContext`MH^2 + 
+              4 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U)^(-1) (
+             4 $CellContext`MT^2 - $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) - (
+             16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+             8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) (
+            256 $CellContext`MT^10 + 
+            256 $CellContext`MT^8 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) - 
+            32 $CellContext`MT^6 (2 $CellContext`MH^2 $CellContext`T14 - 
+             3 ($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2) + 
+            16 $CellContext`MT^4 ($CellContext`MH^4 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^3 - $CellContext`MH^2 \
+$CellContext`T14 ($CellContext`T14 + 
+               3 ($CellContext`T24 + $CellContext`U))) + $CellContext`MT^2 (
+              8 $CellContext`MH^4 $CellContext`T14 ((-5) $CellContext`T14 + \
+$CellContext`T24 + $CellContext`U) + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^4 + 
+              4 $CellContext`MH^2 $CellContext`T14 ($CellContext`T14^2 - 
+                2 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                3 ($CellContext`T24 + $CellContext`U)^2)) + $CellContext`MH^2 \
+$CellContext`T14 (
+              8 $CellContext`MH^4 $CellContext`T14 + ($CellContext`T14 - \
+$CellContext`T24 - $CellContext`U) ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 + $CellContext`MH^2 ((-3) $CellContext`T14^2 - 
+                6 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2))) 
+           X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT]/
+           X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+            4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] + \
+$CellContext`T14 (
+              16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+              8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) (
+             256 $CellContext`MT^8 + 
+             192 $CellContext`MT^6 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) - 
+             48 $CellContext`MT^4 (
+              3 $CellContext`MH^2 $CellContext`T14 - ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^2) + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`T14^2 - 4 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+               5 ($CellContext`T24 + $CellContext`U)^2 + 
+               2 $CellContext`MH^2 ($CellContext`T14 + 
+                 3 ($CellContext`T24 + $CellContext`U))) + 
+             4 $CellContext`MT^2 (
+               6 $CellContext`MH^4 $CellContext`T14 + ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^3 - 
+               2 $CellContext`MH^2 $CellContext`T14 (4 $CellContext`T14 + 
+                7 ($CellContext`T24 + $CellContext`U)))) 
+            X`DiscB[$CellContext`T14, $CellContext`MT, $CellContext`MT]/
+            X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+             4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] + \
+($CellContext`MH^4 + 32 $CellContext`MT^4 + 
+              12 $CellContext`MT^2 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 - 
+              2 $CellContext`MH^2 (
+               6 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U))^(-1) \
+(16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 ($CellContext`MH^2 - \
+$CellContext`T24 - $CellContext`U) + 
+              8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) (
+             8 $CellContext`MH^10 $CellContext`T14^2 + $CellContext`MH^8 \
+$CellContext`T14 (16 $CellContext`MT^4 - 5 $CellContext`T14^2 - 
+               28 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 + 
+               8 $CellContext`MT^2 ((-20) $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)) + $CellContext`MH^6 $CellContext`T14 ((-256) \
+$CellContext`MT^6 + 
+               16 $CellContext`MT^4 (72 $CellContext`T14 - 
+                 11 ($CellContext`T24 + $CellContext`U)) + 
+               8 $CellContext`MT^2 (14 $CellContext`T14^2 + 
+                 52 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                 5 ($CellContext`T24 + $CellContext`U)^2) - 
+               3 ($CellContext`T24 + $CellContext`U) ((-5) $CellContext`T14^2 - 
+                12 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2)) + $CellContext`MT^2 (
+                4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^3 (160 $CellContext`MT^6 - 
+               16 $CellContext`MT^4 (7 $CellContext`T14 - 
+                6 ($CellContext`T24 + $CellContext`U)) - 
+               2 $CellContext`MT^2 (3 $CellContext`T14^2 + 
+                22 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                
+                9 ($CellContext`T24 + $CellContext`U)^2) + ($CellContext`T24 + \
+$CellContext`U) (-$CellContext`T14^2 - 
+                 4 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2)) + $CellContext`MH^4 (
+               256 $CellContext`MT^10 + 
+               256 $CellContext`MT^8 (
+                 5 $CellContext`T14 + $CellContext`T24 + $CellContext`U) - 
+               32 $CellContext`MT^6 (115 $CellContext`T14^2 - 
+                36 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                3 ($CellContext`T24 + $CellContext`U)^2) - $CellContext`T14 \
+($CellContext`T24 + $CellContext`U)^2 (15 $CellContext`T14^2 + 
+                20 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                3 ($CellContext`T24 + $CellContext`U)^2) - 
+               16 $CellContext`MT^4 (49 $CellContext`T14^3 + 
+                129 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) - 
+                24 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 - \
+($CellContext`T24 + $CellContext`U)^3) + $CellContext`MT^2 ((-11) \
+$CellContext`T14^4 - 
+                 232 $CellContext`T14^3 ($CellContext`T24 + $CellContext`U) - 
+                 366 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U)^2 + 
+                 56 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 + \
+($CellContext`T24 + $CellContext`U)^4)) - $CellContext`MH^2 (
+              3072 $CellContext`MT^12 + 
+              256 $CellContext`MT^10 (11 $CellContext`T14 + 
+                14 ($CellContext`T24 + $CellContext`U)) - 
+              128 $CellContext`MT^8 (45 $CellContext`T14^2 - 
+               22 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+               13 ($CellContext`T24 + $CellContext`U)^2) + $CellContext`T14 \
+($CellContext`T24 + $CellContext`U)^3 ((-5) $CellContext`T14^2 - 
+                4 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2) - 
+              32 $CellContext`MT^6 (61 $CellContext`T14^3 + 
+               134 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) - 
+               35 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 - 
+               12 ($CellContext`T24 + $CellContext`U)^3) - 
+              4 $CellContext`MT^4 (25 $CellContext`T14^4 + 
+               236 $CellContext`T14^3 ($CellContext`T24 + $CellContext`U) + 
+               282 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U)^2 - 
+               56 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 - 
+               11 ($CellContext`T24 + $CellContext`U)^4) + $CellContext`MT^2 \
+(-$CellContext`T14^5 - 
+                18 $CellContext`T14^4 ($CellContext`T24 + $CellContext`U) - 
+                134 $CellContext`T14^3 ($CellContext`T24 + $CellContext`U)^2 - 
+                120 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U)^3 + 
+                23 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^4 + 
+                2 ($CellContext`T24 + $CellContext`U)^5))) 
+            X`DiscB[$CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT]/
+            X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] + 
+           2 $CellContext`T14 ((
+               4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 - $CellContext`MH^2 (
+              12 $CellContext`MT^2 + $CellContext`T14 + 
+              3 ($CellContext`T24 + $CellContext`U))) 
+            X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U]^(-1) 
+            X`ScalarC0[$CellContext`MH^2, $CellContext`T14, $CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT]) - 
+         16 $CellContext`MT^2 $CellContext`T14 (16 $CellContext`MT^4 - 
+           4 $CellContext`MH^2 $CellContext`T14 + 
+           8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2)^(-1) ((-4) $CellContext`Pair[
+             $CellContext`e[2], 
+             $CellContext`ec[5]] ($CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[2]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[1]] + $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[5]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[1]] + $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[4]] ($CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[2]] + $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[5]])) + 8 $CellContext`Pair[
+             $CellContext`ec[4], 
+             $CellContext`k[1]] ($CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[5]] $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[5]] + $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`e[2]] $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[2]]) + 8 $CellContext`Pair[
+             $CellContext`e[1], 
+             $CellContext`k[4]] ($CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[5]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`ec[5]] + $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[4]] $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[2]]) + $CellContext`Pair[
+             $CellContext`e[1], 
+             $CellContext`ec[
+             4]] ((2 $CellContext`S - $CellContext`S34 + $CellContext`T - 
+              2 $CellContext`T24) $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[5]] - 4 (($CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[1]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[4]]) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[2]] + $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[5]] ($CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] + $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[4]])))) ((-$CellContext`MH^2 + 
+             4 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U)^(-1) \
+((-2) $CellContext`MH^2 + 
+            4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MH^2 (
+             16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+             8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) (
+            256 $CellContext`MT^8 + 
+            192 $CellContext`MT^6 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) - 
+            48 $CellContext`MT^4 (
+             3 $CellContext`MH^2 $CellContext`T14 - ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^2) + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`T14^2 - 4 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+              5 ($CellContext`T24 + $CellContext`U)^2 + 
+              2 $CellContext`MH^2 ($CellContext`T14 + 
+                3 ($CellContext`T24 + $CellContext`U))) + 
+            4 $CellContext`MT^2 (
+              6 $CellContext`MH^4 $CellContext`T14 + ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^3 - 
+              2 $CellContext`MH^2 $CellContext`T14 (4 $CellContext`T14 + 
+               7 ($CellContext`T24 + $CellContext`U)))) 
+           X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT]/
+           X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+            4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] - (
+            16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+            8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) (
+           256 $CellContext`MT^10 + 
+           256 $CellContext`MT^8 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) - 
+           32 $CellContext`MT^6 (2 $CellContext`MH^2 $CellContext`T14 - 
+            3 ($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2) + \
+$CellContext`MH^2 $CellContext`T14 (4 $CellContext`MH^4 $CellContext`T14 + 
+             2 $CellContext`MH^2 (-$CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 - ($CellContext`T24 + $CellContext`U) ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^2) + 
+           16 $CellContext`MT^4 (
+             2 $CellContext`MH^4 $CellContext`T14 + ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^3 - $CellContext`MH^2 $CellContext`T14 (
+              2 $CellContext`T14 + 
+              3 ($CellContext`T24 + $CellContext`U))) + $CellContext`MT^2 (
+             16 $CellContext`MH^4 $CellContext`T14 ((-2) $CellContext`T14 + \
+$CellContext`T24 + $CellContext`U) + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^4 - 
+             4 $CellContext`MH^2 $CellContext`T14 ($CellContext`T14^2 + 
+              4 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+              3 ($CellContext`T24 + $CellContext`U)^2))) 
+          X`DiscB[$CellContext`T14, $CellContext`MT, $CellContext`MT]/
+          X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+           4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] - \
+($CellContext`MH^4 + 32 $CellContext`MT^4 + 
+            12 $CellContext`MT^2 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 - 
+            2 $CellContext`MH^2 (
+             6 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U))^(-1) (
+            16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+            8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) (
+           2 $CellContext`MH^10 $CellContext`T14 (
+             12 $CellContext`MT^2 - $CellContext`T14 + 
+             3 ($CellContext`T24 + $CellContext`U)) - $CellContext`MH^8 \
+$CellContext`T14 (464 $CellContext`MT^4 + $CellContext`T14^2 - 
+            4 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+            19 ($CellContext`T24 + $CellContext`U)^2 - 
+            8 $CellContext`MT^2 ($CellContext`T14 - 
+             24 ($CellContext`T24 + $CellContext`U))) - $CellContext`MT^2 (
+             4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^4 (
+            40 $CellContext`MT^4 + ($CellContext`T24 + $CellContext`U)^2 + 
+            2 $CellContext`MT^2 ($CellContext`T14 + 
+              7 ($CellContext`T24 + $CellContext`U))) + $CellContext`MH^2 (
+              4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 (
+             832 $CellContext`MT^8 + $CellContext`T14 ($CellContext`T24 + \
+$CellContext`U)^3 + 
+             48 $CellContext`MT^6 (10 $CellContext`T14 + 
+               11 ($CellContext`T24 + $CellContext`U)) + $CellContext`MT^2 \
+($CellContext`T24 + $CellContext`U) (3 $CellContext`T14^2 + 
+               26 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+               7 ($CellContext`T24 + $CellContext`U)^2) + 
+             4 $CellContext`MT^4 (9 $CellContext`T14^2 + 
+               52 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+               27 ($CellContext`T24 + $CellContext`U)^2)) + $CellContext`MH^6 \
+(256 $CellContext`MT^8 + 
+             192 $CellContext`MT^6 (
+               17 $CellContext`T14 + $CellContext`T24 + $CellContext`U) + 
+             16 $CellContext`MT^4 (13 $CellContext`T14^2 + 
+               119 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+               3 ($CellContext`T24 + $CellContext`U)^2) + 
+             3 $CellContext`T14 ($CellContext`T24 + $CellContext`U) \
+($CellContext`T14^2 + 7 ($CellContext`T24 + $CellContext`U)^2) + 
+             4 $CellContext`MT^2 (7 $CellContext`T14^3 + 
+               9 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) + 
+               89 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 + \
+($CellContext`T24 + $CellContext`U)^3)) - $CellContext`MH^4 (
+            3584 $CellContext`MT^10 + 
+            256 $CellContext`MT^8 (40 $CellContext`T14 + 
+              
+              13 ($CellContext`T24 + $CellContext`U)) + $CellContext`T14 \
+($CellContext`T24 + $CellContext`U)^2 (3 $CellContext`T14^2 + 
+              4 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+              9 ($CellContext`T24 + $CellContext`U)^2) + 
+            128 $CellContext`MT^6 (14 $CellContext`T14^2 + 
+              60 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+              9 ($CellContext`T24 + $CellContext`U)^2) + 
+            16 $CellContext`MT^4 (16 $CellContext`T14^3 + 
+              51 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) + 
+              129 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 + 
+              11 ($CellContext`T24 + $CellContext`U)^3) + 
+            2 $CellContext`MT^2 ($CellContext`T14^4 + 
+              28 $CellContext`T14^3 ($CellContext`T24 + $CellContext`U) + 
+              54 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U)^2 + 
+              116 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 + 
+              5 ($CellContext`T24 + $CellContext`U)^4))) 
+          X`DiscB[$CellContext`MH^2 - 
+            4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT]/
+          X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] + 
+          2 $CellContext`MH^2 (16 $CellContext`MT^4 + 
+            2 $CellContext`MH^2 $CellContext`T14 - 
+            2 $CellContext`T14^2 - $CellContext`T14 $CellContext`T24 + \
+$CellContext`T24^2 - $CellContext`T14 $CellContext`U + 
+            2 $CellContext`T24 $CellContext`U + $CellContext`U^2 + \
+$CellContext`MT^2 ((-4) $CellContext`T14 + 
+              8 ($CellContext`T24 + $CellContext`U))) 
+           X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U]^(-1) 
+           X`ScalarC0[$CellContext`MH^2, $CellContext`T14, $CellContext`MH^2 - 
+             4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT]) - 
+         2 ((-4) $CellContext`MT^2 (-$CellContext`MH^2 + 
+             4 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U)^(-1) \
+(-$CellContext`MH^2 + 
+             8 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U)^(-1) \
+(-$CellContext`MH^2 + 8 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U + 
+            2 $CellContext`MT^2 
+             X`DiscB[$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT]) ((-4) $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[5]] ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[2]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]] ($CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[5]])) + 8 $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[1]] ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[5]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`e[2]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]]) + 8 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[4]] ($CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]]) + $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               4]] ((2 $CellContext`S - $CellContext`S34 + $CellContext`T - 
+                2 $CellContext`T24) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] - 4 (($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]]) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] ($CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]])))) - 
+          4 $CellContext`MT^2 (-$CellContext`MH^2 + 
+            8 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U)^(-1) (
+            16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+            8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) 
+          X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+             4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U]^(-1) \
+(((-2) $CellContext`S $CellContext`S34 - $CellContext`S34 $CellContext`T14 + \
+$CellContext`T $CellContext`T14 + 
+             2 $CellContext`MH^2 ($CellContext`S - $CellContext`T24) + 
+             2 $CellContext`T $CellContext`T24) $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`ec[4]] $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`ec[5]] - 
+           4 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+             $CellContext`e[1], 
+             $CellContext`k[4]] $CellContext`Pair[
+             $CellContext`e[2], 
+             $CellContext`k[5]] $CellContext`Pair[
+             $CellContext`ec[4], 
+             $CellContext`ec[5]] - 
+           4 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+             $CellContext`e[1], 
+             $CellContext`ec[5]] $CellContext`Pair[
+             $CellContext`e[2], 
+             $CellContext`k[5]] $CellContext`Pair[
+             $CellContext`ec[4], 
+             $CellContext`k[1]] + 4 $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`ec[
+              5]] (((-2) $CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[2]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[
+                1]] + ($CellContext`S + $CellContext`T14 + $CellContext`T24) \
+$CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[3]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[1]] + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[
+                4]] (((-2) $CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[
+                  2]] + ($CellContext`S + $CellContext`T14 + \
+$CellContext`T24) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]])) - 
+           4 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+             $CellContext`e[1], 
+             $CellContext`k[4]] $CellContext`Pair[
+             $CellContext`e[2], 
+             $CellContext`ec[4]] $CellContext`Pair[
+             $CellContext`ec[5], 
+             $CellContext`k[2]] - 
+           4 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+             $CellContext`e[1], 
+             $CellContext`e[2]] $CellContext`Pair[
+             $CellContext`ec[4], 
+             $CellContext`k[1]] $CellContext`Pair[
+             $CellContext`ec[5], 
+             $CellContext`k[2]] - 8 ($CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[3]] ($CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[1]] - $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[3]]) + ($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[2]] - $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[5]]) $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[3]]) ($CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[3]] $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[2]] + $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[5]] $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[3]]) + 4 $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`ec[
+              4]] (((-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[
+                  1]] + (-$CellContext`MH^2 + $CellContext`T) \
+$CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]]) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[2]] + $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[
+                5]] ((-$CellContext`MH^2 + $CellContext`S34) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[
+                  1]] + (-$CellContext`MH^2 + $CellContext`T) \
+$CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[
+                  4]]))) (-$CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - 
+             8 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U) (
+             2 $CellContext`MH^2 - 
+             4 $CellContext`MT^2 - $CellContext`T14 - $CellContext`T24 - \
+$CellContext`U) 
+            X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MH^2 $CellContext`T14 ($CellContext`MH^2 - 
+             8 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U) (
+             4 $CellContext`MT^2 - $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) 
+            X`DiscB[$CellContext`T14, $CellContext`MT, $CellContext`MT] - (
+            64 $CellContext`MT^8 - 
+            2 $CellContext`MH^2 $CellContext`T14 (-$CellContext`MH^2 + \
+$CellContext`T24 + $CellContext`U)^2 + 
+            48 $CellContext`MT^6 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + 
+            4 $CellContext`MT^4 ((-20) $CellContext`MH^2 $CellContext`T14 + 
+              3 ($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2) + \
+$CellContext`MT^2 (
+              24 $CellContext`MH^4 $CellContext`T14 + ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^3 - 
+              4 $CellContext`MH^2 $CellContext`T14 ($CellContext`T14 + 
+               7 ($CellContext`T24 + $CellContext`U)))) 
+           X`DiscB[$CellContext`MH^2 - 
+             4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] - ($CellContext`MH^2 - 
+            8 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U) (
+            4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) (
+            16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+            8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2)) 
+           X`ScalarC0[$CellContext`MH^2, $CellContext`T14, $CellContext`MH^2 - 
+             4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT])) + 
+         4 (2 $CellContext`MT^2 (16 $CellContext`MT^4 - 
+              4 $CellContext`MH^2 $CellContext`T14 + 
+              8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2)^(-2) (-($CellContext`S34 - $CellContext`T) ((-2) \
+$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + 
+               2 $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] - 
+             4 (2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - 
+              2 $CellContext`U) $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[5]] ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]]) - 
+             4 ($CellContext`S34 - $CellContext`T) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[4]] ($CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]]) + 16 ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) + ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] - $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]]) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) ($CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]])) (-(-$CellContext`MH^2 + 
+                4 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U)^(-1) \
+(12 $CellContext`MH^4 $CellContext`T14 - (
+                4 $CellContext`MT^2 - $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) (
+                 4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 + 
+               2 $CellContext`MH^2 (16 $CellContext`MT^4 - $CellContext`T14^2 - 
+                 6 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 + 
+                 8 $CellContext`MT^2 ((-3) $CellContext`T14 + \
+$CellContext`T24 + $CellContext`U))) + 
+             2 $CellContext`MH^2 (
+                16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+                8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) (
+               1024 $CellContext`MT^12 - 
+               1280 $CellContext`MT^10 ($CellContext`T14 - $CellContext`T24 - \
+$CellContext`U) + 128 $CellContext`MT^8 (7 $CellContext`MH^2 $CellContext`T14 - 
+                 15 $CellContext`T14^2 - 
+                 10 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                 5 ($CellContext`T24 + $CellContext`U)^2) + 
+               32 $CellContext`MT^6 (2 $CellContext`MH^4 $CellContext`T14 - 
+                 5 (5 $CellContext`T14 - $CellContext`T24 - $CellContext`U) \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2 + 
+                 19 $CellContext`MH^2 $CellContext`T14 (
+                   3 $CellContext`T14 + $CellContext`T24 + $CellContext`U)) - 
+               4 $CellContext`MT^4 (
+                5 (7 $CellContext`T14 - $CellContext`T24 - $CellContext`U) \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^3 + 
+                4 $CellContext`MH^4 $CellContext`T14 (55 $CellContext`T14 - 
+                  3 ($CellContext`T24 + $CellContext`U)) - 
+                2 $CellContext`MH^2 $CellContext`T14 (91 $CellContext`T14^2 + 
+                 130 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                 15 ($CellContext`T24 + $CellContext`U)^2)) + \
+$CellContext`MH^2 $CellContext`T14 (
+                 2 $CellContext`MH^4 $CellContext`T14 (3 $CellContext`T14 + 
+                   13 ($CellContext`T24 + $CellContext`U)) - \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2 ($CellContext`T14^2 - 
+                  10 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2) + $CellContext`MH^2 ((-5) \
+$CellContext`T14^3 - 
+                   27 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) - 
+                   33 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 + \
+($CellContext`T24 + $CellContext`U)^3)) + $CellContext`MT^2 (
+                 104 $CellContext`MH^6 $CellContext`T14^2 - (
+                  9 $CellContext`T14 - $CellContext`T24 - $CellContext`U) \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^4 - 
+                 4 $CellContext`MH^4 $CellContext`T14 (37 $CellContext`T14^2 + 
+                  88 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                  3 ($CellContext`T24 + $CellContext`U)^2) + 
+                 2 $CellContext`MH^2 $CellContext`T14 (39 $CellContext`T14^3 + 
+                   127 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) + 
+                   
+                   89 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 + \
+($CellContext`T24 + $CellContext`U)^3))) 
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT]/
+              X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] + 
+             2 $CellContext`T14 (
+                16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+                8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) ((-12) \
+$CellContext`MH^8 $CellContext`T14^2 + $CellContext`MT^2 (
+                  4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^5 - $CellContext`MH^2 (
+                 4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^3 (
+                40 $CellContext`MT^4 + $CellContext`T14 ($CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-4) $CellContext`T14 + 
+                  10 ($CellContext`T24 + $CellContext`U))) - 
+               2 $CellContext`MH^6 $CellContext`T14 (96 $CellContext`MT^4 - 
+                5 $CellContext`T14^2 - 
+                9 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                6 ($CellContext`T24 + $CellContext`U)^2 + $CellContext`MT^2 \
+((-60) $CellContext`T14 + 48 ($CellContext`T24 + $CellContext`U))) + 
+               2 $CellContext`MH^4 $CellContext`T14 (
+                 608 $CellContext`MT^6 + $CellContext`T14^3 - 
+                 5 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) + 
+                 6 ($CellContext`T24 + $CellContext`U)^3 + $CellContext`MT^4 \
+((-64) $CellContext`T14 + 400 ($CellContext`T24 + $CellContext`U)) - 
+                 2 $CellContext`MT^2 (25 $CellContext`T14^2 + 
+                  8 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                  43 ($CellContext`T24 + $CellContext`U)^2))) 
+              X`DiscB[$CellContext`T14, $CellContext`MT, $CellContext`MT]/
+              X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] - 
+             2 ($CellContext`MH^4 + 32 $CellContext`MT^4 + 
+               12 $CellContext`MT^2 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 - 
+               2 $CellContext`MH^2 (
+                6 $CellContext`MT^2 + $CellContext`T24 + \
+$CellContext`U))^(-1) (
+               16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+               8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) (
+              2 $CellContext`MH^12 $CellContext`T14^2 (52 $CellContext`MT^2 - 
+                3 $CellContext`T14 + 
+                13 ($CellContext`T24 + $CellContext`U)) + $CellContext`MT^2 (
+                 4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^5 (
+                16 $CellContext`MT^6 + $CellContext`T14 ($CellContext`T24 + \
+$CellContext`U)^2 + 
+                8 $CellContext`MT^4 (
+                  5 $CellContext`T14 + $CellContext`T24 + $CellContext`U) + \
+$CellContext`MT^2 ($CellContext`T14^2 + 
+                  14 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2)) + $CellContext`MH^10 $CellContext`T14 \
+(64 $CellContext`MT^6 + 5 $CellContext`T14^3 + 
+                3 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) - 
+                97 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 + \
+($CellContext`T24 + $CellContext`U)^3 + $CellContext`MT^4 ((-2320) \
+$CellContext`T14 + 48 ($CellContext`T24 + $CellContext`U)) + 
+                4 $CellContext`MT^2 (3 $CellContext`T14^2 - 
+                  242 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                  3 ($CellContext`T24 + $CellContext`U)^2)) + \
+$CellContext`MH^2 (
+                 4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^3 (
+                512 $CellContext`MT^10 - $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^3 - 
+                64 $CellContext`MT^8 (46 $CellContext`T14 - 
+                 7 ($CellContext`T24 + $CellContext`U)) - 
+                16 $CellContext`MT^6 (26 $CellContext`T14^2 + 
+                 114 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                 9 ($CellContext`T24 + $CellContext`U)^2) - 
+                4 $CellContext`MT^4 (6 $CellContext`T14^3 + 
+                 45 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) + 
+                 90 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 - 
+                 5 ($CellContext`T24 + $CellContext`U)^3) + $CellContext`MT^2 \
+($CellContext`T24 + $CellContext`U) ((-2) $CellContext`T14^3 - 
+                  23 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) - 
+                  22 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 + \
+($CellContext`T24 + $CellContext`U)^3)) + $CellContext`MH^8 $CellContext`T14 (
+                128 $CellContext`MT^8 + $CellContext`T14^4 + 
+                96 $CellContext`MT^6 (
+                  203 $CellContext`T14 - $CellContext`T24 - $CellContext`U) - 
+                12 $CellContext`T14^3 ($CellContext`T24 + $CellContext`U) + 
+                30 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U)^2 + 
+                136 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 - 
+                3 ($CellContext`T24 + $CellContext`U)^4 + 
+                8 $CellContext`MT^4 (157 $CellContext`T14^2 + 
+                  1446 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                  15 ($CellContext`T24 + $CellContext`U)^2) - 
+                2 $CellContext`MT^2 (33 $CellContext`T14^3 - 
+                 205 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) - 
+                 1109 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 + 
+                 17 ($CellContext`T24 + $CellContext`U)^3)) + \
+$CellContext`MH^6 (1024 $CellContext`MT^12 - 
+                256 $CellContext`MT^10 (51 $CellContext`T14 - 
+                 5 ($CellContext`T24 + $CellContext`U)) - 
+                128 $CellContext`MT^8 (609 $CellContext`T14^2 + 
+                 87 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                 5 ($CellContext`T24 + $CellContext`U)^2) - 
+                32 $CellContext`MT^6 (381 $CellContext`T14^3 + 
+                 1892 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) + 
+                 102 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 - 
+                 5 ($CellContext`T24 + $CellContext`U)^3) - $CellContext`T14 \
+($CellContext`T24 + $CellContext`U) (3 $CellContext`T14^4 - 
+                 6 $CellContext`T14^3 ($CellContext`T24 + $CellContext`U) + 
+                 48 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U)^2 + 
+                 86 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 - 
+                 3 ($CellContext`T24 + $CellContext`U)^4) + 
+                4 $CellContext`MT^4 ($CellContext`T14^4 - 
+                  1566 $CellContext`T14^3 ($CellContext`T24 + $CellContext`U) - 
+                  4258 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^2 - 78 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 + 
+                  5 ($CellContext`T24 + $CellContext`U)^4) + \
+$CellContext`MT^2 ((-19) $CellContext`T14^5 + 
+                  43 $CellContext`T14^4 ($CellContext`T24 + $CellContext`U) - 
+                  996 $CellContext`T14^3 ($CellContext`T24 + \
+$CellContext`U)^2 - 
+                  2036 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^3 + 
+                  15 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^4 + \
+($CellContext`T24 + $CellContext`U)^5)) + $CellContext`MH^4 ((-12288) \
+$CellContext`MT^14 + 
+                1024 $CellContext`MT^12 (80 $CellContext`T14 - 
+                  17 ($CellContext`T24 + $CellContext`U)) + 
+                256 $CellContext`MT^10 (621 $CellContext`T14^2 + 
+                  361 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                  40 ($CellContext`T24 + $CellContext`U)^2) + 
+                128 $CellContext`MT^8 (325 $CellContext`T14^3 + 
+                  1187 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) + 
+                  320 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 - 
+                  25 ($CellContext`T24 + $CellContext`U)^3) + 
+                16 $CellContext`MT^6 (157 $CellContext`T14^4 + 
+                  1832 $CellContext`T14^3 ($CellContext`T24 + $CellContext`U) + 
+                  3484 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^2 + 
+                  550 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 - 
+                  35 ($CellContext`T24 + $CellContext`U)^4) + \
+$CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 (3 $CellContext`T14^4 + 
+                  4 $CellContext`T14^3 ($CellContext`T24 + $CellContext`U) + 
+                  24 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U)^2 + 
+                  
+                  22 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 - \
+($CellContext`T24 + $CellContext`U)^4) + 
+                4 $CellContext`MT^4 (46 $CellContext`T14^5 + 
+                  263 $CellContext`T14^4 ($CellContext`T24 + $CellContext`U) + 
+                  1810 $CellContext`T14^3 ($CellContext`T24 + \
+$CellContext`U)^2 + 
+                  2418 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^3 + 
+                  220 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^4 - 
+                  13 ($CellContext`T24 + $CellContext`U)^5) + \
+$CellContext`MT^2 ($CellContext`T14^6 + 
+                  43 $CellContext`T14^5 ($CellContext`T24 + $CellContext`U) + 
+                  122 $CellContext`T14^4 ($CellContext`T24 + \
+$CellContext`U)^2 + 
+                  724 $CellContext`T14^3 ($CellContext`T24 + \
+$CellContext`U)^3 + 
+                  775 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^4 + 25 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^5 - 
+                  2 ($CellContext`T24 + $CellContext`U)^6))) 
+             X`DiscB[$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT]/
+             X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] + 
+             4 (256 $CellContext`MT^10 + 
+               256 $CellContext`MT^8 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) - 
+               32 $CellContext`MT^6 (7 $CellContext`MH^2 $CellContext`T14 - 
+                3 ($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2) + 
+               16 $CellContext`MT^4 (
+                 6 $CellContext`MH^4 $CellContext`T14 + ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^3 - 
+                 2 $CellContext`MH^2 $CellContext`T14 (2 $CellContext`T14 + 
+                  5 ($CellContext`T24 + $CellContext`U))) + $CellContext`MT^2 \
+(($CellContext`T14 + $CellContext`T24 + $CellContext`U)^4 + 
+                 16 $CellContext`MH^4 $CellContext`T14 ((-2) $CellContext`T14 + 
+                   3 ($CellContext`T24 + $CellContext`U)) + 
+                 2 $CellContext`MH^2 $CellContext`T14 (5 $CellContext`T14^2 - 
+                   14 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                   19 ($CellContext`T24 + $CellContext`U)^2)) + 
+               3 $CellContext`MH^2 $CellContext`T14 (
+                 2 $CellContext`MH^4 $CellContext`T14 + ($CellContext`T14 - \
+$CellContext`T24 - $CellContext`U) ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 - 
+                 2 $CellContext`MH^2 ($CellContext`T14^2 + $CellContext`T14 \
+($CellContext`T24 + $CellContext`U) - ($CellContext`T24 + $CellContext`U)^2)))
+                X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                 4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U]^(-1)
+                 X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT]) + 
+           2 $CellContext`MT^2 (16 $CellContext`MT^4 - 
+              4 $CellContext`MH^2 $CellContext`T14 + 
+              8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2)^(-2) (-($CellContext`S34 - $CellContext`T) ((-2) \
+$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + 
+               2 $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] - 
+             4 (2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - 
+              2 $CellContext`U) $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[5]] ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]]) - 
+             4 ($CellContext`S34 - $CellContext`T) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[4]] ($CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]]) + 16 ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) ($CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]])) (-(-$CellContext`MH^2 + 
+                4 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U)^(-1) \
+(64 $CellContext`MT^6 - 3 $CellContext`T14^3 + 
+               5 $CellContext`T14^2 $CellContext`T24 + 
+               9 $CellContext`T14 $CellContext`T24^2 + $CellContext`T24^3 + 
+               5 $CellContext`T14^2 $CellContext`U + 
+               18 $CellContext`T14 $CellContext`T24 $CellContext`U + 
+               3 $CellContext`T24^2 $CellContext`U + 
+               9 $CellContext`T14 $CellContext`U^2 + 
+               3 $CellContext`T24 $CellContext`U^2 + $CellContext`U^3 + 
+               48 $CellContext`MT^4 (
+                 3 $CellContext`T14 + $CellContext`T24 + $CellContext`U) + 
+               2 $CellContext`MH^2 $CellContext`T14 ($CellContext`T14 - 
+                 7 ($CellContext`T24 + $CellContext`U)) + 
+               4 $CellContext`MT^2 ((-14) $CellContext`MH^2 $CellContext`T14 + 
+                 5 $CellContext`T14^2 + 
+                 18 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                 3 ($CellContext`T24 + $CellContext`U)^2)) + (
+                16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+                8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) (
+               4096 $CellContext`MT^14 + 
+               2048 $CellContext`MT^12 (5 $CellContext`T14 + 
+                 3 ($CellContext`T24 + $CellContext`U)) + 
+               256 $CellContext`MT^8 ($CellContext`MH^4 $CellContext`T14 + 
+                 5 ($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2 (
+                   3 $CellContext`T14 + $CellContext`T24 + $CellContext`U) - \
+$CellContext`MH^2 $CellContext`T14 (25 $CellContext`T14 + 
+                  27 ($CellContext`T24 + $CellContext`U))) - 
+               256 $CellContext`MT^10 (26 $CellContext`MH^2 $CellContext`T14 - 
+                5 (7 $CellContext`T14^2 + 
+                 10 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                 3 ($CellContext`T24 + $CellContext`U)^2)) + 
+               16 $CellContext`MT^6 (
+                 16 $CellContext`MH^4 $CellContext`T14 (
+                   8 $CellContext`T14 + $CellContext`T24 + $CellContext`U) + 
+                 5 ($CellContext`T14 + $CellContext`T24 + $CellContext`U)^3 (
+                   11 $CellContext`T14 + 
+                   3 ($CellContext`T24 + $CellContext`U)) - 
+                 4 $CellContext`MH^2 $CellContext`T14 (34 $CellContext`T14^2 + 
+                  83 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                  43 ($CellContext`T24 + $CellContext`U)^2)) + \
+$CellContext`MT^2 (($CellContext`T14 + $CellContext`T24 + $CellContext`U)^5 (
+                   5 $CellContext`T14 + $CellContext`T24 + $CellContext`U) + 
+                 48 $CellContext`MH^6 $CellContext`T14^2 (10 $CellContext`T14 - 
+                   3 ($CellContext`T24 + $CellContext`U)) + 
+                 2 $CellContext`MH^2 $CellContext`T14 ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^2 ($CellContext`T14^2 - 
+                   56 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                   21 ($CellContext`T24 + $CellContext`U)^2) - 
+                 16 $CellContext`MH^4 $CellContext`T14 (14 $CellContext`T14^3 + 
+                  3 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) - 
+                  21 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 - \
+($CellContext`T24 + $CellContext`U)^3)) - 
+               8 $CellContext`MT^4 (
+                36 $CellContext`MH^6 $CellContext`T14^2 - ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^4 (13 $CellContext`T14 + 
+                 3 ($CellContext`T24 + $CellContext`U)) + 
+                12 $CellContext`MH^4 $CellContext`T14 (3 $CellContext`T14^2 - 
+                  15 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - \
+($CellContext`T24 + $CellContext`U)^2) + 
+                2 $CellContext`MH^2 $CellContext`T14 (17 $CellContext`T14^3 + 
+                  84 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) + 
+                  99 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 + 
+                  32 ($CellContext`T24 + $CellContext`U)^3)) - \
+$CellContext`MH^2 $CellContext`T14 (64 $CellContext`MH^6 $CellContext`T14^2 - 
+                6 $CellContext`MH^4 $CellContext`T14 (7 $CellContext`T14^2 + 
+                 12 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                 3 ($CellContext`T24 + $CellContext`U)^2) - ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^3 (2 $CellContext`T14^2 - 
+                 5 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - \
+($CellContext`T24 + $CellContext`U)^2) + $CellContext`MH^2 (
+                  7 $CellContext`T14^4 + 
+                  26 $CellContext`T14^3 ($CellContext`T24 + $CellContext`U) - 
+                  6 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U)^2 - 
+                  26 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 - \
+($CellContext`T24 + $CellContext`U)^4))) 
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT]/
+              X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] - 
+             2 $CellContext`T14^2 (
+               16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+               8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) (
+              9 $CellContext`MT^2 (
+                 4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^4 - 
+              6 $CellContext`MH^6 $CellContext`T14 (
+               20 $CellContext`MT^2 + $CellContext`T14 + 
+               5 ($CellContext`T24 + $CellContext`U)) - $CellContext`MH^2 (
+                4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 (
+               104 $CellContext`MT^4 + $CellContext`T14 (-$CellContext`T14 + 
+                 10 ($CellContext`T24 + $CellContext`U)) + $CellContext`MT^2 (
+                 86 $CellContext`T14 + 
+                 26 ($CellContext`T24 + $CellContext`U))) + $CellContext`MH^4 \
+$CellContext`T14 (1040 $CellContext`MT^4 + 5 $CellContext`T14^2 + 
+                28 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                39 ($CellContext`T24 + $CellContext`U)^2 + 
+                8 $CellContext`MT^2 (19 $CellContext`T14 + 
+                  52 ($CellContext`T24 + $CellContext`U)))) 
+             X`DiscB[$CellContext`T14, $CellContext`MT, $CellContext`MT]/
+             X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] + \
+($CellContext`MH^4 + 32 $CellContext`MT^4 + 
+                12 $CellContext`MT^2 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 - 
+                2 $CellContext`MH^2 (
+                 6 $CellContext`MT^2 + $CellContext`T24 + \
+$CellContext`U))^(-1) (
+                16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+                8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) (
+               64 $CellContext`MH^12 $CellContext`T14^3 + 
+               2 $CellContext`MH^10 $CellContext`T14^2 (144 $CellContext`MT^4 - 
+                 27 $CellContext`T14^2 - 
+                 130 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                 9 ($CellContext`T24 + $CellContext`U)^2 + $CellContext`MT^2 \
+((-744) $CellContext`T14 + 
+                   72 ($CellContext`T24 + $CellContext`U))) - \
+$CellContext`MH^8 $CellContext`T14 (256 $CellContext`MT^8 - 
+                17 $CellContext`T14^4 - 
+                190 $CellContext`T14^3 ($CellContext`T24 + $CellContext`U) - 
+                400 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U)^2 + 
+                62 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 + \
+($CellContext`T24 + $CellContext`U)^4 + 
+                128 $CellContext`MT^6 (43 $CellContext`T14 + 
+                  2 ($CellContext`T24 + $CellContext`U)) - 
+                32 $CellContext`MT^4 (404 $CellContext`T14^2 - 
+                 117 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                 3 ($CellContext`T24 + $CellContext`U)^2) - 
+                8 $CellContext`MT^2 (159 $CellContext`T14^3 + 
+                 580 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) - 
+                 105 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 - 
+                 2 ($CellContext`T24 + $CellContext`U)^3)) - \
+$CellContext`MT^2 (
+                 4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^4 (640 $CellContext`MT^8 + 
+                32 $CellContext`MT^6 (27 $CellContext`T14 + 
+                  17 ($CellContext`T24 + $CellContext`U)) - 
+                24 $CellContext`MT^4 (19 $CellContext`T14^2 - 
+                 22 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                 7 ($CellContext`T24 + $CellContext`U)^2) + ($CellContext`T24 + \
+$CellContext`U) ((-2) $CellContext`T14^3 - 
+                  15 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) + 
+                  6 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 + \
+($CellContext`T24 + $CellContext`U)^3) + 
+                2 $CellContext`MT^2 ((-7) $CellContext`T14^3 - 
+                  87 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) + 
+                  51 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 + 
+                  11 ($CellContext`T24 + $CellContext`U)^3)) + \
+$CellContext`MH^6 $CellContext`T14 (9728 $CellContext`MT^10 + 
+                 256 $CellContext`MT^8 (148 $CellContext`T14 + 
+                   41 ($CellContext`T24 + $CellContext`U)) - 
+                 192 $CellContext`MT^6 (273 $CellContext`T14^2 - 
+                  172 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                  23 ($CellContext`T24 + $CellContext`U)^2) - 
+                 32 $CellContext`MT^4 (326 $CellContext`T14^3 + 
+                  905 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) - 
+                  333 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 - 
+                  28 ($CellContext`T24 + $CellContext`U)^3) + \
+($CellContext`T24 + $CellContext`U) ((-51) $CellContext`T14^4 - 
+                   246 $CellContext`T14^3 ($CellContext`T24 + $CellContext`U) - 
+                   280 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^2 + 78 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 + 
+                   3 ($CellContext`T24 + $CellContext`U)^4) + 
+                 2 $CellContext`MT^2 ((-221) $CellContext`T14^4 - 
+                   1664 $CellContext`T14^3 ($CellContext`T24 + \
+$CellContext`U) - 
+                   2542 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^2 + 
+                   752 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 + 
+                   43 ($CellContext`T24 + $CellContext`U)^4)) + \
+$CellContext`MH^2 (
+                  4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 (3072 $CellContext`MT^12 + 
+                 512 $CellContext`MT^10 (43 $CellContext`T14 + 
+                   7 ($CellContext`T24 + $CellContext`U)) + $CellContext`T14 \
+($CellContext`T24 + $CellContext`U)^3 ((-17) $CellContext`T14^2 + 
+                   6 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2) + 
+                 128 $CellContext`MT^8 (2 $CellContext`T14^2 + 
+                   155 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                   13 ($CellContext`T24 + $CellContext`U)^2) - 
+                 32 $CellContext`MT^6 (208 $CellContext`T14^3 - 
+                  24 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) - 
+                  209 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 - 
+                  12 ($CellContext`T24 + $CellContext`U)^3) + 
+                 4 $CellContext`MT^4 ((-83) $CellContext`T14^4 - 
+                   782 $CellContext`T14^3 ($CellContext`T24 + $CellContext`U) + 
+                   108 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^2 + 
+                   254 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 + 
+                   11 ($CellContext`T24 + $CellContext`U)^4) + 
+                 2 $CellContext`MT^2 (-$CellContext`T14^5 - 
+                   27 $CellContext`T14^4 ($CellContext`T24 + $CellContext`U) - 
+                   
+                   217 $CellContext`T14^3 ($CellContext`T24 + \
+$CellContext`U)^2 + 
+                   44 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^3 + 
+                   32 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^4 + \
+($CellContext`T24 + $CellContext`U)^5)) - $CellContext`MH^4 (
+                4096 $CellContext`MT^14 + 
+                2048 $CellContext`MT^12 (49 $CellContext`T14 + 
+                  3 ($CellContext`T24 + $CellContext`U)) + 
+                1280 $CellContext`MT^10 (95 $CellContext`T14^2 + 
+                  96 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                  3 ($CellContext`T24 + $CellContext`U)^2) - 
+                256 $CellContext`MT^8 (401 $CellContext`T14^3 - 
+                 497 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) - 
+                 238 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 - 
+                 5 ($CellContext`T24 + $CellContext`U)^3) - 
+                16 $CellContext`MT^6 (2297 $CellContext`T14^4 + 
+                 4760 $CellContext`T14^3 ($CellContext`T24 + $CellContext`U) - 
+                 3282 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^2 - 
+                 968 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 - 
+                 15 ($CellContext`T24 + $CellContext`U)^4) + $CellContext`T14 \
+($CellContext`T24 + $CellContext`U)^2 ((-51) $CellContext`T14^4 - 
+                  138 $CellContext`T14^3 ($CellContext`T24 + $CellContext`U) - 
+                  80 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U)^2 + 
+                  42 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 + 
+                  3 ($CellContext`T24 + $CellContext`U)^4) - 
+                8 $CellContext`MT^4 (431 $CellContext`T14^5 + 
+                 2349 $CellContext`T14^4 ($CellContext`T24 + $CellContext`U) + 
+                 2514 $CellContext`T14^3 ($CellContext`T24 + \
+$CellContext`U)^2 - 
+                 1334 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^3 - 
+                 261 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^4 - 
+                 3 ($CellContext`T24 + $CellContext`U)^5) + $CellContext`MT^2 \
+((-35) $CellContext`T14^6 - 
+                  920 $CellContext`T14^5 ($CellContext`T24 + $CellContext`U) - 
+                  2953 $CellContext`T14^4 ($CellContext`T24 + \
+$CellContext`U)^2 - 
+                  2192 $CellContext`T14^3 ($CellContext`T24 + \
+$CellContext`U)^3 + 
+                  1067 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^4 + 
+                  136 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^5 + \
+($CellContext`T24 + $CellContext`U)^6))) 
+              X`DiscB[$CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT]/
+              X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] - 
+             6 $CellContext`T14 (128 $CellContext`MT^8 + 
+              32 $CellContext`MT^6 (5 $CellContext`T14 + 
+                3 ($CellContext`T24 + $CellContext`U)) + 
+              2 $CellContext`MT^2 (
+                20 $CellContext`MH^4 $CellContext`T14 + ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^2 (
+                  7 $CellContext`T14 + $CellContext`T24 + $CellContext`U) - 
+                12 $CellContext`MH^2 $CellContext`T14 (2 $CellContext`T14 + 
+                 3 ($CellContext`T24 + $CellContext`U))) + 
+              8 $CellContext`MT^4 ((-20) $CellContext`MH^2 $CellContext`T14 + 
+                3 (3 $CellContext`T14^2 + 
+                  4 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2)) + $CellContext`T14 (($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^3 + 
+                2 $CellContext`MH^4 ($CellContext`T14 + 
+                  5 ($CellContext`T24 + $CellContext`U)) - 
+                2 $CellContext`MH^2 ($CellContext`T14^2 + 
+                 5 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                 4 ($CellContext`T24 + $CellContext`U)^2))) 
+             X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U]^(-1) 
+             X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT]))))}, 0, 3, 1],
+    Editable->False], ")"}], "-", 
+  RowBox[{
+   FractionBox["1", 
+    RowBox[{"MW", " ", "SW"}]], 
+   RowBox[{"2", " ", 
+    SuperscriptBox["Alfas", "2"], " ", "c1", " ", "EL", " ", 
+    SuperscriptBox["MT", "2"], " ", 
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{"(", 
+       InterpretationBox[
+        RowBox[{
+         RowBox[{"(", 
+          RowBox[{
+           RowBox[{
+            FractionBox["1", "T"], 
+            RowBox[{"(", 
+             RowBox[{
+              RowBox[{
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{"4", " ", 
+                  RowBox[{"(", 
+                   RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    FractionBox["T", "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                    ")"}]}]}]}], ")"}], " ", 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                 RowBox[{"2", " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+              
+              RowBox[{
+               FractionBox["1", 
+                RowBox[{
+                 SuperscriptBox["MH", "2"], "-", "T"}]], 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  SuperscriptBox[
+                   RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                  SuperscriptBox[
+                   RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}]}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 ")"}]}]}], "-", 
+              RowBox[{"16", " ", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], "2"]}]], 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}]}], ")"}]}]}], "+", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}]}]], 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                   
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}]}], 
+                ")"}]}], "-", 
+              RowBox[{
+               FractionBox["1", 
+                RowBox[{
+                 SuperscriptBox["MH", "2"], "-", "T"}]], 
+               RowBox[{"4", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"DiscB", "[", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                  "-", 
+                  RowBox[{"DiscB", "[", 
+                   RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    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", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    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[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}]}], ")"}]}], "+", 
+           RowBox[{
+            FractionBox["1", 
+             RowBox[{
+              RowBox[{"2", " ", 
+               SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", "U"}]], 
+            RowBox[{"(", 
+             RowBox[{
+              RowBox[{
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{"4", " ", 
+                  RowBox[{"(", 
+                   RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "+", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}]}], "+", 
+                    FractionBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], "\[Epsilon]"], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                    ")"}]}]}]}], ")"}], " ", 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                 RowBox[{"2", " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+              
+              RowBox[{
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}]], 
+                  RowBox[{"8", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], "2"]], 
+                  RowBox[{"8", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}]}], 
+                ")"}], " ", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "5", "]"}], ",", 
+                 RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+              RowBox[{
+               FractionBox["1", 
+                RowBox[{
+                 RowBox[{"-", 
+                  SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                 "U"}]], 
+               RowBox[{"4", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", 
+                   RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                  RowBox[{"DiscB", "[", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "-", 
+                    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[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 ")"}]}]}], "+", 
+              RowBox[{
+               FractionBox["1", 
+                RowBox[{
+                 RowBox[{"-", 
+                  SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                 "U"}]], 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", 
+                   SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                  SuperscriptBox[
+                   RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    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[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 ")"}]}]}], "-", 
+              RowBox[{
+               FractionBox["1", "T24"], 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{
+                  RowBox[{"-", "8"}], " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"3", " ", "S34"}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "T14"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", "S34", "+", "T", "-", 
+                    RowBox[{"3", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "+", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "+", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    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[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}]}], "-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], "2"]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"3", " ", "S34"}], "+", "T", "-", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "T14"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", "S34", "+", "T", "-", 
+                    RowBox[{"2", " ", "T24"}], "-", 
+                    RowBox[{"3", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "+", "T", "-", 
+                    RowBox[{"2", " ", "T24"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "+", "T", "-", 
+                    RowBox[{"2", " ", "T24"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    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[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}]}], ")"}]}], "+", 
+                 RowBox[{
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}]], 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}]}], "+", 
+                    FractionBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], "\[Epsilon]"], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                    ")"}]}]}]}], ")"}], " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "S"}], "+", "T14"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    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", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    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[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}]], 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "T14"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    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", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    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[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T24", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T24", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "T14"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T", "-", "T24", "-", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "S34"}], "+", "T", "-", "T24", "+", "U"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "+", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "T14"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    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", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    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[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"3", " ", "S34"}], "+", "T", "-", 
+                    RowBox[{"2", " ", "T24"}], "-", 
+                    RowBox[{"3", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"3", " ", "S34"}], "+", "T", "-", 
+                    RowBox[{"2", " ", "T24"}], "-", 
+                    RowBox[{"3", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "T14"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", 
+                    RowBox[{"3", " ", "S34"}], "+", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T24"}], "-", 
+                    RowBox[{"5", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"5", " ", "S34"}], "+", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T24"}], "+", 
+                    RowBox[{"3", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}]}], ")"}]}], "+", 
+              RowBox[{
+               FractionBox["1", "S"], 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{
+                  RowBox[{"-", "8"}], " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], "2"]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", "S", "-", 
+                    RowBox[{"2", " ", "S34"}], "-", "T14", "-", "T24"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "-", "S", "+", 
+                    RowBox[{"2", " ", "S34"}], "+", "T14", "+", "T24"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"3", " ", "S"}], "+", "T14", "+", "T24", "+", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"3", " ", "S"}], "-", 
+                    RowBox[{"4", " ", "T"}], "-", "T14", "-", "T24"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T14"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    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[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}]}], "-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", "S34", "+", "T", "-", 
+                    RowBox[{"3", " ", "U"}]}], ")"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", "S34", "-", 
+                    RowBox[{"3", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T14"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    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[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}]}], ")"}]}], "+", 
+                 RowBox[{
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}]], 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}]}], "+", 
+                    FractionBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], "\[Epsilon]"], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                    ")"}]}]}]}], ")"}], " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T14"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    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", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                   ")"}]}], "+", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S", "-", "T14", "-", 
+                    "T24"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "7"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"5", " ", "S"}], "+", 
+                    RowBox[{"8", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"5", " ", "S"}], "-", 
+                    RowBox[{"3", " ", "T14"}], "-", 
+                    RowBox[{"3", " ", "T24"}], "-", 
+                    RowBox[{"8", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    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", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", 
+                    RowBox[{"4", " ", "S34"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    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[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", 
+                    RowBox[{"4", " ", "S34"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "+", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}]], 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T14"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", 
+                    RowBox[{"2", " ", "T"}], "+", "T14", "+", "T24"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", "T14", "+", "T24", "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    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[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}]}], " ", 
+                    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", "[", "2", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}]}], ")"}]}]}], ")"}]}], 
+           "+", 
+           RowBox[{
+            FractionBox["1", "S34"], 
+            RowBox[{"(", 
+             RowBox[{
+              RowBox[{
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{"4", " ", 
+                  RowBox[{"(", 
+                   RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    FractionBox["S34", "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                    ")"}]}]}]}], ")"}], " ", 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                 RowBox[{"2", " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+              
+              RowBox[{
+               FractionBox["1", 
+                RowBox[{
+                 SuperscriptBox["MH", "2"], "-", "S34"}]], 
+               RowBox[{"4", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"DiscB", "[", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                  "-", 
+                  RowBox[{"DiscB", "[", 
+                   RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    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[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "+", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{"-", 
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                   RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                    " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}]}], 
+                 "+", 
+                 RowBox[{
+                  FractionBox["1", 
+                   SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], "2"]], 
+                  RowBox[{"8", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}]}], 
+                ")"}]}], "-", 
+              RowBox[{
+               FractionBox["1", 
+                RowBox[{
+                 SuperscriptBox["MH", "2"], "-", "S34"}]], 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  SuperscriptBox[
+                   RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                  SuperscriptBox[
+                   RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"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[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 ")"}]}]}], "+", 
+              RowBox[{
+               FractionBox["1", "S"], 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    FractionBox["S34", "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                    ")"}]}]}]}], ")"}], " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T"}], "-", "T14", "+", "T24", "+", "U"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    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[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    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[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                   ")"}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                   " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "-", "T24", "-", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"2", " ", "S"}], "-", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    RowBox[{"8", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "7"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"3", " ", "S34"}], "+", 
+                    RowBox[{"8", " ", "T"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", "S34", "+", 
+                    RowBox[{"2", " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "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", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"3", " ", "S34"}], "+", 
+                    RowBox[{"4", " ", "T14"}], "+", 
+                    RowBox[{"4", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"3", " ", "S34"}], "+", 
+                    RowBox[{"4", " ", "T14"}], "+", 
+                    RowBox[{"4", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    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[{"8", " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "U"}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "U"}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", 
+                    RowBox[{"4", " ", "T"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "-", "T24", "-", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    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[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], "2"]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    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[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T14"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}]}], ")"}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "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", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    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[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "-", "T24", "-", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "-", "T14", "-", "T24", "-", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}]}], ")"}]}], "+", 
+              RowBox[{
+               FractionBox["1", 
+                RowBox[{
+                 SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", "T14"}]], 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    FractionBox["S34", "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                    ")"}]}]}]}], ")"}], " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    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[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "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[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", "T24", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    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[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                   ")"}]}], "-", 
+                 RowBox[{"8", " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], "2"]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", 
+                    RowBox[{"4", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"4", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", 
+                    RowBox[{"2", " ", "S"}], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "+", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S"}], "+", "S34", "-", 
+                    RowBox[{"2", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"4", " ", "T"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}]}], ")"}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S"}], "-", "T24", "-", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", "S", "-", "S34", "-", "T",
+                     "+", "T14"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    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[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                   " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S"}], "-", "T24", "-", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "-", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    RowBox[{"6", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S"}], "+", "S34", "-", 
+                    RowBox[{"2", " ", "T"}], "+", 
+                    RowBox[{"6", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "+", 
+                    RowBox[{"2", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    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[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "+", 
+                    RowBox[{"2", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "+", 
+                    RowBox[{"2", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}]}], ")"}]}]}], ")"}]}], 
+           "+", 
+           RowBox[{
+            FractionBox["1", "U"], 
+            RowBox[{"(", 
+             RowBox[{
+              RowBox[{"4", " ", 
+               RowBox[{"(", 
+                RowBox[{"2", "+", 
+                 FractionBox["1", "\[Epsilon]"], "+", 
+                 RowBox[{"DiscB", "[", 
+                  RowBox[{"U", ",", "MT", ",", "MT"}], "]"}], "+", 
+                 RowBox[{"Log", "[", 
+                  FractionBox[
+                   SuperscriptBox["\[Micro]", "2"], 
+                   SuperscriptBox["MT", "2"]], "]"}]}], ")"}], " ", 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                 RowBox[{"2", " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+              
+              RowBox[{
+               FractionBox["1", 
+                RowBox[{
+                 SuperscriptBox["MH", "2"], "-", "U"}]], 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  SuperscriptBox[
+                   RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                  SuperscriptBox[
+                   RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 ")"}]}]}], "-", 
+              RowBox[{"16", " ", 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}]}]], 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                    RowBox[{"3", " ", "U"}], "-", 
+                    FractionBox["U", "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 "+", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], "2"]}]], 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U", "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    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", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], "+", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}]}]], 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                   
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    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", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}]}], 
+                ")"}]}], "-", 
+              RowBox[{
+               FractionBox["1", 
+                RowBox[{
+                 SuperscriptBox["MH", "2"], "-", "U"}]], 
+               RowBox[{"4", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"DiscB", "[", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                  "-", 
+                  RowBox[{"DiscB", "[", 
+                   RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "-", 
+              RowBox[{
+               FractionBox["1", 
+                RowBox[{
+                 SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                 "T24"}]], 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{"4", " ", 
+                  RowBox[{"(", 
+                   RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}], " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    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", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "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", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    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", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", "T", "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    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[{
+                    SuperscriptBox["MH", "2"], "-", "U"}]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                    RowBox[{"3", " ", "U"}], "-", 
+                    FractionBox["U", "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    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", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "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", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    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", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", "T", "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    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", 
+                   SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], "2"]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U", "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "-", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                   
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "S34"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "T"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}]], 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "+", "T14", "+", 
+                    "T24", "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    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", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "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", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    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[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                   
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"2", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"6", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"6", " ", "S34"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "-", 
+                    RowBox[{"2", " ", "T24"}], "+", 
+                    RowBox[{"3", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    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", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", 
+                    RowBox[{"2", " ", "S"}], "-", 
+                    RowBox[{"2", " ", "T"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "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", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", 
+                    RowBox[{"2", " ", "S"}], "-", 
+                    RowBox[{"2", " ", "T"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    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[{"16", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}]}], ")"}]}], "-", 
+              RowBox[{
+               FractionBox["1", 
+                RowBox[{
+                 SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", "T14"}]], 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{"4", " ", 
+                  RowBox[{"(", 
+                   RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}], " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    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", "[", "5", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", "T14"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    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", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                   ")"}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                    RowBox[{"3", " ", "U"}], "-", 
+                    FractionBox["U", "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    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", "[", "5", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", "T14"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    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", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                   
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", "U"}], ")"}], " ", 
+                    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[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "S34"}], "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"4", " ", "T"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", 
+                    RowBox[{"2", " ", "S"}], "-", 
+                    RowBox[{"2", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    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", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    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", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], "2"]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U", "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    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[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"2", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "S"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    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", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    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", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                   
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T14"}], "-", "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S34"}], "+", 
+                    RowBox[{"2", " ", "T24"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"6", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", 
+                    RowBox[{"6", " ", "S"}], "-", 
+                    RowBox[{"2", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "-", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    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", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "-", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    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", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    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", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    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", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}]], 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T14"}], "-", "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", "T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", "S", "-", "T", "+", "T14",
+                     "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    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", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    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", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    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", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    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", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}]}], ")"}]}]}], ")"}]}], 
+           "+", 
+           RowBox[{
+            FractionBox["1", "T24"], 
+            RowBox[{"(", 
+             RowBox[{
+              RowBox[{
+               FractionBox["1", "T"], 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{"-", 
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}]], 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "S34", "-", "T14", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "S34", "+", "T14", "-", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    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[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}]}], "+", 
+                 RowBox[{
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}]], 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    FractionBox["T", "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                    ")"}]}]}]}], ")"}], " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "S34", "-", "T14", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+                 RowBox[{"8", " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                    
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", "T", "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", "T", "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "S34"}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "S34", "-", "T14", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], "+", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], "2"]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", "T", "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", "T", "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    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", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "S34"}], "+", "T", "+", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "S34", "-", "T14", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", 
+                    RowBox[{"2", " ", "T24"}], "+", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}]}], ")"}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                   
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "S34"}], "+", "T", "+", 
+                    RowBox[{"2", " ", "T24"}], "+", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "S34"}], "+", "T", "+", 
+                    RowBox[{"2", " ", "T24"}], "+", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "S34", "-", "T14", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{"16", " ", 
+                    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[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"8", " ", "S34"}], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", "T", "+", 
+                    RowBox[{"2", " ", "T14"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T24"}], "-", 
+                    RowBox[{"8", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}]}], ")"}]}], "+", 
+              RowBox[{
+               FractionBox["1", 
+                RowBox[{
+                 SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", "T14"}]], 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{
+                  RowBox[{"-", "2"}], " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "S34"}], " ", "T"}], "+", 
+                    RowBox[{"S34", " ", "T14"}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "U"}], ")"}]}], "+", 
+                    RowBox[{"T", " ", "U"}], "+", 
+                    RowBox[{"T14", " ", "U"}], "-", 
+                    RowBox[{"S", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["S34", "2"]}], "-", 
+                    RowBox[{"4", " ", "S34", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "S34", " ", "T14"}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "U"}], ")"}]}], "+", 
+                    RowBox[{"4", " ", "T", " ", "U"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "U"}], "+", 
+                    SuperscriptBox["U", "2"], "-", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"4", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"4", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"32", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", "S34"}], "+", "U"}], ")"}], " ", 
+                    
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", "S34"}], "+", "U"}], ")"}], " ", 
+                    
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], 
+                    ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}]}], 
+                    ")"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+                 RowBox[{
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "S"}], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T14"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    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", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], ")"}]}],
+                     "+", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], 
+                    "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", "T24", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}]}], 
+                    ")"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "-", 
+                 RowBox[{"4", " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["S34", "2"]}], "-", 
+                    RowBox[{"2", " ", "S34", " ", "T"}], "-", 
+                    RowBox[{"S34", " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "S34"}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "-", 
+                    RowBox[{"3", " ", "U"}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "T", " ", "U"}], "+", 
+                    RowBox[{"4", " ", "T14", " ", "U"}], "+", 
+                    RowBox[{"T24", " ", "U"}], "+", 
+                    SuperscriptBox["U", "2"]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T24", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "S34"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "S34", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T", " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T24", " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}]}], 
+                    ")"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], ")"}]}],
+                     "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "U"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    SuperscriptBox["T", "2"], "-", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "-", 
+                    SuperscriptBox["T24", "2"], "-", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], ")"}]}],
+                     "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "+", 
+                    RowBox[{"5", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"80", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"10", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"7", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"7", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"10", " ", "T"}], "+", 
+                    RowBox[{"10", " ", "T14"}], "+", 
+                    RowBox[{"7", " ", "T24"}]}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14"}], 
+                    ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "192"}], " ", 
+                    SuperscriptBox["MT", "6"]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "3"]}], "-", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T", "2"], " ", "T14"}], "-", 
+                    RowBox[{"9", " ", "T", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "3"]}], "-", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", "T"}], "+", 
+                    RowBox[{"9", " ", "T14"}], "-", "T24"}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T24"}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"5", " ", "T", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"5", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    SuperscriptBox["T24", "3"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"18", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"2", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", "T14"}], "+", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", "T"}], "+", 
+                    RowBox[{"8", " ", "T14"}], "-", 
+                    RowBox[{"4", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"T", " ", "T24"}], "-", 
+                    RowBox[{"T14", " ", "T24"}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T24"}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14"}], 
+                    ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", "T14"}], "+", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "-", "T24"}], ")"}]}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}]}], 
+                    ")"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], ")"}], 
+                    "2"]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "U"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    SuperscriptBox["T", "2"], "-", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "-", 
+                    SuperscriptBox["T24", "2"], "-", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], ")"}]}],
+                     "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "80"}], " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T", "2"]}], "-", 
+                    RowBox[{"10", " ", "T", " ", "T14"}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"4", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"4", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "+", "T24"}], ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T"}], "+", 
+                    RowBox[{"5", " ", "T14"}], "+", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"24", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"6", " ", "T"}], "+", 
+                    RowBox[{"6", " ", "T14"}], "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "-", 
+                    "T24"}], ")"}], "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T24"}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14"}], 
+                    ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "6"], " ", "T24"}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "3"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", "T14"}], "+", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "T14"}], "-", 
+                    RowBox[{"5", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"3", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"3", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "T14"}], "-", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"10", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"8", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"8", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", "T14"}], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"T", " ", "T24"}], "-", 
+                    RowBox[{"T14", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}]}], 
+                    ")"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], ")"}], 
+                    "2"]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}],
+          "+", 
+         RowBox[{
+          FractionBox["1", 
+           RowBox[{
+            RowBox[{"(", 
+             RowBox[{
+              SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", "T14"}], 
+             ")"}], " ", "T24"}]], 
+          RowBox[{
+           RowBox[{"(", 
+            RowBox[{
+             RowBox[{
+              RowBox[{"(", 
+               RowBox[{"8", " ", 
+                SuperscriptBox["MT", "2"], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"8", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "S"}], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T14"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    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", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+                  RowBox[{"8", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                  RowBox[{"4", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   SuperscriptBox["MH", "2"], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "-", 
+                    RowBox[{"4", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}], " ", 
+                   RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T24"}], "+", 
+                    RowBox[{"T24", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", 
+                    RowBox[{"5", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "-", 
+                    RowBox[{"5", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"10", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}], " ", 
+                   RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                  RowBox[{"T24", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "-", "T24"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], " ", 
+                   RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                   RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24"}], "]"}]}], "+", 
+                  RowBox[{"2", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"T14", " ", "T24"}], "-", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", "T"}], "-", 
+                    RowBox[{"3", " ", "T14"}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", "T14"}], "+", "T24"}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "3"], "+", 
+                    SuperscriptBox["T14", "3"], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"T14", " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "20"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MH", "4"]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"6", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "20"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                   RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}]}], 
+                 ")"}]}], ")"}], "/", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"16", " ", 
+                   SuperscriptBox["MT", "4"]}], "+", 
+                  SuperscriptBox["T", "2"], "+", 
+                  SuperscriptBox["T14", "2"], "-", 
+                  RowBox[{"4", " ", 
+                   SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                  RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                  SuperscriptBox["T24", "2"], "+", 
+                  RowBox[{"2", " ", "T", " ", 
+                   RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                  RowBox[{"8", " ", 
+                   SuperscriptBox["MT", "2"], " ", 
+                   RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], ")"}], 
+                " ", 
+                RowBox[{"Kallen\[Lambda]", "[", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], ",", 
+                  RowBox[{
+                   SuperscriptBox["MH", "2"], "-", 
+                   RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                  "T24"}], "]"}]}], ")"}]}], "-", 
+             RowBox[{"2", " ", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{"-", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "S34"}], " ", "T"}], "+", 
+                    RowBox[{"S34", " ", "T14"}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "U"}], ")"}]}], "+", 
+                    RowBox[{"T", " ", "U"}], "+", 
+                    RowBox[{"T14", " ", "U"}], "-", 
+                    RowBox[{"S", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", "T24", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "8"]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "T14"}], 
+                    ")"}], "2"], " ", "T24"}], "+", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"6", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"6", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "20"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "3"], "+", 
+                    SuperscriptBox["T14", "3"], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"T14", " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "28"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"24", " ", 
+                    SuperscriptBox["MH", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"6", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "28"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "-", 
+                    "T24"}], ")"}], " ", "T24", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}]}], 
+                    ")"}]}], ")"}], "/", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24"}], "]"}]}], ")"}]}], ")"}]}], "+", 
+                RowBox[{
+                 RowBox[{"(", 
+                  RowBox[{"4", " ", 
+                   SuperscriptBox["MT", "2"], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["S34", "2"]}], "-", 
+                    RowBox[{"4", " ", "S34", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "S34", " ", "T14"}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "U"}], ")"}]}], "+", 
+                    RowBox[{"4", " ", "T", " ", "U"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "U"}], "+", 
+                    SuperscriptBox["U", "2"], "-", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"4", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"4", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"32", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", "S34"}], "+", "U"}], ")"}], " ", 
+                    
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", "S34"}], "+", "U"}], ")"}], " ", 
+                    
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MT", "2"]}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "4"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "6"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"96", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"8", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"3", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"3", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"10", " ", "T"}], "+", 
+                    RowBox[{"10", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "-", "T24"}], ")"}], " ", 
+                    "T24"}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "-", "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "3"]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"112", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"10", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}]}], "-", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"96", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"6", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"22", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"22", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"T14", " ", "T24"}], "-", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", "T14"}], "+", "T24"}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "3"], "+", 
+                    SuperscriptBox["T14", "3"], "+", 
+                    RowBox[{"17", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"7", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T14"}], "+", 
+                    RowBox[{"17", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"34", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "10"]}], "+", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "T14"}], "-", "T24"}], ")"}]}], "-", 
+                    RowBox[{"T14", " ", "T24"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24"}], ")"}], " ", 
+                    "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"6", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "3"], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox["T14", "3"], "-", 
+                    RowBox[{"3", " ", "T14", " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "-", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "+", 
+                    RowBox[{"3", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "4"], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["T", "3"], " ", "T14"}], "+", 
+                    SuperscriptBox["T14", "4"], "-", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T24", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "40"}], " ", 
+                    SuperscriptBox["MH", "4"]}], "+", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "-", 
+                    RowBox[{"8", " ", "T14", " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "+", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"4", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "3"], "-", 
+                    RowBox[{"3", " ", "T14", " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}]}], "-", 
+                    RowBox[{"2", " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24"}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MH", "4"], " ", "T24"}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "-", "T24"}], ")"}]}], "-", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "-", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}]}], 
+                    ")"}]}], ")"}], "/", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], ")"}], 
+                   " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                   " ", 
+                   RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24"}], "]"}]}], ")"}]}]}], ")"}]}], "-", 
+             RowBox[{"4", " ", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{"-", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "U"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "8"], " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "4"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "6"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"176", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"22", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"11", " ", "T"}], "+", 
+                    RowBox[{"11", " ", "T14"}], "-", 
+                    RowBox[{"23", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"30", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"30", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"13", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "1408"}], " ", 
+                    SuperscriptBox["MT", "6"]}], "-", 
+                    RowBox[{"17", " ", 
+                    SuperscriptBox["T", "3"]}], "-", 
+                    RowBox[{"17", " ", 
+                    SuperscriptBox["T14", "3"]}], "-", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"61", " ", "T"}], "+", 
+                    RowBox[{"61", " ", "T14"}], "-", 
+                    RowBox[{"30", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"19", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "51"}], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"28", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"56", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"28", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"19", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"19", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"17", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "51"}], " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"16", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"19", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"144", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"6", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "-", "T24"}], ")"}], " ", 
+                    "T24"}], "+", 
+                    RowBox[{"24", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "+", 
+                    RowBox[{"5", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"54", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"55", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"18", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MH", "10"], " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "5"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "8"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"176", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"22", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"11", " ", "T"}], "+", 
+                    RowBox[{"11", " ", "T14"}], "-", 
+                    RowBox[{"32", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"48", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"48", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "6"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"400", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"35", " ", "T"}], "+", 
+                    RowBox[{"35", " ", "T14"}], "-", 
+                    RowBox[{"38", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"65", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"65", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"65", " ", "T14"}], "-", 
+                    RowBox[{"58", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"116", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"45", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"10", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", "T24"}], ")"}]}], "-", 
+                    RowBox[{"10", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", "T"}], "+", 
+                    RowBox[{"16", " ", "T14"}], "-", 
+                    RowBox[{"11", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "-", "T24"}], ")"}], " ", 
+                    "T24"}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"16", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"9", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"9", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4608", " ", 
+                    SuperscriptBox["MT", "10"]}], "+", 
+                    RowBox[{"1536", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "+", 
+                    RowBox[{"5", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"54", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"109", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"109", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"58", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"18", " ", 
+                    SuperscriptBox["T", "3"]}], "+", 
+                    RowBox[{"18", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"147", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "-", 
+                    RowBox[{"130", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"93", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"18", " ", "T14"}], "+", 
+                    RowBox[{"49", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"147", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"65", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T", "4"]}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "4"]}], "+", 
+                    RowBox[{"174", " ", 
+                    SuperscriptBox["T14", "3"], " ", "T24"}], "-", 
+                    RowBox[{"172", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"254", " ", "T14", " ", 
+                    SuperscriptBox["T24", "3"]}], "-", 
+                    RowBox[{"21", " ", 
+                    SuperscriptBox["T24", "4"]}], "+", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", "T14"}], "+", 
+                    RowBox[{"29", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"261", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"86", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"36", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"522", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "-", 
+                    RowBox[{"344", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"254", " ", 
+                    SuperscriptBox["T24", "3"]}]}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "19"}], " ", 
+                    SuperscriptBox["T", "4"]}], "-", 
+                    RowBox[{"19", " ", 
+                    SuperscriptBox["T14", "4"]}], "+", 
+                    RowBox[{"14", " ", 
+                    SuperscriptBox["T14", "3"], " ", "T24"}], "+", 
+                    RowBox[{"34", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    SuperscriptBox["T24", "4"], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "76"}], " ", "T14"}], "+", 
+                    RowBox[{"14", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "114"}], " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"42", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"34", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "76"}], " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"42", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"68", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T24", "3"]}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"36", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"9", " ", "T"}], "+", 
+                    RowBox[{"9", " ", "T14"}], "-", "T24"}], ")"}], " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "5"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "6"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"192", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "3"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", "T"}], "+", 
+                    RowBox[{"9", " ", "T14"}], "-", 
+                    RowBox[{"50", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", "T14"}], "-", 
+                    RowBox[{"32", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "-", 
+                    RowBox[{"9", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"64", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"18", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"82", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"82", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", "T"}], "+", 
+                    RowBox[{"4", " ", "T14"}], "-", 
+                    RowBox[{"11", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "-", "T24"}], ")"}], " ", 
+                    "T24"}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"4", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"9", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"9", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "512"}], " ", 
+                    SuperscriptBox["MT", "8"]}], "-", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T", "4"]}], "-", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T14", "4"]}], "-", 
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"13", " ", "T"}], "+", 
+                    RowBox[{"13", " ", "T14"}], "-", 
+                    RowBox[{"69", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"26", " ", 
+                    SuperscriptBox["T14", "3"], " ", "T24"}], "+", 
+                    RowBox[{"22", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"10", " ", "T14", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    SuperscriptBox["T24", "4"], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "28"}], " ", "T14"}], "+", 
+                    RowBox[{"26", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"54", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"164", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"164", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"49", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "42"}], " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"78", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"22", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "28"}], " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"78", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"44", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"10", " ", 
+                    SuperscriptBox["T24", "3"]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"23", " ", 
+                    SuperscriptBox["T", "3"]}], "+", 
+                    RowBox[{"23", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"69", " ", "T14"}], "-", 
+                    RowBox[{"121", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"121", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "-", 
+                    RowBox[{"71", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"21", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"69", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"242", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"71", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"20", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"5", " ", "T"}], "+", 
+                    RowBox[{"5", " ", "T14"}], "-", "T24"}], ")"}]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24"}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"36", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"9", " ", "T"}], "+", 
+                    RowBox[{"9", " ", "T14"}], "-", "T24"}], ")"}], " ", 
+                    "T24"}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "4"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T"}], "+", 
+                    RowBox[{"5", " ", "T14"}], "-", 
+                    RowBox[{"21", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"192", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "3"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", "T"}], "+", 
+                    RowBox[{"9", " ", "T14"}], "-", 
+                    RowBox[{"29", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", "T14"}], "-", 
+                    RowBox[{"23", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"23", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "-", 
+                    RowBox[{"13", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    SuperscriptBox["T24", "3"], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"18", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"52", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"52", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"15", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"46", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"13", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}]}], 
+                    ")"}]}], ")"}], "/", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], ")"}], 
+                    "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24"}], "]"}]}], ")"}]}], ")"}]}], "+", 
+                RowBox[{
+                 RowBox[{"(", 
+                  RowBox[{"2", " ", 
+                   SuperscriptBox["MT", "2"], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "U"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MH", "10"], " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "-", "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "5"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "8"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"176", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"22", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"11", " ", "T"}], "+", 
+                    RowBox[{"11", " ", "T14"}], "-", 
+                    RowBox[{"24", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"32", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"32", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"320", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T"}], "+", 
+                    RowBox[{"5", " ", "T14"}], "-", "T24"}], ")"}], " ", 
+                    "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"20", " ", "T"}], "+", 
+                    RowBox[{"20", " ", "T14"}], "+", 
+                    RowBox[{"7", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"10", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"20", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"10", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"17", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"17", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "6"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"464", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"41", " ", "T"}], "+", 
+                    RowBox[{"41", " ", "T14"}], "-", 
+                    RowBox[{"18", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"14", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"4", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"4", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"6", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"T", " ", "T24"}], "-", 
+                    RowBox[{"T14", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4608", " ", 
+                    SuperscriptBox["MT", "10"]}], "+", 
+                    RowBox[{"512", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", "T"}], "+", 
+                    RowBox[{"9", " ", "T14"}], "+", 
+                    RowBox[{"25", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"54", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"181", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"181", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"10", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"18", " ", 
+                    SuperscriptBox["T", "3"]}], "+", 
+                    RowBox[{"18", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"243", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"50", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"41", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"9", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"54", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"486", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"50", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T", "4"]}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "4"]}], "+", 
+                    RowBox[{"286", " ", 
+                    SuperscriptBox["T14", "3"], " ", "T24"}], "+", 
+                    RowBox[{"140", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"78", " ", "T14", " ", 
+                    SuperscriptBox["T24", "3"]}], "-", 
+                    RowBox[{"13", " ", 
+                    SuperscriptBox["T24", "4"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"36", " ", "T14"}], "+", 
+                    RowBox[{"286", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"429", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"70", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"36", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"858", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"280", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"78", " ", 
+                    SuperscriptBox["T24", "3"]}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"31", " ", 
+                    SuperscriptBox["T", "4"]}], "+", 
+                    RowBox[{"31", " ", 
+                    SuperscriptBox["T14", "4"]}], "+", 
+                    RowBox[{"30", " ", 
+                    SuperscriptBox["T14", "3"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    SuperscriptBox["T24", "3"]}], "-", 
+                    SuperscriptBox["T24", "4"], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"62", " ", "T14"}], "+", 
+                    RowBox[{"15", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"93", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"45", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"62", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"45", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    SuperscriptBox["T24", "3"]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "8"], " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"4", " ", "T"}], "+", 
+                    RowBox[{"4", " ", "T14"}], "-", 
+                    RowBox[{"5", " ", "T24"}]}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "4"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "6"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"176", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"22", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"11", " ", "T"}], "+", 
+                    RowBox[{"11", " ", "T14"}], "-", 
+                    RowBox[{"25", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"34", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"34", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"13", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"144", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T"}], "+", 
+                    RowBox[{"5", " ", "T14"}], "-", 
+                    RowBox[{"6", " ", "T24"}]}], ")"}], " ", "T24"}], "+", 
+                    RowBox[{"72", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"18", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"38", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"38", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"55", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"672", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["T", "3"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"29", " ", "T"}], "+", 
+                    RowBox[{"29", " ", "T14"}], "-", 
+                    RowBox[{"20", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"24", " ", "T14"}], "-", 
+                    RowBox[{"7", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "-", 
+                    RowBox[{"10", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"53", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"106", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"53", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"54", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"54", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"35", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"7", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "8"], " ", 
+                    SuperscriptBox["T24", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"36", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"9", " ", "T"}], "+", 
+                    RowBox[{"9", " ", "T14"}], "+", "T24"}], ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"6", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "-", 
+                    RowBox[{"7", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"14", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"14", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "6"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"192", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "3"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", "T"}], "+", 
+                    RowBox[{"9", " ", "T14"}], "-", 
+                    RowBox[{"58", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", "T14"}], "-", 
+                    RowBox[{"40", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"40", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "-", 
+                    RowBox[{"17", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"18", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"98", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"98", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"19", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"80", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"17", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "1536"}], " ", 
+                    SuperscriptBox["MT", "8"]}], "-", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T", "4"]}], "-", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T14", "4"]}], "-", 
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"29", " ", "T"}], "+", 
+                    RowBox[{"29", " ", "T14"}], "-", 
+                    RowBox[{"115", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"50", " ", 
+                    SuperscriptBox["T14", "3"], " ", "T24"}], "+", 
+                    RowBox[{"56", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"26", " ", "T14", " ", 
+                    SuperscriptBox["T24", "3"]}], "-", 
+                    SuperscriptBox["T24", "4"], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "44"}], " ", "T14"}], "+", 
+                    RowBox[{"50", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"51", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"102", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"51", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"280", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"280", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"95", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "66"}], " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"150", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"56", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "44"}], " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"150", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"112", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"26", " ", 
+                    SuperscriptBox["T24", "3"]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"39", " ", 
+                    SuperscriptBox["T", "3"]}], "+", 
+                    RowBox[{"39", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"117", " ", "T14"}], "-", 
+                    RowBox[{"215", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"215", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "-", 
+                    RowBox[{"151", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"37", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"117", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"430", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"151", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", "T"}], "+", 
+                    RowBox[{"6", " ", "T14"}], "-", 
+                    RowBox[{"7", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"6", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"2", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"37", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T14"}], "-", 
+                    RowBox[{"8", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"16", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T", "3"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"13", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "-", 
+                    RowBox[{"106", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    SuperscriptBox["T24", "3"], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", "T14"}], "+", 
+                    RowBox[{"13", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"13", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"53", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "64"}], " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["T", "2"]}], "-", 
+                    RowBox[{"8", " ", "T", " ", "T14"}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"3", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"3", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"20", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"5", " ", "T"}], "+", 
+                    RowBox[{"5", " ", "T14"}], "+", "T24"}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", "T"}], "+", 
+                    RowBox[{"8", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24"}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", "T"}], "+", 
+                    RowBox[{"4", " ", "T14"}], "-", 
+                    RowBox[{"6", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}]}]}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "3"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "6"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"36", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"9", " ", "T"}], "+", 
+                    RowBox[{"9", " ", "T14"}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"192", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "3"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", "T"}], "+", 
+                    RowBox[{"9", " ", "T14"}], "-", 
+                    RowBox[{"37", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", "T14"}], "-", 
+                    RowBox[{"31", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"31", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "-", 
+                    RowBox[{"19", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    SuperscriptBox["T24", "3"], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"62", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"19", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"18", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"68", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"68", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"17", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"320", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T", "4"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T14", "4"]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"23", " ", "T"}], "+", 
+                    RowBox[{"23", " ", "T14"}], "-", 
+                    RowBox[{"37", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", "T14"}], "-", 
+                    RowBox[{"6", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T14", "3"], " ", "T24"}], "-", 
+                    RowBox[{"10", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"3", " ", "T14", " ", 
+                    SuperscriptBox["T24", "3"]}], "-", 
+                    SuperscriptBox["T24", "4"], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"39", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"78", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"39", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"98", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"98", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"45", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"9", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["T14", "3"]}], "-", 
+                    RowBox[{"18", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "-", 
+                    RowBox[{"20", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T24", "3"]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"29", " ", 
+                    SuperscriptBox["T", "3"]}], "+", 
+                    RowBox[{"29", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"87", " ", "T14"}], "-", 
+                    RowBox[{"85", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"85", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "-", 
+                    RowBox[{"85", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"87", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"170", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"85", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}]}], 
+                    ")"}]}], ")"}], "/", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], ")"}], 
+                    "2"], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                   " ", 
+                   RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24"}], "]"}]}], ")"}]}], "+", 
+                RowBox[{
+                 RowBox[{"(", 
+                  RowBox[{"4", " ", 
+                   SuperscriptBox["MT", "2"], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["S34", "2"]}], "-", 
+                    RowBox[{"2", " ", "S34", " ", "T"}], "-", 
+                    RowBox[{"S34", " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "S34"}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "-", 
+                    RowBox[{"3", " ", "U"}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "T", " ", "U"}], "+", 
+                    RowBox[{"4", " ", "T14", " ", "U"}], "+", 
+                    RowBox[{"T24", " ", "U"}], "+", 
+                    SuperscriptBox["U", "2"]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T24", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "S34"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "S34", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14"}]], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"192", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", 
+                    SuperscriptBox["T", "2"]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"4", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "+", "T24"}], ")"}]}], "-", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T14"}], "+", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "3"], "+", 
+                    SuperscriptBox["T14", "3"], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"T14", " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "14"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MH", "4"]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"6", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "14"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24"}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "10"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "-", "T24"}], ")"}], " ", 
+                    "T24"}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "8"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"464", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"19", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"38", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"19", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"24", " ", "T"}], "+", 
+                    RowBox[{"24", " ", "T14"}], "-", "T24"}], ")"}]}], "-", 
+                    RowBox[{"4", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"4", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"40", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], "2"], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", "T"}], "+", 
+                    RowBox[{"7", " ", "T14"}], "+", "T24"}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"832", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], "3"], " ", "T24"}], "+", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"11", " ", "T"}], "+", 
+                    RowBox[{"11", " ", "T14"}], "+", 
+                    RowBox[{"10", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"14", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"26", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"26", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"54", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"52", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"52", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"192", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", 
+                    RowBox[{"17", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"14", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"6", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"119", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"119", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"13", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "3"], "+", 
+                    SuperscriptBox["T14", "3"], "+", 
+                    RowBox[{"89", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"9", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T14"}], "+", 
+                    RowBox[{"89", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"178", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3584", " ", 
+                    SuperscriptBox["MT", "10"]}], "+", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"13", " ", "T"}], "+", 
+                    RowBox[{"13", " ", "T14"}], "+", 
+                    RowBox[{"40", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], "2"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"18", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"4", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"4", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"18", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"60", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"60", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"14", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T", "3"]}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"129", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"51", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"11", " ", "T14"}], "+", 
+                    RowBox[{"43", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"3", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"86", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"17", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T", "4"]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "4"]}], "+", 
+                    RowBox[{"116", " ", 
+                    SuperscriptBox["T14", "3"], " ", "T24"}], "+", 
+                    RowBox[{"54", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"28", " ", "T14", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    SuperscriptBox["T24", "4"], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["T", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T14"}], "+", 
+                    RowBox[{"29", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"58", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"87", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"27", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T24", "3"]}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], "+", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], "2"], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14"}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24"}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "10"]}], "+", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "-", "T24"}], ")"}], "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T24"}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}], "2"]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"6", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"6", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "4"], "+", 
+                    SuperscriptBox["T14", "4"], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["T14", "3"], " ", "T24"}], "+", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"4", " ", "T14", " ", "T24", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}], "2"]}], 
+                    "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["T", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T24", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "32"}], " ", 
+                    SuperscriptBox["MH", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "+", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"4", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "3"], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"3", " ", "T14", " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}], 
+                    "2"]}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "3"], "+", 
+                    SuperscriptBox["T14", "3"], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"3", " ", "T14", " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "4"]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "+", 
+                    RowBox[{"3", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                    "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24"}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", "T14"}], "+", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", "T"}], "+", 
+                    RowBox[{"8", " ", "T14"}], "-", 
+                    RowBox[{"4", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "-", 
+                    RowBox[{"T", " ", "T24"}], "-", 
+                    RowBox[{"T14", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                    "/", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24"}], "]"}]}]}], ")"}]}], ")"}], "/", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                   SuperscriptBox["T", "2"], "+", 
+                   SuperscriptBox["T14", "2"], "-", 
+                   RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                   RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                   SuperscriptBox["T24", "2"], "+", 
+                   RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                   RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], 
+                  ")"}]}]}], ")"}]}]}], ")"}], " ", 
+           SuperscriptBox["\[Beta]", "2"]}]}], "+", 
+         InterpretationBox[
+          SuperscriptBox[
+           RowBox[{"O", "[", "\[Beta]", "]"}], "3"],
+          SeriesData[$CellContext`\[Beta], 0, {}, 0, 3, 1],
+          Editable->False]}],
+        SeriesData[$CellContext`\[Beta], 
+         0, {$CellContext`T^(-1) ((
+              4 (2 + X`Eps^(-1) + 
+                X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT] + 
+                Log[$CellContext`MT^(-2) X`Mu^2]) - 
+              4 ($CellContext`MH^2 - $CellContext`T)^(-1) (
+               3 $CellContext`MH^2 + X`Eps^(-1) $CellContext`MH^2 - 
+               3 $CellContext`T - 
+               X`Eps^(-1) $CellContext`T + $CellContext`MH^2 
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+$CellContext`T 
+               X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MT^2 
+                Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MH^2 
+                Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`T 
+               Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`MT^2 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (
+                   2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T \
+((-4) $CellContext`MT^2 + $CellContext`T))^
+                    Rational[1, 2])]^2)) ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] - 2 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`e[2]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[
+                 5]]) - ($CellContext`MH^2 - $CellContext`T)^(-1) (
+             Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                 2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 - 
+             Log[Rational[1, 2] $CellContext`MT^(-2) (
+                2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T ((-4) \
+$CellContext`MT^2 + $CellContext`T))^
+                 Rational[
+                  1, 2])]^2) (((-$CellContext`MH^2 + $CellContext`T) \
+$CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] + 2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[1]]) $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`ec[5]] - 2 $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[
+               5]] ((-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] + 2 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]]) + $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[
+                4]] ((-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] + 2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]])) - 16 $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`k[3]] (
+             Rational[
+               1, 2] ($CellContext`MH^2 - $CellContext`T)^(-2) \
+(-$CellContext`MH^2 + $CellContext`T - $CellContext`MH^2 
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MH^2 
+                X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MT^2 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                   2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MT^2 
+                Log[Rational[1, 2] $CellContext`MT^(-2) (
+                    2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T \
+((-4) $CellContext`MT^2 + $CellContext`T))^
+                    Rational[1, 2])]^2) ($CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[1]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] - 2 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]]) + 
+             Rational[
+               1, 2] ($CellContext`MH^2 - $CellContext`T)^(-1) (-
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+               X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT]) \
+($CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] - 2 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]])) - 
+            4 ($CellContext`MH^2 - $CellContext`T)^(-1) (
+             X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+             X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT]) \
+(((-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] + 2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]])) $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`ec[5]] - 2 $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[
+               5]] ((-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] + 2 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] ($CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]])) + $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[
+                4]] ((-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] + 2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] ($CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]])))) + (
+             
+             2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U)^(-1) ((
+              4 (2 + X`Eps^(-1) + 
+                X`DiscB[
+                 2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] + 
+                Log[$CellContext`MT^(-2) X`Mu^2]) + 
+              4 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (
+                3 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) + 
+                X`Eps^(-1) ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) - $CellContext`MH^2 
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+(2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - $CellContext`U) 
+                 X`DiscB[
+                  2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] - $CellContext`MT^2 
+                Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[
+                    1, 2])]^2 + ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) 
+                 Log[$CellContext`MT^(-2) X`Mu^2] + $CellContext`MT^2 
+                 Log[Rational[
+                    1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[1, 2])]^2)) ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] - 2 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`e[2]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]]) + (
+              8 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+                X`DiscB[
+                2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT]) ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[4]] - 2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`e[2]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) - 
+              8 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-2) (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + $CellContext`MH^2 
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MH^2 
+               X`DiscB[
+                2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] + $CellContext`MT^2 
+                Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 - $CellContext`MT^2 
+               Log[Rational[
+                   1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                   2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[1, 2])]^2) ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] - 2 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[5]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[5]])) $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[3]] - 
+            4 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (-
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+             X`DiscB[2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT]) ($CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[
+                4]] ((-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] - 2 ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] - $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]]) $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]]) - 2 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               4]] ((-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] - 2 ($CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] - $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[5]]) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[3]]) + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[
+                2]] ((-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] - 2 ($CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]] - $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[5]]) $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[
+                 3]])) + (-$CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T + $CellContext`U)^(-1) (-
+               Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                   2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 + 
+              Log[Rational[1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                  2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[1, 2])]^2) (-$CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[
+                 4]] ((-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[5]] + 2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + 2 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[
+                 4]] ((-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + $\
+CellContext`U) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] + 2 $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[
+                2]] ((-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] + 2 $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]])) - $CellContext`T24^(-1) ((-8) (
+               Rational[-1, 
+                  2] (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (
+                 X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+                 X`DiscB[
+                 2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT]) (-(($CellContext`MH^2 - 
+                    3 $CellContext`S34 + $CellContext`T + $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] + 
+                   2 ($CellContext`S - $CellContext`T14) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    3]] + ($CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T - 3 $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] + 
+                 2 ($CellContext`MH^2 - $CellContext`S34 + $CellContext`T - \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] + 
+                 2 ($CellContext`MH^2 - $CellContext`S34 + $CellContext`T - \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + 8 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]))) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]] + 
+               Rational[-1, 
+                  2] (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-2) (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + $CellContext`MH^2 
+                  X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] - $CellContext`MH^2 
+                 X`DiscB[
+                  2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] + $CellContext`MT^2 
+                  Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 - $CellContext`MT^2 
+                 Log[Rational[
+                    1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[1, 2])]^2) (-(($CellContext`MH^2 - 
+                    3 $CellContext`S34 + $CellContext`T - 
+                    2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] + 
+                   2 ($CellContext`S - $CellContext`T14) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    3]] + ($CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T - 2 $CellContext`T24 - 3 $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] + 
+                 2 ($CellContext`MH^2 - $CellContext`S34 + $CellContext`T - 
+                   2 $CellContext`T24 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] + 
+                 2 ($CellContext`MH^2 - $CellContext`S34 + $CellContext`T - 
+                   2 $CellContext`T24 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + 8 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]))) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]]) + (
+               4 (2 + X`Eps^(-1) + 
+                 X`DiscB[
+                  2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] + 
+                 Log[$CellContext`MT^(-2) X`Mu^2]) + 
+               4 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (
+                 3 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) + 
+                 X`Eps^(-1) ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) - $CellContext`MH^2 
+                 X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+(2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - $CellContext`U) 
+                  X`DiscB[
+                   2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] - $CellContext`MT^2 
+                 Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[
+                    1, 2])]^2 + ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) 
+                  Log[$CellContext`MT^(-2) X`Mu^2] + $CellContext`MT^2 
+                  Log[Rational[
+                    1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[1, 2])]^2)) ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[
+                  5]] ((-$CellContext`S + $CellContext`T14) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] + 4 ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]])) - 2 (2 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]]) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] + $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] (2 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] (2 $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[4]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] (2 $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]])) + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] ((-4) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + 4 $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]]))) + (-$CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T + $CellContext`U)^(-1) (-
+                Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 + 
+               Log[Rational[
+                   1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                   2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                    
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[
+                    1, 2])]^2) ((-4) ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] - $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]]) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] - 
+               4 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] - $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]]) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[
+                  5]] (-($CellContext`S - $CellContext`T14) \
+(-$CellContext`MH^2 + $CellContext`S + $CellContext`T14 + $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] + 
+                 4 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]])) + 8 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]] + 4 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[
+                  4]] ((-$CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    1]] + ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T24 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + 4 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[
+                  2]] ((-$CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    1]] + ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T24 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) - 2 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[
+                 4]] (($CellContext`S - $CellContext`T14) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] (
+                  2 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    2]] + ($CellContext`S34 + $CellContext`T - \
+$CellContext`T24 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[
+                   2]] ((-$CellContext`S34 + $CellContext`T - \
+$CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + 
+                  2 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) + 
+             4 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (-
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+               X`DiscB[
+                2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT]) ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[
+                  5]] (-($CellContext`S - $CellContext`T14) \
+(-$CellContext`MH^2 + $CellContext`S + $CellContext`T14 + $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] + 
+                 4 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]])) + 
+               2 ((-2) ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] - 
+                 2 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]]) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + 8 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] (
+                   2 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + (3 $CellContext`MH^2 - 
+                    3 $CellContext`S34 + $CellContext`T - 2 $CellContext`T24 - 
+                    3 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] (
+                   2 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + (3 $CellContext`MH^2 - 
+                    3 $CellContext`S34 + $CellContext`T - 2 $CellContext`T24 - 
+                    3 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])) - $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] (
+                4 ($CellContext`S - $CellContext`T14) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] (
+                  4 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + ($CellContext`MH^2 + 
+                    3 $CellContext`S34 + 3 $CellContext`T - 
+                    2 $CellContext`T24 - 5 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[
+                   2]] (($CellContext`MH^2 - 5 $CellContext`S34 + 
+                    3 $CellContext`T - 2 $CellContext`T24 + 
+                    3 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + 
+                  4 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])))) + $CellContext`S^(-1) ((-8) (
+                Rational[-1, 
+                   2] (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-2) (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + $CellContext`MH^2 
+                   X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] - $CellContext`MH^2 
+                  X`DiscB[
+                   2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] + $CellContext`MT^2 
+                   Log[Rational[
+                    1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 - $CellContext`MT^2 
+                  Log[Rational[
+                    1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[1, 2])]^2) (
+                  2 ($CellContext`MH^2 + $CellContext`S - 
+                    2 $CellContext`S34 - $CellContext`T14 - $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] + 
+                  2 (-$CellContext`MH^2 - $CellContext`S + 
+                    2 $CellContext`S34 + $CellContext`T14 + $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[
+                    2]] (((-3) $CellContext`MH^2 + 
+                    3 $CellContext`S + $CellContext`T14 + $CellContext`T24 + 
+                    4 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + (3 $CellContext`MH^2 - 
+                    3 $CellContext`S - 
+                    4 $CellContext`T - $CellContext`T14 - $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + 
+                    2 (-$CellContext`T14 + $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + 8 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] (-$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]))) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]] + 
+                Rational[-1, 
+                   2] (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (
+                  X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] - X`DiscB[
+                  2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT]) (
+                  2 (-$CellContext`MH^2 - $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] + 
+                  2 ($CellContext`MH^2 + $CellContext`S34 - $CellContext`T - \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[
+                    2]] (-($CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T - 3 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    1]] + ($CellContext`MH^2 + $CellContext`S34 - 
+                    3 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + 
+                    2 (-$CellContext`T14 + $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + 8 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] (-$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]))) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + (
+                4 (2 + X`Eps^(-1) + 
+                  X`DiscB[
+                   2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] + 
+                  Log[$CellContext`MT^(-2) X`Mu^2]) + 
+                4 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (
+                  3 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) + 
+                  X`Eps^(-1) ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) - $CellContext`MH^2 
+                  X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + (
+                    2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) X`DiscB[
+                    2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] - $CellContext`MT^2 
+                  Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[
+                    1, 2])]^2 + ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) 
+                   Log[$CellContext`MT^(-2) X`Mu^2] + $CellContext`MT^2 
+                   Log[Rational[
+                    1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[
+                    1, 2])]^2)) ((-$CellContext`T14 + $CellContext`T24) \
+$CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`e[2]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] + 4 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] + 4 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) - 4 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[1]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]]) - $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] (4 $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] ((-4) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])) - 2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] ($CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]] + 2 $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]) + 2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[4]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + 2 $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + 
+              4 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (-
+                 X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+                X`DiscB[
+                 2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT]) (-$CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`e[
+                   2]] (-($CellContext`MH^2 - $CellContext`S - \
+$CellContext`T14 - $CellContext`T24) ($CellContext`T14 - $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + 
+                  4 ($CellContext`T14 - $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] (
+                    4 ($CellContext`MH^2 - $CellContext`S - $CellContext`T14 - \
+$CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + ((-7) $CellContext`MH^2 + 
+                    5 $CellContext`S + 8 $CellContext`T + 3 $CellContext`T14 + 
+                    3 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] (
+                    4 (-$CellContext`MH^2 + $CellContext`S + $CellContext`T14 + \
+$CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + (7 $CellContext`MH^2 - 
+                    5 $CellContext`S - 3 $CellContext`T14 - 
+                    3 $CellContext`T24 - 8 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] (
+                  4 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) - 2 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[
+                    4]] (((-3) $CellContext`MH^2 + $CellContext`S + 
+                    4 $CellContext`S34 + 3 $CellContext`T14 + 
+                    3 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + 
+                   2 (-$CellContext`MH^2 + $CellContext`S + $CellContext`T14 + \
+$CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + 
+                2 ((-2) ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] - 
+                  2 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) + 8 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] (-$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] (((-3) $CellContext`MH^2 + $CellContext`S + 
+                    4 $CellContext`S34 + 3 $CellContext`T14 + 
+                    3 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + 
+                    2 (-$CellContext`MH^2 + $CellContext`S + $CellContext`T14 + \
+$CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]]))) + (-$CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T + $CellContext`U)^(-1) (-
+                 Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 + 
+                Log[Rational[
+                    1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[1, 2])]^2) ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`e[
+                   2]] (($CellContext`MH^2 - $CellContext`S - \
+$CellContext`T14 - $CellContext`T24) ($CellContext`T14 - $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + 
+                  2 ((-$CellContext`T14 + $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] (
+                    2 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + ((-2) $CellContext`MH^2 + 
+                    2 $CellContext`S34 + 
+                    2 $CellContext`T + $CellContext`T14 + $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] (
+                    2 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + ((-2) $CellContext`MH^2 + 
+                    2 $CellContext`S34 + $CellContext`T14 + $CellContext`T24 + 
+                    2 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]))) - 
+                4 (($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[
+                    5]] + ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) - 2 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] (-$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]] - $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[4]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[
+                   1]] ((-$CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    3]] + ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    2]] (-($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[
+                    4]] ((-$CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    3]] + ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])))))) + $CellContext`S34^(-1) ((
+              4 (2 + X`Eps^(-1) + 
+                X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT] + 
+                Log[$CellContext`MT^(-2) X`Mu^2]) - 
+              4 ($CellContext`MH^2 - $CellContext`S34)^(-1) (
+               3 $CellContext`MH^2 + X`Eps^(-1) $CellContext`MH^2 - 
+               3 $CellContext`S34 - 
+               X`Eps^(-1) $CellContext`S34 + $CellContext`MH^2 
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+$CellContext`S34 
+               X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MT^2 
+                Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MH^2 
+                Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`S34 
+               Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`MT^2 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (
+                   2 $CellContext`MT^2 - $CellContext`S34 + ($CellContext`S34 \
+((-4) $CellContext`MT^2 + $CellContext`S34))^
+                    Rational[1, 2])]^2)) ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] - 2 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`e[2]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]]) + 
+            4 ($CellContext`MH^2 - $CellContext`S34)^(-1) (
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+              X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT]) (
+              2 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[
+                 5]] ((-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[4]] + 2 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]]) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                5]] ((-$CellContext`MH^2 + $CellContext`S34) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] + 2 ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] - $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]]) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[
+                2]] ((-$CellContext`MH^2 + $CellContext`S34) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] + 2 $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]] ($CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]] - $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[4]]))) + $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[
+               3]] ((-8) ($CellContext`MH^2 - $CellContext`S34)^(-1) (-
+                 X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+                X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT]) \
+((-2) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[5]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`e[2]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + 
+              8 ($CellContext`MH^2 - $CellContext`S34)^(-2) \
+(-$CellContext`MH^2 + $CellContext`S34 - $CellContext`MH^2 
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MH^2 
+                 X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MT^2 
+                Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MT^2 
+                 Log[Rational[1, 2] $CellContext`MT^(-2) (
+                    2 $CellContext`MT^2 - $CellContext`S34 + \
+($CellContext`S34 ((-4) $CellContext`MT^2 + $CellContext`S34))^
+                    Rational[1, 2])]^2) ((-2) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[5]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`e[2]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[
+                   4]])) - ($CellContext`MH^2 - $CellContext`S34)^(-1) (
+             Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                 2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 - 
+             Log[Rational[1, 2] $CellContext`MT^(-2) (
+                2 $CellContext`MT^2 - $CellContext`S34 + ($CellContext`S34 \
+((-4) $CellContext`MT^2 + $CellContext`S34))^Rational[1, 2])]^2) (
+             2 $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[
+                5]] (($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[4]] + 2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) - $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               5]] (($CellContext`MH^2 - $CellContext`S34) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] + 2 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]]) - $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`e[
+               2]] (($CellContext`MH^2 - $CellContext`S34) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] + 2 $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[4]])) + $CellContext`S^(-1) ((
+                4 (2 + X`Eps^(-1) + 
+                  X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT] + 
+                  Log[$CellContext`MT^(-2) X`Mu^2]) - 
+                4 ($CellContext`MH^2 - $CellContext`S34)^(-1) (
+                 3 $CellContext`MH^2 + X`Eps^(-1) $CellContext`MH^2 - 
+                 3 $CellContext`S34 - 
+                 X`Eps^(-1) $CellContext`S34 + $CellContext`MH^2 
+                  X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] - $CellContext`S34 
+                 X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MT^2 
+                  Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MH^2 
+                  Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`S34 
+                 Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`MT^2 
+                 Log[Rational[1, 2] $CellContext`MT^(-2) (
+                    2 $CellContext`MT^2 - $CellContext`S34 + \
+($CellContext`S34 ((-4) $CellContext`MT^2 + $CellContext`S34))^
+                    Rational[
+                    1, 2])]^2)) ((-$CellContext`T - $CellContext`T14 + \
+$CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`e[2]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] - 4 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] + 2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] + 2 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]) - 2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[1]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]] + 2 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]) - 4 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] ($CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]]) + 4 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[4]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) - $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] ((-4) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) + 4 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]])) - 
+              4 ($CellContext`MH^2 - $CellContext`S34)^(-1) (
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+               X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT]) \
+(-$CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[
+                  2]] (-($CellContext`MH^2 - $CellContext`S34) \
+($CellContext`T + $CellContext`T14 - $CellContext`T24 - $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + 
+                 4 ($CellContext`MH^2 - $CellContext`S34) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + 
+                 4 (-$CellContext`MH^2 + $CellContext`S34) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[
+                   3]] ((7 $CellContext`MH^2 - 2 $CellContext`S - 
+                    3 $CellContext`S34 - 8 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + ((-7) $CellContext`MH^2 + 
+                    2 $CellContext`S + 3 $CellContext`S34 + 
+                    8 $CellContext`T) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + 
+                  4 ((-2) $CellContext`MH^2 + $CellContext`S + \
+$CellContext`S34 + 2 $CellContext`T24 + 2 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])) - 
+               2 (2 ($CellContext`MH^2 - $CellContext`S34) \
+($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[5]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[
+                   1]] (((-3) $CellContext`MH^2 + 2 $CellContext`S + 
+                    3 $CellContext`S34 + 4 $CellContext`T14 + 
+                    4 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] + 
+                  2 (-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]) + 
+                2 ($CellContext`MH^2 - $CellContext`S34) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[4]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) - $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[
+                    5]] (((-3) $CellContext`MH^2 + 2 $CellContext`S + 
+                    3 $CellContext`S34 + 4 $CellContext`T14 + 
+                    4 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] + 
+                   2 (-$CellContext`MH^2 + $CellContext`S34) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]) + 
+                 2 ($CellContext`MH^2 - $CellContext`S34) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]])) + 8 $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]] (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])))) + 
+              8 (Rational[
+                  1, 2] ($CellContext`MH^2 - $CellContext`S34)^(-1) (-
+                   X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + 
+                  X`DiscB[$CellContext`S34, $CellContext`MT, \
+$CellContext`MT]) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]] (
+                  2 ((-3) $CellContext`MH^2 + $CellContext`S34 + 
+                    2 ($CellContext`T + $CellContext`U)) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] - 
+                  2 ((-3) $CellContext`MH^2 + $CellContext`S34 + 
+                   2 ($CellContext`T + $CellContext`U)) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[
+                    2]] (((-3) $CellContext`MH^2 + $CellContext`S34 + 
+                    4 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + (
+                    3 $CellContext`MH^2 - $CellContext`S34 - 
+                    4 $CellContext`T) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + 
+                    2 ($CellContext`T + $CellContext`T14 - $CellContext`T24 - \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + 8 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]))) + 
+                Rational[
+                  1, 2] ($CellContext`MH^2 - $CellContext`S34)^(-2) \
+(-$CellContext`MH^2 + $CellContext`S34 - $CellContext`MH^2 
+                  X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + $CellContext`MH^2 
+                   X`DiscB[$CellContext`S34, $CellContext`MT, \
+$CellContext`MT] - $CellContext`MT^2 
+                  Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MT^2 
+                   Log[Rational[1, 2] $CellContext`MT^(-2) (
+                    2 $CellContext`MT^2 - $CellContext`S34 + \
+($CellContext`S34 ((-4) $CellContext`MT^2 + $CellContext`S34))^
+                    Rational[1, 2])]^2) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[
+                   3]] ((-2) (-$CellContext`MH^2 + $CellContext`S34 + 
+                    2 ($CellContext`T14 + $CellContext`T24)) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] + 
+                  2 (-$CellContext`MH^2 + $CellContext`S34 + 
+                    2 ($CellContext`T14 + $CellContext`T24)) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + 8 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])) - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[
+                    2]] ((-$CellContext`MH^2 + $CellContext`S34 + 
+                    2 ($CellContext`T14 + $CellContext`T24)) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    1]] + ($CellContext`MH^2 - $CellContext`S34 - 
+                    2 ($CellContext`T14 + $CellContext`T24)) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + 
+                   2 (-$CellContext`T14 + $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + 
+                   2 ($CellContext`T - $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]]))) - ($CellContext`MH^2 - $CellContext`S34)^(-1) (
+               Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                   2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 - 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (
+                  2 $CellContext`MT^2 - $CellContext`S34 + ($CellContext`S34 \
+((-4) $CellContext`MT^2 + $CellContext`S34))^
+                   Rational[
+                    1, 2])]^2) ((-4) (($CellContext`MH^2 - $CellContext`S34) \
+($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] ((-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    
+                    1]] + (-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    2]] + ($CellContext`T14 + $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    3]]) + ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) - $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[
+                    5]] ((-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    1]] + (-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    2]] + ($CellContext`T14 + $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    3]]) + ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]])) + 2 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]))) + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[
+                  2]] (($CellContext`MH^2 - $CellContext`S34) ($CellContext`T + \
+$CellContext`T14 - $CellContext`T24 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + 
+                 2 (2 (-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - 
+                   2 ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]) + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] (
+                    2 ($CellContext`T14 + $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - 
+                    2 $CellContext`T14 $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    3]] + ($CellContext`T - $CellContext`T14 - \
+$CellContext`T24 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]]))))) + ($CellContext`MH^2 - $CellContext`S - \
+$CellContext`T - $CellContext`T14)^(-1) ((
+                4 (2 + X`Eps^(-1) + 
+                  X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT] + 
+                  Log[$CellContext`MT^(-2) X`Mu^2]) - 
+                4 ($CellContext`MH^2 - $CellContext`S34)^(-1) (
+                 3 $CellContext`MH^2 + X`Eps^(-1) $CellContext`MH^2 - 
+                 3 $CellContext`S34 - 
+                 X`Eps^(-1) $CellContext`S34 + $CellContext`MH^2 
+                  X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] - $CellContext`S34 
+                 X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MT^2 
+                  Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MH^2 
+                  Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`S34 
+                 Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`MT^2 
+                 Log[Rational[1, 2] $CellContext`MT^(-2) (
+                    2 $CellContext`MT^2 - $CellContext`S34 + \
+($CellContext`S34 ((-4) $CellContext`MT^2 + $CellContext`S34))^
+                    Rational[1, 2])]^2)) (4 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]]) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] + 2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] (2 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[
+                   5]] ((-$CellContext`MH^2 + 
+                    2 $CellContext`S + $CellContext`T24 + $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] ((-4) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] + 4 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) + 4 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]]) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + 2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`e[2]] (2 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] - 4 $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]])) - 
+              8 (Rational[
+                 1, 2] ($CellContext`MH^2 - $CellContext`S34)^(-2) \
+(-$CellContext`MH^2 + $CellContext`S34 - $CellContext`MH^2 
+                 X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MH^2 
+                  X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MT^2 
+                 Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MT^2 
+                  Log[Rational[1, 2] $CellContext`MT^(-2) (
+                    2 $CellContext`MT^2 - $CellContext`S34 + \
+($CellContext`S34 ((-4) $CellContext`MT^2 + $CellContext`S34))^
+                    Rational[1, 2])]^2) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]] (
+                 2 (-$CellContext`MH^2 + $CellContext`S34 + 
+                   2 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] - $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[
+                   5]] (((-2) $CellContext`MH^2 + 2 $CellContext`S34 + 
+                    4 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] + (-$CellContext`MH^2 + $CellContext`S34 + 
+                    4 $CellContext`T14) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + ($CellContext`MH^2 + 
+                    2 $CellContext`S - $CellContext`S34 - 2 $CellContext`T + 
+                    2 $CellContext`T14) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) + 
+                 2 (-$CellContext`MH^2 + $CellContext`S34 + 
+                   2 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + 8 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) + 
+               Rational[
+                 1, 2] ($CellContext`MH^2 - $CellContext`S34)^(-1) (-
+                  X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + 
+                 X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT]) \
+$CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]] (
+                 2 ($CellContext`MH^2 - $CellContext`S34 - 
+                   2 $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[
+                    5]] (((-2) $CellContext`MH^2 + 2 $CellContext`S34 + 
+                    4 $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - ($CellContext`MH^2 - 
+                    2 $CellContext`S + $CellContext`S34 - 2 $CellContext`T + 
+                    2 $CellContext`T14) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    3]] + ((-3) $CellContext`MH^2 + $CellContext`S34 + 
+                    4 $CellContext`T) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) + 
+                 2 ($CellContext`MH^2 - $CellContext`S34 - 
+                   2 $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + 8 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]])))) - ($CellContext`MH^2 - $CellContext`S34)^(-1) (
+               Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                   2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 - 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (
+                  2 $CellContext`MT^2 - $CellContext`S34 + ($CellContext`S34 \
+((-4) $CellContext`MT^2 + $CellContext`S34))^
+                   Rational[1, 2])]^2) ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[
+                  5]] (($CellContext`MH^2 - $CellContext`S34) \
+($CellContext`MH^2 - 
+                   2 $CellContext`S - $CellContext`T24 - $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] - 2 ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    3]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + 
+                    2 $CellContext`T14 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    4]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    1]] + ($CellContext`MH^2 + $CellContext`S - \
+$CellContext`S34 - $CellContext`T + $CellContext`T14) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + 2 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] ((-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`T24 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]))) + 4 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    5]] (-($CellContext`MH^2 - $CellContext`S34) \
+($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[
+                    5]] ((-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`T24 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    3]])) - ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]]) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[
+                    2]] ((-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`T24 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    1]] + ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) + 2 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])))) - 
+              4 ($CellContext`MH^2 - $CellContext`S34)^(-1) (
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+               X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT]) \
+(-$CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[
+                  5]] (-($CellContext`MH^2 - $CellContext`S34) \
+($CellContext`MH^2 - 
+                   2 $CellContext`S - $CellContext`T24 - $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    4]] ((-4) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + (5 $CellContext`MH^2 + 
+                    2 $CellContext`S - 3 $CellContext`S34 - 6 $CellContext`T + 
+                    2 $CellContext`T14) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    3]] ((-4) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + ($CellContext`MH^2 - 
+                    2 $CellContext`S + $CellContext`S34 - 2 $CellContext`T + 
+                    6 $CellContext`T14) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + 2 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    2]] + ($CellContext`MH^2 - $CellContext`S34 + 
+                    2 $CellContext`T24 - 2 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) + 2 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    5]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[
+                    5]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    2]] + ($CellContext`MH^2 - $CellContext`S34 + 
+                    2 $CellContext`T24 - 2 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) - 
+                 2 ($CellContext`MH^2 - $CellContext`S34) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]]) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[
+                    2]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    2]] + ($CellContext`MH^2 - $CellContext`S34 + 
+                    2 $CellContext`T24 - 2 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + 
+                 2 ($CellContext`MH^2 - $CellContext`S34) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) + 8 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])))))) + $CellContext`U^(-1) (
+            4 (2 + X`Eps^(-1) + 
+              X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] + 
+              Log[$CellContext`MT^(-2) X`Mu^2]) ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] - 2 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`e[2]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[
+                 5]]) - ($CellContext`MH^2 - $CellContext`U)^(-1) (
+             Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                 2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 - 
+             Log[Rational[1, 2] $CellContext`MT^(-2) (
+                2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U ((-4) \
+$CellContext`MT^2 + $CellContext`U))^
+                 Rational[
+                  1, 2])]^2) (((-$CellContext`MH^2 + $CellContext`U) \
+$CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] + 2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]]) $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`ec[5]] + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                5]] ((-$CellContext`MH^2 + $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] + 2 $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]]) - 2 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               4]] ((-$CellContext`MH^2 + $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] + 2 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]])) - 
+            16 (Rational[1, 4] ($CellContext`MH^2 - $CellContext`U)^(-1) (
+               3 $CellContext`MH^2 + X`Eps^(-1) $CellContext`MH^2 - 
+               3 $CellContext`U - 
+               X`Eps^(-1) $CellContext`U + $CellContext`MH^2 
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+$CellContext`U 
+               X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MT^2 
+                Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MH^2 
+                Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`U 
+               Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`MT^2 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (
+                   2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U \
+((-4) $CellContext`MT^2 + $CellContext`U))^
+                    Rational[1, 2])]^2) ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] - 2 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]]) + 
+             Rational[
+               1, 2] ($CellContext`MH^2 - $CellContext`U)^(-2) \
+(-$CellContext`MH^2 + $CellContext`U - $CellContext`MH^2 
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MH^2 
+                X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MT^2 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                   2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MT^2 
+                Log[Rational[1, 2] $CellContext`MT^(-2) (
+                    2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U \
+((-4) $CellContext`MT^2 + $CellContext`U))^
+                    Rational[1, 2])]^2) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[3]] ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] - 2 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]]) + 
+             Rational[
+               1, 2] ($CellContext`MH^2 - $CellContext`U)^(-1) (-
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+               X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT]) \
+$CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[3]] ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]] - 2 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]])) - 
+            4 ($CellContext`MH^2 - $CellContext`U)^(-1) (
+             X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+             X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT]) \
+(((-$CellContext`MH^2 + $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] + 2 ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]]) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]]) $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`ec[5]] + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                5]] ((-$CellContext`MH^2 + $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] + 2 $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]])) - 2 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               4]] ((-$CellContext`MH^2 + $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] + 2 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] ($CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[
+                  3]]))) - ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24)^(-1) (
+             4 (2 + X`Eps^(-1) + 
+               X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] + 
+               Log[$CellContext`MT^(-2) X`Mu^2]) (($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 4 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] ((-4) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + 3 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 4 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]])) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] - 4 ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] - $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]]) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[5]] + 2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] (2 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]]) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[5]] + 4 ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] - $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]]) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[4]] - 2 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] (2 $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]]) $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[4]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[
+                  2]] ((-$CellContext`MH^2 + $CellContext`S + $CellContext`T + 
+                   2 $CellContext`T14) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + 4 (-$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) - 
+             4 ($CellContext`MH^2 - $CellContext`U)^(-1) (3 $CellContext`MH^2 + 
+              X`Eps^(-1) $CellContext`MH^2 - 3 $CellContext`U - 
+              X`Eps^(-1) $CellContext`U + $CellContext`MH^2 
+               
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+$CellContext`U 
+              X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MT^2 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                   2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MH^2 
+               Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`U 
+              Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`MT^2 
+              Log[Rational[1, 2] $CellContext`MT^(-2) (
+                  2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U \
+((-4) $CellContext`MT^2 + $CellContext`U))^
+                   Rational[1, 2])]^2) (($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 4 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]]) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] ((-4) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + 3 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 4 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]])) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] - 4 ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[2]] - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[3]]) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[5]] + 2 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[5]] (2 $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]]) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[5]] + 4 ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] - $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]]) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[4]] - 2 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[4]] (2 $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[1]] - $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[3]]) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[4]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`e[
+                 2]] ((-$CellContext`MH^2 + $CellContext`S + $CellContext`T + 
+                  2 $CellContext`T14) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] + 4 (-$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) - 
+             4 ($CellContext`MH^2 - $CellContext`U)^(-2) (-$CellContext`MH^2 + \
+$CellContext`U - $CellContext`MH^2 
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MH^2 
+               X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MT^2 
+              Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                  2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MT^2 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (
+                   2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U \
+((-4) $CellContext`MT^2 + $CellContext`U))^
+                    Rational[1, 2])]^2) $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[
+               3]] (-((-$CellContext`MH^2 + 2 $CellContext`S34 - 
+                  2 $CellContext`T14 - 
+                  2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] + (-$CellContext`MH^2 + 
+                  4 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] + 
+                2 ($CellContext`MH^2 - 
+                  2 $CellContext`S - $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]]) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] + 
+              2 (-$CellContext`MH^2 + 
+                2 $CellContext`S + $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[5]] + 
+              2 ($CellContext`MH^2 - 
+                2 $CellContext`S - $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[4]] + 8 ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] (-$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) - 
+             4 ($CellContext`MH^2 - $CellContext`U)^(-1) (-
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+              X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT]) \
+$CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[
+               3]] (-(((-3) $CellContext`MH^2 + 
+                  4 $CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] + ($CellContext`MH^2 - 
+                  2 $CellContext`S34 - 2 $CellContext`T14 + 
+                  2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] + 
+                2 (-$CellContext`MH^2 + 
+                  2 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]]) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] + 
+              2 ($CellContext`MH^2 - 
+                2 $CellContext`T - $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[5]] + 
+              2 (-$CellContext`MH^2 + 
+                2 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[4]] + 8 ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] (-$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]]))) - ($CellContext`MH^2 - $CellContext`U)^(-1) (
+              Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                  2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 - 
+              Log[Rational[1, 2] $CellContext`MT^(-2) (
+                 2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U ((-4) \
+$CellContext`MT^2 + $CellContext`U))^Rational[1, 2])]^2) ((-2) (
+                2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[
+                   4]] (($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`S $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]]) + 2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] ($CellContext`T24 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    3]] + ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) - $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[
+                  2]] (($CellContext`MH^2 - $CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 
+                 2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]])) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] + 
+              4 ($CellContext`MH^2 - $CellContext`U) ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] - $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]]) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[5]] + 4 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[
+                 5]] ((-$CellContext`MH^2 + $CellContext`U) \
+$CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] + $CellContext`S $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]]) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[5]] - 
+              4 ($CellContext`MH^2 - $CellContext`U) ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[2]] - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[3]]) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[4]] - 4 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                4]] ((-$CellContext`MH^2 + $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[1]] + $CellContext`S $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]]) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[4]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`e[
+                 2]] (($CellContext`MH^2 - $CellContext`S - $CellContext`T - 
+                  2 $CellContext`T14) ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] + 
+                4 ($CellContext`MH^2 - $CellContext`U) ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + 8 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] (-$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) - 
+             4 ($CellContext`MH^2 - $CellContext`U)^(-1) (
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+              X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT]) (-(
+                2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] (
+                  2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + (-$CellContext`MH^2 - 
+                    2 $CellContext`S + 
+                    2 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[
+                   3]] (($CellContext`MH^2 - 2 $CellContext`S34 - 
+                    2 $CellContext`T14 + 
+                    6 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 
+                  4 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[
+                   2]] (((-5) $CellContext`MH^2 + 6 $CellContext`S34 - 
+                    2 $CellContext`T14 - 2 $CellContext`T24 + 
+                    3 $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 
+                  4 (-$CellContext`MH^2 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]])) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] + 
+              4 ($CellContext`MH^2 - $CellContext`U) ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] - $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]]) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[5]] + 2 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[
+                 5]] ((-2) ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] + ($CellContext`MH^2 + 2 $CellContext`S - 
+                  2 $CellContext`T - $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]]) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[5]] - 
+              4 ($CellContext`MH^2 - $CellContext`U) ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[2]] - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[3]]) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[4]] - 2 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                4]] ((-2) ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[1]] + ($CellContext`MH^2 + 2 $CellContext`S - 
+                 2 $CellContext`T - $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]]) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[4]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`e[
+                 2]] (($CellContext`MH^2 - $CellContext`S - $CellContext`T - 
+                  2 $CellContext`T14) ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] + 
+                4 ($CellContext`MH^2 - $CellContext`U) ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + 16 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] (-$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]])))) - ($CellContext`MH^2 - $CellContext`S - \
+$CellContext`T - $CellContext`T14)^(-1) (
+             4 (2 + X`Eps^(-1) + 
+               X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] + 
+               Log[$CellContext`MT^(-2) X`Mu^2]) ((-2) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] + 2 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] + 4 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[5]]) + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[
+                  5]] ((-$CellContext`MH^2 + $CellContext`S34 + 
+                   2 $CellContext`T14 + $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] - 4 $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + 4 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] - $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) - 2 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] ($CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] + 2 $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]]) $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] + 4 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[5]]) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + 4 $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) - 
+             4 ($CellContext`MH^2 - $CellContext`U)^(-1) (3 $CellContext`MH^2 + 
+              X`Eps^(-1) $CellContext`MH^2 - 3 $CellContext`U - 
+              X`Eps^(-1) $CellContext`U + $CellContext`MH^2 
+               
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+$CellContext`U 
+              X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MT^2 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                   2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MH^2 
+               Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`U 
+              Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`MT^2 
+              Log[Rational[1, 2] $CellContext`MT^(-2) (
+                  2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U \
+((-4) $CellContext`MT^2 + $CellContext`U))^
+                   Rational[1, 2])]^2) ((-2) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] ($CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] + 2 $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]]) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] + 4 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] ($CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] - $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[5]]) + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[
+                 5]] ((-$CellContext`MH^2 + $CellContext`S34 + 
+                  2 $CellContext`T14 + $CellContext`T24) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[4]] - 4 $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] + 4 $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[5]] - $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[5]])) - 2 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[4]] ($CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] + 2 $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]]) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[1]] + 4 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`e[2]] ($CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] - $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[5]]) $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] + 4 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]])) - 
+             4 ($CellContext`MH^2 - $CellContext`U)^(-1) (-
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+              X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT]) \
+$CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[3]] (
+              2 ($CellContext`MH^2 - 
+                2 $CellContext`S34 - $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[
+                 5]] (((-2) $CellContext`MH^2 + 4 $CellContext`S34 + 
+                  2 $CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + (3 $CellContext`MH^2 - 
+                  4 $CellContext`T - $CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] - ($CellContext`MH^2 + 2 $CellContext`S - 
+                 2 $CellContext`T - 
+                 2 $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) + 
+              2 ($CellContext`MH^2 - 
+                2 $CellContext`S34 - $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] + 8 ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[5]]) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) - 
+             4 ($CellContext`MH^2 - $CellContext`U)^(-2) (-$CellContext`MH^2 + \
+$CellContext`U - $CellContext`MH^2 
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MH^2 
+               X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MT^2 
+              Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                  2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MT^2 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (
+                   2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U \
+((-4) $CellContext`MT^2 + $CellContext`U))^
+                    Rational[1, 2])]^2) $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[3]] (
+              2 (-$CellContext`MH^2 + 
+                2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                5]] (((-2) $CellContext`MH^2 + 4 $CellContext`T24 + 
+                 2 $CellContext`U) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] + (-$CellContext`MH^2 - 2 $CellContext`S + 
+                 2 $CellContext`T - 
+                 2 $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] + (-$CellContext`MH^2 + 
+                 4 $CellContext`S + $CellContext`U) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) + 
+              2 (-$CellContext`MH^2 + 
+                2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] + 8 ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[5]]) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) - 
+             4 ($CellContext`MH^2 - $CellContext`U)^(-1) (
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+              X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT]) \
+($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[
+                 5]] (($CellContext`MH^2 - $CellContext`S34 - 
+                  2 $CellContext`T14 - $CellContext`T24) ($CellContext`MH^2 - \
+$CellContext`U) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[4]] - 
+                4 ($CellContext`MH^2 - $CellContext`U) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) - $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] (
+                 2 ($CellContext`MH^2 - 2 $CellContext`S34 + 
+                   2 $CellContext`T24 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + ((-5) $CellContext`MH^2 - 
+                   2 $CellContext`S + 6 $CellContext`T - 2 $CellContext`T14 + 
+                   3 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + ($CellContext`MH^2 + 
+                   6 $CellContext`S - 2 $CellContext`T - 
+                   2 $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) - 2 ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[
+                  5]] (((-$CellContext`MH^2 + 2 $CellContext`S34 - 
+                    2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 
+                   2 (-$CellContext`MH^2 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + 
+                 2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[
+                  4]] ((-$CellContext`MH^2 + 2 $CellContext`S34 - 
+                   2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 
+                 2 (-$CellContext`MH^2 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + 
+               2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[5]]) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + 
+               2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]) - 8 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[5]]) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]])))) - ($CellContext`MH^2 - $CellContext`U)^(-1) (
+              Log[
+                Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                  2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 - 
+              Log[Rational[1, 2] $CellContext`MT^(-2) (
+                 2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U ((-4) \
+$CellContext`MT^2 + $CellContext`U))^Rational[1, 2])]^2) ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[
+                 5]] (($CellContext`MH^2 - $CellContext`S34 - 
+                  2 $CellContext`T14 - $CellContext`T24) ($CellContext`MH^2 - \
+$CellContext`U) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[4]] + 
+                2 ((-2) ($CellContext`MH^2 - $CellContext`U) \
+($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    3]] ((-2) $CellContext`T24 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    1]] + ($CellContext`MH^2 + $CellContext`S - \
+$CellContext`T + $CellContext`T14 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] - 2 $CellContext`S $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]))) + 4 ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] (($CellContext`T24 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    3]] + ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[
+                    5]] - ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[4]] ($CellContext`T24 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    3]] + ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[
+                   1]] - ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[5]]) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[
+                  1]] - ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]) + 2 $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]])))))) + $CellContext`T24^(-1) ($CellContext`T^(-1) \
+(-($CellContext`MH^2 - $CellContext`T)^(-1) (
+                Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 - 
+                Log[Rational[1, 2] $CellContext`MT^(-2) (
+                   2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T \
+((-4) $CellContext`MT^2 + $CellContext`T))^
+                    Rational[1, 2])]^2) ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[
+                   5]] (-($CellContext`MH^2 - $CellContext`T) ($CellContext`S - \
+$CellContext`S34 - $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] + 
+                  4 ($CellContext`MH^2 - $CellContext`T) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) - 
+                2 ((-2) ((-$CellContext`MH^2 + $CellContext`T) \
+$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    2]] + ($CellContext`S + $CellContext`T14) \
+$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    3]] + ($CellContext`MH^2 - $CellContext`T) \
+$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] - 
+                 2 ((-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    2]] + ($CellContext`S + $CellContext`T14) \
+$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    3]] + ($CellContext`MH^2 - $CellContext`T) \
+$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + 
+                 2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + 
+                 2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] (
+                   2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - 
+                   2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    3]] (($CellContext`S + $CellContext`S34 + \
+$CellContext`T14 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + 
+                    2 ($CellContext`S + $CellContext`T14) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - 2 $CellContext`S $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])) + 4 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])))) + (
+                4 (2 + X`Eps^(-1) + 
+                  X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT] + 
+                  Log[$CellContext`MT^(-2) X`Mu^2]) - 
+                4 ($CellContext`MH^2 - $CellContext`T)^(-1) (
+                 3 $CellContext`MH^2 + X`Eps^(-1) $CellContext`MH^2 - 
+                 3 $CellContext`T - 
+                 X`Eps^(-1) $CellContext`T + $CellContext`MH^2 
+                  X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] - $CellContext`T 
+                 X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MT^2 
+                  Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MH^2 
+                  Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`T 
+                 Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`MT^2 
+                 Log[Rational[1, 2] $CellContext`MT^(-2) (
+                    2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T \
+((-4) $CellContext`MT^2 + $CellContext`T))^Rational[1, 2])]^2)) (
+                2 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] + 2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] + 2 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] + 2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[
+                   5]] (($CellContext`S - $CellContext`S34 - $CellContext`T14 + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] - 4 ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) + 4 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[4]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + 4 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`e[2]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) - $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] ((-4) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + 4 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]] - $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) + 
+              8 (Rational[
+                  1, 2] ($CellContext`MH^2 - $CellContext`T)^(-1) (-
+                   X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + 
+                  X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT]) \
+$CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] (
+                  2 ((-3) $CellContext`MH^2 + 
+                    2 $CellContext`S34 + $CellContext`T + 
+                    2 $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + 
+                  2 ((-3) $CellContext`MH^2 + 
+                    2 $CellContext`S34 + $CellContext`T + 
+                    2 $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + 8 ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[
+                    4]] (((-3) $CellContext`MH^2 + 
+                    4 $CellContext`S34 + $CellContext`T) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + 
+                   2 ($CellContext`S - $CellContext`S34 - $CellContext`T14 + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    3]] + ((-3) $CellContext`MH^2 + $CellContext`T + 
+                    4 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + 
+                Rational[
+                  1, 2] ($CellContext`MH^2 - $CellContext`T)^(-2) \
+(-$CellContext`MH^2 + $CellContext`T - $CellContext`MH^2 
+                  X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + $CellContext`MH^2 
+                   X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MT^2 
+                  Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MT^2 
+                   Log[Rational[1, 2] $CellContext`MT^(-2) (
+                    2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T \
+((-4) $CellContext`MT^2 + $CellContext`T))^
+                    Rational[1, 2])]^2) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[
+                   3]] ((-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`S + $CellContext`T + 
+                    2 $CellContext`T14) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] - 
+                  2 (-$CellContext`MH^2 + 2 $CellContext`S + $CellContext`T + 
+                   2 $CellContext`T14) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + 8 (-$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] (-$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])) - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[
+                    4]] (((-3) $CellContext`MH^2 + 
+                    4 $CellContext`S34 + $CellContext`T + 
+                    2 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + 
+                   2 ($CellContext`S - $CellContext`S34 - $CellContext`T14 + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    3]] + ((-3) $CellContext`MH^2 + $CellContext`T + 
+                    2 $CellContext`T24 + 4 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) - 
+              4 ($CellContext`MH^2 - $CellContext`T)^(-1) (
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+               X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT]) \
+((-2) (((-5) $CellContext`MH^2 + 4 $CellContext`S34 + $CellContext`T + 
+                   2 $CellContext`T24 + 4 $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] + 
+                 2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] - 
+               2 (((-5) $CellContext`MH^2 + 
+                  4 $CellContext`S34 + $CellContext`T + 2 $CellContext`T24 + 
+                  4 $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] + 
+                2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]]) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[
+                  5]] (-($CellContext`MH^2 - $CellContext`T) ($CellContext`S - \
+$CellContext`S34 - $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] + 
+                 4 ($CellContext`MH^2 - $CellContext`T) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) - 
+               4 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[4]] ($CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] - $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]]) - 
+               4 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`e[2]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] ($CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] - $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]]) - 16 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]])) - $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[
+                   3]] ((7 $CellContext`MH^2 - 8 $CellContext`S34 - 
+                    3 $CellContext`T - 2 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + 
+                  4 ((-2) $CellContext`MH^2 + 
+                    2 $CellContext`S34 + $CellContext`T + 
+                    2 $CellContext`T14 + $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + (7 $CellContext`MH^2 - 
+                    3 $CellContext`T - 2 $CellContext`T24 - 
+                    8 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]) + 
+                4 ($CellContext`MH^2 - $CellContext`T) ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]])))) + ($CellContext`MH^2 - $CellContext`S - \
+$CellContext`T - $CellContext`T14)^(-1) ((-2) (((-$CellContext`S34 \
+$CellContext`T + $CellContext`S34 $CellContext`T14 + $CellContext`MH^2 \
+($CellContext`S34 - $CellContext`U) + $CellContext`T $CellContext`U + \
+$CellContext`T14 $CellContext`U - $CellContext`S ($CellContext`S34 + \
+$CellContext`U)) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] - 
+                  4 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] - 
+                  4 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + 4 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[
+                    5]] ((($CellContext`S34 + $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] + (-$CellContext`MH^2 + $CellContext`T) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    4]] (($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    1]] + (-$CellContext`MH^2 + $CellContext`T) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) - 
+                  4 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - 
+                  4 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + 8 ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + 4 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] ($CellContext`U $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`S34 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] ($CellContext`U $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`S34 $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) 
+                 X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+                   4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT] + (
+                   16 $CellContext`MT^4 + $CellContext`T^2 + \
+$CellContext`T14^2 - 4 $CellContext`MH^2 $CellContext`T24 + 
+                   2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                   2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+                   8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24))^(-1) ((-$CellContext`S34^2 - 
+                    4 $CellContext`S34 $CellContext`T + 
+                    2 $CellContext`S34 $CellContext`T14 + 
+                    4 $CellContext`MH^2 ($CellContext`S34 - $CellContext`U) + 
+                    4 $CellContext`T $CellContext`U + 
+                    2 $CellContext`T14 $CellContext`U + $CellContext`U^2 - 
+                    2 $CellContext`S ($CellContext`S34 + $CellContext`U)) \
+$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] - 
+                  8 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] - 
+                  8 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + 4 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[
+                    5]] ((2 ($CellContext`S34 + $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] + ((-4) $CellContext`MH^2 + $CellContext`S34 + 
+                    4 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] (
+                    2 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    1]] + ((-4) $CellContext`MH^2 + $CellContext`S34 + 
+                    4 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) - 
+                  8 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - 
+                  8 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + 32 ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + 4 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] (
+                    2 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    1]] + ((-3) $CellContext`S34 + $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] (
+                    2 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    2]] + ((-3) $CellContext`S34 + $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]))) ((2 $CellContext`MH^2 - 
+                    4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14 - \
+$CellContext`T24) 
+                   X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] - 2 ($CellContext`MH^2 - 
+                   4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14) 
+                  X`DiscB[$CellContext`MH^2 - 
+                    4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`MT, $CellContext`MT] - (
+                   4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 - \
+$CellContext`T24) 
+                  X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] + \
+($CellContext`MH^2 - 
+                    4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14) (
+                    4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24) X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+                    4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT])) + (
+                8 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[
+                   5]] ((2 $CellContext`S - $CellContext`S34 - 
+                    2 $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] - 4 (($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]))) + 8 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] - 4 $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) (
+                2 (2 + X`Eps^(-1) + 
+                  X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] + 
+                  Log[$CellContext`MT^(-2) X`Mu^2]) - 
+                2 (16 $CellContext`MT^4 + $CellContext`T^2 + \
+$CellContext`T14^2 - 4 $CellContext`MH^2 $CellContext`T24 + 
+                  2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                  2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+                  8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24))^(-1) (
+                 3 (16 $CellContext`MT^4 + $CellContext`T^2 + \
+$CellContext`T14^2 - 4 $CellContext`MH^2 $CellContext`T24 + 
+                   2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                   2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+                   8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24)) + 
+                 X`Eps^(-1) (
+                   16 $CellContext`MT^4 + $CellContext`T^2 + \
+$CellContext`T14^2 - 4 $CellContext`MH^2 $CellContext`T24 + 
+                   2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                   2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+                   8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24)) + $CellContext`MH^2 (
+                   4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 - \
+$CellContext`T24) 
+                  X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] - ($CellContext`MH^2 - 
+                  4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14) (
+                  4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24) 
+                 X`DiscB[$CellContext`MH^2 - 
+                   4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`MT, $CellContext`MT] - (2 $CellContext`MH^2 - 
+                  4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14 - \
+$CellContext`T24) $CellContext`T24 
+                 X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] + \
+(16 $CellContext`MT^4 + $CellContext`T^2 + $CellContext`T14^2 - 
+                   4 $CellContext`MH^2 $CellContext`T24 + 
+                   2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                   2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+                   8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24)) Log[$CellContext`MT^(-2) X`Mu^2] + 
+                 2 (16 $CellContext`MT^6 + $CellContext`MH^2 \
+($CellContext`MH^2 - $CellContext`T - $CellContext`T14) $CellContext`T24 + 
+                   8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+                    8 $CellContext`MH^2 $CellContext`T24 + 
+                    2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                    2 $CellContext`T ($CellContext`T14 + $CellContext`T24))) 
+                  X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+                    4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT])) - 
+              4 ((16 $CellContext`MT^4 + $CellContext`T^2 + \
+$CellContext`T14^2 - 4 $CellContext`MH^2 $CellContext`T24 + 
+                  2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                  2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+                  8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24))^(-1) ((-$CellContext`S34^2 - 
+                   2 $CellContext`S34 $CellContext`T - $CellContext`S34 \
+$CellContext`T24 + 2 $CellContext`T14 $CellContext`T24 - 
+                   2 $CellContext`S (
+                    2 $CellContext`S34 + $CellContext`T24) + \
+$CellContext`MH^2 (2 $CellContext`S + 3 $CellContext`S34 - 2 $CellContext`T14 - 
+                    3 $CellContext`U) + 2 $CellContext`T $CellContext`U + 
+                   4 $CellContext`T14 $CellContext`U + $CellContext`T24 \
+$CellContext`U + $CellContext`U^2) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] - 
+                 8 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T24 + \
+$CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] - 
+                 8 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T24 + \
+$CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] - 
+                 4 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T24 - \
+$CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[5]] ((2 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] (2 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) - 
+                 8 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T24 + \
+$CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[4]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] - 
+                 8 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T24 + \
+$CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`e[2]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + 4 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[
+                    4]] ((-$CellContext`MH^2 + 
+                    2 $CellContext`S34 + $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    1]] + (-$CellContext`S34 + $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`MH^2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`T24 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + 2 $CellContext`U $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`MH^2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + 
+                   2 $CellContext`S34 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`T24 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`S34 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`U $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] - $CellContext`MH^2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]] + $CellContext`T24 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]] + 2 $CellContext`U $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) ((-2) $CellContext`MH^2 
+                  X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + (2 $CellContext`MH^2 - 
+                   4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14 - \
+$CellContext`T24) 
+                  X`DiscB[$CellContext`MH^2 - 
+                    4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`MT, $CellContext`MT] + 
+                 4 $CellContext`MT^2 
+                  
+                  X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] + \
+$CellContext`T 
+                  X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] + \
+$CellContext`T14 
+                  X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] + \
+$CellContext`T24 X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] - 
+                 4 $CellContext`MH^2 $CellContext`MT^2 
+                 X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+                   4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MH^2 $CellContext`T 
+                 X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+                   4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MH^2 $CellContext`T14 
+                 X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+                   4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MH^2 $CellContext`T24 
+                  X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+                    4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT]) + 
+               Rational[
+                 1, 2] (16 $CellContext`MT^4 + $CellContext`T^2 + \
+$CellContext`T14^2 - 4 $CellContext`MH^2 $CellContext`T24 + 
+                  2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                  2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+                  8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24))^(-2) (-($CellContext`S34 - $CellContext`U) ((-2) \
+$CellContext`MH^2 + $CellContext`S34 + 
+                   2 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] - 
+                 4 (2 $CellContext`MH^2 - $CellContext`S34 - 
+                  2 $CellContext`T - $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) - 
+                 4 ($CellContext`S34 - $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[4]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + 16 ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])) ((-2) ($CellContext`MH^2 - 
+                   4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14) \
+((-16) $CellContext`MT^4 - $CellContext`T^2 - $CellContext`T14^2 + 
+                   4 $CellContext`MH^2 $CellContext`T24 - 
+                   2 $CellContext`T14 $CellContext`T24 - $CellContext`T24^2 - 
+                   2 $CellContext`T ($CellContext`T14 + $CellContext`T24) - 
+                   8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24)) + ((
+                    4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2 (12 $CellContext`MT^2 + 3 $CellContext`T + 
+                    3 $CellContext`T14 + $CellContext`T24) + 
+                   2 $CellContext`MH^4 (12 $CellContext`MT^2 + 
+                    3 $CellContext`T + 3 $CellContext`T14 + 
+                    5 $CellContext`T24) - 
+                   2 $CellContext`MH^2 (80 $CellContext`MT^4 + 
+                    5 $CellContext`T^2 + 10 $CellContext`T $CellContext`T14 + 
+                    5 $CellContext`T14^2 + 7 $CellContext`T $CellContext`T24 + 
+                    7 $CellContext`T14 $CellContext`T24 + 
+                    4 $CellContext`T24^2 + 
+                    4 $CellContext`MT^2 (10 $CellContext`T + 
+                    10 $CellContext`T14 + 7 $CellContext`T24))) 
+                  X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] - 
+                 6 (-$CellContext`MH^2 + 
+                   4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14)^2 \
+(4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + $CellContext`T24) 
+                 X`DiscB[$CellContext`MH^2 - 
+                   4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`MT, $CellContext`MT] - ((-192) $CellContext`MT^6 - 
+                  3 $CellContext`T^3 - 9 $CellContext`T^2 $CellContext`T14 - 
+                  9 $CellContext`T $CellContext`T14^2 - 3 $CellContext`T14^3 - 
+                  16 $CellContext`MT^4 (9 $CellContext`T + 
+                   9 $CellContext`T14 - $CellContext`T24) + 
+                  4 $CellContext`MH^4 $CellContext`T24 + $CellContext`T^2 \
+$CellContext`T24 + 
+                  2 $CellContext`T $CellContext`T14 $CellContext`T24 + \
+$CellContext`T14^2 $CellContext`T24 + 5 $CellContext`T $CellContext`T24^2 + 
+                  5 $CellContext`T14 $CellContext`T24^2 + $CellContext`T24^3 - 
+                  4 $CellContext`MT^2 (9 $CellContext`T^2 + 
+                   18 $CellContext`T $CellContext`T14 + 9 $CellContext`T14^2 - 
+                   2 $CellContext`T $CellContext`T24 - 
+                   2 $CellContext`T14 $CellContext`T24 - 
+                   5 $CellContext`T24^2) + 
+                  2 $CellContext`MH^2 (
+                    16 $CellContext`MT^4 + $CellContext`T^2 + 
+                    2 $CellContext`T $CellContext`T14 + $CellContext`T14^2 + \
+$CellContext`MT^2 (8 $CellContext`T + 8 $CellContext`T14 - 
+                    4 $CellContext`T24) - $CellContext`T $CellContext`T24 - \
+$CellContext`T14 $CellContext`T24 - 4 $CellContext`T24^2)) 
+                 X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] + 
+                 2 ($CellContext`MH^2 - 
+                   4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14) (
+                   2 $CellContext`MH^4 $CellContext`T24 - (
+                    2 $CellContext`MT^2 + $CellContext`T + $CellContext`T14) (
+                    4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2 + $CellContext`MH^2 (
+                    16 $CellContext`MT^4 + $CellContext`T^2 + 
+                    2 $CellContext`T $CellContext`T14 + $CellContext`T14^2 + 
+                    8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 - \
+$CellContext`T24) + $CellContext`T24^2)) 
+                  X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+                    4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT]) + 
+               Rational[
+                 1, 2] (16 $CellContext`MT^4 + $CellContext`T^2 + \
+$CellContext`T14^2 - 4 $CellContext`MH^2 $CellContext`T24 + 
+                  2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                  2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+                  8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24))^(-2) (-($CellContext`S34 - $CellContext`U) ((-2) \
+$CellContext`MH^2 + $CellContext`S34 + 
+                   2 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] - 
+                 4 (2 $CellContext`MH^2 - $CellContext`S34 - 
+                  2 $CellContext`T - $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + 16 ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) - 
+                 4 ($CellContext`S34 - $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[4]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])) ((2 $CellContext`MH^2 - 
+                   4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14 - \
+$CellContext`T24) ((-16) $CellContext`MT^4 - $CellContext`T^2 - \
+$CellContext`T14^2 + 4 $CellContext`MH^2 $CellContext`T24 - 
+                   2 $CellContext`T14 $CellContext`T24 - $CellContext`T24^2 - 
+                   2 $CellContext`T ($CellContext`T14 + $CellContext`T24) - 
+                   8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24)) - $CellContext`MH^2 ((-80) $CellContext`MT^4 - 
+                  5 $CellContext`T^2 - 10 $CellContext`T $CellContext`T14 - 
+                  5 $CellContext`T14^2 - 4 $CellContext`T $CellContext`T24 - 
+                  4 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                  2 $CellContext`MH^2 (12 $CellContext`MT^2 + 
+                    3 $CellContext`T + 3 $CellContext`T14 + $CellContext`T24) - 
+                  8 $CellContext`MT^2 (5 $CellContext`T + 5 $CellContext`T14 + 
+                   2 $CellContext`T24)) 
+                 X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+($CellContext`MH^2 - 
+                   4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14) \
+($CellContext`MH^2 (24 $CellContext`MT^2 + 6 $CellContext`T + 
+                    6 $CellContext`T14 - 2 $CellContext`T24) - (
+                    4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2) 
+                  X`DiscB[$CellContext`MH^2 - 
+                    4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`MT, $CellContext`MT] + (
+                   2 $CellContext`MH^2 (
+                    4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 - \
+$CellContext`T24)^2 + 
+                   4 $CellContext`MH^4 $CellContext`T24 - (
+                    4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14) (
+                    4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2) 
+                  X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] - 
+                 2 (2 $CellContext`MH^6 $CellContext`T24 - $CellContext`MT^2 (
+                    4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^3 + $CellContext`MH^4 (
+                    16 $CellContext`MT^4 + $CellContext`T^2 + 
+                    2 $CellContext`T $CellContext`T14 + $CellContext`T14^2 + 
+                    4 $CellContext`MT^2 (2 $CellContext`T + 
+                    2 $CellContext`T14 - 5 $CellContext`T24) - 
+                    3 $CellContext`T $CellContext`T24 - 
+                    3 $CellContext`T14 $CellContext`T24 - 
+                    2 $CellContext`T24^2) - $CellContext`MH^2 (
+                   32 $CellContext`MT^6 + 
+                   16 $CellContext`MT^4 (2 $CellContext`T + 
+                    2 $CellContext`T14 - 3 $CellContext`T24) + 
+                   2 $CellContext`MT^2 (5 $CellContext`T^2 + 
+                    10 $CellContext`T $CellContext`T14 + 5 $CellContext`T14^2 - 
+                    8 $CellContext`T $CellContext`T24 - 
+                    8 $CellContext`T14 $CellContext`T24 - 
+                    7 $CellContext`T24^2) + ($CellContext`T + \
+$CellContext`T14) ($CellContext`T^2 + 
+                    2 $CellContext`T $CellContext`T14 + $CellContext`T14^2 - \
+$CellContext`T $CellContext`T24 - $CellContext`T14 $CellContext`T24 - 
+                    2 $CellContext`T24^2))) 
+                 X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+                   4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT])))), 
+          0, ($CellContext`MH^2 - $CellContext`S - $CellContext`T - \
+$CellContext`T14)^(-1) $CellContext`T24^(-1) (
+           8 $CellContext`MT^2 (
+              16 $CellContext`MT^4 + $CellContext`T^2 + $CellContext`T14^2 - 
+              4 $CellContext`MH^2 $CellContext`T24 + 
+              2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+              2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+              8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24))^(-1) 
+            X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24]^(-1) (8 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]] ($CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]]) + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                5]] ((2 $CellContext`S - $CellContext`S34 - 
+                 2 $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] - 4 (($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]))) + 8 ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]]) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[1]] - 4 $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[4]] ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[2]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] ($CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[4]]))) ($CellContext`MH^2 (
+               16 $CellContext`MT^4 + $CellContext`T^2 + $CellContext`T14^2 + 
+               2 $CellContext`T ($CellContext`T14 - 2 $CellContext`T24) + 
+               8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 - 
+                 2 $CellContext`T24) + 8 $CellContext`MH^2 $CellContext`T24 - 
+               4 $CellContext`T14 $CellContext`T24 - 5 $CellContext`T24^2) 
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - (
+              8 $CellContext`MH^4 $CellContext`T24 + $CellContext`T24 (
+                 4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2 + $CellContext`MH^2 (
+                16 $CellContext`MT^4 + $CellContext`T^2 + $CellContext`T14^2 + 
+                2 $CellContext`T ($CellContext`T14 - 5 $CellContext`T24) + 
+                8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 - 
+                  5 $CellContext`T24) - 10 $CellContext`T14 $CellContext`T24 - 
+                3 $CellContext`T24^2)) 
+             X`DiscB[$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`MT, $CellContext`MT] + $CellContext`T24 ((-2) $CellContext`MH^2 (
+                 12 $CellContext`MT^2 + 3 $CellContext`T + 
+                 3 $CellContext`T14 - $CellContext`T24) + (
+                 4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2) 
+              X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] + (
+               4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24) 
+              X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24] + 
+             2 (64 $CellContext`MT^8 + 
+               48 $CellContext`MT^6 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + 
+               12 $CellContext`MT^4 ($CellContext`T^2 + $CellContext`T14^2 + 
+                 
+                 2 $CellContext`T14 $CellContext`T24 + $CellContext`T24 ((-4) \
+$CellContext`MH^2 + $CellContext`T24) + 
+                 2 $CellContext`T ($CellContext`T14 + $CellContext`T24)) - \
+$CellContext`MH^2 $CellContext`T24 (2 $CellContext`T^2 + 
+                2 $CellContext`T14^2 + $CellContext`T14 $CellContext`T24 - \
+$CellContext`T24^2 + $CellContext`MH^2 ((-3) $CellContext`T - 
+                  3 $CellContext`T14 + $CellContext`T24) + $CellContext`T (
+                  4 $CellContext`T14 + $CellContext`T24)) + $CellContext`MT^2 \
+($CellContext`T^3 + $CellContext`T14^3 + 
+                 3 $CellContext`T14^2 $CellContext`T24 + 
+                 3 $CellContext`T^2 ($CellContext`T14 + $CellContext`T24) + \
+$CellContext`T14 $CellContext`T24 ((-20) $CellContext`MH^2 + 
+                   3 $CellContext`T24) + $CellContext`T24 (
+                   12 $CellContext`MH^4 - 
+                   8 $CellContext`MH^2 $CellContext`T24 + $CellContext`T24^2) + \
+$CellContext`T (3 $CellContext`T14^2 + 
+                   6 $CellContext`T14 $CellContext`T24 + $CellContext`T24 \
+((-20) $CellContext`MH^2 + 3 $CellContext`T24)))) 
+              X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT]) - 
+           2 ((-4) $CellContext`MT^2 (-$CellContext`MH^2 + 
+               8 $CellContext`MT^2 + $CellContext`T + $CellContext`T14)^(-1) (
+               16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+               8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+                 8 $CellContext`MH^2 $CellContext`T24 + 
+                 2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                 2 $CellContext`T ($CellContext`T14 + $CellContext`T24)))^(-1)
+                X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24]^(-1) ((-$CellContext`S34 $CellContext`T + $CellContext`S34 \
+$CellContext`T14 + $CellContext`MH^2 ($CellContext`S34 - $CellContext`U) + \
+$CellContext`T $CellContext`U + $CellContext`T14 $CellContext`U - \
+$CellContext`S ($CellContext`S34 + $CellContext`U)) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] - 
+              4 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[4]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`ec[5]] - 
+              4 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[2]] + 4 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[
+                 5]] ((($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] + (-$CellContext`MH^2 + $CellContext`T) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]]) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[
+                   4]] (($CellContext`S34 + $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    1]] + (-$CellContext`MH^2 + $CellContext`T) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) - 
+              4 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[4]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[1]] - 
+              4 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[2]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[2]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[1]] + 8 ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]]) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + 4 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] ($CellContext`U $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`S34 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] ($CellContext`U $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`S34 $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]]))) (-$CellContext`MH^2 ($CellContext`MH^2 - 
+                8 $CellContext`MT^2 - $CellContext`T - $CellContext`T14) (
+                2 $CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14 - \
+$CellContext`T24) $CellContext`T24 
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+(64 $CellContext`MT^8 - 
+               2 $CellContext`MH^2 (-$CellContext`MH^2 + $CellContext`T + \
+$CellContext`T14)^2 $CellContext`T24 + 
+               48 $CellContext`MT^6 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + 
+               4 $CellContext`MT^4 (3 $CellContext`T^2 + 3 $CellContext`T14^2 + 
+                 6 $CellContext`T14 $CellContext`T24 + 
+                 6 $CellContext`T ($CellContext`T14 + $CellContext`T24) + \
+$CellContext`T24 ((-20) $CellContext`MH^2 + 
+                   3 $CellContext`T24)) + $CellContext`MT^2 ($CellContext`T^3 + \
+$CellContext`T14^3 + 3 $CellContext`T14^2 $CellContext`T24 + 
+                 3 $CellContext`T^2 ($CellContext`T14 + $CellContext`T24) + \
+$CellContext`T14 $CellContext`T24 ((-28) $CellContext`MH^2 + 
+                   3 $CellContext`T24) + $CellContext`T24 (
+                   24 $CellContext`MH^4 - 
+                   4 $CellContext`MH^2 $CellContext`T24 + $CellContext`T24^2) + \
+$CellContext`T (3 $CellContext`T14^2 + 
+                   6 $CellContext`T14 $CellContext`T24 + $CellContext`T24 \
+((-28) $CellContext`MH^2 + 3 $CellContext`T24)))) 
+              X`DiscB[$CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`MT, $CellContext`MT] + $CellContext`MH^2 ($CellContext`MH^2 - 
+                8 $CellContext`MT^2 - $CellContext`T - $CellContext`T14) (
+                
+                4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 - \
+$CellContext`T24) $CellContext`T24 
+               X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] - \
+($CellContext`MH^2 - 
+               8 $CellContext`MT^2 - $CellContext`T - $CellContext`T14) (
+               4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24) (
+               16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+               8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+                 8 $CellContext`MH^2 $CellContext`T24 + 
+                 2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                 2 $CellContext`T ($CellContext`T14 + $CellContext`T24))) 
+              X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT]) + 
+            4 $CellContext`MT^2 (
+               16 $CellContext`MT^4 + $CellContext`T^2 + $CellContext`T14^2 - 
+               4 $CellContext`MH^2 $CellContext`T24 + 
+               2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+               2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+               8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24))^(-1) (
+               16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+               8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+                 8 $CellContext`MH^2 $CellContext`T24 + 
+                 2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                 2 $CellContext`T ($CellContext`T14 + $CellContext`T24)))^(-1)
+                X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24]^(-1) ((-$CellContext`S34^2 - 
+                4 $CellContext`S34 $CellContext`T + 
+                2 $CellContext`S34 $CellContext`T14 + 
+                4 $CellContext`MH^2 ($CellContext`S34 - $CellContext`U) + 
+                4 $CellContext`T $CellContext`U + 
+                2 $CellContext`T14 $CellContext`U + $CellContext`U^2 - 
+                2 $CellContext`S ($CellContext`S34 + $CellContext`U)) \
+$CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] - 
+              8 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[4]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`ec[5]] - 
+              8 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[2]] + 4 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[
+                 5]] ((2 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] + ((-4) $CellContext`MH^2 + $CellContext`S34 + 
+                    4 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]]) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] (
+                  2 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    1]] + ((-4) $CellContext`MH^2 + $CellContext`S34 + 
+                    4 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) - 
+              8 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[4]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[1]] - 
+              8 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[2]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[2]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[1]] + 32 ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]]) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + 4 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] (
+                2 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[
+                   1]] + ((-3) $CellContext`S34 + $CellContext`U) \
+$CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] (
+                  2 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    2]] + ((-3) $CellContext`S34 + $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]))) (-(-$CellContext`MT^2 (
+                   4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^4 + 
+                2 $CellContext`MH^6 $CellContext`T24 (12 $CellContext`MT^2 + 
+                  3 $CellContext`T + 3 $CellContext`T14 + $CellContext`T24) + 
+                2 $CellContext`MH^2 (
+                   4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2 (
+                  8 $CellContext`MT^4 + ($CellContext`T + $CellContext`T14) \
+$CellContext`T24 + 2 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + 
+                    3 $CellContext`T24)) - 
+                2 $CellContext`MH^4 $CellContext`T24 (96 $CellContext`MT^4 + 
+                 4 $CellContext`T^2 + 8 $CellContext`T $CellContext`T14 + 
+                 4 $CellContext`T14^2 + 3 $CellContext`T $CellContext`T24 + 
+                 3 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                 4 $CellContext`MT^2 (10 $CellContext`T + 10 $CellContext`T14 + 
+                   3 $CellContext`T24))) 
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+(2 $CellContext`MH^6 (12 $CellContext`MT^2 + 3 $CellContext`T + 
+                  3 $CellContext`T14 - $CellContext`T24) $CellContext`T24 - \
+$CellContext`MT^2 (12 $CellContext`MT^2 + 3 $CellContext`T + 
+                 3 $CellContext`T14 - $CellContext`T24) (
+                  
+                  4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^3 - 
+                2 $CellContext`MH^4 $CellContext`T24 (112 $CellContext`MT^4 + 
+                 5 $CellContext`T^2 + 10 $CellContext`T $CellContext`T14 + 
+                 5 $CellContext`T14^2 + 
+                 48 $CellContext`MT^2 ($CellContext`T + $CellContext`T14) - \
+$CellContext`T24^2) + 
+                2 $CellContext`MH^2 (128 $CellContext`MT^8 + 
+                  96 $CellContext`MT^6 ($CellContext`T + $CellContext`T14 + 
+                    3 $CellContext`T24) + 
+                  8 $CellContext`MT^4 (3 $CellContext`T^2 + 
+                    6 $CellContext`T $CellContext`T14 + 3 $CellContext`T14^2 + 
+                    22 $CellContext`T $CellContext`T24 + 
+                    22 $CellContext`T14 $CellContext`T24 + 
+                    5 $CellContext`T24^2) + ($CellContext`T + \
+$CellContext`T14) $CellContext`T24 (2 $CellContext`T^2 + 
+                    2 $CellContext`T14^2 + $CellContext`T14 $CellContext`T24 - \
+$CellContext`T24^2 + $CellContext`T (4 $CellContext`T14 + $CellContext`T24)) + 
+                  2 $CellContext`MT^2 ($CellContext`T^3 + $CellContext`T14^3 + 
+                    17 $CellContext`T14^2 $CellContext`T24 + 
+                    7 $CellContext`T14 $CellContext`T24^2 - 
+                    3 $CellContext`T24^3 + $CellContext`T^2 (
+                    3 $CellContext`T14 + 
+                    17 $CellContext`T24) + $CellContext`T (
+                    3 $CellContext`T14^2 + 
+                    34 $CellContext`T14 $CellContext`T24 + 
+                    7 $CellContext`T24^2)))) 
+               X`DiscB[$CellContext`MH^2 - 
+                 4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`MT, $CellContext`MT] + (256 $CellContext`MT^10 + 
+                256 $CellContext`MT^8 ($CellContext`T + $CellContext`T14) + 
+                2 $CellContext`MH^2 ($CellContext`MH^2 - $CellContext`T - \
+$CellContext`T14) $CellContext`T24 ($CellContext`T^2 + $CellContext`T14^2 + \
+$CellContext`T (
+                    2 $CellContext`T14 - $CellContext`T24) - $CellContext`T14 \
+$CellContext`T24 + 2 ($CellContext`MH^2 - $CellContext`T24) $CellContext`T24) + 
+                32 $CellContext`MT^6 (3 $CellContext`T^2 + 
+                  6 $CellContext`T $CellContext`T14 + 
+                  3 $CellContext`T14^2 - $CellContext`T24 (
+                   4 $CellContext`MH^2 + 3 $CellContext`T24)) + 
+                16 $CellContext`MT^4 ($CellContext`T^3 + 
+                  3 $CellContext`T^2 $CellContext`T14 + $CellContext`T14^3 - 
+                  3 $CellContext`T14 $CellContext`T24 (
+                   2 $CellContext`MH^2 + $CellContext`T24) + 
+                  2 $CellContext`T24 ($CellContext`MH^4 + 
+                    3 $CellContext`MH^2 $CellContext`T24 - \
+$CellContext`T24^2) + 
+                  3 $CellContext`T ($CellContext`T14^2 - $CellContext`T24 (
+                    2 $CellContext`MH^2 + $CellContext`T24))) + \
+$CellContext`MT^2 ($CellContext`T^4 + 
+                  4 $CellContext`T^3 $CellContext`T14 + $CellContext`T14^4 - 
+                  6 $CellContext`T14^2 $CellContext`T24 (
+                   4 $CellContext`MH^2 + $CellContext`T24) + \
+$CellContext`T24^2 ((-40) $CellContext`MH^4 + 
+                    32 $CellContext`MH^2 $CellContext`T24 - 
+                    3 $CellContext`T24^2) - 
+                  8 $CellContext`T14 $CellContext`T24 ((-2) $CellContext`MH^4 - 
+                   4 $CellContext`MH^2 $CellContext`T24 + $CellContext`T24^2) + 
+                  6 $CellContext`T^2 ($CellContext`T14^2 - $CellContext`T24 (
+                    4 $CellContext`MH^2 + $CellContext`T24)) + 
+                  4 $CellContext`T ($CellContext`T14^3 - 
+                    3 $CellContext`T14 $CellContext`T24 (
+                    4 $CellContext`MH^2 + $CellContext`T24) - 
+                    2 $CellContext`T24 ((-2) $CellContext`MH^4 - 
+                    4 $CellContext`MH^2 $CellContext`T24 + \
+$CellContext`T24^2)))) 
+               X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] - 
+              2 (16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+               8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+                 8 $CellContext`MH^2 $CellContext`T24 + 
+                 2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                 2 $CellContext`T ($CellContext`T14 + $CellContext`T24))) 
+              X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24] + ((-4) $CellContext`MH^4 $CellContext`T24 + (
+                  4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 - \
+$CellContext`T24) (
+                   4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2 - 
+                2 $CellContext`MH^2 (
+                 16 $CellContext`MT^4 + $CellContext`T^2 + $CellContext`T14^2 + 
+                 2 $CellContext`T ($CellContext`T14 - $CellContext`T24) + 
+                 8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 - \
+$CellContext`T24) - 
+                 2 $CellContext`T14 $CellContext`T24 - $CellContext`T24^2)) (
+                16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+                8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+                  8 $CellContext`MH^2 $CellContext`T24 + 
+                  2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                  2 $CellContext`T ($CellContext`T14 + $CellContext`T24))) 
+               X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+                 4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT])) - 
+           4 ((-2) $CellContext`MT^2 (
+               16 $CellContext`MT^4 + $CellContext`T^2 + $CellContext`T14^2 - 
+               4 $CellContext`MH^2 $CellContext`T24 + 
+               2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+               2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+               8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24))^(-2) (
+               16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+               8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+                 8 $CellContext`MH^2 $CellContext`T24 + 
+                 2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                 2 $CellContext`T ($CellContext`T14 + $CellContext`T24)))^(-1)
+                X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24]^(-1) (-($CellContext`S34 - $CellContext`U) ((-2) \
+$CellContext`MH^2 + $CellContext`S34 + 
+                2 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] - 
+              4 (2 $CellContext`MH^2 - $CellContext`S34 - 
+               2 $CellContext`T - $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[5]] ($CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) + 16 ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]]) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) - 
+              4 ($CellContext`S34 - $CellContext`U) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]])) ((-2) $CellContext`MH^2 (
+                16 $CellContext`MH^8 $CellContext`T24^2 - 
+                5 $CellContext`MT^2 (
+                 4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 - \
+$CellContext`T24) (
+                  4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^4 + $CellContext`MH^6 $CellContext`T24 (
+                  176 $CellContext`MT^4 + 11 $CellContext`T^2 + 
+                  22 $CellContext`T $CellContext`T14 + 11 $CellContext`T14^2 + 
+                  8 $CellContext`MT^2 (11 $CellContext`T + 
+                    11 $CellContext`T14 - 23 $CellContext`T24) - 
+                  30 $CellContext`T $CellContext`T24 - 
+                  30 $CellContext`T14 $CellContext`T24 - 
+                  13 $CellContext`T24^2) + $CellContext`MH^4 $CellContext`T24 \
+((-1408) $CellContext`MT^6 - 17 $CellContext`T^3 - 17 $CellContext`T14^3 - 
+                  16 $CellContext`MT^4 (61 $CellContext`T + 
+                   61 $CellContext`T14 - 30 $CellContext`T24) + 
+                  8 $CellContext`T14^2 $CellContext`T24 + 
+                  19 $CellContext`T14 $CellContext`T24^2 + 
+                  6 $CellContext`T24^3 + $CellContext`T^2 ((-51) \
+$CellContext`T14 + 8 $CellContext`T24) - 
+                  8 $CellContext`MT^2 (28 $CellContext`T^2 + 
+                   56 $CellContext`T $CellContext`T14 + 28 $CellContext`T14^2 - 
+                   19 $CellContext`T $CellContext`T24 - 
+                   19 $CellContext`T14 $CellContext`T24 - 
+                   17 $CellContext`T24^2) + $CellContext`T ((-51) \
+$CellContext`T14^2 + 16 $CellContext`T14 $CellContext`T24 + 
+                    19 $CellContext`T24^2)) + $CellContext`MH^2 (
+                   4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2 (144 $CellContext`MT^6 + 
+                  6 ($CellContext`T + $CellContext`T14) ($CellContext`T + \
+$CellContext`T14 - $CellContext`T24) $CellContext`T24 + 
+                  24 $CellContext`MT^4 (3 $CellContext`T + 3 $CellContext`T14 + 
+                    5 $CellContext`T24) + $CellContext`MT^2 (
+                    9 $CellContext`T^2 + 9 $CellContext`T14^2 + 
+                    54 $CellContext`T14 $CellContext`T24 - 
+                    55 $CellContext`T24^2 + 
+                    18 $CellContext`T ($CellContext`T14 + 
+                    3 $CellContext`T24)))) 
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+(32 $CellContext`MH^10 $CellContext`T24^2 + $CellContext`MT^2 (
+                  4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 - \
+$CellContext`T24) (
+                   4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^5 + 
+                2 $CellContext`MH^8 $CellContext`T24 (176 $CellContext`MT^4 + 
+                  11 $CellContext`T^2 + 22 $CellContext`T $CellContext`T14 + 
+                  11 $CellContext`T14^2 + 
+                  8 $CellContext`MT^2 (11 $CellContext`T + 
+                    11 $CellContext`T14 - 32 $CellContext`T24) - 
+                  48 $CellContext`T $CellContext`T24 - 
+                  48 $CellContext`T14 $CellContext`T24 - 
+                  11 $CellContext`T24^2) - 
+                8 $CellContext`MH^6 $CellContext`T24 (400 $CellContext`MT^6 + 
+                 8 $CellContext`MT^4 (35 $CellContext`T + 35 $CellContext`T14 - 
+                   38 $CellContext`T24) + $CellContext`MT^2 (
+                   65 $CellContext`T^2 + 65 $CellContext`T14^2 + 
+                   2 $CellContext`T (65 $CellContext`T14 - 
+                    58 $CellContext`T24) - 
+                   116 $CellContext`T14 $CellContext`T24 - 
+                   45 $CellContext`T24^2) + ($CellContext`T + \
+$CellContext`T14) (5 $CellContext`T^2 + 5 $CellContext`T14^2 + 
+                   10 $CellContext`T ($CellContext`T14 - $CellContext`T24) - 
+                   10 $CellContext`T14 $CellContext`T24 - 
+                   7 $CellContext`T24^2)) - $CellContext`MH^2 (
+                  4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^3 (256 $CellContext`MT^6 + 
+                 8 $CellContext`MT^4 (16 $CellContext`T + 16 $CellContext`T14 - 
+                   11 $CellContext`T24) + ($CellContext`T + $CellContext`T14) \
+($CellContext`T + $CellContext`T14 - $CellContext`T24) $CellContext`T24 + 
+                 2 $CellContext`MT^2 (8 $CellContext`T^2 + 
+                   16 $CellContext`T $CellContext`T14 + 8 $CellContext`T14^2 - 
+                   9 $CellContext`T $CellContext`T24 - 
+                   9 $CellContext`T14 $CellContext`T24 - 
+                   5 $CellContext`T24^2)) + $CellContext`MH^4 (
+                  4608 $CellContext`MT^10 + 
+                  1536 $CellContext`MT^8 (3 $CellContext`T + 
+                    3 $CellContext`T14 + 5 $CellContext`T24) + 
+                  64 $CellContext`MT^6 (27 $CellContext`T^2 + 
+                    54 $CellContext`T $CellContext`T14 + 
+                    27 $CellContext`T14^2 + 
+                    109 $CellContext`T $CellContext`T24 + 
+                    109 $CellContext`T14 $CellContext`T24 - 
+                    58 $CellContext`T24^2) + 
+                  16 $CellContext`MT^4 (18 $CellContext`T^3 + 
+                    18 $CellContext`T14^3 + 
+                    147 $CellContext`T14^2 $CellContext`T24 - 
+                    130 $CellContext`T14 $CellContext`T24^2 - 
+                    93 $CellContext`T24^3 + 
+                    3 $CellContext`T^2 (18 $CellContext`T14 + 
+                    49 $CellContext`T24) + 
+                    2 $CellContext`T (27 $CellContext`T14^2 + 
+                    147 $CellContext`T14 $CellContext`T24 - 
+                    65 $CellContext`T24^2)) + 
+                  2 $CellContext`MT^2 (9 $CellContext`T^4 + 
+                    9 $CellContext`T14^4 + 
+                    174 $CellContext`T14^3 $CellContext`T24 - 
+                    172 $CellContext`T14^2 $CellContext`T24^2 - 
+                    254 $CellContext`T14 $CellContext`T24^3 - 
+                    21 $CellContext`T24^4 + 
+                    6 $CellContext`T^3 (6 $CellContext`T14 + 
+                    29 $CellContext`T24) + 
+                    2 $CellContext`T^2 (27 $CellContext`T14^2 + 
+                    261 $CellContext`T14 $CellContext`T24 - 
+                    86 $CellContext`T24^2) + $CellContext`T (
+                    36 $CellContext`T14^3 + 
+                    522 $CellContext`T14^2 $CellContext`T24 - 
+                    344 $CellContext`T14 $CellContext`T24^2 - 
+                    254 $CellContext`T24^3)) - $CellContext`T24 ((-19) \
+$CellContext`T^4 - 19 $CellContext`T14^4 + 
+                   14 $CellContext`T14^3 $CellContext`T24 + 
+                   34 $CellContext`T14^2 $CellContext`T24^2 + 
+                   2 $CellContext`T14 $CellContext`T24^3 + $CellContext`T24^4 + \
+$CellContext`T^3 ((-76) $CellContext`T14 + 
+                    14 $CellContext`T24) + $CellContext`T^2 ((-114) \
+$CellContext`T14^2 + 42 $CellContext`T14 $CellContext`T24 + 
+                    34 $CellContext`T24^2) + $CellContext`T ((-76) \
+$CellContext`T14^3 + 42 $CellContext`T14^2 $CellContext`T24 + 
+                    68 $CellContext`T14 $CellContext`T24^2 + 
+                    2 $CellContext`T24^3)))) 
+               X`DiscB[$CellContext`MH^2 - 
+                 4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`MT, $CellContext`MT] + (
+                4 $CellContext`MH^8 (36 $CellContext`MT^2 + 9 $CellContext`T + 
+                  9 $CellContext`T14 - $CellContext`T24) $CellContext`T24^2 - \
+$CellContext`MT^2 (
+                 4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 - \
+$CellContext`T24) (
+                  4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^5 + 
+                2 $CellContext`MH^6 $CellContext`T24 (192 $CellContext`MT^6 + 
+                  3 $CellContext`T^3 + 3 $CellContext`T14^3 + 
+                  16 $CellContext`MT^4 (9 $CellContext`T + 9 $CellContext`T14 - 
+                    50 $CellContext`T24) + $CellContext`T^2 (
+                    9 $CellContext`T14 - 32 $CellContext`T24) - 
+                  32 $CellContext`T14^2 $CellContext`T24 - 
+                  9 $CellContext`T14 $CellContext`T24^2 + 
+                  6 $CellContext`T24^3 + $CellContext`T (9 $CellContext`T14^2 - 
+                    64 $CellContext`T14 $CellContext`T24 - 
+                    9 $CellContext`T24^2) + 
+                  4 $CellContext`MT^2 (9 $CellContext`T^2 + 
+                    18 $CellContext`T $CellContext`T14 + 9 $CellContext`T14^2 - 
+                    82 $CellContext`T $CellContext`T24 - 
+                    82 $CellContext`T14 $CellContext`T24 - 
+                    7 $CellContext`T24^2)) + $CellContext`MH^2 (
+                   4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^3 (64 $CellContext`MT^6 + 
+                  8 $CellContext`MT^4 (4 $CellContext`T + 4 $CellContext`T14 - 
+                    11 $CellContext`T24) + ($CellContext`T + \
+$CellContext`T14) ($CellContext`T + $CellContext`T14 - $CellContext`T24) \
+$CellContext`T24 + 2 $CellContext`MT^2 (2 $CellContext`T^2 + 
+                    4 $CellContext`T $CellContext`T14 + 2 $CellContext`T14^2 - 
+                    9 $CellContext`T $CellContext`T24 - 
+                    9 $CellContext`T14 $CellContext`T24 + \
+$CellContext`T24^2)) + $CellContext`MH^4 $CellContext`T24 ((-512) \
+$CellContext`MT^8 - 7 $CellContext`T^4 - 7 $CellContext`T14^4 - 
+                  64 $CellContext`MT^6 (13 $CellContext`T + 
+                   13 $CellContext`T14 - 69 $CellContext`T24) + 
+                  26 $CellContext`T14^3 $CellContext`T24 + 
+                  22 $CellContext`T14^2 $CellContext`T24^2 - 
+                  10 $CellContext`T14 $CellContext`T24^3 + $CellContext`T24^4 + \
+$CellContext`T^3 ((-28) $CellContext`T14 + 26 $CellContext`T24) - 
+                  16 $CellContext`MT^4 (27 $CellContext`T^2 + 
+                   54 $CellContext`T $CellContext`T14 + 27 $CellContext`T14^2 - 
+                   164 $CellContext`T $CellContext`T24 - 
+                   164 $CellContext`T14 $CellContext`T24 - 
+                   49 $CellContext`T24^2) + $CellContext`T^2 ((-42) \
+$CellContext`T14^2 + 78 $CellContext`T14 $CellContext`T24 + 
+                    22 $CellContext`T24^2) + $CellContext`T ((-28) \
+$CellContext`T14^3 + 78 $CellContext`T14^2 $CellContext`T24 + 
+                    44 $CellContext`T14 $CellContext`T24^2 - 
+                    10 $CellContext`T24^3) - 
+                  4 $CellContext`MT^2 (23 $CellContext`T^3 + 
+                   23 $CellContext`T14^3 + $CellContext`T^2 (
+                    69 $CellContext`T14 - 121 $CellContext`T24) - 
+                   121 $CellContext`T14^2 $CellContext`T24 - 
+                   71 $CellContext`T14 $CellContext`T24^2 + 
+                   21 $CellContext`T24^3 + $CellContext`T (
+                    69 $CellContext`T14^2 - 
+                    242 $CellContext`T14 $CellContext`T24 - 
+                    71 $CellContext`T24^2)))) 
+               X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] - 
+              2 ($CellContext`MH^2 (20 $CellContext`MT^2 + 5 $CellContext`T + 
+                 5 $CellContext`T14 - $CellContext`T24) - (
+                4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2) (
+               16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+               8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+                 8 $CellContext`MH^2 $CellContext`T24 + 
+                 2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                 2 $CellContext`T ($CellContext`T14 + $CellContext`T24))) 
+              X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24] + 
+              2 (16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+                8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+                  8 $CellContext`MH^2 $CellContext`T24 + 
+                  2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                  2 $CellContext`T ($CellContext`T14 + $CellContext`T24))) \
+((-2) $CellContext`MH^6 (36 $CellContext`MT^2 + 9 $CellContext`T + 
+                  9 $CellContext`T14 - $CellContext`T24) $CellContext`T24 + 
+                2 $CellContext`MT^2 (
+                   4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^4 + 
+                2 $CellContext`MH^2 (
+                   4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2 (
+                  4 $CellContext`MT^4 + $CellContext`T^2 + $CellContext`T14^2 + \
+$CellContext`MT^2 (5 $CellContext`T + 5 $CellContext`T14 - 
+                    21 $CellContext`T24) + 
+                  2 $CellContext`T ($CellContext`T14 - 2 $CellContext`T24) - 
+                  4 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2) - \
+$CellContext`MH^4 (192 $CellContext`MT^6 + 3 $CellContext`T^3 + 
+                 3 $CellContext`T14^3 + 
+                 16 $CellContext`MT^4 (9 $CellContext`T + 9 $CellContext`T14 - 
+                   29 $CellContext`T24) + $CellContext`T^2 (
+                   9 $CellContext`T14 - 23 $CellContext`T24) - 
+                 23 $CellContext`T14^2 $CellContext`T24 - 
+                 13 $CellContext`T14 $CellContext`T24^2 + $CellContext`T24^3 + 
+                 4 $CellContext`MT^2 (9 $CellContext`T^2 + 
+                   18 $CellContext`T $CellContext`T14 + 9 $CellContext`T14^2 - 
+                   52 $CellContext`T $CellContext`T24 - 
+                   52 $CellContext`T14 $CellContext`T24 - 
+                   15 $CellContext`T24^2) + $CellContext`T (
+                   9 $CellContext`T14^2 - 
+                   46 $CellContext`T14 $CellContext`T24 - 
+                   13 $CellContext`T24^2))) 
+               X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+                 4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT]) + 
+            2 $CellContext`MT^2 (
+               16 $CellContext`MT^4 + $CellContext`T^2 + $CellContext`T14^2 - 
+               4 $CellContext`MH^2 $CellContext`T24 + 
+               2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+               2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+               8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24))^(-2) (
+               16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+               8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+                 8 $CellContext`MH^2 $CellContext`T24 + 
+                 2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                 2 $CellContext`T ($CellContext`T14 + $CellContext`T24)))^(-1)
+                X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24]^(-1) (-($CellContext`S34 - $CellContext`U) ((-2) \
+$CellContext`MH^2 + $CellContext`S34 + 
+                2 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] - 
+              4 (2 $CellContext`MH^2 - $CellContext`S34 - 
+               2 $CellContext`T - $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[5]] ($CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) - 
+              4 ($CellContext`S34 - $CellContext`U) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]]) + 16 ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]])) (-(
+                32 $CellContext`MH^10 $CellContext`T24^2 + $CellContext`MT^2 (
+                  12 $CellContext`MT^2 + 3 $CellContext`T + 
+                  3 $CellContext`T14 - $CellContext`T24) (
+                   4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^5 + 
+                2 $CellContext`MH^8 $CellContext`T24 (176 $CellContext`MT^4 + 
+                  11 $CellContext`T^2 + 22 $CellContext`T $CellContext`T14 + 
+                  11 $CellContext`T14^2 + 
+                  8 $CellContext`MT^2 (11 $CellContext`T + 
+                    11 $CellContext`T14 - 24 $CellContext`T24) - 
+                  32 $CellContext`T $CellContext`T24 - 
+                  32 $CellContext`T14 $CellContext`T24 - 
+                  11 $CellContext`T24^2) - $CellContext`MH^2 (
+                  4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^3 (
+                 320 $CellContext`MT^6 + ($CellContext`T + $CellContext`T14) (
+                   5 $CellContext`T + 
+                   5 $CellContext`T14 - $CellContext`T24) $CellContext`T24 + 
+                 8 $CellContext`MT^4 (20 $CellContext`T + 20 $CellContext`T14 + 
+                   7 $CellContext`T24) + 
+                 2 $CellContext`MT^2 (10 $CellContext`T^2 + 
+                   20 $CellContext`T $CellContext`T14 + 10 $CellContext`T14^2 + 
+                   17 $CellContext`T $CellContext`T24 + 
+                   17 $CellContext`T14 $CellContext`T24 - 
+                   5 $CellContext`T24^2)) - 
+                8 $CellContext`MH^6 $CellContext`T24 (464 $CellContext`MT^6 + 
+                 8 $CellContext`MT^4 (41 $CellContext`T + 41 $CellContext`T14 - 
+                   18 $CellContext`T24) + 
+                 11 $CellContext`MT^2 (7 $CellContext`T^2 + 
+                   14 $CellContext`T $CellContext`T14 + 7 $CellContext`T14^2 - 
+                   4 $CellContext`T $CellContext`T24 - 
+                   4 $CellContext`T14 $CellContext`T24 - 
+                   3 $CellContext`T24^2) + 
+                 2 ($CellContext`T + $CellContext`T14) (3 $CellContext`T^2 + 
+                   6 $CellContext`T $CellContext`T14 + 
+                   3 $CellContext`T14^2 - $CellContext`T $CellContext`T24 - \
+$CellContext`T14 $CellContext`T24 - 
+                   2 $CellContext`T24^2)) + $CellContext`MH^4 (
+                  4608 $CellContext`MT^10 + 
+                  512 $CellContext`MT^8 (9 $CellContext`T + 
+                    9 $CellContext`T14 + 25 $CellContext`T24) + 
+                  64 $CellContext`MT^6 (27 $CellContext`T^2 + 
+                    54 $CellContext`T $CellContext`T14 + 
+                    27 $CellContext`T14^2 + 
+                    181 $CellContext`T $CellContext`T24 + 
+                    181 $CellContext`T14 $CellContext`T24 + 
+                    10 $CellContext`T24^2) + 
+                  16 $CellContext`MT^4 (18 $CellContext`T^3 + 
+                    18 $CellContext`T14^3 + 
+                    243 $CellContext`T14^2 $CellContext`T24 + 
+                    50 $CellContext`T14 $CellContext`T24^2 - 
+                    41 $CellContext`T24^3 + 
+                    27 $CellContext`T^2 (2 $CellContext`T14 + 
+                    9 $CellContext`T24) + $CellContext`T (
+                    54 $CellContext`T14^2 + 
+                    486 $CellContext`T14 $CellContext`T24 + 
+                    50 $CellContext`T24^2)) + 
+                  2 $CellContext`MT^2 (9 $CellContext`T^4 + 
+                    9 $CellContext`T14^4 + 
+                    286 $CellContext`T14^3 $CellContext`T24 + 
+                    140 $CellContext`T14^2 $CellContext`T24^2 - 
+                    78 $CellContext`T14 $CellContext`T24^3 - 
+                    13 $CellContext`T24^4 + $CellContext`T^3 (
+                    36 $CellContext`T14 + 286 $CellContext`T24) + 
+                    2 $CellContext`T^2 (27 $CellContext`T14^2 + 
+                    429 $CellContext`T14 $CellContext`T24 + 
+                    70 $CellContext`T24^2) + $CellContext`T (
+                    36 $CellContext`T14^3 + 
+                    858 $CellContext`T14^2 $CellContext`T24 + 
+                    280 $CellContext`T14 $CellContext`T24^2 - 
+                    78 $CellContext`T24^3)) + $CellContext`T24 (
+                    31 $CellContext`T^4 + 31 $CellContext`T14^4 + 
+                    30 $CellContext`T14^3 $CellContext`T24 + 
+                    2 $CellContext`T14^2 $CellContext`T24^2 + 
+                    2 $CellContext`T14 $CellContext`T24^3 - \
+$CellContext`T24^4 + 2 $CellContext`T^3 (62 $CellContext`T14 + 
+                    15 $CellContext`T24) + 
+                    2 $CellContext`T^2 (93 $CellContext`T14^2 + 
+                    45 $CellContext`T14 $CellContext`T24 + \
+$CellContext`T24^2) + 
+                    2 $CellContext`T (62 $CellContext`T14^3 + 
+                    45 $CellContext`T14^2 $CellContext`T24 + 
+                    2 $CellContext`T14 $CellContext`T24^2 + \
+$CellContext`T24^3)))) 
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+              2 ($CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14) (
+                16 $CellContext`MH^8 $CellContext`T24^2 - $CellContext`MT^2 (
+                 16 $CellContext`MT^2 + 4 $CellContext`T + 4 $CellContext`T14 - 
+                 5 $CellContext`T24) (
+                  4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^4 + $CellContext`MH^6 $CellContext`T24 (
+                  176 $CellContext`MT^4 + 11 $CellContext`T^2 + 
+                  22 $CellContext`T $CellContext`T14 + 11 $CellContext`T14^2 + 
+                  8 $CellContext`MT^2 (11 $CellContext`T + 
+                    11 $CellContext`T14 - 25 $CellContext`T24) - 
+                  34 $CellContext`T $CellContext`T24 - 
+                  34 $CellContext`T14 $CellContext`T24 - 
+                  13 $CellContext`T24^2) + $CellContext`MH^2 (
+                   4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2 (
+                  144 $CellContext`MT^6 + ($CellContext`T + $CellContext`T14) \
+(5 $CellContext`T + 5 $CellContext`T14 - 6 $CellContext`T24) $CellContext`T24 + 
+                  72 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 (9 $CellContext`T^2 + 
+                    18 $CellContext`T $CellContext`T14 + 9 $CellContext`T14^2 + 
+                    38 $CellContext`T $CellContext`T24 + 
+                    38 $CellContext`T14 $CellContext`T24 - 
+                    55 $CellContext`T24^2)) - 
+                2 $CellContext`MH^4 $CellContext`T24 (672 $CellContext`MT^6 + 
+                 8 $CellContext`T^3 + 8 $CellContext`T14^3 + 
+                 16 $CellContext`MT^4 (29 $CellContext`T + 
+                   29 $CellContext`T14 - 
+                   20 $CellContext`T24) + $CellContext`T^2 (
+                   24 $CellContext`T14 - 7 $CellContext`T24) - 
+                 7 $CellContext`T14^2 $CellContext`T24 - 
+                 10 $CellContext`T14 $CellContext`T24^2 - 
+                 3 $CellContext`T24^3 + 
+                 2 $CellContext`MT^2 (53 $CellContext`T^2 + 
+                   106 $CellContext`T $CellContext`T14 + 
+                   53 $CellContext`T14^2 - 54 $CellContext`T $CellContext`T24 - 
+                   54 $CellContext`T14 $CellContext`T24 - 
+                   35 $CellContext`T24^2) + 
+                 2 $CellContext`T (12 $CellContext`T14^2 - 
+                   7 $CellContext`T14 $CellContext`T24 - 
+                   5 $CellContext`T24^2))) 
+               X`DiscB[$CellContext`MH^2 - 
+                 4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`MT, $CellContext`MT] + (
+                4 $CellContext`MH^8 $CellContext`T24^2 (36 $CellContext`MT^2 + 
+                  9 $CellContext`T + 
+                  9 $CellContext`T14 + $CellContext`T24) - $CellContext`MT^2 (
+                  4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^4 (48 $CellContext`MT^4 + 3 $CellContext`T^2 + 
+                 6 $CellContext`T $CellContext`T14 + 3 $CellContext`T14^2 + 
+                 8 $CellContext`MT^2 (3 $CellContext`T + 3 $CellContext`T14 - 
+                   7 $CellContext`T24) - 14 $CellContext`T $CellContext`T24 - 
+                 14 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2) + 
+                2 $CellContext`MH^6 $CellContext`T24 (192 $CellContext`MT^6 + 
+                  3 $CellContext`T^3 + 3 $CellContext`T14^3 + 
+                  16 $CellContext`MT^4 (9 $CellContext`T + 9 $CellContext`T14 - 
+                    58 $CellContext`T24) + $CellContext`T^2 (
+                    9 $CellContext`T14 - 40 $CellContext`T24) - 
+                  40 $CellContext`T14^2 $CellContext`T24 - 
+                  17 $CellContext`T14 $CellContext`T24^2 - 
+                  6 $CellContext`T24^3 + 
+                  4 $CellContext`MT^2 (9 $CellContext`T^2 + 
+                    18 $CellContext`T $CellContext`T14 + 9 $CellContext`T14^2 - 
+                    98 $CellContext`T $CellContext`T24 - 
+                    98 $CellContext`T14 $CellContext`T24 - 
+                    19 $CellContext`T24^2) + $CellContext`T (
+                    9 $CellContext`T14^2 - 
+                    80 $CellContext`T14 $CellContext`T24 - 
+                    17 $CellContext`T24^2)) + $CellContext`MH^4 \
+$CellContext`T24 ((-1536) $CellContext`MT^8 - 11 $CellContext`T^4 - 
+                  11 $CellContext`T14^4 - 
+                  64 $CellContext`MT^6 (29 $CellContext`T + 
+                   29 $CellContext`T14 - 115 $CellContext`T24) + 
+                  50 $CellContext`T14^3 $CellContext`T24 + 
+                  56 $CellContext`T14^2 $CellContext`T24^2 + 
+                  26 $CellContext`T14 $CellContext`T24^3 - $CellContext`T24^4 + \
+$CellContext`T^3 ((-44) $CellContext`T14 + 50 $CellContext`T24) - 
+                  16 $CellContext`MT^4 (51 $CellContext`T^2 + 
+                   102 $CellContext`T $CellContext`T14 + 
+                   51 $CellContext`T14^2 - 
+                   280 $CellContext`T $CellContext`T24 - 
+                   280 $CellContext`T14 $CellContext`T24 - 
+                   95 $CellContext`T24^2) + $CellContext`T^2 ((-66) \
+$CellContext`T14^2 + 150 $CellContext`T14 $CellContext`T24 + 
+                    56 $CellContext`T24^2) + $CellContext`T ((-44) \
+$CellContext`T14^3 + 150 $CellContext`T14^2 $CellContext`T24 + 
+                    112 $CellContext`T14 $CellContext`T24^2 + 
+                    26 $CellContext`T24^3) - 
+                  4 $CellContext`MT^2 (39 $CellContext`T^3 + 
+                   39 $CellContext`T14^3 + $CellContext`T^2 (
+                    117 $CellContext`T14 - 215 $CellContext`T24) - 
+                   215 $CellContext`T14^2 $CellContext`T24 - 
+                   151 $CellContext`T14 $CellContext`T24^2 - 
+                   37 $CellContext`T24^3 + $CellContext`T (
+                    117 $CellContext`T14^2 - 
+                    430 $CellContext`T14 $CellContext`T24 - 
+                    151 $CellContext`T24^2))) + $CellContext`MH^2 (
+                   4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2 (256 $CellContext`MT^8 + 
+                  32 $CellContext`MT^6 (6 $CellContext`T + 6 $CellContext`T14 - 
+                    7 $CellContext`T24) + 
+                  16 $CellContext`MT^4 (3 $CellContext`T^2 + 
+                    6 $CellContext`T $CellContext`T14 + 3 $CellContext`T14^2 - 
+                    2 $CellContext`T $CellContext`T24 - 
+                    2 $CellContext`T14 $CellContext`T24 - 
+                    37 $CellContext`T24^2) + ($CellContext`T + \
+$CellContext`T14) $CellContext`T24 (5 $CellContext`T^2 + 5 $CellContext`T14^2 + 
+                    2 $CellContext`T (5 $CellContext`T14 - 
+                    8 $CellContext`T24) - 
+                    16 $CellContext`T14 $CellContext`T24 + \
+$CellContext`T24^2) + 
+                  2 $CellContext`MT^2 (2 $CellContext`T^3 + 
+                    2 $CellContext`T14^3 + 
+                    13 $CellContext`T14^2 $CellContext`T24 - 
+                    106 $CellContext`T14 $CellContext`T24^2 - \
+$CellContext`T24^3 + $CellContext`T^2 (6 $CellContext`T14 + 
+                    13 $CellContext`T24) + 
+                    2 $CellContext`T (3 $CellContext`T14^2 + 
+                    13 $CellContext`T14 $CellContext`T24 - 
+                    53 $CellContext`T24^2)))) 
+               X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] - 
+              2 ((-64) $CellContext`MT^4 - 4 $CellContext`T^2 - 
+               8 $CellContext`T $CellContext`T14 - 4 $CellContext`T14^2 - 
+               3 $CellContext`T $CellContext`T24 - 
+               3 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + \
+$CellContext`MH^2 (20 $CellContext`MT^2 + 5 $CellContext`T + 
+                 5 $CellContext`T14 + $CellContext`T24) - 
+               4 $CellContext`MT^2 (8 $CellContext`T + 8 $CellContext`T14 + 
+                3 $CellContext`T24)) (
+               16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+               8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+                 8 $CellContext`MH^2 $CellContext`T24 + 
+                 2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                 2 $CellContext`T ($CellContext`T14 + $CellContext`T24))) 
+              X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24] - 
+              2 (16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+               8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+                 8 $CellContext`MH^2 $CellContext`T24 + 
+                 2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                 2 $CellContext`T ($CellContext`T14 + $CellContext`T24))) \
+(($CellContext`MT^2 (4 $CellContext`T + 4 $CellContext`T14 - 
+                   6 $CellContext`T24) + ($CellContext`T + $CellContext`T14) \
+($CellContext`T + $CellContext`T14 - 2 $CellContext`T24)) (
+                  
+                  4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^3 + 
+               2 $CellContext`MH^6 $CellContext`T24 (36 $CellContext`MT^2 + 
+                 9 $CellContext`T + 
+                 9 $CellContext`T14 + $CellContext`T24) + $CellContext`MH^4 (
+                 192 $CellContext`MT^6 + 3 $CellContext`T^3 + 
+                 3 $CellContext`T14^3 + 
+                 16 $CellContext`MT^4 (9 $CellContext`T + 9 $CellContext`T14 - 
+                   37 $CellContext`T24) + $CellContext`T^2 (
+                   9 $CellContext`T14 - 31 $CellContext`T24) - 
+                 31 $CellContext`T14^2 $CellContext`T24 - 
+                 19 $CellContext`T14 $CellContext`T24^2 - $CellContext`T24^3 + \
+$CellContext`T (9 $CellContext`T14^2 - 62 $CellContext`T14 $CellContext`T24 - 
+                   19 $CellContext`T24^2) + 
+                 4 $CellContext`MT^2 (9 $CellContext`T^2 + 
+                   18 $CellContext`T $CellContext`T14 + 9 $CellContext`T14^2 - 
+                   68 $CellContext`T $CellContext`T24 - 
+                   68 $CellContext`T14 $CellContext`T24 - 
+                   17 $CellContext`T24^2)) - 
+               2 $CellContext`MH^2 (320 $CellContext`MT^8 + 
+                2 $CellContext`T^4 + 2 $CellContext`T14^4 + 
+                16 $CellContext`MT^6 (23 $CellContext`T + 23 $CellContext`T14 - 
+                  37 $CellContext`T24) + $CellContext`T^3 (8 $CellContext`T14 - 
+                  6 $CellContext`T24) - 6 $CellContext`T14^3 $CellContext`T24 - 
+                10 $CellContext`T14^2 $CellContext`T24^2 - 
+                3 $CellContext`T14 $CellContext`T24^3 - $CellContext`T24^4 + 
+                4 $CellContext`MT^4 (39 $CellContext`T^2 + 
+                  78 $CellContext`T $CellContext`T14 + 39 $CellContext`T14^2 - 
+                  98 $CellContext`T $CellContext`T24 - 
+                  98 $CellContext`T14 $CellContext`T24 - 
+                  45 $CellContext`T24^2) + 
+                2 $CellContext`T^2 (6 $CellContext`T14^2 - 
+                  9 $CellContext`T14 $CellContext`T24 - 
+                  5 $CellContext`T24^2) + $CellContext`T (
+                  8 $CellContext`T14^3 - 
+                  18 $CellContext`T14^2 $CellContext`T24 - 
+                  20 $CellContext`T14 $CellContext`T24^2 - 
+                  3 $CellContext`T24^3) + $CellContext`MT^2 (
+                  29 $CellContext`T^3 + 
+                  29 $CellContext`T14^3 + $CellContext`T^2 (
+                    87 $CellContext`T14 - 85 $CellContext`T24) - 
+                  85 $CellContext`T14^2 $CellContext`T24 - 
+                  85 $CellContext`T14 $CellContext`T24^2 - 
+                  7 $CellContext`T24^3 + $CellContext`T (
+                    87 $CellContext`T14^2 - 
+                    170 $CellContext`T14 $CellContext`T24 - 
+                    85 $CellContext`T24^2)))) 
+              X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT]) + 
+            4 $CellContext`MT^2 (
+               16 $CellContext`MT^4 + $CellContext`T^2 + $CellContext`T14^2 - 
+               4 $CellContext`MH^2 $CellContext`T24 + 
+               2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+               2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+               8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24))^(-1) ((-$CellContext`S34^2 - 
+                2 $CellContext`S34 $CellContext`T - $CellContext`S34 \
+$CellContext`T24 + 2 $CellContext`T14 $CellContext`T24 - 
+                2 $CellContext`S (
+                 2 $CellContext`S34 + $CellContext`T24) + $CellContext`MH^2 (
+                  2 $CellContext`S + 3 $CellContext`S34 - 2 $CellContext`T14 - 
+                  3 $CellContext`U) + 2 $CellContext`T $CellContext`U + 
+                4 $CellContext`T14 $CellContext`U + $CellContext`T24 \
+$CellContext`U + $CellContext`U^2) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] - 
+              8 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T24 + \
+$CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[4]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`ec[5]] - 
+              8 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T24 + \
+$CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[2]] - 
+              4 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T24 - \
+$CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[5]] ((2 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]]) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]] (2 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]])) - 
+              8 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T24 + \
+$CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[4]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[1]] - 
+              8 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T24 + \
+$CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[2]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[2]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[1]] + 4 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[
+                 4]] ((-$CellContext`MH^2 + 
+                  2 $CellContext`S34 + $CellContext`T24) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[
+                   1]] + (-$CellContext`S34 + $CellContext`U) \
+$CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] - $CellContext`MH^2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + $CellContext`T24 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + 2 $CellContext`U $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] - $CellContext`MH^2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + 2 $CellContext`S34 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] + $CellContext`T24 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] - $CellContext`S34 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]] + $CellContext`U $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]] - $CellContext`MH^2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[4]] + $CellContext`T24 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]] + 2 $CellContext`U $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]])) ((-$CellContext`MH^2 + 
+                 4 $CellContext`MT^2 + $CellContext`T + \
+$CellContext`T14)^(-1) ((-2) $CellContext`MH^2 + 
+                4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MH^2 (
+                 16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+                 8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+                   8 $CellContext`MH^2 $CellContext`T24 + 
+                   2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                   2 $CellContext`T ($CellContext`T14 + \
+$CellContext`T24)))^(-1) (256 $CellContext`MT^8 + 
+                192 $CellContext`MT^6 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + 
+                48 $CellContext`MT^4 ($CellContext`T^2 + $CellContext`T14^2 + 
+                  2 $CellContext`T14 $CellContext`T24 + $CellContext`T24 \
+((-3) $CellContext`MH^2 + $CellContext`T24) + 
+                  2 $CellContext`T ($CellContext`T14 + $CellContext`T24)) + \
+$CellContext`MH^2 $CellContext`T24 ((-5) $CellContext`T^2 - 
+                  5 $CellContext`T14^2 - 
+                  4 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                  2 $CellContext`MH^2 (3 $CellContext`T + 
+                    3 $CellContext`T14 + $CellContext`T24) - 
+                  2 $CellContext`T (5 $CellContext`T14 + 2 $CellContext`T24)) + 
+                4 $CellContext`MT^2 ($CellContext`T^3 + $CellContext`T14^3 + 
+                  3 $CellContext`T14^2 $CellContext`T24 + 
+                  3 $CellContext`T^2 ($CellContext`T14 + $CellContext`T24) + \
+$CellContext`T14 $CellContext`T24 ((-14) $CellContext`MH^2 + 
+                    3 $CellContext`T24) + $CellContext`T24 (
+                    6 $CellContext`MH^4 - 
+                    8 $CellContext`MH^2 $CellContext`T24 + \
+$CellContext`T24^2) + $CellContext`T (3 $CellContext`T14^2 + 
+                    6 $CellContext`T14 $CellContext`T24 + $CellContext`T24 \
+((-14) $CellContext`MH^2 + 3 $CellContext`T24)))) 
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT]/
+               X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24] - ($CellContext`MH^4 + 32 $CellContext`MT^4 + 
+                12 $CellContext`MT^2 ($CellContext`T + $CellContext`T14) + \
+($CellContext`T + $CellContext`T14)^2 - 
+                2 $CellContext`MH^2 (
+                 6 $CellContext`MT^2 + $CellContext`T + \
+$CellContext`T14))^(-1) (
+                16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+                8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+                  8 $CellContext`MH^2 $CellContext`T24 + 
+                  2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                  2 $CellContext`T ($CellContext`T14 + \
+$CellContext`T24)))^(-1) (
+               2 $CellContext`MH^10 (12 $CellContext`MT^2 + 3 $CellContext`T + 
+                 3 $CellContext`T14 - $CellContext`T24) $CellContext`T24 - \
+$CellContext`MH^8 $CellContext`T24 (464 $CellContext`MT^4 + 
+                19 $CellContext`T^2 + 38 $CellContext`T $CellContext`T14 + 
+                19 $CellContext`T14^2 + 
+                8 $CellContext`MT^2 (24 $CellContext`T + 
+                  24 $CellContext`T14 - $CellContext`T24) - 
+                4 $CellContext`T $CellContext`T24 - 
+                4 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2) - \
+$CellContext`MT^2 (
+                 4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^4 (
+                40 $CellContext`MT^4 + ($CellContext`T + $CellContext`T14)^2 + 
+                2 $CellContext`MT^2 (7 $CellContext`T + 
+                  7 $CellContext`T14 + $CellContext`T24)) + $CellContext`MH^2 \
+(4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2 (
+                 832 $CellContext`MT^8 + ($CellContext`T + \
+$CellContext`T14)^3 $CellContext`T24 + 
+                 48 $CellContext`MT^6 (11 $CellContext`T + 
+                   11 $CellContext`T14 + 
+                   10 $CellContext`T24) + $CellContext`MT^2 ($CellContext`T + \
+$CellContext`T14) (7 $CellContext`T^2 + 14 $CellContext`T $CellContext`T14 + 
+                   7 $CellContext`T14^2 + 26 $CellContext`T $CellContext`T24 + 
+                   26 $CellContext`T14 $CellContext`T24 + 
+                   3 $CellContext`T24^2) + 
+                 4 $CellContext`MT^4 (27 $CellContext`T^2 + 
+                   54 $CellContext`T $CellContext`T14 + 27 $CellContext`T14^2 + 
+                   52 $CellContext`T $CellContext`T24 + 
+                   52 $CellContext`T14 $CellContext`T24 + 
+                   9 $CellContext`T24^2)) + $CellContext`MH^6 (
+                 256 $CellContext`MT^8 + 
+                 192 $CellContext`MT^6 ($CellContext`T + $CellContext`T14 + 
+                   17 $CellContext`T24) + 
+                 3 ($CellContext`T + $CellContext`T14) $CellContext`T24 (
+                   7 $CellContext`T^2 + 14 $CellContext`T $CellContext`T14 + 
+                   7 $CellContext`T14^2 + $CellContext`T24^2) + 
+                 16 $CellContext`MT^4 (3 $CellContext`T^2 + 
+                   6 $CellContext`T $CellContext`T14 + 3 $CellContext`T14^2 + 
+                   119 $CellContext`T $CellContext`T24 + 
+                   119 $CellContext`T14 $CellContext`T24 + 
+                   13 $CellContext`T24^2) + 
+                 4 $CellContext`MT^2 ($CellContext`T^3 + $CellContext`T14^3 + 
+                   89 $CellContext`T14^2 $CellContext`T24 + 
+                   9 $CellContext`T14 $CellContext`T24^2 + 
+                   7 $CellContext`T24^3 + $CellContext`T^2 (
+                    3 $CellContext`T14 + 
+                    89 $CellContext`T24) + $CellContext`T (
+                    3 $CellContext`T14^2 + 
+                    178 $CellContext`T14 $CellContext`T24 + 
+                    9 $CellContext`T24^2))) - $CellContext`MH^4 (
+                3584 $CellContext`MT^10 + 
+                256 $CellContext`MT^8 (13 $CellContext`T + 
+                  13 $CellContext`T14 + 
+                  
+                  40 $CellContext`T24) + ($CellContext`T + \
+$CellContext`T14)^2 $CellContext`T24 (9 $CellContext`T^2 + 
+                  18 $CellContext`T $CellContext`T14 + 9 $CellContext`T14^2 + 
+                  4 $CellContext`T $CellContext`T24 + 
+                  4 $CellContext`T14 $CellContext`T24 + 3 $CellContext`T24^2) + 
+                128 $CellContext`MT^6 (9 $CellContext`T^2 + 
+                  18 $CellContext`T $CellContext`T14 + 9 $CellContext`T14^2 + 
+                  60 $CellContext`T $CellContext`T24 + 
+                  60 $CellContext`T14 $CellContext`T24 + 
+                  14 $CellContext`T24^2) + 
+                16 $CellContext`MT^4 (11 $CellContext`T^3 + 
+                  11 $CellContext`T14^3 + 
+                  129 $CellContext`T14^2 $CellContext`T24 + 
+                  51 $CellContext`T14 $CellContext`T24^2 + 
+                  16 $CellContext`T24^3 + 
+                  3 $CellContext`T^2 (11 $CellContext`T14 + 
+                    43 $CellContext`T24) + 
+                  3 $CellContext`T (11 $CellContext`T14^2 + 
+                    86 $CellContext`T14 $CellContext`T24 + 
+                    17 $CellContext`T24^2)) + 
+                2 $CellContext`MT^2 (5 $CellContext`T^4 + 
+                  5 $CellContext`T14^4 + 
+                  116 $CellContext`T14^3 $CellContext`T24 + 
+                  54 $CellContext`T14^2 $CellContext`T24^2 + 
+                  28 $CellContext`T14 $CellContext`T24^3 + $CellContext`T24^4 + 
+                  4 $CellContext`T^3 (5 $CellContext`T14 + 
+                    29 $CellContext`T24) + 
+                  6 $CellContext`T^2 (5 $CellContext`T14^2 + 
+                    58 $CellContext`T14 $CellContext`T24 + 
+                    9 $CellContext`T24^2) + 
+                  4 $CellContext`T (5 $CellContext`T14^3 + 
+                    87 $CellContext`T14^2 $CellContext`T24 + 
+                    27 $CellContext`T14 $CellContext`T24^2 + 
+                    7 $CellContext`T24^3)))) 
+              X`DiscB[$CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`MT, $CellContext`MT]/
+              X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24] - (
+                16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+                8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+                  8 $CellContext`MH^2 $CellContext`T24 + 
+                  2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                  2 $CellContext`T ($CellContext`T14 + \
+$CellContext`T24)))^(-1) (256 $CellContext`MT^10 + 
+               256 $CellContext`MT^8 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MH^2 $CellContext`T24 (
+                 2 $CellContext`MH^2 ($CellContext`T + $CellContext`T14 - \
+$CellContext`T24)^2 + 
+                 4 $CellContext`MH^4 $CellContext`T24 - ($CellContext`T + \
+$CellContext`T14) ($CellContext`T + $CellContext`T14 + $CellContext`T24)^2) + 
+               32 $CellContext`MT^6 (3 $CellContext`T^2 + 
+                 3 $CellContext`T14^2 + 6 $CellContext`T14 $CellContext`T24 + 
+                 6 $CellContext`T ($CellContext`T14 + $CellContext`T24) + \
+$CellContext`T24 ((-2) $CellContext`MH^2 + 
+                   3 $CellContext`T24)) + $CellContext`MT^2 ($CellContext`T^4 + \
+$CellContext`T14^4 + 4 $CellContext`T14^3 $CellContext`T24 + 
+                 6 $CellContext`T14^2 $CellContext`T24 ((-2) \
+$CellContext`MH^2 + $CellContext`T24) + 
+                 4 $CellContext`T14 $CellContext`T24 ((-2) $CellContext`MH^2 + \
+$CellContext`T24)^2 + 
+                 4 $CellContext`T^3 ($CellContext`T14 + $CellContext`T24) + \
+$CellContext`T24^2 ((-32) $CellContext`MH^4 - 
+                   4 $CellContext`MH^2 $CellContext`T24 + $CellContext`T24^2) + 
+                 6 $CellContext`T^2 ($CellContext`T14^2 + 
+                   2 $CellContext`T14 $CellContext`T24 + $CellContext`T24 \
+((-2) $CellContext`MH^2 + $CellContext`T24)) + 
+                 4 $CellContext`T ($CellContext`T14^3 + 
+                   3 $CellContext`T14^2 $CellContext`T24 + 
+                   3 $CellContext`T14 $CellContext`T24 ((-2) \
+$CellContext`MH^2 + $CellContext`T24) + $CellContext`T24 ((-2) \
+$CellContext`MH^2 + $CellContext`T24)^2)) + 
+               16 $CellContext`MT^4 ($CellContext`T^3 + $CellContext`T14^3 + 
+                 3 $CellContext`T14^2 $CellContext`T24 + 
+                 3 $CellContext`T14 $CellContext`T24 (-$CellContext`MH^2 + \
+$CellContext`T24) + 
+                 3 $CellContext`T^2 ($CellContext`T14 + $CellContext`T24) + \
+$CellContext`T24 (2 $CellContext`MH^4 - 
+                   2 $CellContext`MH^2 $CellContext`T24 + $CellContext`T24^2) + 
+                 3 $CellContext`T ($CellContext`T14^2 + 
+                   2 $CellContext`T14 $CellContext`T24 + $CellContext`T24 \
+(-$CellContext`MH^2 + $CellContext`T24)))) 
+              X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT]/
+              X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24] + 
+              2 $CellContext`MH^2 (16 $CellContext`MT^4 + $CellContext`T^2 + 
+                2 $CellContext`T $CellContext`T14 + $CellContext`T14^2 + \
+$CellContext`MT^2 (8 $CellContext`T + 8 $CellContext`T14 - 
+                  4 $CellContext`T24) + 
+                2 $CellContext`MH^2 $CellContext`T24 - $CellContext`T \
+$CellContext`T24 - $CellContext`T14 $CellContext`T24 - 2 $CellContext`T24^2) 
+               X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+                  4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24]^(-1) 
+               X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+                 4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT])))}, 0, 
+         3, 1],
+        Editable->False], ")"}], "+", 
+      RowBox[{
+       FractionBox["1", 
+        RowBox[{
+         SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", "T24"}]], 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          FractionBox["1", "T"], 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"4", " ", 
+                RowBox[{"(", 
+                 RowBox[{"2", "+", 
+                  FractionBox["1", "\[Epsilon]"], "+", 
+                  RowBox[{"DiscB", "[", 
+                   RowBox[{"T", ",", "MT", ",", "MT"}], "]"}], "+", 
+                  RowBox[{"Log", "[", 
+                   FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "-", 
+               RowBox[{
+                FractionBox["1", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], "-", "T"}]], 
+                RowBox[{"4", " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                   FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                   RowBox[{"3", " ", "T"}], "-", 
+                   FractionBox["T", "\[Epsilon]"], "+", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                   RowBox[{"T", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                   RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                   RowBox[{"T", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                   RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                  ")"}]}]}]}], ")"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"4", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}], "-", 
+                  RowBox[{"4", " ", 
+                   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[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                  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", "[", "5", "]"}]}], "]"}]}], "-", 
+               RowBox[{"4", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                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", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "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", "[", "4", "]"}]}], "]"}]}], "+", 
+               RowBox[{"4", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                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", "[", "4", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 ")"}]}]}], ")"}]}], "-", 
+            RowBox[{
+             FractionBox["1", 
+              RowBox[{
+               SuperscriptBox["MH", "2"], "-", "T"}]], 
+             RowBox[{
+              RowBox[{"(", 
+               RowBox[{
+                SuperscriptBox[
+                 RowBox[{"Log", "[", 
+                  FractionBox[
+                   RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                   RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                SuperscriptBox[
+                 RowBox[{"Log", "[", 
+                  FractionBox[
+                   RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                   RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{"2", " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", 
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                   RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                  ")"}], " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"ec", "[", "4", "]"}], ",", 
+                   RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                RowBox[{"4", " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                   RowBox[{"S", " ", 
+                    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", "[", "5", "]"}]}], "]"}]}], "+", 
+                RowBox[{"4", " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"e", "[", "1", "]"}], ",", 
+                   RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                 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", "[", "4", "]"}], ",", 
+                   RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                RowBox[{"4", " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                   RowBox[{"S", " ", 
+                    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", "[", "4", "]"}]}], "]"}]}], "-", 
+                RowBox[{"4", " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"e", "[", "1", "]"}], ",", 
+                   RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                 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", "[", "4", "]"}]}], "]"}]}], "+", 
+                RowBox[{
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"e", "[", "1", "]"}], ",", 
+                   RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S", "-", 
+                    RowBox[{"2", " ", "T24"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                   RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                  ")"}]}], "+", 
+                RowBox[{"8", " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"e", "[", "1", "]"}], ",", 
+                   RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    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[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    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[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                  ")"}]}]}], ")"}]}]}], "-", 
+            RowBox[{
+             FractionBox["1", 
+              RowBox[{
+               SuperscriptBox["MH", "2"], "-", "T"}]], 
+             RowBox[{"4", " ", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{"DiscB", "[", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                "-", 
+                RowBox[{"DiscB", "[", 
+                 RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S", "-", 
+                    RowBox[{"2", " ", "T24"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "7"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"8", " ", "S34"}], "+", 
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"6", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "9"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"8", " ", "S34"}], "+", 
+                    RowBox[{"5", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                   RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    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"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", 
+                    RowBox[{"2", " ", "S"}], "-", "T", "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    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", "[", "5", "]"}]}], "]"}]}], "+", 
+                RowBox[{"4", " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"e", "[", "1", "]"}], ",", 
+                   RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                 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", "[", "4", "]"}], ",", 
+                   RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                RowBox[{"2", " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", 
+                    RowBox[{"2", " ", "S"}], "-", "T", "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    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", "[", "4", "]"}]}], "]"}]}], "-", 
+                RowBox[{"4", " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"e", "[", "1", "]"}], ",", 
+                   RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                 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", "[", "4", "]"}]}], "]"}]}], "+", 
+                RowBox[{
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"e", "[", "1", "]"}], ",", 
+                   RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S", "-", 
+                    RowBox[{"2", " ", "T24"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                   RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                  ")"}]}], "+", 
+                RowBox[{"16", " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"e", "[", "1", "]"}], ",", 
+                   RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                  ")"}]}]}], ")"}]}]}], "-", 
+            RowBox[{"8", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                FractionBox["1", 
+                 RowBox[{"2", " ", 
+                  SuperscriptBox[
+                   RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], "2"]}]], 
+                RowBox[{
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "-", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                   RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                   RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"e", "[", "1", "]"}], ",", 
+                   RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "-", 
+                    RowBox[{"4", " ", "S34"}], "-", "T", "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"2", " ", "S"}], "-", 
+                    RowBox[{"4", " ", "S34"}], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                   RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                   RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S"}], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                   RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "+", 
+               RowBox[{
+                FractionBox["1", 
+                 RowBox[{"2", " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}]}]], 
+                RowBox[{
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                   RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"e", "[", "1", "]"}], ",", 
+                   RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"4", " ", "S34"}], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"4", " ", "S34"}], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                   RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                   RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                   RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}]}], ")"}]}]}], ")"}]}], "+", 
+         RowBox[{
+          FractionBox["1", "S"], 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"2", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"2", "+", 
+                  FractionBox["1", "\[Epsilon]"], "+", 
+                  RowBox[{"DiscB", "[", 
+                   RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}], "+", 
+                  RowBox[{"Log", "[", 
+                   FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "4"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"8", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                  RowBox[{"8", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                  RowBox[{"8", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"8", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "U"}], "+", 
+                    RowBox[{"S", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T"}], "+", "U"}], ")"}]}]}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "T14", "+", "T24"}], ")"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "T", "-", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                   " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                   " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                   " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                   " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"8", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                  RowBox[{"4", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 ")"}], " ", 
+                RowBox[{"ScalarC0", "[", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], ",", 
+                  RowBox[{
+                   SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                   "T24"}], ",", 
+                  RowBox[{"-", 
+                   FractionBox[
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], 
+                    RowBox[{
+                    RowBox[{"-", "1"}], "+", 
+                    SuperscriptBox["\[Beta]", "2"]}]]}], ",", "MT", ",", "MT",
+                   ",", "MT"}], "]"}]}]}], ")"}]}], "-", 
+            RowBox[{"4", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", "T", "-", "U"}], ")"}], 
+                   " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                  RowBox[{"16", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", "T", "-", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "-", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", 
+                    RowBox[{"-", 
+                    FractionBox[
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], 
+                    RowBox[{
+                    RowBox[{"-", "1"}], "+", 
+                    SuperscriptBox["\[Beta]", "2"]}]]}], ",", "MT", ",", "MT",
+                     ",", "MT"}], "]"}], " ", 
+                   RowBox[{"(", 
+                    InterpretationBox[
+                    RowBox[{
+                    FractionBox[
+                    RowBox[{"24", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "2"]], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"14", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "3"]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    SuperscriptBox["\[Beta]", "2"]}], ")"}], "/", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "3"]}], "+", 
+                    InterpretationBox[
+                    SuperscriptBox[
+                    RowBox[{"O", "[", "\[Beta]", "]"}], "4"],
+                    SeriesData[$CellContext`\[Beta], 0, {}, 0, 4, 1],
+                    Editable->False]}],
+                    
+                    SeriesData[$CellContext`\[Beta], 0, {
+                    24 $CellContext`MT^4 ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 ((-16) $CellContext`MH^2 $CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-2), 0, 
+                    8 $CellContext`MT^4 (
+                    16 $CellContext`MH^2 $CellContext`MT^2 - (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-3) ((
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^3 (4 $CellContext`MT^2 - 
+                    5 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)) - 8 $CellContext`MH^4 (16 $CellContext`MT^4 + 
+                    3 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2) + 8 $CellContext`MH^2 (32 $CellContext`MT^6 + 
+                    16 $CellContext`MT^4 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) + 
+                    14 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 + 
+                    3 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^3))}, 0, 4, 1],
+                    Editable->False], ")"}]}], "+", 
+                  RowBox[{"(", 
+                   InterpretationBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "192"}], " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"20", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "3"], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}]}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "2"]}], ")"}]}], "+", 
+                    FractionBox[
+                    RowBox[{"48", " ", "\[ImaginaryI]", " ", 
+                    SuperscriptBox["MT", "4"], " ", "\[Pi]", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", "\[Beta]"}], 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "2"]], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    RowBox[{"112", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"24", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"768", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"512", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "-", 
+                    RowBox[{"96", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "3"]}], 
+                    "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"10", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"7", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"768", " ", 
+                    SuperscriptBox["MT", "8"]}], "-", 
+                    RowBox[{"512", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "3"]}], 
+                    "+", 
+                    RowBox[{"96", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"10", " ", 
+                    SuperscriptBox["MH", "4"]}], "-", 
+                    RowBox[{"13", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}]}]}], ")"}]}], 
+                    ")"}], " ", 
+                    SuperscriptBox["\[Beta]", "2"]}], ")"}], "/", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "3"]}], "+", 
+                    FractionBox[
+                    RowBox[{"96", " ", "\[ImaginaryI]", " ", 
+                    SuperscriptBox["MT", "4"], " ", "\[Pi]", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"]}], "-", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}]}], 
+                    ")"}], " ", 
+                    SuperscriptBox["\[Beta]", "3"]}], 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "3"]], "+", 
+                    InterpretationBox[
+                    SuperscriptBox[
+                    RowBox[{"O", "[", "\[Beta]", "]"}], "4"],
+                    SeriesData[$CellContext`\[Beta], 0, {}, 0, 4, 1],
+                    Editable->False]}],
+                    
+                    SeriesData[$CellContext`\[Beta], 0, {
+                    Rational[
+                    1, 2] ((-16) $CellContext`MH^2 $CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-2) (
+                    8 $CellContext`MT^2 ((-16) $CellContext`MH^2 \
+$CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2) + (-(
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 (
+                    12 $CellContext`MT^2 + $CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) + 
+                    8 $CellContext`MH^2 $CellContext`MT^2 (
+                    12 $CellContext`MT^2 + 
+                    5 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24))) 
+                    X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + ((-192) $CellContext`MT^6 + 
+                    16 $CellContext`MT^4 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) + 
+                    20 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 + ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^3 + 8 $CellContext`MH^2 (12 $CellContext`MT^4 - 
+                    5 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24))) 
+                    X`DiscB[$CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24, $CellContext`MT, $CellContext`MT]), 
+                    Complex[0, 48] $CellContext`MT^4 
+                    Pi ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) ((-16) $CellContext`MH^2 $CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-2), (-2) $CellContext`MT^2 (
+                    16 $CellContext`MH^2 $CellContext`MT^2 - (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-3) ((-2) (48 $CellContext`MH^2 $CellContext`MT^2 - 
+                    112 $CellContext`MT^4 - 
+                    24 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) + ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2) (16 $CellContext`MH^2 $CellContext`MT^2 - (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2) + (768 $CellContext`MT^8 + 
+                    512 $CellContext`MT^6 ($CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) - 
+                    96 $CellContext`MT^4 (
+                    5 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24) ($CellContext`S34 + $CellContext`T14 + $CellContext`T24) + (
+                    2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24) ($CellContext`S34 + $CellContext`T14 + $CellContext`T24)^3 + 
+                    16 $CellContext`MH^2 $CellContext`MT^2 ($CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) (10 $CellContext`MH^2 - 
+                    7 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24))) 
+                    X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + (768 $CellContext`MT^8 - 
+                    512 $CellContext`MT^6 ($CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) - (
+                    2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24) ($CellContext`S34 + $CellContext`T14 + $CellContext`T24)^3 + 
+                    96 $CellContext`MT^4 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) (5 $CellContext`MH^2 - 
+                    4 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)) - 
+                    16 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) (10 $CellContext`MH^4 - 
+                    13 $CellContext`MH^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) + 
+                    3 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)) 
+                    X`DiscB[$CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24, $CellContext`MT, $CellContext`MT]), 
+                    Complex[0, 96] $CellContext`MT^4 
+                    Pi (32 $CellContext`MT^6 - 
+                    6 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 + (
+                    2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24) ($CellContext`S34 + $CellContext`T14 + $CellContext`T24)^2) \
+(16 $CellContext`MH^2 $CellContext`MT^2 - (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-3)}, 0, 4, 1],
+                    Editable->False], ")"}]}], ")"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", "T", "-", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", "T", "-", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "-", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", 
+                    RowBox[{"-", 
+                    FractionBox[
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], 
+                    RowBox[{
+                    RowBox[{"-", "1"}], "+", 
+                    SuperscriptBox["\[Beta]", "2"]}]]}], ",", "MT", ",", "MT",
+                     ",", "MT"}], "]"}], " ", 
+                   RowBox[{"(", 
+                    InterpretationBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "3"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], ")"}], "/", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "2"]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "48"}], " ", 
+                    SuperscriptBox["MH", "6"], " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"14", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "4"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"208", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "3"]}]}], 
+                    ")"}]}]}], ")"}]}], ")"}], " ", 
+                    SuperscriptBox["\[Beta]", "2"]}], ")"}], "/", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "3"]}], "+", 
+                    InterpretationBox[
+                    SuperscriptBox[
+                    RowBox[{"O", "[", "\[Beta]", "]"}], "4"],
+                    SeriesData[$CellContext`\[Beta], 0, {}, 0, 4, 1],
+                    Editable->False]}],
+                    SeriesData[$CellContext`\[Beta], 
+                    0, {-$CellContext`MT^2 ((-16) $CellContext`MH^2 \
+$CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-2) ((-8) $CellContext`MH^2 ($CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^3 - 4 $CellContext`MH^4 (4 $CellContext`MT^2 - 
+                    3 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24))), 0, (-4) $CellContext`MT^2 (
+                    16 $CellContext`MH^2 $CellContext`MT^2 - (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-3) ((-48) $CellContext`MH^6 $CellContext`MT^2 \
+($CellContext`S34 + $CellContext`T14 + $CellContext`T24) - 
+                    2 $CellContext`MH^2 (
+                    14 $CellContext`MT^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24) ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 + $CellContext`MT^2 (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^4 + $CellContext`MH^4 (128 $CellContext`MT^6 + 
+                    208 $CellContext`MT^4 ($CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) + 
+                    64 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 - 
+                    3 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^3))}, 0, 4, 1],
+                    Editable->False], ")"}]}], "+", 
+                  RowBox[{"(", 
+                   InterpretationBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    RowBox[{"80", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MH", "4"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "48"}], " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"40", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}]}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "2"]}], ")"}]}], ")"}]}], 
+                    "-", 
+                    FractionBox[
+                    RowBox[{"2", " ", "\[ImaginaryI]", " ", 
+                    SuperscriptBox["MT", "2"], " ", "\[Pi]", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    RowBox[{"6", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", "\[Beta]"}], 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "2"]], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "4"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "24"}], " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MH", "6"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "3"]}], "-", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"24", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"14", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"240", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"28", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    "-", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "3"]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}]}]}], ")"}], " ", 
+                    SuperscriptBox["\[Beta]", "2"]}], ")"}], "/", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "3"]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", "\[ImaginaryI]", " ", 
+                    SuperscriptBox["MT", "2"], " ", "\[Pi]", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"96", " ", 
+                    SuperscriptBox["MH", "4"], " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "3"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "6"]}], "-", 
+                    RowBox[{"144", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "-", 
+                    RowBox[{"40", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "3"]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    SuperscriptBox["\[Beta]", "3"]}], ")"}], "/", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "3"]}], "+", 
+                    InterpretationBox[
+                    SuperscriptBox[
+                    RowBox[{"O", "[", "\[Beta]", "]"}], "4"],
+                    SeriesData[$CellContext`\[Beta], 0, {}, 0, 4, 1],
+                    Editable->False]}],
+                    
+                    SeriesData[$CellContext`\[Beta], 0, {
+                    Rational[-1, 
+                    2] ((-16) $CellContext`MH^2 $CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-2) ((
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) ((-16) $CellContext`MH^2 $CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2) + $CellContext`MH^2 (
+                    32 $CellContext`MH^2 $CellContext`MT^2 - 
+                    80 $CellContext`MT^4 - 
+                    16 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) + ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2) 
+                    X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] - (32 $CellContext`MH^4 $CellContext`MT^2 + 
+                    4 $CellContext`MT^2 (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 + $CellContext`MH^2 ((-48) $CellContext`MT^4 - 
+                    40 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) + ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)) 
+                    X`DiscB[$CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24, $CellContext`MT, $CellContext`MT]), 
+                    Complex[0, -2] $CellContext`MT^2 
+                    Pi ((-16) $CellContext`MH^2 $CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-2) ((
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 + $CellContext`MH^2 (8 $CellContext`MT^2 - 
+                    6 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24))), 2 $CellContext`MT^2 (
+                    16 $CellContext`MH^2 $CellContext`MT^2 - (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-3) ((
+                    16 $CellContext`MH^2 $CellContext`MT^2 - (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2) (
+                    16 $CellContext`MH^2 ($CellContext`MT^2 - \
+$CellContext`S34 - $CellContext`T14 - $CellContext`T24) + 
+                    3 (4 $CellContext`MT^2 + $CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24)^2) + 
+                    8 $CellContext`MH^2 (
+                    16 $CellContext`MH^4 $CellContext`MT^2 + (
+                    5 $CellContext`MT^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24) (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 + 2 $CellContext`MH^2 ((-24) $CellContext`MT^4 - 
+                    8 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) + ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)) 
+                    X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] - (128 $CellContext`MH^6 $CellContext`MT^2 - (
+                    4 $CellContext`MT^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24) (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^3 - 16 $CellContext`MH^4 (24 $CellContext`MT^4 + 
+                    14 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) - ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2) + 2 $CellContext`MH^2 (64 $CellContext`MT^6 + 
+                    240 $CellContext`MT^4 ($CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) + 
+                    28 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 - 
+                    7 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^3)) 
+                    X`DiscB[$CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24, $CellContext`MT, $CellContext`MT]), 
+                    Complex[0, -2] $CellContext`MT^2 
+                    Pi (16 $CellContext`MH^2 $CellContext`MT^2 - (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-3) (
+                    96 $CellContext`MH^4 $CellContext`MT^2 ($CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) + (
+                    4 $CellContext`MT^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24) (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^3 + 2 $CellContext`MH^2 (256 $CellContext`MT^6 - 
+                    144 $CellContext`MT^4 ($CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) - 
+                    40 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 + 
+                    3 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^3))}, 0, 4, 1],
+                    Editable->False], ")"}]}], ")"}]}]}], ")"}]}], "-", 
+            RowBox[{"8", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", "4"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+               RowBox[{"8", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+               RowBox[{"8", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+               RowBox[{"8", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+               RowBox[{"8", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 ")"}]}]}], ")"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"ScalarC0", "[", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], ",", 
+                  RowBox[{
+                   SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                   "T24"}], ",", 
+                  RowBox[{"-", 
+                   FractionBox[
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], 
+                    RowBox[{
+                    RowBox[{"-", "1"}], "+", 
+                    SuperscriptBox["\[Beta]", "2"]}]]}], ",", "MT", ",", "MT",
+                   ",", "MT"}], "]"}], " ", 
+                RowBox[{"(", 
+                 InterpretationBox[
+                  RowBox[{
+                   RowBox[{"-", 
+                    FractionBox[
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}]}]]}], "-", 
+                   FractionBox[
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    ")"}]}], ")"}], " ", 
+                    SuperscriptBox["\[Beta]", "2"]}], 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "2"]], "+", 
+                   InterpretationBox[
+                    SuperscriptBox[
+                    RowBox[{"O", "[", "\[Beta]", "]"}], "4"],
+                    SeriesData[$CellContext`\[Beta], 0, {}, 0, 4, 1],
+                    Editable->False]}],
+                  
+                  SeriesData[$CellContext`\[Beta], 0, {
+                   Rational[-1, 2] $CellContext`MT^2 ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2/(
+                    16 $CellContext`MH^2 $CellContext`MT^2 - (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2), 
+                    0, (-2) $CellContext`MH^2 $CellContext`MT^2 \
+($CellContext`MH^2 - $CellContext`S34 - $CellContext`T14 - $CellContext`T24) (
+                    16 $CellContext`MT^4 - ($CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24)^2) ((-16) $CellContext`MH^2 \
+$CellContext`MT^2 + (
+                    
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-2)}, 0, 4, 1],
+                  Editable->False], ")"}]}], "+", 
+               RowBox[{"(", 
+                InterpretationBox[
+                 RowBox[{
+                  RowBox[{
+                   FractionBox["1", "4"], " ", 
+                   RowBox[{"(", 
+                    RowBox[{"3", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    FractionBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}]], "+", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}]}], 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}]], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "+", 
+                  FractionBox[
+                   RowBox[{"\[ImaginaryI]", " ", 
+                    SuperscriptBox["MT", "2"], " ", "\[Pi]", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", "\[Beta]"}], 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}]], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}]}]}], ")"}], " ", 
+                    SuperscriptBox["\[Beta]", "2"]}], ")"}], "/", 
+                   SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "2"]}], "-", 
+                  FractionBox[
+                   RowBox[{"\[ImaginaryI]", " ", 
+                    SuperscriptBox["MT", "2"], " ", "\[Pi]", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    SuperscriptBox["\[Beta]", "3"]}], 
+                   SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "2"]], "+", 
+                  InterpretationBox[
+                   SuperscriptBox[
+                    RowBox[{"O", "[", "\[Beta]", "]"}], "4"],
+                   SeriesData[$CellContext`\[Beta], 0, {}, 0, 4, 1],
+                   Editable->False]}],
+                 
+                 SeriesData[$CellContext`\[Beta], 0, {
+                  Rational[1, 4] (3 + 
+                    X`Eps^(-1) + $CellContext`MH^2 (
+                    4 $CellContext`MT^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24) (16 $CellContext`MH^2 $CellContext`MT^2 - (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-1) 
+                    X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24) (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) (16 $CellContext`MH^2 $CellContext`MT^2 - (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-1) 
+                    X`DiscB[$CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24, $CellContext`MT, $CellContext`MT] + 
+                    Log[$CellContext`MT^(-2) X`Mu^2]), 
+                   Complex[0, 1] $CellContext`MT^2 
+                   Pi ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)/((-16) $CellContext`MH^2 $CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2), $CellContext`MT^2 ((-16) $CellContext`MH^2 \
+$CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-2) ((-2) (2 $CellContext`MH^2 - 
+                    4 $CellContext`MT^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24) (16 $CellContext`MH^2 $CellContext`MT^2 - (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2) + $CellContext`MH^2 (16 $CellContext`MT^4 - 
+                    8 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) + ($CellContext`S34 + $CellContext`T14 + $CellContext`T24) (
+                    4 $CellContext`MH^2 - 
+                    3 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24))) 
+                    X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] - (
+                    4 $CellContext`MH^4 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) + ($CellContext`S34 + $CellContext`T14 + $CellContext`T24) (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 - $CellContext`MH^2 (16 $CellContext`MT^4 + 
+                    8 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) + 
+                    5 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)) 
+                    X`DiscB[$CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24, $CellContext`MT, $CellContext`MT]), 
+                   Complex[0, -1] $CellContext`MT^2 
+                   Pi ((-16) $CellContext`MH^2 $CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-2) (-($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 + 
+                    2 $CellContext`MH^2 (
+                    16 $CellContext`MT^4 + ($CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24)^2))}, 0, 4, 1],
+                 Editable->False], ")"}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              InterpretationBox[
+               RowBox[{
+                RowBox[{
+                 RowBox[{"(", 
+                  RowBox[{"4", " ", "S", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], ")"}], "/", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                   SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}]}], "-", 
+                RowBox[{
+                 RowBox[{"(", 
+                  RowBox[{"32", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", "S", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], ")"}], " ", 
+                   SuperscriptBox["\[Beta]", "2"]}], ")"}], "/", 
+                 SuperscriptBox[
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "2"]}], "+", 
+                InterpretationBox[
+                 SuperscriptBox[
+                  RowBox[{"O", "[", "\[Beta]", "]"}], "3"],
+                 SeriesData[$CellContext`\[Beta], 0, {}, 0, 3, 1],
+                 Editable->False]}],
+               SeriesData[$CellContext`\[Beta], 0, {
+                4 $CellContext`S ((-16) $CellContext`MH^2 $CellContext`MT^2 + \
+(4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-1) (4 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - 2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 2 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]])) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + 8 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] - 8 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] - 8 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]] + 8 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[
+                    2]] ((-$CellContext`T - 2 $CellContext`T14 + 
+                    2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] - 4 ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] (-$CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) + ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))), 
+                 0, (-32) $CellContext`MT^2 $CellContext`S ((-2) \
+$CellContext`MH^2 + 
+                  4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) ((-16) $CellContext`MH^2 $CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-2) (4 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - 2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 2 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]])) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + 8 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] - 8 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] - 8 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]] + 8 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[
+                    2]] ((-$CellContext`T - 2 $CellContext`T14 + 
+                    2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] - 4 ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] (-$CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) + ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])))}, 0, 3, 1],
+               Editable->False], ")"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"ScalarC0", "[", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], ",", 
+                  RowBox[{
+                   SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                   "T24"}], ",", 
+                  RowBox[{"-", 
+                   FractionBox[
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], 
+                    RowBox[{
+                    RowBox[{"-", "1"}], "+", 
+                    SuperscriptBox["\[Beta]", "2"]}]]}], ",", "MT", ",", "MT",
+                   ",", "MT"}], "]"}], " ", 
+                RowBox[{"(", 
+                 InterpretationBox[
+                  RowBox[{
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}]}], "+", 
+                   RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox["\[Beta]", "2"]}], "+", 
+                   RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox["\[Beta]", "4"]}], "+", 
+                   InterpretationBox[
+                    SuperscriptBox[
+                    RowBox[{"O", "[", "\[Beta]", "]"}], "5"],
+                    SeriesData[$CellContext`\[Beta], 0, {}, 0, 5, 1],
+                    Editable->False]}],
+                  
+                  SeriesData[$CellContext`\[Beta], 
+                   0, {$CellContext`MH^2 (
+                    4 $CellContext`MT^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24), 0, 4 $CellContext`MH^2 $CellContext`MT^2, 0, 
+                    4 $CellContext`MH^2 $CellContext`MT^2}, 0, 5, 1],
+                  Editable->False], ")"}]}], "+", 
+               RowBox[{"(", 
+                InterpretationBox[
+                 RowBox[{
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}]}]}], ")"}], "+", 
+                  RowBox[{"\[ImaginaryI]", " ", "\[Pi]", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", "\[Beta]"}], "-", 
+                  RowBox[{"2", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24", "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}]}]}], ")"}], " ", 
+                   SuperscriptBox["\[Beta]", "2"]}], "+", 
+                  RowBox[{"4", " ", "\[ImaginaryI]", " ", 
+                   SuperscriptBox["MT", "2"], " ", "\[Pi]", " ", 
+                   SuperscriptBox["\[Beta]", "3"]}], "-", 
+                  RowBox[{
+                   FractionBox["2", "3"], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24", "+", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}]}]}], ")"}], " ", 
+                   SuperscriptBox["\[Beta]", "4"]}], "+", 
+                  InterpretationBox[
+                   SuperscriptBox[
+                    RowBox[{"O", "[", "\[Beta]", "]"}], "5"],
+                   SeriesData[$CellContext`\[Beta], 0, {}, 0, 5, 1],
+                   Editable->False]}],
+                 
+                 SeriesData[$CellContext`\[Beta], 
+                  0, {(-2) $CellContext`MH^2 
+                    X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + (2 $CellContext`MH^2 - 
+                    4 $CellContext`MT^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24) 
+                    X`DiscB[$CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24, $CellContext`MT, $CellContext`MT], 
+                   Complex[0, 1] 
+                   Pi (4 $CellContext`MT^2 + $CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24), (-2) (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24 + 2 $CellContext`MT^2 
+                    X`DiscB[$CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24, $CellContext`MT, $CellContext`MT]), 
+                   Complex[0, 4] $CellContext`MT^2 Pi, 
+                   Rational[-2, 3] (
+                    16 $CellContext`MT^2 + $CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24 + 
+                    6 $CellContext`MT^2 
+                    X`DiscB[$CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24, $CellContext`MT, $CellContext`MT])}, 0, 
+                  5, 1],
+                 Editable->False], ")"}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              InterpretationBox[
+               RowBox[{
+                RowBox[{"-", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", "S34", " ", "T"}], "-", 
+                    SuperscriptBox["T", "2"], "+", 
+                    RowBox[{"4", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "-", "U"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", 
+                    RowBox[{"2", " ", "T14"}], "-", 
+                    RowBox[{"2", " ", "T24"}], "-", "U"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "S34", " ", "U"}], "-", 
+                    RowBox[{"4", " ", "T14", " ", "U"}], "+", 
+                    SuperscriptBox["U", "2"]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "S34", "+", "T14", "+", "T24"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", "S34", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"32", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], ")"}], "/", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}]}], ")"}]}], "+", 
+                RowBox[{
+                 RowBox[{"(", 
+                  RowBox[{"16", " ", 
+                   SuperscriptBox["MT", "2"], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", "S34", " ", "T"}], "-", 
+                    SuperscriptBox["T", "2"], "+", 
+                    RowBox[{"4", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "-", "U"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", 
+                    RowBox[{"2", " ", "T14"}], "-", 
+                    RowBox[{"2", " ", "T24"}], "-", "U"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "S34", " ", "U"}], "-", 
+                    RowBox[{"4", " ", "T14", " ", "U"}], "+", 
+                    SuperscriptBox["U", "2"]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "S34", "+", "T14", "+", "T24"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", "S34", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"32", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                   SuperscriptBox["\[Beta]", "2"]}], ")"}], "/", 
+                 SuperscriptBox[
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "2"]}], "+", 
+                InterpretationBox[
+                 SuperscriptBox[
+                  RowBox[{"O", "[", "\[Beta]", "]"}], "3"],
+                 SeriesData[$CellContext`\[Beta], 0, {}, 0, 3, 1],
+                 Editable->False]}],
+               
+               SeriesData[$CellContext`\[Beta], 
+                0, {(-2) ((-16) $CellContext`MH^2 $CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-1) (((-2) $CellContext`S34 $CellContext`T - \
+$CellContext`T^2 + 4 $CellContext`T $CellContext`T24 + 
+                    2 $CellContext`S ($CellContext`T - $CellContext`U) + 
+                    2 $CellContext`MH^2 ($CellContext`T + 2 $CellContext`T14 - 
+                    2 $CellContext`T24 - $CellContext`U) + 
+                    2 $CellContext`S34 $CellContext`U - 
+                    4 $CellContext`T14 $CellContext`U + $CellContext`U^2) \
+$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] - 
+                  4 ((-2) ($CellContext`S - $CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] + ((-2) $CellContext`MH^2 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + 2 $CellContext`MH^2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`T $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`U $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + 2 $CellContext`S $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] - 
+                   2 $CellContext`S34 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 
+                   2 $CellContext`T14 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 
+                   2 $CellContext`T24 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 2 $CellContext`MH^2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] - $CellContext`T $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] - $CellContext`U $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] - 2 $CellContext`MH^2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] + $CellContext`T $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] + $CellContext`U $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + 
+                  8 ((-2) $CellContext`MH^2 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] - 
+                  8 ((-2) $CellContext`MH^2 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] + 32 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]]) ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) - ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) - 
+                  8 ((-2) $CellContext`MH^2 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]] + 
+                  8 ((-2) $CellContext`MH^2 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]] - 4 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] (
+                    2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - 
+                    2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    2]] + ($CellContext`T - $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    3]]) + ((-2) ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + 
+                    2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    2]] + (-$CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])), 0, 
+                 16 $CellContext`MT^2 ((-2) $CellContext`MH^2 + 
+                  4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) ((-16) $CellContext`MH^2 $CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-2) (((-2) $CellContext`S34 $CellContext`T - \
+$CellContext`T^2 + 4 $CellContext`T $CellContext`T24 + 
+                    2 $CellContext`S ($CellContext`T - $CellContext`U) + 
+                    2 $CellContext`MH^2 ($CellContext`T + 2 $CellContext`T14 - 
+                    2 $CellContext`T24 - $CellContext`U) + 
+                    2 $CellContext`S34 $CellContext`U - 
+                    4 $CellContext`T14 $CellContext`U + $CellContext`U^2) \
+$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] - 
+                  4 ((-2) ($CellContext`S - $CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] + ((-2) $CellContext`MH^2 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + 2 $CellContext`MH^2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`T $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`U $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + 2 $CellContext`S $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] - 
+                   2 $CellContext`S34 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 
+                   2 $CellContext`T14 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 
+                   2 $CellContext`T24 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 2 $CellContext`MH^2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] - $CellContext`T $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] - $CellContext`U $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] - 2 $CellContext`MH^2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] + $CellContext`T $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] + $CellContext`U $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + 
+                  8 ((-2) $CellContext`MH^2 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] - 
+                  8 ((-2) $CellContext`MH^2 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] + 32 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]]) ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) - ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) - 
+                  8 ((-2) $CellContext`MH^2 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]] + 
+                  8 ((-2) $CellContext`MH^2 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]] - 4 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] (
+                    2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - 
+                    2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    2]] + ($CellContext`T - $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    3]]) + ((-2) ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + 
+                    2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    2]] + (-$CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))}, 0, 3, 1],
+               Editable->False], ")"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"ScalarC0", "[", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], ",", 
+                  RowBox[{
+                   SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                   "T24"}], ",", 
+                  RowBox[{"-", 
+                   FractionBox[
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], 
+                    RowBox[{
+                    RowBox[{"-", "1"}], "+", 
+                    SuperscriptBox["\[Beta]", "2"]}]]}], ",", "MT", ",", "MT",
+                   ",", "MT"}], "]"}], " ", 
+                RowBox[{"(", 
+                 InterpretationBox[
+                  RowBox[{
+                   RowBox[{"-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}]}], ")"}]}]}], "-", 
+                   RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}]}], ")"}], " ", 
+                    SuperscriptBox["\[Beta]", "2"]}], "-", 
+                   RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}]}], ")"}], " ", 
+                    SuperscriptBox["\[Beta]", "4"]}], "+", 
+                   InterpretationBox[
+                    SuperscriptBox[
+                    RowBox[{"O", "[", "\[Beta]", "]"}], "5"],
+                    SeriesData[$CellContext`\[Beta], 0, {}, 0, 5, 1],
+                    Editable->False]}],
+                  
+                  SeriesData[$CellContext`\[Beta], 
+                   0, {(-4) $CellContext`MT^2 ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24), 0, (-4) $CellContext`MT^2 ((-2) $CellContext`MH^2 + 
+                    8 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24), 0, (-4) $CellContext`MT^2 ((-2) $CellContext`MH^2 + 
+                    12 $CellContext`MT^2 + $CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24)}, 0, 5, 1],
+                  Editable->False], ")"}]}], "+", 
+               RowBox[{"(", 
+                InterpretationBox[
+                 RowBox[{
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}]}]}], ")"}], "-", 
+                  RowBox[{"8", " ", "\[ImaginaryI]", " ", 
+                   SuperscriptBox["MT", "2"], " ", "\[Pi]", " ", "\[Beta]"}], 
+                  "+", 
+                  RowBox[{"4", " ", 
+                   SuperscriptBox["MT", "2"], " ", 
+                   RowBox[{"(", 
+                    RowBox[{"4", "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                   SuperscriptBox["\[Beta]", "2"]}], "-", 
+                  RowBox[{"8", " ", "\[ImaginaryI]", " ", 
+                   SuperscriptBox["MT", "2"], " ", "\[Pi]", " ", 
+                   SuperscriptBox["\[Beta]", "3"]}], "+", 
+                  RowBox[{
+                   FractionBox["4", "3"], " ", 
+                   SuperscriptBox["MT", "2"], " ", 
+                   RowBox[{"(", 
+                    RowBox[{"16", "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}]}]}], ")"}], " ", 
+                   SuperscriptBox["\[Beta]", "4"]}], "+", 
+                  InterpretationBox[
+                   SuperscriptBox[
+                    RowBox[{"O", "[", "\[Beta]", "]"}], "5"],
+                   SeriesData[$CellContext`\[Beta], 0, {}, 0, 5, 1],
+                   Editable->False]}],
+                 
+                 SeriesData[$CellContext`\[Beta], 
+                  0, {(4 $CellContext`MT^2 + $CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) 
+                    X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + (
+                    4 $CellContext`MT^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24) 
+                    X`DiscB[$CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24, $CellContext`MT, $CellContext`MT], 
+                   Complex[0, -8] $CellContext`MT^2 Pi, 
+                   4 $CellContext`MT^2 (4 + 
+                    X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + 
+                    X`DiscB[$CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24, $CellContext`MT, $CellContext`MT]), 
+                   Complex[0, -8] $CellContext`MT^2 Pi, 
+                   Rational[4, 3] $CellContext`MT^2 (16 + 
+                    3 X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + 3 
+                    X`DiscB[$CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24, $CellContext`MT, $CellContext`MT])}, 0, 
+                  5, 1],
+                 Editable->False], ")"}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], 
+     ")"}]}]}], "+", 
+  RowBox[{
+   FractionBox["1", 
+    RowBox[{"MW", " ", "SW"}]], 
+   RowBox[{"2", " ", 
+    SuperscriptBox["Alfas", "2"], " ", "c2", " ", "EL", " ", 
+    SuperscriptBox["MT", "2"], " ", 
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{"(", 
+       InterpretationBox[
+        RowBox[{
+         RowBox[{"(", 
+          RowBox[{
+           RowBox[{
+            FractionBox["1", "T"], 
+            RowBox[{"(", 
+             RowBox[{
+              RowBox[{
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{"4", " ", 
+                  RowBox[{"(", 
+                   RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    FractionBox["T", "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                    ")"}]}]}]}], ")"}], " ", 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{"2", " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+              
+              RowBox[{
+               FractionBox["1", 
+                RowBox[{
+                 SuperscriptBox["MH", "2"], "-", "T"}]], 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  SuperscriptBox[
+                   RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                  SuperscriptBox[
+                   RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}]}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 ")"}]}]}], "+", 
+              RowBox[{"16", " ", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], "2"]}]], 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}]}], ")"}]}]}], "+", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}]}]], 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                   
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}]}], 
+                ")"}]}], "+", 
+              RowBox[{
+               FractionBox["1", 
+                RowBox[{
+                 SuperscriptBox["MH", "2"], "-", "T"}]], 
+               RowBox[{"4", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"DiscB", "[", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                  "-", 
+                  RowBox[{"DiscB", "[", 
+                   RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    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", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    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[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}]}], ")"}]}], "+", 
+           RowBox[{
+            FractionBox["1", "S34"], 
+            RowBox[{"(", 
+             RowBox[{
+              RowBox[{
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{"4", " ", 
+                  RowBox[{"(", 
+                   RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    FractionBox["S34", "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                    ")"}]}]}]}], ")"}], " ", 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{"2", " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+              
+              RowBox[{
+               FractionBox["1", 
+                RowBox[{
+                 SuperscriptBox["MH", "2"], "-", "S34"}]], 
+               RowBox[{"4", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"DiscB", "[", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                  "-", 
+                  RowBox[{"DiscB", "[", 
+                   RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    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[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "+", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{"-", 
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                   RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                    " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}]}], 
+                 "+", 
+                 RowBox[{
+                  FractionBox["1", 
+                   SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], "2"]], 
+                  RowBox[{"8", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}]}], 
+                ")"}]}], "-", 
+              RowBox[{
+               FractionBox["1", 
+                RowBox[{
+                 SuperscriptBox["MH", "2"], "-", "S34"}]], 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  SuperscriptBox[
+                   RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                  SuperscriptBox[
+                   RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 ")"}]}]}], "+", 
+              RowBox[{
+               FractionBox["1", "S"], 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    FractionBox["S34", "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                    ")"}]}]}]}], ")"}], " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T"}], "-", "T14", "+", "T24", "+", "U"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    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[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    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[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                   ")"}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                   " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "-", "T24", "-", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"2", " ", "S"}], "-", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    RowBox[{"8", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "7"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"3", " ", "S34"}], "+", 
+                    RowBox[{"8", " ", "T"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", "S34", "+", 
+                    RowBox[{"2", " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "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", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"3", " ", "S34"}], "+", 
+                    RowBox[{"4", " ", "T14"}], "+", 
+                    RowBox[{"4", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"3", " ", "S34"}], "+", 
+                    RowBox[{"4", " ", "T14"}], "+", 
+                    RowBox[{"4", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    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[{"8", " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "U"}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "U"}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", 
+                    RowBox[{"4", " ", "T"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "-", "T24", "-", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    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[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], "2"]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    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[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T14"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}]}], ")"}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "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", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    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[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "-", "T24", "-", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "-", "T14", "-", "T24", "-", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}]}], ")"}]}]}], ")"}]}], 
+           "+", 
+           RowBox[{
+            FractionBox["1", 
+             RowBox[{
+              RowBox[{"2", " ", 
+               SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", "U"}]], 
+            RowBox[{"(", 
+             RowBox[{
+              RowBox[{
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{"4", " ", 
+                  RowBox[{"(", 
+                   RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "+", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}]}], "+", 
+                    FractionBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], "\[Epsilon]"], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                    ")"}]}]}]}], ")"}], " ", 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{"2", " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+              
+              RowBox[{
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}]], 
+                  RowBox[{"8", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], "2"]], 
+                  RowBox[{"8", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"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[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}]}], 
+                ")"}], " ", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "5", "]"}], ",", 
+                 RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+              RowBox[{
+               FractionBox["1", 
+                RowBox[{
+                 RowBox[{"-", 
+                  SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                 "U"}]], 
+               RowBox[{"4", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", 
+                   RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                  RowBox[{"DiscB", "[", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    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["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "-", 
+                    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[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 ")"}]}]}], "+", 
+              RowBox[{
+               FractionBox["1", 
+                RowBox[{
+                 RowBox[{"-", 
+                  SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                 "U"}]], 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", 
+                   SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                  SuperscriptBox[
+                   RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "2"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    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["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    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[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 ")"}]}]}], "+", 
+              RowBox[{
+               FractionBox["1", "S"], 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{
+                  RowBox[{"-", "8"}], " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], "2"]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", "S", "-", 
+                    RowBox[{"2", " ", "S34"}], "-", "T14", "-", "T24"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "-", "S", "+", 
+                    RowBox[{"2", " ", "S34"}], "+", "T14", "+", "T24"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"3", " ", "S"}], "+", "T14", "+", "T24", "+", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"3", " ", "S"}], "-", 
+                    RowBox[{"4", " ", "T"}], "-", "T14", "-", "T24"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T14"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    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[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}]}], "-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", "S34", "+", "T", "-", 
+                    RowBox[{"3", " ", "U"}]}], ")"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", "S34", "-", 
+                    RowBox[{"3", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T14"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    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[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}]}], ")"}]}], "+", 
+                 RowBox[{
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}]], 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}]}], "+", 
+                    FractionBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], "\[Epsilon]"], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                    ")"}]}]}]}], ")"}], " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T14"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    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", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                   ")"}]}], "+", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S", "-", "T14", "-", 
+                    "T24"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "7"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"5", " ", "S"}], "+", 
+                    RowBox[{"8", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"5", " ", "S"}], "-", 
+                    RowBox[{"3", " ", "T14"}], "-", 
+                    RowBox[{"3", " ", "T24"}], "-", 
+                    RowBox[{"8", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    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", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", 
+                    RowBox[{"4", " ", "S34"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    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[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", 
+                    RowBox[{"4", " ", "S34"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "+", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}]], 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T14"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", 
+                    RowBox[{"2", " ", "T"}], "+", "T14", "+", "T24"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", "T14", "+", "T24", "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    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[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}]}], " ", 
+                    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", "[", "2", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}]}], ")"}]}], "+", 
+              RowBox[{
+               FractionBox["1", "T14"], 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{"8", " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    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[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"3", " ", "S34"}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", "S34", "-", 
+                    RowBox[{"3", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    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[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    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[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}]}], "-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], "2"]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    RowBox[{"2", " ", "T14"}], "+", "U"}], ")"}], " ", 
+                    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[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", 
+                    RowBox[{"4", " ", "S34"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", 
+                    RowBox[{"4", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    RowBox[{"2", " ", "T14"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    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[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    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[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}]}], ")"}]}], "+", 
+                 RowBox[{
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}]], 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}]}], "+", 
+                    FractionBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], "\[Epsilon]"], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                    ")"}]}]}]}], ")"}], " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    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", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    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", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    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[{"-", "S"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    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", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    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", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    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", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    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[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    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[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    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", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "+", "U"}], ")"}], " ", 
+                    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[{"S", "-", "T24"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "S"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "7"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"3", " ", "S"}], "+", 
+                    RowBox[{"8", " ", "T"}], "+", 
+                    RowBox[{"5", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "7"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"3", " ", "S"}], "+", 
+                    RowBox[{"8", " ", "S34"}], "+", 
+                    RowBox[{"5", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "+", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}]], 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    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", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    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", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    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[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    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[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}]}], " ", 
+                    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", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    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[{"S", "-", "T24"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", 
+                    RowBox[{"2", " ", "S34"}], "+", "T24", "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", 
+                    RowBox[{"2", " ", "T"}], "+", "T24", "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}]}], ")"}]}]}], ")"}]}], 
+           "+", 
+           RowBox[{
+            FractionBox["1", "U"], 
+            RowBox[{"(", 
+             RowBox[{
+              RowBox[{
+               FractionBox["1", 
+                RowBox[{
+                 SuperscriptBox["MH", "2"], "-", "U"}]], 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  SuperscriptBox[
+                   RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                  SuperscriptBox[
+                   RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 ")"}]}]}], "-", 
+              RowBox[{"16", " ", 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}]}]], 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                    RowBox[{"3", " ", "U"}], "-", 
+                    FractionBox["U", "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 "+", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], "2"]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U", "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], "+", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                    
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}]}], 
+                   ")"}]}]}], ")"}]}], "+", 
+              RowBox[{"4", " ", 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{
+                  RowBox[{"(", 
+                   RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}], " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}]], 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                   
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    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[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}]}], ")"}]}], "+", 
+              RowBox[{
+               FractionBox["1", "T14"], 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{"-", 
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}]], 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "S34", "+", "T", "-", "T24"}], ")"}], 
+                    " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "S34", "-", "T", "+", "T24"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    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", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}]}], "+", 
+                 RowBox[{
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}]], 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                    RowBox[{"3", " ", "U"}], "-", 
+                    FractionBox["U", "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                    ")"}]}]}]}], ")"}], " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "S"}], "+", "S34", "-", "T", "+", "T24"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "-", 
+                 RowBox[{"8", " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], "2"]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U", "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    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", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], "+", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                    
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", 
+                    RowBox[{"2", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", 
+                    RowBox[{"2", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    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", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "S34"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "S34", "+", "T", "-", "T24"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}]}], ")"}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                   
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "S34"}], "+", 
+                    RowBox[{"4", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "T14"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "S34"}], "+", 
+                    RowBox[{"4", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "T14"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    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", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "S34", "+", "T", "-", "T24"}], ")"}], 
+                    " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"8", " ", "S34"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "-", 
+                    RowBox[{"3", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", "T14", "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"8", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "-", 
+                    RowBox[{"3", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    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", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}]}], ")"}]}], "-", 
+              RowBox[{
+               FractionBox["1", 
+                RowBox[{
+                 SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                 "T24"}]], 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}]], 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                    RowBox[{"3", " ", "U"}], "-", 
+                    FractionBox["U", "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                    ")"}]}]}]}], ")"}], " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    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", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "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", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    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", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", "T", "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    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[{
+                    SuperscriptBox["MH", "2"], "-", "U"}]], 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "+", "T14", "+", 
+                    "T24", "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    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", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "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", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    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[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                   
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"2", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"6", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"6", " ", "S34"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "-", 
+                    RowBox[{"2", " ", "T24"}], "+", 
+                    RowBox[{"3", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    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", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", 
+                    RowBox[{"2", " ", "S"}], "-", 
+                    RowBox[{"2", " ", "T"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "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", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", 
+                    RowBox[{"2", " ", "S"}], "-", 
+                    RowBox[{"2", " ", "T"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    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[{"16", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "-", 
+                 RowBox[{"8", " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], "2"]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U", "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "-", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "+", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                    
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "S34"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "T"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+           "+", 
+           RowBox[{
+            FractionBox["1", 
+             RowBox[{
+              SuperscriptBox["MH", "2"], "-", "S", "-", "T24", "-", "U"}]], 
+            RowBox[{"(", 
+             RowBox[{
+              RowBox[{"-", 
+               RowBox[{
+                FractionBox["1", "S34"], 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    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[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    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[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    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[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    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[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    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", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    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[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                   RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    FractionBox["S34", "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    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[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    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[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    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[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    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[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    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", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    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[{"8", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", 
+                    RowBox[{"4", " ", "T"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S"}], "+", "S34", "+", 
+                    RowBox[{"2", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", "T"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", "T"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    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[{
+                    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[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "+", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], "2"]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", 
+                    RowBox[{"4", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"4", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", 
+                    RowBox[{"2", " ", "S"}], "-", "S34", "+", 
+                    RowBox[{"2", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    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[{
+                    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[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}]}], ")"}]}], "-", 
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                   RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                    " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    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[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "-", 
+                    RowBox[{"3", " ", "S34"}], "+", 
+                    RowBox[{"2", " ", "T24"}], "-", 
+                    RowBox[{"6", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S"}], "+", "S34", "+", 
+                    RowBox[{"6", " ", "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[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S"}], "-", "T", "-", "T14"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    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[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "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[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "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[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    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[{"-", 
+                    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[{
+                    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[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}], "-", 
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S"}], "-", "T", "-", "T14"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    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[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "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[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"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", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", "S", "-", "S34", "+", 
+                    "T24", "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "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[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    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[{"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[{
+                    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[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}]}], ")"}]}]}], "+", 
+              RowBox[{
+               FractionBox["1", "T"], 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{"4", " ", 
+                  RowBox[{"(", 
+                   RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}], " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                    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[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    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[{"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[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    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[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T14", "+", 
+                    
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    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[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    FractionBox["T", "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                    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[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    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[{"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[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    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[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T14", "+", 
+                    
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    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[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}]], 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"T14", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "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[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    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[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    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", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", "S34", "+", "T14", "+", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"T14", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"T14", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "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[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    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[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    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[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    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[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], ")"}],
+                     " ", 
+                    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", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    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[{
+                    SuperscriptBox["MH", "2"], "-", "T"}]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                   
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", "T", "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "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[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    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[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    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", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", 
+                    RowBox[{"5", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "-", 
+                    RowBox[{"8", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", "T", "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"8", " ", "S"}], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", "T", "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "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[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    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[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    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[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    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", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    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", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "-", 
+                 RowBox[{"8", " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], "2"]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    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[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", "T", "-", 
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T14", "+", 
+                    
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "-", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    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[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                    
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", "T"}], ")"}], " ", 
+                    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[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "S34"}], "+", 
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T14", "+", 
+                    
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "T", "-", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    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", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    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", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}]}], ")"}]}]}], ")"}]}], "+", 
+              RowBox[{
+               FractionBox["1", "T14"], 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{
+                  RowBox[{"(", 
+                   RowBox[{"4", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    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[{"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[{"8", " ", 
+                    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[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    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[{"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[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T14", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T24", " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "U", " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}]}], ")"}]}], ")"}], 
+                  "/", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                   ")"}]}], "-", 
+                 RowBox[{
+                  RowBox[{"(", 
+                   RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", "S", " ", "S34"}], "-", 
+                    SuperscriptBox["S34", "2"], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    RowBox[{"2", " ", "S34", " ", "T14"}], "-", 
+                    RowBox[{"2", " ", "T", " ", "T14"}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "S"}], "-", "S34", "+", "T", "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "S34", " ", "U"}], "+", 
+                    RowBox[{"2", " ", "T", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "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[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    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[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "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[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    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[{"32", " ", 
+                    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", "[", "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", "[", "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[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "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[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}]}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T14", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", "T14", " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"T14", " ", "T24", " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"T14", " ", "U", " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}]}], ")"}]}], ")"}], 
+                  "/", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                   ")"}]}], "+", 
+                 RowBox[{
+                  RowBox[{"(", 
+                   RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    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[{"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[{"8", " ", 
+                    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[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    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[{"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[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}], "+", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T14", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}]}], ")"}]}], ")"}], 
+                  "/", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                   ")"}]}], "-", 
+                 RowBox[{"2", " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    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[{"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[{"8", " ", 
+                    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[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    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[{"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[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", "S", " ", "S34"}], "-", 
+                    RowBox[{"S34", " ", "T14"}], "+", 
+                    RowBox[{"T", " ", "T14"}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "T24"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "T", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "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[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    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[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "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[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    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[{
+                    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", "[", "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", "[", "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[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "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[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}]}], ")"}]}], "+", 
+                 RowBox[{"4", " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "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[{"16", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    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[{
+                    RowBox[{"2", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T14"}], "+", 
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "10"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"10", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T14", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "6"]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"5", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    SuperscriptBox["T24", "3"], "+", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], " ", "U"}], "+", 
+                    RowBox[{"10", " ", "T14", " ", "T24", " ", "U"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T24", "2"], " ", "U"}], "+", 
+                    RowBox[{"5", " ", "T14", " ", 
+                    SuperscriptBox["U", "2"]}], "+", 
+                    RowBox[{"3", " ", "T24", " ", 
+                    SuperscriptBox["U", "2"]}], "+", 
+                    SuperscriptBox["U", "3"], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T14"}], "-", 
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "10"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"10", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"6", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], ")"}]}], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MH", "4"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}]}], ")"}]}], ")"}], 
+                    "/", 
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}], "2"]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "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[{"16", " ", 
+                    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", "[", "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", "[", "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[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"4", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "-", 
+                    RowBox[{"4", " ", "T14", " ", "U"}], "+", 
+                    RowBox[{"2", " ", "T24", " ", "U"}], "+", 
+                    SuperscriptBox["U", "2"], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "2"], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T14", "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T14", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    RowBox[{"T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"10", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}]}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "3"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}]}], ")"}]}], ")"}], 
+                    "/", 
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}], "2"]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}],
+           ")"}], "+", 
+         RowBox[{
+          FractionBox["1", 
+           RowBox[{"T14", " ", 
+            RowBox[{"(", 
+             RowBox[{
+              SuperscriptBox["MH", "2"], "-", "S", "-", "T24", "-", "U"}], 
+             ")"}]}]], 
+          RowBox[{
+           RowBox[{"(", 
+            RowBox[{
+             RowBox[{"-", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"8", " ", 
+                  SuperscriptBox["MT", "2"], " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    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[{"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[{"8", " ", 
+                    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[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    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[{"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[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"4", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "-", 
+                    RowBox[{"4", " ", "T14", " ", "U"}], "+", 
+                    RowBox[{"2", " ", "T24", " ", "U"}], "+", 
+                    SuperscriptBox["U", "2"], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "2"], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T14", "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T14", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    RowBox[{"T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"10", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}]}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "3"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}]}], ")"}]}], ")"}], 
+                "/", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                   ")"}], " ", 
+                  RowBox[{"Kallen\[Lambda]", "[", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                   "]"}]}], ")"}]}], ")"}]}], "+", 
+             RowBox[{
+              RowBox[{"(", 
+               RowBox[{"8", " ", 
+                SuperscriptBox["MT", "2"], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", "S", " ", "S34"}], "-", 
+                    SuperscriptBox["S34", "2"], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    RowBox[{"2", " ", "S34", " ", "T14"}], "-", 
+                    RowBox[{"2", " ", "T", " ", "T14"}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "S"}], "-", "S34", "+", "T", "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "S34", " ", "U"}], "+", 
+                    RowBox[{"2", " ", "T", " ", "U"}]}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"8", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "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[{"8", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                   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[{"4", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                  RowBox[{"8", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "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[{"8", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                   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[{"32", " ", 
+                   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", "[", "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", "[", "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[{"4", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "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[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  FractionBox[
+                   RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T14", "+", "T24", "+", 
+                    "U"}], 
+                   RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}]], "-", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "10"]}], "+", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "3"], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "4"], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", "T24", "-", "U"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"6", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], ")"}], "/", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"192", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "3"], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", "T14"}], "+", 
+                    RowBox[{"7", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T14", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                   "/", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "10"], " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "8"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"28", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "20"}], " ", "T14"}], "+", "T24", "+", "U"}],
+                     ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "6"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "256"}], " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"72", " ", "T14"}], "-", 
+                    RowBox[{"11", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"14", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"52", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"12", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"160", " ", 
+                    SuperscriptBox["MT", "6"]}], "-", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", "T14"}], "-", 
+                    RowBox[{"6", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"22", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"4", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "10"]}], "+", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}], "-", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"115", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"36", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"15", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"20", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"49", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"129", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"24", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "11"}], " ", 
+                    SuperscriptBox["T14", "4"]}], "-", 
+                    RowBox[{"232", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"366", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"56", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3072", " ", 
+                    SuperscriptBox["MT", "12"]}], "+", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "10"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"11", " ", "T14"}], "+", 
+                    RowBox[{"14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"45", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"22", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"13", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"4", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], ")"}]}], "-", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"61", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"134", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"35", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"25", " ", 
+                    SuperscriptBox["T14", "4"]}], "+", 
+                    RowBox[{"236", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"282", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"56", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "-", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["T14", "5"]}], "-", 
+                    RowBox[{"18", " ", 
+                    SuperscriptBox["T14", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"134", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"120", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"23", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "5"]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], ")"}], "/", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], "+", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "2"], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}], ")"}], "/", 
+                   RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}]}], ")"}]}], ")"}], "/", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{"16", " ", 
+                 SuperscriptBox["MT", "4"]}], "-", 
+                RowBox[{"4", " ", 
+                 SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                RowBox[{"8", " ", 
+                 SuperscriptBox["MT", "2"], " ", 
+                 RowBox[{"(", 
+                  RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                SuperscriptBox[
+                 RowBox[{"(", 
+                  RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+               ")"}]}], "-", 
+             RowBox[{
+              RowBox[{"(", 
+               RowBox[{"16", " ", 
+                SuperscriptBox["MT", "2"], " ", "T14", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "4"}], " ", 
+                   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[{"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[{"8", " ", 
+                   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[{"8", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                   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[{"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[{"(", 
+                 RowBox[{
+                  FractionBox[
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], 
+                   RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}]], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"192", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "3"], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", "T14"}], "+", 
+                    RowBox[{"7", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], ")"}], "/", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}], "-", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "10"]}], "+", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T14"}], "+", "T24", "+", "U"}], ")"}], 
+                    "2"]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "3"], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "4"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"4", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T14", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                   "/", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}], "-", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "10"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T14", "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "8"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"464", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"19", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", 
+                    RowBox[{"24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"40", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", 
+                    RowBox[{"7", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"832", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"10", " ", "T14"}], "+", 
+                    RowBox[{"11", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"26", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"52", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"27", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"192", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"17", " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"13", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"119", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"3", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"89", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3584", " ", 
+                    SuperscriptBox["MT", "10"]}], "+", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"40", " ", "T14"}], "+", 
+                    RowBox[{"13", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"4", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"14", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"60", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"51", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"129", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "4"], "+", 
+                    RowBox[{"28", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"54", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"116", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], ")"}], "/", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], "+", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "-", 
+                    RowBox[{"T14", " ", "U"}], "+", 
+                    RowBox[{"2", " ", "T24", " ", "U"}], "+", 
+                    SuperscriptBox["U", "2"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}], ")"}], "/", 
+                   RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}]}], ")"}]}], ")"}], "/", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{"16", " ", 
+                 SuperscriptBox["MT", "4"]}], "-", 
+                RowBox[{"4", " ", 
+                 SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                RowBox[{"8", " ", 
+                 SuperscriptBox["MT", "2"], " ", 
+                 RowBox[{"(", 
+                  RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                SuperscriptBox[
+                 RowBox[{"(", 
+                  RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+               ")"}]}], "-", 
+             RowBox[{"2", " ", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{"-", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U", "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    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[{"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[{"8", " ", 
+                    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[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    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[{"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[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+                    ")"}]}], ")"}]}], ")"}]}], "-", 
+                RowBox[{
+                 RowBox[{"(", 
+                  RowBox[{"4", " ", 
+                   SuperscriptBox["MT", "2"], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", "S", " ", "S34"}], "-", 
+                    RowBox[{"S34", " ", "T14"}], "+", 
+                    RowBox[{"T", " ", "T14"}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "T24"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "T", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "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[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    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[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "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[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    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[{
+                    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", "[", "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", "[", "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[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "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[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T14", "-", "T24", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T14", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "8"]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24", "+", "U"}], 
+                    ")"}], "2"]}], "+", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "20"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"24", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "3"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", 
+                    RowBox[{"7", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}]}], ")"}]}], ")"}], 
+                 "/", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+                    ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                   RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}]}], ")"}]}], "+", 
+             RowBox[{"4", " ", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{
+                 RowBox[{"(", 
+                  RowBox[{"2", " ", 
+                   SuperscriptBox["MT", "2"], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "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[{"16", " ", 
+                    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", "[", "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", "[", "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[{
+                    RowBox[{"-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}]], 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"6", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"1024", " ", 
+                    SuperscriptBox["MT", "12"]}], "-", 
+                    RowBox[{"1280", " ", 
+                    SuperscriptBox["MT", "10"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", "T24", "-", "U"}], ")"}]}], "+", 
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "-", 
+                    RowBox[{"15", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"10", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "-", 
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T14"}], "-", "T24", "-", "U"}], ")"}], 
+                    " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"19", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", "T14"}], "-", "T24", "-", "U"}], ")"}], 
+                    " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"55", " ", "T14"}], "-", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"91", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"130", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"15", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T14"}], "+", 
+                    RowBox[{"13", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"10", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", 
+                    SuperscriptBox["T14", "3"]}], "-", 
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"33", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"104", " ", 
+                    SuperscriptBox["MH", "6"], " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", "T14"}], "-", "T24", "-", "U"}], ")"}], 
+                    " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"37", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"88", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"39", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"127", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"89", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "12"}], " ", 
+                    SuperscriptBox["MH", "8"], " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "5"]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"40", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", "T14"}], "+", 
+                    RowBox[{"10", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "6"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"96", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"9", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "60"}], " ", "T14"}], "+", 
+                    RowBox[{"48", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"608", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    SuperscriptBox["T14", "3"], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "64"}], " ", "T14"}], "+", 
+                    RowBox[{"400", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"25", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"8", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"43", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T14", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                    "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "12"], " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"52", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    RowBox[{"3", " ", "T14"}], "+", 
+                    RowBox[{"13", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "5"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"14", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "10"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"97", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2320"}], " ", "T14"}], "+", 
+                    RowBox[{"48", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"242", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"512", " ", 
+                    SuperscriptBox["MT", "10"]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "-", 
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"46", " ", "T14"}], "-", 
+                    RowBox[{"7", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"26", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"114", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"45", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"90", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["T14", "3"]}], "-", 
+                    RowBox[{"23", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"22", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "8"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    SuperscriptBox["T14", "4"], "+", 
+                    RowBox[{"96", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"203", " ", "T14"}], "-", "T24", "-", "U"}], 
+                    ")"}]}], "-", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"30", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"136", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"157", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"1446", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"15", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"33", " ", 
+                    SuperscriptBox["T14", "3"]}], "-", 
+                    RowBox[{"205", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"1109", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"17", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"1024", " ", 
+                    SuperscriptBox["MT", "12"]}], "-", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "10"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"51", " ", "T14"}], "-", 
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"609", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"87", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"381", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"1892", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"102", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "4"]}], "-", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"86", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "4"], "-", 
+                    RowBox[{"1566", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"4258", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"78", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "19"}], " ", 
+                    SuperscriptBox["T14", "5"]}], "+", 
+                    RowBox[{"43", " ", 
+                    SuperscriptBox["T14", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"996", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"2036", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"15", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "5"]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "12288"}], " ", 
+                    SuperscriptBox["MT", "14"]}], "+", 
+                    RowBox[{"1024", " ", 
+                    SuperscriptBox["MT", "12"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"80", " ", "T14"}], "-", 
+                    RowBox[{"17", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "10"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"621", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"361", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"40", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"325", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"1187", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"320", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"25", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"157", " ", 
+                    SuperscriptBox["T14", "4"]}], "+", 
+                    RowBox[{"1832", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"3484", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"550", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "-", 
+                    RowBox[{"35", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "4"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"24", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"22", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"46", " ", 
+                    SuperscriptBox["T14", "5"]}], "+", 
+                    RowBox[{"263", " ", 
+                    SuperscriptBox["T14", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"1810", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"2418", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"220", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}], "-", 
+                    RowBox[{"13", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "5"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "6"], "+", 
+                    RowBox[{"43", " ", 
+                    SuperscriptBox["T14", "5"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"122", " ", 
+                    SuperscriptBox["T14", "4"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"724", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"775", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}], "+", 
+                    RowBox[{"25", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "5"]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "6"]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], "+", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "10"]}], "+", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "3"], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "4"], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"14", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"19", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", "T24", "-", "U"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}], ")"}], "/", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}]}], ")"}]}], ")"}], "/", 
+                 SuperscriptBox[
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                   ")"}], "2"]}], "+", 
+                RowBox[{
+                 RowBox[{"(", 
+                  RowBox[{"2", " ", 
+                   SuperscriptBox["MT", "2"], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "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[{"16", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    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[{
+                    RowBox[{"-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}]], 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "6"]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"9", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    SuperscriptBox["T24", "3"], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"], " ", "U"}], "+", 
+                    RowBox[{"18", " ", "T14", " ", "T24", " ", "U"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T24", "2"], " ", "U"}], "+", 
+                    RowBox[{"9", " ", "T14", " ", 
+                    SuperscriptBox["U", "2"]}], "+", 
+                    RowBox[{"3", " ", "T24", " ", 
+                    SuperscriptBox["U", "2"]}], "+", 
+                    SuperscriptBox["U", "3"], "+", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", 
+                    RowBox[{"7", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "14"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"18", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}]}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4096", " ", 
+                    SuperscriptBox["MT", "14"]}], "+", 
+                    RowBox[{"2048", " ", 
+                    SuperscriptBox["MT", "12"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"25", " ", "T14"}], "+", 
+                    RowBox[{"27", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "-", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "10"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"26", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "-", 
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"10", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"11", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"34", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"83", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"43", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "5"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MH", "6"], " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"10", " ", "T14"}], "-", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"56", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"21", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"14", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"21", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"36", " ", 
+                    SuperscriptBox["MH", "6"], " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"13", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"15", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"17", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"84", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"99", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MH", "6"], " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"12", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"5", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T14", "4"]}], "+", 
+                    RowBox[{"26", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"26", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "4"]}], "-", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MH", "6"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"20", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", 
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"104", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T14"}], "+", 
+                    RowBox[{"10", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"86", " ", "T14"}], "+", 
+                    RowBox[{"26", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"1040", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"28", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"39", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"19", " ", "T14"}], "+", 
+                    RowBox[{"52", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T14", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                    "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MH", "12"], " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "10"], " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"144", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"130", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "744"}], " ", "T14"}], "+", 
+                    RowBox[{"72", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "8"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"]}], "-", 
+                    RowBox[{"17", " ", 
+                    SuperscriptBox["T14", "4"]}], "-", 
+                    RowBox[{"190", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"400", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"62", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"], "+", 
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"43", " ", "T14"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"404", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"117", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"159", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"580", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"105", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"640", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"27", " ", "T14"}], "+", 
+                    RowBox[{"17", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"24", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"19", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"22", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["T14", "3"]}], "-", 
+                    RowBox[{"15", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"6", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "7"}], " ", 
+                    SuperscriptBox["T14", "3"]}], "-", 
+                    RowBox[{"87", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"51", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "6"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9728", " ", 
+                    SuperscriptBox["MT", "10"]}], "+", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"148", " ", "T14"}], "+", 
+                    RowBox[{"41", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"192", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"273", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"172", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"23", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"326", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"905", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"333", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"28", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "51"}], " ", 
+                    SuperscriptBox["T14", "4"]}], "-", 
+                    RowBox[{"246", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"280", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"78", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "221"}], " ", 
+                    SuperscriptBox["T14", "4"]}], "-", 
+                    RowBox[{"1664", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"2542", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"752", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"43", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3072", " ", 
+                    SuperscriptBox["MT", "12"]}], "+", 
+                    RowBox[{"512", " ", 
+                    SuperscriptBox["MT", "10"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"43", " ", "T14"}], "+", 
+                    RowBox[{"7", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "17"}], " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"6", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], ")"}]}], "+", 
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"155", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"13", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"208", " ", 
+                    SuperscriptBox["T14", "3"]}], "-", 
+                    RowBox[{"24", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"209", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "83"}], " ", 
+                    SuperscriptBox["T14", "4"]}], "-", 
+                    RowBox[{"782", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"108", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"254", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["T14", "5"]}], "-", 
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T14", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"217", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"44", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"32", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "5"]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4096", " ", 
+                    SuperscriptBox["MT", "14"]}], "+", 
+                    RowBox[{"2048", " ", 
+                    SuperscriptBox["MT", "12"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"49", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"1280", " ", 
+                    SuperscriptBox["MT", "10"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"95", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"96", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"401", " ", 
+                    SuperscriptBox["T14", "3"]}], "-", 
+                    RowBox[{"497", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"238", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2297", " ", 
+                    SuperscriptBox["T14", "4"]}], "+", 
+                    RowBox[{"4760", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"3282", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"968", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "-", 
+                    RowBox[{"15", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "51"}], " ", 
+                    SuperscriptBox["T14", "4"]}], "-", 
+                    RowBox[{"138", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"80", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"42", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"431", " ", 
+                    SuperscriptBox["T14", "5"]}], "+", 
+                    RowBox[{"2349", " ", 
+                    SuperscriptBox["T14", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"2514", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"1334", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "-", 
+                    RowBox[{"261", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "5"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "35"}], " ", 
+                    SuperscriptBox["T14", "6"]}], "-", 
+                    RowBox[{"920", " ", 
+                    SuperscriptBox["T14", "5"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"2953", " ", 
+                    SuperscriptBox["T14", "4"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"2192", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"1067", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}], "+", 
+                    RowBox[{"136", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "5"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "6"]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], "+", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"6", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"20", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}], "-", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "20"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"4", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "3"], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", 
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"5", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}], ")"}], "/", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}]}], ")"}]}], ")"}], "/", 
+                 SuperscriptBox[
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                   ")"}], "2"]}]}], ")"}]}]}], ")"}], " ", 
+           SuperscriptBox["\[Beta]", "2"]}]}], "+", 
+         InterpretationBox[
+          SuperscriptBox[
+           RowBox[{"O", "[", "\[Beta]", "]"}], "3"],
+          SeriesData[$CellContext`\[Beta], 0, {}, 0, 3, 1],
+          Editable->False]}],
+        SeriesData[$CellContext`\[Beta], 
+         0, {$CellContext`T^(-1) ((
+              4 (2 + X`Eps^(-1) + 
+                X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT] + 
+                Log[$CellContext`MT^(-2) X`Mu^2]) - 
+              4 ($CellContext`MH^2 - $CellContext`T)^(-1) (
+               3 $CellContext`MH^2 + X`Eps^(-1) $CellContext`MH^2 - 
+               3 $CellContext`T - 
+               X`Eps^(-1) $CellContext`T + $CellContext`MH^2 
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+$CellContext`T 
+               X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MT^2 
+                Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MH^2 
+                Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`T 
+               Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`MT^2 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (
+                   2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T \
+((-4) $CellContext`MT^2 + $CellContext`T))^Rational[1, 2])]^2)) (
+              2 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[2]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`ec[
+                5]]) + ($CellContext`MH^2 - $CellContext`T)^(-1) (
+              Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                  2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 - 
+              Log[Rational[1, 2] $CellContext`MT^(-2) (
+                 2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T ((-4) \
+$CellContext`MT^2 + $CellContext`T))^
+                  Rational[
+                   1, 2])]^2) (((-$CellContext`MH^2 + $CellContext`T) \
+$CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`e[2]] + 2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]]) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[
+                 5]] ((-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+                  
+                   $CellContext`e[1], 
+                   $CellContext`ec[4]] + 2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]]) - 2 $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[
+                4]] ((-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] + 2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]])) + 16 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[3]] (
+              Rational[
+                1, 2] ($CellContext`MH^2 - $CellContext`T)^(-2) \
+(-$CellContext`MH^2 + $CellContext`T - $CellContext`MH^2 
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MH^2 
+                 X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MT^2 
+                Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MT^2 
+                 Log[Rational[1, 2] $CellContext`MT^(-2) (
+                    2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T \
+((-4) $CellContext`MT^2 + $CellContext`T))^
+                    Rational[1, 2])]^2) ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] - 2 $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]]) + 
+              Rational[
+                1, 2] ($CellContext`MH^2 - $CellContext`T)^(-1) (-
+                 X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+                X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT]) \
+($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]] - 2 $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]])) + 
+            4 ($CellContext`MH^2 - $CellContext`T)^(-1) (
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+              X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT]) \
+(((-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`e[2]] + 2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]])) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[
+                 5]] ((-$CellContext`MH^2 + $CellContext`T) \
+$CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[4]] + 2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) - 2 $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[
+                4]] ((-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] + 2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] ($CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]])))) + $CellContext`S34^(-1) ((
+              4 (2 + X`Eps^(-1) + 
+                X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT] + 
+                Log[$CellContext`MT^(-2) X`Mu^2]) - 
+              4 ($CellContext`MH^2 - $CellContext`S34)^(-1) (
+               3 $CellContext`MH^2 + X`Eps^(-1) $CellContext`MH^2 - 
+               3 $CellContext`S34 - 
+               X`Eps^(-1) $CellContext`S34 + $CellContext`MH^2 
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+$CellContext`S34 
+               X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MT^2 
+                Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MH^2 
+                Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`S34 
+               Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`MT^2 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (
+                   2 $CellContext`MT^2 - $CellContext`S34 + ($CellContext`S34 \
+((-4) $CellContext`MT^2 + $CellContext`S34))^Rational[1, 2])]^2)) (
+              2 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[2]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`ec[5]]) + 
+            4 ($CellContext`MH^2 - $CellContext`S34)^(-1) (
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+              X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT]) \
+($CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[
+                 5]] ((-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[4]] + 2 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]]) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) - 2 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                5]] ((-$CellContext`MH^2 + $CellContext`S34) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] + 2 ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] - $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]]) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`e[
+                 2]] ((-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] + 2 $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]]))) + $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[
+               3]] ((-8) ($CellContext`MH^2 - $CellContext`S34)^(-1) (-
+                 X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+                X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT]) \
+(-$CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] + 2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[5]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] - $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]]) + 
+              8 ($CellContext`MH^2 - $CellContext`S34)^(-2) \
+(-$CellContext`MH^2 + $CellContext`S34 - $CellContext`MH^2 
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MH^2 
+                 X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MT^2 
+                Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MT^2 
+                 Log[Rational[1, 2] $CellContext`MT^(-2) (
+                    2 $CellContext`MT^2 - $CellContext`S34 + \
+($CellContext`S34 ((-4) $CellContext`MT^2 + $CellContext`S34))^
+                    Rational[1, 2])]^2) (-$CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] + 2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[5]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] - $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[
+                  4]])) - ($CellContext`MH^2 - $CellContext`S34)^(-1) (
+             Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                 2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 - 
+             Log[Rational[1, 2] $CellContext`MT^(-2) (
+                2 $CellContext`MT^2 - $CellContext`S34 + ($CellContext`S34 \
+((-4) $CellContext`MT^2 + $CellContext`S34))^
+                 Rational[1, 2])]^2) ($CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[
+                5]] (($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[4]] + 2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) - 2 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               5]] (($CellContext`MH^2 - $CellContext`S34) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] + 2 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]]) + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[
+                2]] (($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] + 2 $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[4]])) + $CellContext`S^(-1) ((
+                4 (2 + X`Eps^(-1) + 
+                  X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT] + 
+                  Log[$CellContext`MT^(-2) X`Mu^2]) - 
+                4 ($CellContext`MH^2 - $CellContext`S34)^(-1) (
+                 3 $CellContext`MH^2 + X`Eps^(-1) $CellContext`MH^2 - 
+                 3 $CellContext`S34 - 
+                 X`Eps^(-1) $CellContext`S34 + $CellContext`MH^2 
+                  X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] - $CellContext`S34 
+                 X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MT^2 
+                  Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MH^2 
+                  Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`S34 
+                 Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`MT^2 
+                 Log[Rational[1, 2] $CellContext`MT^(-2) (
+                    2 $CellContext`MT^2 - $CellContext`S34 + \
+($CellContext`S34 ((-4) $CellContext`MT^2 + $CellContext`S34))^
+                    Rational[
+                    1, 2])]^2)) ((-$CellContext`T - $CellContext`T14 + \
+$CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`e[2]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] - 4 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] + 2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] + 2 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]) - 2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[1]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]] + 2 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]) - 4 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] ($CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]]) + 4 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[4]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) - $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] ((-4) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) + 4 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]])) - 
+              4 ($CellContext`MH^2 - $CellContext`S34)^(-1) (
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+               X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT]) \
+(-$CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[
+                  2]] (-($CellContext`MH^2 - $CellContext`S34) \
+($CellContext`T + $CellContext`T14 - $CellContext`T24 - $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + 
+                 4 ($CellContext`MH^2 - $CellContext`S34) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + 
+                 4 (-$CellContext`MH^2 + $CellContext`S34) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[
+                   3]] ((7 $CellContext`MH^2 - 2 $CellContext`S - 
+                    3 $CellContext`S34 - 8 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + ((-7) $CellContext`MH^2 + 
+                    2 $CellContext`S + 3 $CellContext`S34 + 
+                    8 $CellContext`T) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + 
+                  4 ((-2) $CellContext`MH^2 + $CellContext`S + \
+$CellContext`S34 + 2 $CellContext`T24 + 2 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])) - 
+               2 (2 ($CellContext`MH^2 - $CellContext`S34) \
+($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[5]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[
+                   1]] (((-3) $CellContext`MH^2 + 2 $CellContext`S + 
+                    3 $CellContext`S34 + 4 $CellContext`T14 + 
+                    4 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] + 
+                  2 (-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]) + 
+                2 ($CellContext`MH^2 - $CellContext`S34) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[4]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) - $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[
+                    5]] (((-3) $CellContext`MH^2 + 2 $CellContext`S + 
+                    3 $CellContext`S34 + 4 $CellContext`T14 + 
+                    4 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] + 
+                   2 (-$CellContext`MH^2 + $CellContext`S34) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]) + 
+                 2 ($CellContext`MH^2 - $CellContext`S34) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]])) + 8 $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]] (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])))) + 
+              8 (Rational[
+                  1, 2] ($CellContext`MH^2 - $CellContext`S34)^(-1) (-
+                   X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + 
+                  X`DiscB[$CellContext`S34, $CellContext`MT, \
+$CellContext`MT]) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]] (
+                  2 ((-3) $CellContext`MH^2 + $CellContext`S34 + 
+                    2 ($CellContext`T + $CellContext`U)) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] - 
+                  2 ((-3) $CellContext`MH^2 + $CellContext`S34 + 
+                   2 ($CellContext`T + $CellContext`U)) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[
+                    2]] (((-3) $CellContext`MH^2 + $CellContext`S34 + 
+                    4 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + (
+                    3 $CellContext`MH^2 - $CellContext`S34 - 
+                    4 $CellContext`T) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + 
+                    2 ($CellContext`T + $CellContext`T14 - $CellContext`T24 - \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + 8 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]))) + 
+                Rational[
+                  1, 2] ($CellContext`MH^2 - $CellContext`S34)^(-2) \
+(-$CellContext`MH^2 + $CellContext`S34 - $CellContext`MH^2 
+                  X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + $CellContext`MH^2 
+                   X`DiscB[$CellContext`S34, $CellContext`MT, \
+$CellContext`MT] - $CellContext`MT^2 
+                  Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MT^2 
+                   Log[Rational[1, 2] $CellContext`MT^(-2) (
+                    2 $CellContext`MT^2 - $CellContext`S34 + \
+($CellContext`S34 ((-4) $CellContext`MT^2 + $CellContext`S34))^
+                    Rational[1, 2])]^2) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[
+                   3]] ((-2) (-$CellContext`MH^2 + $CellContext`S34 + 
+                    2 ($CellContext`T14 + $CellContext`T24)) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] + 
+                  2 (-$CellContext`MH^2 + $CellContext`S34 + 
+                    2 ($CellContext`T14 + $CellContext`T24)) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + 8 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])) - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[
+                    2]] ((-$CellContext`MH^2 + $CellContext`S34 + 
+                    2 ($CellContext`T14 + $CellContext`T24)) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    1]] + ($CellContext`MH^2 - $CellContext`S34 - 
+                    2 ($CellContext`T14 + $CellContext`T24)) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + 
+                   2 (-$CellContext`T14 + $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + 
+                   2 ($CellContext`T - $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]]))) - ($CellContext`MH^2 - $CellContext`S34)^(-1) (
+               Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                   2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 - 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (
+                  2 $CellContext`MT^2 - $CellContext`S34 + ($CellContext`S34 \
+((-4) $CellContext`MT^2 + $CellContext`S34))^
+                   Rational[
+                    1, 2])]^2) ((-4) (($CellContext`MH^2 - $CellContext`S34) \
+($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] ((-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    1]] + (-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    2]] + ($CellContext`T14 + $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    3]]) + ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) - $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[
+                    5]] ((-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    1]] + (-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    2]] + ($CellContext`T14 + $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    3]]) + ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]])) + 2 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]))) + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[
+                  2]] (($CellContext`MH^2 - $CellContext`S34) ($CellContext`T + \
+$CellContext`T14 - $CellContext`T24 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + 
+                 2 (2 (-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - 
+                   2 ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]) + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] (
+                    2 ($CellContext`T14 + $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - 
+                    2 $CellContext`T14 $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    3]] + ($CellContext`T - $CellContext`T14 - \
+$CellContext`T24 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])))))) + (
+             2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U)^(-1) ((
+              4 (2 + X`Eps^(-1) + 
+                X`DiscB[
+                 2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] + 
+                Log[$CellContext`MT^(-2) X`Mu^2]) + 
+              4 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (
+                3 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) + 
+                X`Eps^(-1) ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) - $CellContext`MH^2 
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+(2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - $CellContext`U) 
+                 X`DiscB[
+                  2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] - $CellContext`MT^2 
+                Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[
+                    1, 2])]^2 + ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) 
+                 Log[$CellContext`MT^(-2) X`Mu^2] + $CellContext`MT^2 
+                 Log[Rational[
+                    1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[1, 2])]^2)) (2 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[2]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`ec[5]]) + (
+              8 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+                X`DiscB[
+                2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT]) (2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[4]] - $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] - $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) - 
+              8 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-2) (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + $CellContext`MH^2 
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MH^2 
+               X`DiscB[
+                2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] + $CellContext`MT^2 
+                Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 - $CellContext`MT^2 
+               Log[Rational[
+                   1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                   2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[1, 2])]^2) (2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] - $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[5]] - $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`e[2]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[5]])) $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[3]] - 
+            4 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (-
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+             X`DiscB[2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT]) (2 $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[
+                4]] ((-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] - 2 ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] - $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]]) $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]]) - $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               4]] ((-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] - 2 ($CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] - $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[5]]) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[3]]) - $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`e[
+               2]] ((-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] - 2 ($CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]] - $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[5]]) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[
+                3]])) + (-$CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T + $CellContext`U)^(-1) (-
+               Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                   2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 + 
+              Log[Rational[1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                  2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[1, 2])]^2) ((-2) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[
+                 4]] ((-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[5]] + 2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[
+                 4]] ((-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] + 2 $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`e[
+                 2]] ((-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] + 2 $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]])) + $CellContext`S^(-1) ((-8) (
+                Rational[-1, 
+                   2] (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-2) (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + $CellContext`MH^2 
+                   X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] - $CellContext`MH^2 
+                  X`DiscB[
+                   2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] + $CellContext`MT^2 
+                   Log[Rational[
+                    1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 - $CellContext`MT^2 
+                  Log[Rational[
+                    1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[1, 2])]^2) (
+                  2 ($CellContext`MH^2 + $CellContext`S - 
+                    2 $CellContext`S34 - $CellContext`T14 - $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] + 
+                  2 (-$CellContext`MH^2 - $CellContext`S + 
+                    2 $CellContext`S34 + $CellContext`T14 + $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[
+                    2]] (((-3) $CellContext`MH^2 + 
+                    3 $CellContext`S + $CellContext`T14 + $CellContext`T24 + 
+                    4 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + (3 $CellContext`MH^2 - 
+                    3 $CellContext`S - 
+                    4 $CellContext`T - $CellContext`T14 - $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + 
+                    2 (-$CellContext`T14 + $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + 8 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] (-$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]))) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]] + 
+                Rational[-1, 
+                   2] (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (
+                  X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] - X`DiscB[
+                  2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT]) (
+                  2 (-$CellContext`MH^2 - $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] + 
+                  2 ($CellContext`MH^2 + $CellContext`S34 - $CellContext`T - \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[
+                    2]] (-($CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T - 3 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    1]] + ($CellContext`MH^2 + $CellContext`S34 - 
+                    3 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + 
+                    2 (-$CellContext`T14 + $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + 8 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] (-$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]))) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + (
+                4 (2 + X`Eps^(-1) + 
+                  X`DiscB[
+                   2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] + 
+                  Log[$CellContext`MT^(-2) X`Mu^2]) + 
+                4 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (
+                  3 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) + 
+                  X`Eps^(-1) ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) - $CellContext`MH^2 
+                  X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + (
+                    2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) X`DiscB[
+                    2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] - $CellContext`MT^2 
+                  Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[
+                    1, 2])]^2 + ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) 
+                   Log[$CellContext`MT^(-2) X`Mu^2] + $CellContext`MT^2 
+                   Log[Rational[
+                    1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[
+                    1, 2])]^2)) ((-$CellContext`T14 + $CellContext`T24) \
+$CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`e[2]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] + 4 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] + 4 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) - 4 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[1]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]]) - $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] (4 $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] ((-4) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])) - 2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] ($CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]] + 2 $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]) + 2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[4]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + 2 $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + 
+              4 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (-
+                 X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+                X`DiscB[
+                 2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT]) (-$CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`e[
+                   2]] (-($CellContext`MH^2 - $CellContext`S - \
+$CellContext`T14 - $CellContext`T24) ($CellContext`T14 - $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + 
+                  4 ($CellContext`T14 - $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] (
+                    4 ($CellContext`MH^2 - $CellContext`S - $CellContext`T14 - \
+$CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + ((-7) $CellContext`MH^2 + 
+                    5 $CellContext`S + 8 $CellContext`T + 3 $CellContext`T14 + 
+                    3 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] (
+                    4 (-$CellContext`MH^2 + $CellContext`S + $CellContext`T14 + \
+$CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + (7 $CellContext`MH^2 - 
+                    5 $CellContext`S - 3 $CellContext`T14 - 
+                    3 $CellContext`T24 - 8 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] (
+                  4 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) - 2 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[
+                    4]] (((-3) $CellContext`MH^2 + $CellContext`S + 
+                    4 $CellContext`S34 + 3 $CellContext`T14 + 
+                    3 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + 
+                   2 (-$CellContext`MH^2 + $CellContext`S + $CellContext`T14 + \
+$CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + 
+                2 ((-2) ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] - 
+                  2 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) + 8 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] (-$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] (((-3) $CellContext`MH^2 + $CellContext`S + 
+                    4 $CellContext`S34 + 3 $CellContext`T14 + 
+                    3 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + 
+                    2 (-$CellContext`MH^2 + $CellContext`S + $CellContext`T14 + \
+$CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]]))) + (-$CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T + $CellContext`U)^(-1) (-
+                 Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 + 
+                Log[Rational[
+                    1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[1, 2])]^2) ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`e[
+                   2]] (($CellContext`MH^2 - $CellContext`S - \
+$CellContext`T14 - $CellContext`T24) ($CellContext`T14 - $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + 
+                  2 ((-$CellContext`T14 + $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] (
+                    2 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + ((-2) $CellContext`MH^2 + 
+                    2 $CellContext`S34 + 
+                    2 $CellContext`T + $CellContext`T14 + $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] (
+                    2 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + ((-2) $CellContext`MH^2 + 
+                    2 $CellContext`S34 + $CellContext`T14 + $CellContext`T24 + 
+                    2 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]))) - 
+                4 (($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[
+                    5]] + ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) - 2 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] (-$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]] - $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[4]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[
+                   1]] ((-$CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    3]] + ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    2]] (-($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[
+                    4]] ((-$CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    3]] + ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))))) + $CellContext`T14^(-1) (
+              8 (Rational[-1, 
+                   2] (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (
+                  X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] - X`DiscB[
+                  2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT]) ((-2) ($CellContext`MH^2 - \
+$CellContext`S34 - $CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[
+                    4]] (($CellContext`MH^2 - 
+                    3 $CellContext`S34 + $CellContext`T + $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + 
+                    2 ($CellContext`S - $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    3]] + ($CellContext`MH^2 + $CellContext`S34 - 
+                    3 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) - 
+                  2 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + 8 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]))) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]] + 
+                Rational[-1, 
+                   2] (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-2) (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + $CellContext`MH^2 
+                   X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] - $CellContext`MH^2 
+                  X`DiscB[
+                   2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] + $CellContext`MT^2 
+                   Log[Rational[
+                    1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 - $CellContext`MT^2 
+                  Log[Rational[
+                    1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[
+                    1, 2])]^2) ((-2) ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - 2 $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[
+                    4]] (((-3) $CellContext`MH^2 + $CellContext`S + 
+                    4 $CellContext`S34 + 
+                    3 $CellContext`T14 + $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - 
+                   2 ($CellContext`S - $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    3]] + ((-3) $CellContext`MH^2 + $CellContext`S + 
+                    4 $CellContext`T + 
+                    3 $CellContext`T14 + $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) - 
+                  2 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - 
+                   2 $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + 8 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]))) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + (
+                4 (2 + X`Eps^(-1) + 
+                  X`DiscB[
+                   2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] + 
+                  Log[$CellContext`MT^(-2) X`Mu^2]) + 
+                4 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (
+                  3 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) + 
+                  X`Eps^(-1) ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) - $CellContext`MH^2 
+                  X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + (
+                    2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) X`DiscB[
+                    2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] - $CellContext`MT^2 
+                  Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[
+                    1, 2])]^2 + ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) 
+                   Log[$CellContext`MT^(-2) X`Mu^2] + $CellContext`MT^2 
+                   Log[Rational[
+                    1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[1, 2])]^2)) ((-2) ((-2) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] (2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] (2 $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] (2 ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] (2 $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]))) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[
+                   4]] ((-$CellContext`S + $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] ((-4) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + 4 $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) + 
+              4 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (-
+                 X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+                X`DiscB[
+                 2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT]) (
+                2 ((-2) ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + 
+                  2 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) - 8 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] (
+                    2 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + (3 $CellContext`MH^2 - 
+                    3 $CellContext`S34 - 3 $CellContext`T - 
+                    2 $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    4]] ((-2) ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] (
+                    2 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + (3 $CellContext`MH^2 - 
+                    3 $CellContext`S34 - 3 $CellContext`T - 
+                    2 $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]))) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[
+                   4]] (-($CellContext`S - $CellContext`T24) \
+(-$CellContext`MH^2 + $CellContext`S + $CellContext`T14 + $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] + 
+                  4 (-$CellContext`S + $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] (
+                    4 ($CellContext`MH^2 - $CellContext`S - $CellContext`T14 - \
+$CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + ((-7) $CellContext`MH^2 + 
+                    3 $CellContext`S + 8 $CellContext`T + 5 $CellContext`T14 + 
+                    3 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] (((-7) $CellContext`MH^2 + 3 $CellContext`S + 
+                    8 $CellContext`S34 + 5 $CellContext`T14 + 
+                    3 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + 
+                    4 (-$CellContext`MH^2 + $CellContext`S + $CellContext`T14 + \
+$CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]]))) + (-$CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T + $CellContext`U)^(-1) (-
+                 Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 + 
+                Log[Rational[
+                    1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[1, 2])]^2) (
+                4 (-($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    1]] + ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) - 2 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    1]] ((-$CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    2]] + (-$CellContext`MH^2 + $CellContext`S + \
+$CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    4]] (-($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[
+                    4]] ((-$CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    2]] + (-$CellContext`MH^2 + $CellContext`S + \
+$CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]))) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[
+                   4]] (-($CellContext`S - $CellContext`T24) \
+(-$CellContext`MH^2 + $CellContext`S + $CellContext`T14 + $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] - 
+                  2 (($CellContext`S - $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] (
+                    2 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    1]] + ((-2) $CellContext`MH^2 + $CellContext`S + 
+                    2 $CellContext`S34 + $CellContext`T24 + 
+                    2 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] (((-2) $CellContext`MH^2 + $CellContext`S + 
+                    2 $CellContext`T + $CellContext`T24 + 
+                    2 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + 
+                    2 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]])))))) + $CellContext`U^(-1) (($CellContext`MH^2 - \
+$CellContext`U)^(-1) (
+              Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                  2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 - 
+              Log[Rational[1, 2] $CellContext`MT^(-2) (
+                 2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U ((-4) \
+$CellContext`MT^2 + $CellContext`U))^
+                  Rational[
+                   1, 2])]^2) (((-$CellContext`MH^2 + $CellContext`U) \
+$CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`e[2]] + 2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]]) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] - 2 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                5]] ((-$CellContext`MH^2 + $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] + 2 $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]]) + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[
+                 4]] ((-$CellContext`MH^2 + $CellContext`U) \
+$CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] + 2 $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]])) - 
+            16 (Rational[1, 4] ($CellContext`MH^2 - $CellContext`U)^(-1) (
+               3 $CellContext`MH^2 + X`Eps^(-1) $CellContext`MH^2 - 
+               3 $CellContext`U - 
+               X`Eps^(-1) $CellContext`U + $CellContext`MH^2 
+                
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+$CellContext`U 
+               X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MT^2 
+                Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MH^2 
+                Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`U 
+               Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`MT^2 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (
+                   2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U \
+((-4) $CellContext`MT^2 + $CellContext`U))^Rational[1, 2])]^2) (
+               2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] - $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] - $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`e[2]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]]) + $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[3]] (
+               Rational[
+                 1, 2] ($CellContext`MH^2 - $CellContext`U)^(-2) \
+(-$CellContext`MH^2 + $CellContext`U - $CellContext`MH^2 
+                 X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MH^2 
+                  X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MT^2 
+                 Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MT^2 
+                  Log[Rational[1, 2] $CellContext`MT^(-2) (
+                    2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U \
+((-4) $CellContext`MT^2 + $CellContext`U))^
+                    Rational[1, 2])]^2) (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + 2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[4]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]]) + 
+               Rational[
+                 1, 2] ($CellContext`MH^2 - $CellContext`U)^(-1) (-
+                  X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + 
+                 X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT]) \
+(-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + 2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[4]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]))) + 
+            4 ((2 + X`Eps^(-1) + 
+                X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] + 
+                Log[$CellContext`MT^(-2) X`Mu^2]) (2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[5]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[4]] - $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] - $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[
+                  5]]) + ($CellContext`MH^2 - $CellContext`U)^(-1) (
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+                X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT]) \
+(((-$CellContext`MH^2 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] + 2 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]]) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]]) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] - 2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[
+                  5]] ((-$CellContext`MH^2 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] + 2 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[
+                   4]] ((-$CellContext`MH^2 + $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] + 2 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    3]])))) + $CellContext`T14^(-1) (-($CellContext`MH^2 - \
+$CellContext`U)^(-1) (
+                Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 - 
+                Log[Rational[1, 2] $CellContext`MT^(-2) (
+                   2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U \
+((-4) $CellContext`MT^2 + $CellContext`U))^
+                    Rational[1, 2])]^2) ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[
+                   4]] (($CellContext`S - $CellContext`S34 + $CellContext`T - \
+$CellContext`T24) ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] + 
+                  2 (2 ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - 
+                    2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] (
+                    2 ($CellContext`S + $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    1]] + ($CellContext`S + $CellContext`S34 - $CellContext`T + \
+$CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - 2 $CellContext`S $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]))) - 4 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[
+                    5]] ((-$CellContext`MH^2 + $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] + ($CellContext`S + $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    3]] + ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    1]] + ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    4]] (((-$CellContext`MH^2 + $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] + ($CellContext`S + $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    3]] + ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[
+                    5]] + ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) - 2 $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]])) + ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) + (
+                4 (2 + X`Eps^(-1) + 
+                  X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] + 
+                  Log[$CellContext`MT^(-2) X`Mu^2]) - 
+                4 ($CellContext`MH^2 - $CellContext`U)^(-1) (
+                 3 $CellContext`MH^2 + X`Eps^(-1) $CellContext`MH^2 - 
+                 3 $CellContext`U - 
+                 X`Eps^(-1) $CellContext`U + $CellContext`MH^2 
+                  X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] - $CellContext`U 
+                 X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MT^2 
+                  Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MH^2 
+                  Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`U 
+                 Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`MT^2 
+                 Log[Rational[1, 2] $CellContext`MT^(-2) (
+                    2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U \
+((-4) $CellContext`MT^2 + $CellContext`U))^
+                    Rational[1, 2])]^2)) ((-2) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 2 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + 4 $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] ((-2) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 2 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + 4 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + 4 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`e[2]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]]) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[
+                   4]] ((-$CellContext`S + $CellContext`S34 - $CellContext`T + \
+$CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] - 4 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + 4 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) - 
+              8 (Rational[
+                 1, 2] ($CellContext`MH^2 - $CellContext`U)^(-2) \
+(-$CellContext`MH^2 + $CellContext`U - $CellContext`MH^2 
+                 X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MH^2 
+                  X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MT^2 
+                 Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MT^2 
+                  Log[Rational[1, 2] $CellContext`MT^(-2) (
+                    2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U \
+((-4) $CellContext`MT^2 + $CellContext`U))^
+                    Rational[1, 2])]^2) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[
+                  3]] ((-2) (-$CellContext`MH^2 + 2 $CellContext`S + 
+                   2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] - 
+                 2 (-$CellContext`MH^2 + 2 $CellContext`S + 
+                  2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + 8 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[
+                    4]] ((-$CellContext`MH^2 + 2 $CellContext`S + 
+                    2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + 
+                   2 ($CellContext`S34 - $CellContext`T) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - 2 $CellContext`S $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + 
+                   2 $CellContext`T24 $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] - $CellContext`MH^2 $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]] + 2 $CellContext`S $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]] + 
+                   2 $CellContext`T24 $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]] + $CellContext`U $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + 
+               Rational[
+                 1, 2] ($CellContext`MH^2 - $CellContext`U)^(-1) (-
+                  X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + 
+                 X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT]) \
+$CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] (
+                 2 ((-3) $CellContext`MH^2 + 2 $CellContext`S34 + 
+                   2 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + 
+                 2 ((-3) $CellContext`MH^2 + 2 $CellContext`S34 + 
+                   2 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + 8 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) - $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[
+                   4]] (((-3) $CellContext`MH^2 + 
+                    4 $CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + 
+                  2 ($CellContext`S - $CellContext`S34 + $CellContext`T - \
+$CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + ((-3) $CellContext`MH^2 + 
+                    4 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) - 
+              4 ($CellContext`MH^2 - $CellContext`U)^(-1) (
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+               X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT]) (
+               2 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[
+                    5]] (((-5) $CellContext`MH^2 + 4 $CellContext`S34 + 
+                    4 $CellContext`T + 
+                    2 $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 
+                   2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - 
+                 2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    4]] ((((-5) $CellContext`MH^2 + 4 $CellContext`S34 + 
+                    4 $CellContext`T + 
+                    2 $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 
+                    2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] - 
+                   2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + 8 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) - 
+                 2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`e[2]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]])) + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[
+                  4]] (($CellContext`S - $CellContext`S34 + $CellContext`T - \
+$CellContext`T24) ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    3]] ((7 $CellContext`MH^2 - 8 $CellContext`S34 - 
+                    2 $CellContext`T14 - 3 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + 
+                   4 ((-2) $CellContext`MH^2 + 
+                    2 $CellContext`S34 + $CellContext`T14 + 
+                    2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + (7 $CellContext`MH^2 - 
+                    8 $CellContext`T - 2 $CellContext`T14 - 
+                    3 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]) + 
+                 4 ($CellContext`MH^2 - $CellContext`U) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]])))) - ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24)^(-1) ((
+               4 (2 + X`Eps^(-1) + 
+                 X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] + 
+                 Log[$CellContext`MT^(-2) X`Mu^2]) - 
+               4 ($CellContext`MH^2 - $CellContext`U)^(-1) (
+                3 $CellContext`MH^2 + X`Eps^(-1) $CellContext`MH^2 - 
+                3 $CellContext`U - 
+                X`Eps^(-1) $CellContext`U + $CellContext`MH^2 
+                 X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+$CellContext`U 
+                X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MT^2 
+                 Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MH^2 
+                 Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`U 
+                Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`MT^2 
+                Log[Rational[1, 2] $CellContext`MT^(-2) (
+                    2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U \
+((-4) $CellContext`MT^2 + $CellContext`U))^
+                    Rational[1, 2])]^2)) (($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 4 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] ((-4) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + 3 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 4 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]])) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] - 4 ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] - $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]]) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[5]] + 2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] (2 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]]) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[5]] + 4 ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] - $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]]) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[4]] - 2 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] (2 $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]]) $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[4]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[
+                  2]] ((-$CellContext`MH^2 + $CellContext`S + $CellContext`T + 
+                   2 $CellContext`T14) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + 4 (-$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]]))) - ($CellContext`MH^2 - $CellContext`U)^(-1) (
+              Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                  2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 - 
+              Log[Rational[1, 2] $CellContext`MT^(-2) (
+                 2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U ((-4) \
+$CellContext`MT^2 + $CellContext`U))^Rational[1, 2])]^2) ((-2) (
+                2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[
+                   4]] (($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`S $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]]) + 2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] ($CellContext`T24 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    3]] + ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) - $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[
+                  2]] (($CellContext`MH^2 - $CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 
+                 2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]])) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] + 
+              4 ($CellContext`MH^2 - $CellContext`U) ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] - $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]]) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[5]] + 4 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[
+                 5]] ((-$CellContext`MH^2 + $CellContext`U) \
+$CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] + $CellContext`S $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]]) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[5]] - 
+              4 ($CellContext`MH^2 - $CellContext`U) ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[2]] - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[3]]) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[4]] - 4 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                4]] ((-$CellContext`MH^2 + $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[1]] + $CellContext`S $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]]) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[4]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`e[
+                 2]] (($CellContext`MH^2 - $CellContext`S - $CellContext`T - 
+                  2 $CellContext`T14) ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] + 
+                4 ($CellContext`MH^2 - $CellContext`U) ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + 8 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] (-$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) - 
+             4 ($CellContext`MH^2 - $CellContext`U)^(-1) (
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+              X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT]) (-(
+                2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] (
+                  2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + (-$CellContext`MH^2 - 
+                    2 $CellContext`S + 
+                    2 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[
+                   3]] (($CellContext`MH^2 - 2 $CellContext`S34 - 
+                    2 $CellContext`T14 + 
+                    6 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 
+                  4 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[
+                   2]] (((-5) $CellContext`MH^2 + 6 $CellContext`S34 - 
+                    2 $CellContext`T14 - 2 $CellContext`T24 + 
+                    3 $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 
+                  4 (-$CellContext`MH^2 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]])) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] + 
+              4 ($CellContext`MH^2 - $CellContext`U) ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] - $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]]) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[5]] + 2 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[
+                 5]] ((-2) ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] + ($CellContext`MH^2 + 2 $CellContext`S - 
+                  2 $CellContext`T - $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]]) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[5]] - 
+              4 ($CellContext`MH^2 - $CellContext`U) ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[2]] - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[3]]) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[4]] - 2 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                4]] ((-2) ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[1]] + ($CellContext`MH^2 + 2 $CellContext`S - 
+                 2 $CellContext`T - $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]]) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[4]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`e[
+                 2]] (($CellContext`MH^2 - $CellContext`S - $CellContext`T - 
+                  2 $CellContext`T14) ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] + 
+                4 ($CellContext`MH^2 - $CellContext`U) ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + 16 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] (-$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) - 
+             8 (Rational[
+                1, 2] ($CellContext`MH^2 - $CellContext`U)^(-2) \
+(-$CellContext`MH^2 + $CellContext`U - $CellContext`MH^2 
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MH^2 
+                 X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MT^2 
+                Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MT^2 
+                 Log[Rational[1, 2] $CellContext`MT^(-2) (
+                    2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U \
+((-4) $CellContext`MT^2 + $CellContext`U))^
+                    Rational[1, 2])]^2) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[
+                 3]] (-((-$CellContext`MH^2 + 2 $CellContext`S34 - 
+                    2 $CellContext`T14 - 
+                    2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] + (-$CellContext`MH^2 + 
+                    4 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] + 
+                  2 ($CellContext`MH^2 - 
+                    2 $CellContext`S - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] + 
+                2 (-$CellContext`MH^2 + 
+                  2 $CellContext`S + $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[5]] + 
+                2 ($CellContext`MH^2 - 
+                  2 $CellContext`S - $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[4]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]] + 8 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] (-$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) + 
+              Rational[
+                1, 2] ($CellContext`MH^2 - $CellContext`U)^(-1) (-
+                 X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+                X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT]) \
+$CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[
+                 3]] (-(((-3) $CellContext`MH^2 + 
+                    4 $CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] + ($CellContext`MH^2 - 
+                    2 $CellContext`S34 - 2 $CellContext`T14 + 
+                    2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] + 
+                  2 (-$CellContext`MH^2 + 
+                    2 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] + 
+                2 ($CellContext`MH^2 - 
+                  2 $CellContext`T - $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[5]] + 
+                2 (-$CellContext`MH^2 + 
+                  2 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[4]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]] + 8 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] (-$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]])))))) + ($CellContext`MH^2 - $CellContext`S - \
+$CellContext`T24 - $CellContext`U)^(-1) (-$CellContext`S34^(-1) (
+              4 (2 + X`Eps^(-1) + 
+                X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT] + 
+                Log[$CellContext`MT^(-2) X`Mu^2]) (4 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]]) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] + 2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[5]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] (2 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) - $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] ((-4) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] + 4 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) + 4 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]]) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[4]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] + 2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`e[2]] (2 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[
+                   4]] ((-$CellContext`MH^2 + 
+                    2 $CellContext`S + $CellContext`T + $CellContext`T14) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] - 4 ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]))) - 
+              4 ($CellContext`MH^2 - $CellContext`S34)^(-1) (
+               3 $CellContext`MH^2 + X`Eps^(-1) $CellContext`MH^2 - 
+               3 $CellContext`S34 - 
+               X`Eps^(-1) $CellContext`S34 + $CellContext`MH^2 
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+$CellContext`S34 
+               X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MT^2 
+                Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MH^2 
+                Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`S34 
+               Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`MT^2 
+               Log[
+                 Rational[1, 2] $CellContext`MT^(-2) (
+                   2 $CellContext`MT^2 - $CellContext`S34 + ($CellContext`S34 \
+((-4) $CellContext`MT^2 + $CellContext`S34))^Rational[1, 2])]^2) (
+               4 ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] - $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]]) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] + 2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] (2 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) - $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] ((-4) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] + 4 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) + 4 ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] - $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]]) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + 2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] (2 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[
+                  4]] ((-$CellContext`MH^2 + 
+                   2 $CellContext`S + $CellContext`T + $CellContext`T14) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] - 4 ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]))) + 
+              8 (Rational[
+                  1, 2] ($CellContext`MH^2 - $CellContext`S34)^(-1) (-
+                   X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + 
+                  X`DiscB[$CellContext`S34, $CellContext`MT, \
+$CellContext`MT]) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[
+                   3]] (-(((-2) $CellContext`MH^2 + 2 $CellContext`S34 + 
+                    4 $CellContext`T) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - ($CellContext`MH^2 - 
+                    2 $CellContext`S + $CellContext`S34 + 2 $CellContext`T24 - 
+                    2 $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    3]] + ((-3) $CellContext`MH^2 + $CellContext`S34 + 
+                    4 $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] + 
+                  2 (-$CellContext`MH^2 + $CellContext`S34 + 
+                    2 $CellContext`T) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] + 
+                  2 (-$CellContext`MH^2 + $CellContext`S34 + 
+                    2 $CellContext`T) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + 8 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) + 
+                Rational[
+                  1, 2] ($CellContext`MH^2 - $CellContext`S34)^(-2) \
+(-$CellContext`MH^2 + $CellContext`S34 - $CellContext`MH^2 
+                  X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + $CellContext`MH^2 
+                   X`DiscB[$CellContext`S34, $CellContext`MT, \
+$CellContext`MT] - $CellContext`MT^2 
+                  Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MT^2 
+                   Log[Rational[1, 2] $CellContext`MT^(-2) (
+                    2 $CellContext`MT^2 - $CellContext`S34 + \
+($CellContext`S34 ((-4) $CellContext`MT^2 + $CellContext`S34))^
+                    Rational[1, 2])]^2) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[
+                   3]] ((((-2) $CellContext`MH^2 + 2 $CellContext`S34 + 
+                    4 $CellContext`T14) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    2]] + (-$CellContext`MH^2 + $CellContext`S34 + 
+                    4 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] + ($CellContext`MH^2 + 
+                    2 $CellContext`S - $CellContext`S34 + 2 $CellContext`T24 - 
+                    2 $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] + 
+                  2 ($CellContext`MH^2 - $CellContext`S34 - 
+                    2 $CellContext`T14) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] + 
+                  2 ($CellContext`MH^2 - $CellContext`S34 - 
+                    2 $CellContext`T14) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + 8 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])))) - 
+              4 ($CellContext`MH^2 - $CellContext`S34)^(-1) (
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+               X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT]) \
+(-$CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    2]] ((-4) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + 
+                   2 ($CellContext`MH^2 - $CellContext`S34 - 2 $CellContext`T + 
+                    2 $CellContext`T14) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    4]] ((-4) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + (5 $CellContext`MH^2 + 
+                    2 $CellContext`S - 3 $CellContext`S34 + 
+                    2 $CellContext`T24 - 6 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    3]] ((-4) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + ($CellContext`MH^2 - 
+                    2 $CellContext`S + $CellContext`S34 + 6 $CellContext`T24 - 
+                    2 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[
+                  4]] (($CellContext`MH^2 - $CellContext`S34) \
+($CellContext`MH^2 - 
+                   2 $CellContext`S - $CellContext`T - $CellContext`T14) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] + 
+                 4 ($CellContext`MH^2 - $CellContext`S34) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]])) + 
+               2 ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    5]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    1]] + ($CellContext`MH^2 - $CellContext`S34 - 
+                    2 $CellContext`T + 2 $CellContext`T14) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) - 
+                 2 ($CellContext`MH^2 - $CellContext`S34) ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]]) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[4]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[
+                    2]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    1]] + ($CellContext`MH^2 - $CellContext`S34 - 
+                    2 $CellContext`T + 2 $CellContext`T14) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - 8 $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]] (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]])))) - ($CellContext`MH^2 - $CellContext`S34)^(-1) (
+               Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                   2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 - 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (
+                  2 $CellContext`MT^2 - $CellContext`S34 + ($CellContext`S34 \
+((-4) $CellContext`MT^2 + $CellContext`S34))^
+                   Rational[1, 2])]^2) ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[
+                  4]] (($CellContext`MH^2 - $CellContext`S34) \
+($CellContext`MH^2 - 
+                   2 $CellContext`S - $CellContext`T - $CellContext`T14) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] + 
+                 4 ($CellContext`MH^2 - $CellContext`S34) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]])) - 
+               2 (2 ($CellContext`MH^2 - $CellContext`S34) \
+($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]]) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] - 2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[
+                  5]] ((-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`T14 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    2]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + 
+                    2 $CellContext`T14 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    3]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + 
+                    2 $CellContext`T24 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    4]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    2]] + ($CellContext`MH^2 + $CellContext`S - \
+$CellContext`S34 + $CellContext`T24 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) + 
+                2 ($CellContext`MH^2 - $CellContext`S34) ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]]) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[4]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] - 2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[
+                  2]] ((-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`T14 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + 4 $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]] (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))))) + $CellContext`T^(-1) (
+              4 (2 + X`Eps^(-1) + 
+                X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT] + 
+                Log[$CellContext`MT^(-2) X`Mu^2]) ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] ((-4) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + 4 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) - 2 (($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] + 2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + 2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + (($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] + 2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] + 2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[
+                   4]] ((-$CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T14 + 2 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] + 4 ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) - 
+              4 ($CellContext`MH^2 - $CellContext`T)^(-1) (
+               3 $CellContext`MH^2 + X`Eps^(-1) $CellContext`MH^2 - 
+               3 $CellContext`T - 
+               X`Eps^(-1) $CellContext`T + $CellContext`MH^2 
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+$CellContext`T 
+               X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MT^2 
+                Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MH^2 
+                Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`T 
+               Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`MT^2 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (
+                   2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T \
+((-4) $CellContext`MT^2 + $CellContext`T))^
+                    Rational[1, 2])]^2) ($CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] ((-4) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + 4 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] - $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) - 2 (($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] + 2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] + 2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[5]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) + (($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] + 2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] + 2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]]) + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[
+                  4]] ((-$CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T14 + 2 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] + 4 ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]]))) - ($CellContext`MH^2 - $CellContext`T)^(-1) (
+               Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                   2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 - 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (
+                  2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T \
+((-4) $CellContext`MT^2 + $CellContext`T))^Rational[1, 2])]^2) (
+               4 ($CellContext`T14 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    3]] + ($CellContext`MH^2 - $CellContext`T) \
+$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] + 
+               4 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) + 2 $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] (
+                 2 (-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] - 
+                 2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    3]] ((-$CellContext`MH^2 + 
+                    2 $CellContext`S + $CellContext`S34 + $CellContext`T14 + 
+                    2 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - 2 ($CellContext`T14 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`S $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]))) + 
+               4 ($CellContext`T14 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    3]] + ($CellContext`MH^2 - $CellContext`T) \
+$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + 
+               4 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[
+                  4]] (($CellContext`MH^2 - $CellContext`T) \
+($CellContext`MH^2 - $CellContext`S34 - $CellContext`T14 - 
+                   2 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] - 
+                 4 ($CellContext`MH^2 - $CellContext`T) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + 8 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] (($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) - 
+              4 ($CellContext`MH^2 - $CellContext`T)^(-1) (
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+               X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT]) (
+               2 (($CellContext`MH^2 - 2 $CellContext`S34 - $CellContext`T + 
+                   2 $CellContext`T14) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] + 
+                 2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] + 
+               4 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] (
+                 4 (-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] - 
+                 4 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    3]] ((9 $CellContext`MH^2 - 2 $CellContext`S34 - 
+                    5 $CellContext`T - 2 $CellContext`T14 - 
+                    8 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - 
+                   2 ($CellContext`MH^2 - 2 $CellContext`S34 - $CellContext`T + 
+                    2 $CellContext`T14) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + (3 $CellContext`MH^2 - 
+                    8 $CellContext`S - 2 $CellContext`S34 - 3 $CellContext`T - 
+                    2 $CellContext`T14) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) + 
+               2 (($CellContext`MH^2 - 2 $CellContext`S34 - $CellContext`T + 
+                   2 $CellContext`T14) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] + 
+                 2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + 
+               4 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[
+                  4]] (($CellContext`MH^2 - $CellContext`T) \
+($CellContext`MH^2 - $CellContext`S34 - $CellContext`T14 - 
+                   2 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] - 
+                 4 ($CellContext`MH^2 - $CellContext`T) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + 16 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) - 
+              8 (Rational[
+                 1, 2] ($CellContext`MH^2 - $CellContext`T)^(-2) \
+(-$CellContext`MH^2 + $CellContext`T - $CellContext`MH^2 
+                 X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MH^2 
+                  X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MT^2 
+                 Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MT^2 
+                  Log[Rational[1, 2] $CellContext`MT^(-2) (
+                    2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T \
+((-4) $CellContext`MT^2 + $CellContext`T))^
+                    Rational[1, 2])]^2) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] (
+                 2 (-$CellContext`MH^2 + $CellContext`T + 
+                   2 $CellContext`T14) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[
+                    5]] (((-3) $CellContext`MH^2 + 
+                    2 $CellContext`S34 + $CellContext`T - 2 $CellContext`T14 + 
+                    4 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + 
+                   2 (-$CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T14 + 2 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] + (5 $CellContext`MH^2 - 
+                    2 $CellContext`S34 - 3 $CellContext`T - 
+                    2 $CellContext`T14 - 4 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]) + 
+                 2 (-$CellContext`MH^2 + $CellContext`T + 
+                   2 $CellContext`T14) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + 8 ((-$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]))) + 
+               Rational[
+                 1, 2] ($CellContext`MH^2 - $CellContext`T)^(-1) (-
+                  X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + 
+                 X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT]) \
+$CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] (
+                 2 ($CellContext`MH^2 - 
+                   2 $CellContext`S34 - $CellContext`T) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[
+                    5]] (((-5) $CellContext`MH^2 + 4 $CellContext`S34 + 
+                    3 $CellContext`T + 4 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + 
+                   2 (-$CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T14 + 2 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] + (
+                    3 $CellContext`MH^2 - $CellContext`T - 
+                    4 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]) + 
+                 2 ($CellContext`MH^2 - 
+                   2 $CellContext`S34 - $CellContext`T) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + 8 ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))))) + $CellContext`T14^(-1) (
+              4 $CellContext`T14 (16 $CellContext`MT^4 - 
+                 4 $CellContext`MH^2 $CellContext`T14 + 
+                 8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2)^(-1) ((-4) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) + 8 $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) + 8 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[
+                   4]] ((2 $CellContext`S - $CellContext`S34 + $CellContext`T - 
+                    2 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] - 4 (($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])))) (
+                2 $CellContext`MH^2 
+                 X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+(4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + $CellContext`U) 
+                X`DiscB[$CellContext`T14, $CellContext`MT, $CellContext`MT] - 
+                2 $CellContext`MH^2 
+                X`DiscB[$CellContext`MH^2 - 
+                  4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] + 
+                4 $CellContext`MT^2 
+                 X`DiscB[$CellContext`MH^2 - 
+                   4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] + $CellContext`T14 
+                 X`DiscB[$CellContext`MH^2 - 
+                   4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] + $CellContext`T24 
+                 X`DiscB[$CellContext`MH^2 - 
+                   4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] + $CellContext`U 
+                 X`DiscB[$CellContext`MH^2 - 
+                   4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] + 
+                4 $CellContext`MH^2 $CellContext`MT^2 
+                 X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                   4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT] - $CellContext`MH^2 \
+$CellContext`T14 
+                X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                  4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT] + $CellContext`MH^2 \
+$CellContext`T24 
+                 X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                   4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT] + $CellContext`MH^2 \
+$CellContext`U 
+                 X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                   4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT]) - 
+              2 (16 $CellContext`MT^4 - 4 $CellContext`MH^2 $CellContext`T14 + 
+                8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2)^(-1) ((
+                 4 $CellContext`S $CellContext`S34 - $CellContext`S34^2 + \
+$CellContext`T^2 + 2 $CellContext`S34 $CellContext`T14 - 
+                 2 $CellContext`T $CellContext`T14 - 
+                 2 $CellContext`MH^2 (
+                  2 $CellContext`S - $CellContext`S34 + $CellContext`T - 
+                  2 $CellContext`T24) - 4 $CellContext`T $CellContext`T24 - 
+                 2 $CellContext`S34 $CellContext`U + 
+                 2 $CellContext`T $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] + 
+               8 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] + 
+               8 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] - 4 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] (
+                2 ((-2) $CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + (6 $CellContext`MH^2 - 
+                  3 $CellContext`S34 - 3 $CellContext`T - 
+                  4 $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] (
+                  2 ((-2) $CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + (6 $CellContext`MH^2 - 
+                    3 $CellContext`S34 - 3 $CellContext`T - 
+                    4 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) + 
+               8 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + 
+               8 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + 32 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) - 4 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[
+                 4]] (((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] + ($CellContext`S34 - $CellContext`T) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 
+                  2 (-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[
+                   5]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    1]] + ($CellContext`S34 - $CellContext`T) \
+$CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + 
+                  2 (-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) (-(
+                 4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+               2 $CellContext`T14 
+                X`DiscB[$CellContext`T14, $CellContext`MT, $CellContext`MT] + 
+               4 $CellContext`MT^2 
+                X`DiscB[$CellContext`MH^2 - 
+                  4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] - $CellContext`T14 
+               X`DiscB[$CellContext`MH^2 - 
+                 4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] + $CellContext`T24 
+                X`DiscB[$CellContext`MH^2 - 
+                  4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] + $CellContext`U 
+                X`DiscB[$CellContext`MH^2 - 
+                  4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] - 2 $CellContext`MH^2 $CellContext`T14 
+               X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                 4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT] + 
+               4 $CellContext`MT^2 $CellContext`T14 
+                X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                  4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT] + $CellContext`T14^2 
+                X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                  4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT] + $CellContext`T14 \
+$CellContext`T24 
+                X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                  4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT] + $CellContext`T14 \
+$CellContext`U 
+                X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                  4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT]) + 
+              2 (16 $CellContext`MT^4 - 4 $CellContext`MH^2 $CellContext`T14 + 
+                 8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2)^(-1) ((-4) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) + 8 $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) + 8 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[
+                   4]] ((2 $CellContext`S - $CellContext`S34 + $CellContext`T - 
+                    2 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] - 4 (($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])))) (
+                3 (16 $CellContext`MT^4 - 
+                  4 $CellContext`MH^2 $CellContext`T14 + 
+                  8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2) + 
+                X`Eps^(-1) (16 $CellContext`MT^4 - 
+                  4 $CellContext`MH^2 $CellContext`T14 + 
+                  8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2) + \
+$CellContext`MH^2 (
+                  4 $CellContext`MT^2 - $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) 
+                 X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`T14 ((-2) $CellContext`MH^2 + 
+                  4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) 
+                 X`DiscB[$CellContext`T14, $CellContext`MT, $CellContext`MT] - \
+($CellContext`MH^2 - 
+                 4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U) (
+                 4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) 
+                X`DiscB[$CellContext`MH^2 - 
+                  4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] + (16 $CellContext`MT^4 - 
+                  4 $CellContext`MH^2 $CellContext`T14 + 
+                  8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2) 
+                 Log[$CellContext`MT^(-2) X`Mu^2] + 
+                2 (16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+                  8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2)) 
+                 X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                   4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT]) - 
+              2 ((2 + X`Eps^(-1) + 
+                 X`DiscB[$CellContext`MH^2 - 
+                   4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] + 
+                 Log[$CellContext`MT^(-2) X`Mu^2]) ((-4) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) + 8 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) + 8 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[
+                    4]] ((2 $CellContext`S - $CellContext`S34 + \
+$CellContext`T - 2 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] - 4 (($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]])))) + (((-2) $CellContext`S $CellContext`S34 - \
+$CellContext`S34 $CellContext`T14 + $CellContext`T $CellContext`T14 + 
+                   2 $CellContext`MH^2 ($CellContext`S - $CellContext`T24) + 
+                   2 $CellContext`T $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] - 
+                 4 ((-2) $CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] - 
+                 4 ((-2) $CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[5]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + 4 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[
+                    5]] (((-2) $CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    1]] + ($CellContext`S + $CellContext`T14 + \
+$CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    4]] (((-2) $CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    2]] + ($CellContext`S + $CellContext`T14 + \
+$CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) - 
+                 4 ((-2) $CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[4]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] - 
+                 4 ((-2) $CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`e[2]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] - 8 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + 4 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[
+                    4]] (((-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] + (-$CellContext`MH^2 + $CellContext`T) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    5]] ((-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    1]] + (-$CellContext`MH^2 + $CellContext`T) \
+$CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) 
+                X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                  4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT]) + 
+              4 (Rational[
+                  1, 2] (16 $CellContext`MT^4 - 
+                   4 $CellContext`MH^2 $CellContext`T14 + 
+                   8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2)^(-2) (-($CellContext`S34 - $CellContext`T) ((-2) \
+$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + 
+                    2 $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] - 
+                  4 (2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - 
+                   2 $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) - 
+                  4 ($CellContext`S34 - $CellContext`T) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + 16 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])) (
+                  2 $CellContext`T14 (16 $CellContext`MT^4 - 
+                    4 $CellContext`MH^2 $CellContext`T14 + 
+                    8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2) - \
+(64 $CellContext`MT^6 + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 (3 $CellContext`T14 + $CellContext`T24 + $CellContext`U) + 
+                   16 $CellContext`MT^4 (5 $CellContext`T14 + 
+                    3 ($CellContext`T24 + $CellContext`U)) - 
+                   2 $CellContext`MH^2 $CellContext`T14 (3 $CellContext`T14 + 
+                    5 ($CellContext`T24 + $CellContext`U)) + 
+                   4 $CellContext`MT^2 ((-10) $CellContext`MH^2 \
+$CellContext`T14 + 7 $CellContext`T14^2 + 
+                    10 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                    3 ($CellContext`T24 + $CellContext`U)^2)) 
+                  X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + 6 $CellContext`T14^2 ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) 
+                   X`DiscB[$CellContext`T14, $CellContext`MT, \
+$CellContext`MT] + (64 $CellContext`MT^6 - 
+                    3 $CellContext`T14^3 + $CellContext`T14^2 \
+$CellContext`T24 + 
+                    5 $CellContext`T14 $CellContext`T24^2 + \
+$CellContext`T24^3 + $CellContext`T14^2 $CellContext`U + 
+                    10 $CellContext`T14 $CellContext`T24 $CellContext`U + 
+                    3 $CellContext`T24^2 $CellContext`U + 
+                    5 $CellContext`T14 $CellContext`U^2 + 
+                    3 $CellContext`T24 $CellContext`U^2 + $CellContext`U^3 + 
+                    2 $CellContext`MH^2 $CellContext`T14 (3 $CellContext`T14 - 
+                    5 ($CellContext`T24 + $CellContext`U)) + 
+                    16 $CellContext`MT^4 (5 $CellContext`T14 + 
+                    3 ($CellContext`T24 + $CellContext`U)) + 
+                    4 $CellContext`MT^2 ((-10) $CellContext`MH^2 \
+$CellContext`T14 + $CellContext`T14^2 + 
+                    10 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                    3 ($CellContext`T24 + $CellContext`U)^2)) 
+                   X`DiscB[$CellContext`MH^2 - 
+                    4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] + 
+                  2 $CellContext`T14 (32 $CellContext`MT^6 + 
+                    16 $CellContext`MT^4 (
+                    2 $CellContext`T14 + $CellContext`T24 + $CellContext`U) + 
+                    2 $CellContext`MT^2 ((-16) $CellContext`MH^2 \
+$CellContext`T14 + 5 $CellContext`T14^2 + 
+                    6 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2) + $CellContext`T14 (
+                    6 $CellContext`MH^4 + ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^2 - 
+                    2 $CellContext`MH^2 (2 $CellContext`T14 + 
+                    3 ($CellContext`T24 + $CellContext`U)))) 
+                   X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                    4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT]) + 
+                Rational[-1, 2] (16 $CellContext`MT^4 - 
+                   4 $CellContext`MH^2 $CellContext`T14 + 
+                   8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2)^(-2) (-($CellContext`S34 - $CellContext`T) ((-2) \
+$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + 
+                    2 $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] - 
+                  4 (2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - 
+                   2 $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) - 
+                  4 ($CellContext`S34 - $CellContext`T) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + 16 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])) ((
+                    4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) (16 $CellContext`MT^4 - 4 $CellContext`MH^2 $CellContext`T14 + 
+                    8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2) + \
+$CellContext`MH^2 (16 $CellContext`MT^4 + 
+                    8 $CellContext`MH^2 $CellContext`T14 - 
+                    5 $CellContext`T14^2 - 
+                    4 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 - 
+                    4 $CellContext`T14 $CellContext`U + 
+                    2 $CellContext`T24 $CellContext`U + $CellContext`U^2 + 
+                    8 $CellContext`MT^2 ((-2) $CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)) 
+                   X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + $CellContext`T14 ((
+                    4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 - 2 $CellContext`MH^2 (
+                    12 $CellContext`MT^2 - $CellContext`T14 + 
+                    3 ($CellContext`T24 + $CellContext`U))) 
+                   X`DiscB[$CellContext`T14, $CellContext`MT, \
+$CellContext`MT] - (
+                   8 $CellContext`MH^4 $CellContext`T14 + $CellContext`T14 (
+                    4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 + $CellContext`MH^2 (16 $CellContext`MT^4 - 
+                    3 $CellContext`T14^2 - 
+                    10 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 + 
+                    8 $CellContext`MT^2 ((-5) $CellContext`T14 + \
+$CellContext`T24 + $CellContext`U))) 
+                  X`DiscB[$CellContext`MH^2 - 
+                    4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] + 
+                  2 (64 $CellContext`MT^8 + 
+                    48 $CellContext`MT^6 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + 
+                    12 $CellContext`MT^4 ((-4) $CellContext`MH^2 \
+$CellContext`T14 + ($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2) - \
+$CellContext`MH^2 $CellContext`T14 (-$CellContext`T14^2 + $CellContext`T14 \
+($CellContext`T24 + $CellContext`U) + 
+                    2 ($CellContext`T24 + $CellContext`U)^2 + \
+$CellContext`MH^2 ($CellContext`T14 - 
+                    3 ($CellContext`T24 + $CellContext`U))) + \
+$CellContext`MT^2 (
+                    12 $CellContext`MH^4 $CellContext`T14 + ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^3 - 
+                    4 $CellContext`MH^2 $CellContext`T14 (2 $CellContext`T14 + 
+                    5 ($CellContext`T24 + $CellContext`U)))) 
+                   X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                    4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT])))), 
+          0, $CellContext`T14^(-1) ($CellContext`MH^2 - $CellContext`S - \
+$CellContext`T24 - $CellContext`U)^(-1) ((-8) $CellContext`MT^2 (
+              16 $CellContext`MT^4 - 4 $CellContext`MH^2 $CellContext`T14 + 
+              8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2)^(-1) 
+            X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U]^(-1) \
+((-4) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[5]])) + 8 $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[1]] ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]]) + 8 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[4]] ($CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]]) + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                4]] ((2 $CellContext`S - $CellContext`S34 + $CellContext`T - 
+                 2 $CellContext`T24) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] - 4 (($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])))) ($CellContext`MH^2 (
+               16 $CellContext`MT^4 + 8 $CellContext`MH^2 $CellContext`T14 - 
+               5 $CellContext`T14^2 - 
+               4 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 - 
+               4 $CellContext`T14 $CellContext`U + 
+               2 $CellContext`T24 $CellContext`U + $CellContext`U^2 + 
+               8 $CellContext`MT^2 ((-2) $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)) 
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`T14 ((
+                 4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 - 
+               2 $CellContext`MH^2 (12 $CellContext`MT^2 - $CellContext`T14 + 
+                3 ($CellContext`T24 + $CellContext`U))) 
+              X`DiscB[$CellContext`T14, $CellContext`MT, $CellContext`MT] - (
+              8 $CellContext`MH^4 $CellContext`T14 + $CellContext`T14 (
+                 4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 + $CellContext`MH^2 (16 $CellContext`MT^4 - 
+                3 $CellContext`T14^2 - 
+                10 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 + 
+                8 $CellContext`MT^2 ((-5) $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U))) 
+             X`DiscB[$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] + (
+               4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) 
+              X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] + 
+             2 (64 $CellContext`MT^8 + 
+               48 $CellContext`MT^6 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + 
+               12 $CellContext`MT^4 ((-4) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2) - $CellContext`MH^2 \
+$CellContext`T14 (-$CellContext`T14^2 + $CellContext`T14 ($CellContext`T24 + \
+$CellContext`U) + 
+                2 ($CellContext`T24 + $CellContext`U)^2 + $CellContext`MH^2 \
+($CellContext`T14 - 
+                  3 ($CellContext`T24 + $CellContext`U))) + $CellContext`MT^2 \
+(12 $CellContext`MH^4 $CellContext`T14 + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^3 - 
+                 4 $CellContext`MH^2 $CellContext`T14 (2 $CellContext`T14 + 
+                  5 ($CellContext`T24 + $CellContext`U)))) 
+              X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT]) + 
+           8 $CellContext`MT^2 (16 $CellContext`MT^4 - 
+              4 $CellContext`MH^2 $CellContext`T14 + 
+              8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2)^(-1) ((
+               4 $CellContext`S $CellContext`S34 - $CellContext`S34^2 + \
+$CellContext`T^2 + 2 $CellContext`S34 $CellContext`T14 - 
+               2 $CellContext`T $CellContext`T14 - 
+               2 $CellContext`MH^2 (
+                2 $CellContext`S - $CellContext`S34 + $CellContext`T - 
+                2 $CellContext`T24) - 4 $CellContext`T $CellContext`T24 - 
+               2 $CellContext`S34 $CellContext`U + 
+               2 $CellContext`T $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] + 
+             8 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`ec[5]] + 
+             8 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[5]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[1]] - 4 $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[5]] (
+              2 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[2]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] + (6 $CellContext`MH^2 - 
+                3 $CellContext`S34 - 3 $CellContext`T - 
+                4 $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]] (
+                2 ((-2) $CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + (6 $CellContext`MH^2 - 
+                  3 $CellContext`S34 - 3 $CellContext`T - 
+                  4 $CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]])) + 
+             8 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[2]] + 
+             8 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[2]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[1]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[2]] + 32 ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) + ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] - $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]]) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) ($CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]]) - 4 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               4]] (((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[
+                   1]] + ($CellContext`S34 - $CellContext`T) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] + 
+                2 (-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]]) $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[
+                 5]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[
+                   1]] + ($CellContext`S34 - $CellContext`T) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]] + 
+                2 (-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]]))) ((-$CellContext`MH^2 + 
+                4 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U)^(-1) \
+(4 $CellContext`MT^2 - $CellContext`T14 + $CellContext`T24 + $CellContext`U) - \
+(16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 ($CellContext`MH^2 - \
+$CellContext`T24 - $CellContext`U) + 
+               8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) (
+              256 $CellContext`MT^10 + 
+              256 $CellContext`MT^8 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) - 
+              32 $CellContext`MT^6 (2 $CellContext`MH^2 $CellContext`T14 - 
+               3 ($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2) + 
+              16 $CellContext`MT^4 ($CellContext`MH^4 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^3 - $CellContext`MH^2 \
+$CellContext`T14 ($CellContext`T14 + 
+                 3 ($CellContext`T24 + $CellContext`U))) + $CellContext`MT^2 (
+                8 $CellContext`MH^4 $CellContext`T14 ((-5) $CellContext`T14 + \
+$CellContext`T24 + $CellContext`U) + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^4 + 
+                4 $CellContext`MH^2 $CellContext`T14 ($CellContext`T14^2 - 
+                  2 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                  3 ($CellContext`T24 + $CellContext`U)^2)) + \
+$CellContext`MH^2 $CellContext`T14 (
+                8 $CellContext`MH^4 $CellContext`T14 + ($CellContext`T14 - \
+$CellContext`T24 - $CellContext`U) ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 + $CellContext`MH^2 ((-3) $CellContext`T14^2 - 
+                  6 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2))) 
+             X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT]/
+             X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] + \
+$CellContext`T14 (
+                16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+                8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) (
+               256 $CellContext`MT^8 + 
+               192 $CellContext`MT^6 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) - 
+               48 $CellContext`MT^4 (
+                3 $CellContext`MH^2 $CellContext`T14 - ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^2) + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`T14^2 - 4 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                 5 ($CellContext`T24 + $CellContext`U)^2 + 
+                 2 $CellContext`MH^2 ($CellContext`T14 + 
+                   3 ($CellContext`T24 + $CellContext`U))) + 
+               4 $CellContext`MT^2 (
+                 6 $CellContext`MH^4 $CellContext`T14 + ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^3 - 
+                 2 $CellContext`MH^2 $CellContext`T14 (4 $CellContext`T14 + 
+                  7 ($CellContext`T24 + $CellContext`U)))) 
+              X`DiscB[$CellContext`T14, $CellContext`MT, $CellContext`MT]/
+              X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] + \
+($CellContext`MH^4 + 32 $CellContext`MT^4 + 
+                12 $CellContext`MT^2 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 - 
+                2 $CellContext`MH^2 (
+                 6 $CellContext`MT^2 + $CellContext`T24 + \
+$CellContext`U))^(-1) (
+                16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+                8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) (
+               8 $CellContext`MH^10 $CellContext`T14^2 + $CellContext`MH^8 \
+$CellContext`T14 (16 $CellContext`MT^4 - 5 $CellContext`T14^2 - 
+                 28 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 + 
+                 8 $CellContext`MT^2 ((-20) $CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)) + $CellContext`MH^6 $CellContext`T14 \
+((-256) $CellContext`MT^6 + 
+                 16 $CellContext`MT^4 (72 $CellContext`T14 - 
+                   11 ($CellContext`T24 + $CellContext`U)) + 
+                 8 $CellContext`MT^2 (14 $CellContext`T14^2 + 
+                   52 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                   5 ($CellContext`T24 + $CellContext`U)^2) - 
+                 3 ($CellContext`T24 + $CellContext`U) ((-5) \
+$CellContext`T14^2 - 
+                  12 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2)) + $CellContext`MT^2 (
+                  
+                  4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^3 (160 $CellContext`MT^6 - 
+                 16 $CellContext`MT^4 (7 $CellContext`T14 - 
+                  6 ($CellContext`T24 + $CellContext`U)) - 
+                 2 $CellContext`MT^2 (3 $CellContext`T14^2 + 
+                  22 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                  9 ($CellContext`T24 + $CellContext`U)^2) + \
+($CellContext`T24 + $CellContext`U) (-$CellContext`T14^2 - 
+                   4 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2)) + $CellContext`MH^4 (
+                 256 $CellContext`MT^10 + 
+                 256 $CellContext`MT^8 (
+                   5 $CellContext`T14 + $CellContext`T24 + $CellContext`U) - 
+                 32 $CellContext`MT^6 (115 $CellContext`T14^2 - 
+                  36 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                  3 ($CellContext`T24 + $CellContext`U)^2) - $CellContext`T14 \
+($CellContext`T24 + $CellContext`U)^2 (15 $CellContext`T14^2 + 
+                  20 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                  3 ($CellContext`T24 + $CellContext`U)^2) - 
+                 16 $CellContext`MT^4 (49 $CellContext`T14^3 + 
+                  129 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) - 
+                  24 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 - \
+($CellContext`T24 + $CellContext`U)^3) + $CellContext`MT^2 ((-11) \
+$CellContext`T14^4 - 
+                   232 $CellContext`T14^3 ($CellContext`T24 + $CellContext`U) - 
+                   366 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^2 + 
+                   56 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 + \
+($CellContext`T24 + $CellContext`U)^4)) - $CellContext`MH^2 (
+                3072 $CellContext`MT^12 + 
+                256 $CellContext`MT^10 (11 $CellContext`T14 + 
+                  14 ($CellContext`T24 + $CellContext`U)) - 
+                128 $CellContext`MT^8 (45 $CellContext`T14^2 - 
+                 22 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                 13 ($CellContext`T24 + $CellContext`U)^2) + $CellContext`T14 \
+($CellContext`T24 + $CellContext`U)^3 ((-5) $CellContext`T14^2 - 
+                  4 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2) - 
+                32 $CellContext`MT^6 (61 $CellContext`T14^3 + 
+                 134 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) - 
+                 35 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 - 
+                 12 ($CellContext`T24 + $CellContext`U)^3) - 
+                4 $CellContext`MT^4 (25 $CellContext`T14^4 + 
+                 236 $CellContext`T14^3 ($CellContext`T24 + $CellContext`U) + 
+                 282 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U)^2 - 
+                 56 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 - 
+                 11 ($CellContext`T24 + $CellContext`U)^4) + \
+$CellContext`MT^2 (-$CellContext`T14^5 - 
+                  18 $CellContext`T14^4 ($CellContext`T24 + $CellContext`U) - 
+                  134 $CellContext`T14^3 ($CellContext`T24 + \
+$CellContext`U)^2 - 
+                  120 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^3 + 23 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^4 + 
+                  2 ($CellContext`T24 + $CellContext`U)^5))) 
+              X`DiscB[$CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT]/
+              X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] + 
+             2 $CellContext`T14 ((
+                 4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 - $CellContext`MH^2 (
+                12 $CellContext`MT^2 + $CellContext`T14 + 
+                3 ($CellContext`T24 + $CellContext`U))) 
+              X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                 4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U]^(-1)
+                 X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT]) - 
+           16 $CellContext`MT^2 $CellContext`T14 (16 $CellContext`MT^4 - 
+             4 $CellContext`MH^2 $CellContext`T14 + 
+             8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2)^(-1) ((-4) $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[5]] ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[2]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]] ($CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[5]])) + 8 $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[1]] ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[5]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`e[2]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]]) + 8 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[4]] ($CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]]) + $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               4]] ((2 $CellContext`S - $CellContext`S34 + $CellContext`T - 
+                2 $CellContext`T24) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] - 4 (($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]]) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] ($CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]])))) ((-$CellContext`MH^2 + 
+               4 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U)^(-1) \
+((-2) $CellContext`MH^2 + 
+              4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MH^2 (
+               16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+               8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) (
+              256 $CellContext`MT^8 + 
+              192 $CellContext`MT^6 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) - 
+              48 $CellContext`MT^4 (
+               3 $CellContext`MH^2 $CellContext`T14 - ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^2) + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`T14^2 - 4 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                5 ($CellContext`T24 + $CellContext`U)^2 + 
+                2 $CellContext`MH^2 ($CellContext`T14 + 
+                  3 ($CellContext`T24 + $CellContext`U))) + 
+              4 $CellContext`MT^2 (
+                6 $CellContext`MH^4 $CellContext`T14 + ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^3 - 
+                2 $CellContext`MH^2 $CellContext`T14 (4 $CellContext`T14 + 
+                 7 ($CellContext`T24 + $CellContext`U)))) 
+             X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT]/
+             X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] - (
+              16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+              8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) (
+             256 $CellContext`MT^10 + 
+             256 $CellContext`MT^8 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) - 
+             32 $CellContext`MT^6 (2 $CellContext`MH^2 $CellContext`T14 - 
+              3 ($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2) + \
+$CellContext`MH^2 $CellContext`T14 (4 $CellContext`MH^4 $CellContext`T14 + 
+               2 $CellContext`MH^2 (-$CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 - ($CellContext`T24 + $CellContext`U) ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^2) + 
+             16 $CellContext`MT^4 (
+               2 $CellContext`MH^4 $CellContext`T14 + ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^3 - $CellContext`MH^2 $CellContext`T14 (
+                2 $CellContext`T14 + 
+                3 ($CellContext`T24 + $CellContext`U))) + $CellContext`MT^2 (
+               16 $CellContext`MH^4 $CellContext`T14 ((-2) $CellContext`T14 + \
+$CellContext`T24 + $CellContext`U) + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^4 - 
+               4 $CellContext`MH^2 $CellContext`T14 ($CellContext`T14^2 + 
+                4 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                3 ($CellContext`T24 + $CellContext`U)^2))) 
+            X`DiscB[$CellContext`T14, $CellContext`MT, $CellContext`MT]/
+            X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+             4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] - \
+($CellContext`MH^4 + 32 $CellContext`MT^4 + 
+              12 $CellContext`MT^2 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 - 
+              2 $CellContext`MH^2 (
+               6 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U))^(-1) \
+(16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 ($CellContext`MH^2 - \
+$CellContext`T24 - $CellContext`U) + 
+              8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) (
+             2 $CellContext`MH^10 $CellContext`T14 (
+               12 $CellContext`MT^2 - $CellContext`T14 + 
+               3 ($CellContext`T24 + $CellContext`U)) - $CellContext`MH^8 \
+$CellContext`T14 (464 $CellContext`MT^4 + $CellContext`T14^2 - 
+              4 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+              19 ($CellContext`T24 + $CellContext`U)^2 - 
+              8 $CellContext`MT^2 ($CellContext`T14 - 
+               24 ($CellContext`T24 + $CellContext`U))) - $CellContext`MT^2 (
+               4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^4 (
+              40 $CellContext`MT^4 + ($CellContext`T24 + $CellContext`U)^2 + 
+              2 $CellContext`MT^2 ($CellContext`T14 + 
+                7 ($CellContext`T24 + $CellContext`U))) + $CellContext`MH^2 (
+                4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 (
+               832 $CellContext`MT^8 + $CellContext`T14 ($CellContext`T24 + \
+$CellContext`U)^3 + 
+               48 $CellContext`MT^6 (10 $CellContext`T14 + 
+                 11 ($CellContext`T24 + $CellContext`U)) + $CellContext`MT^2 \
+($CellContext`T24 + $CellContext`U) (3 $CellContext`T14^2 + 
+                 26 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                 7 ($CellContext`T24 + $CellContext`U)^2) + 
+               4 $CellContext`MT^4 (9 $CellContext`T14^2 + 
+                 52 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                 27 ($CellContext`T24 + $CellContext`U)^2)) + \
+$CellContext`MH^6 (256 $CellContext`MT^8 + 
+               192 $CellContext`MT^6 (
+                 17 $CellContext`T14 + $CellContext`T24 + $CellContext`U) + 
+               16 $CellContext`MT^4 (13 $CellContext`T14^2 + 
+                 119 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                 3 ($CellContext`T24 + $CellContext`U)^2) + 
+               3 $CellContext`T14 ($CellContext`T24 + $CellContext`U) \
+($CellContext`T14^2 + 7 ($CellContext`T24 + $CellContext`U)^2) + 
+               4 $CellContext`MT^2 (7 $CellContext`T14^3 + 
+                 9 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) + 
+                 89 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 + \
+($CellContext`T24 + $CellContext`U)^3)) - $CellContext`MH^4 (
+              3584 $CellContext`MT^10 + 
+              256 $CellContext`MT^8 (40 $CellContext`T14 + 
+                13 ($CellContext`T24 + $CellContext`U)) + $CellContext`T14 \
+($CellContext`T24 + $CellContext`U)^2 (3 $CellContext`T14^2 + 
+                4 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                9 ($CellContext`T24 + $CellContext`U)^2) + 
+              128 $CellContext`MT^6 (14 $CellContext`T14^2 + 
+                60 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                9 ($CellContext`T24 + $CellContext`U)^2) + 
+              16 $CellContext`MT^4 (16 $CellContext`T14^3 + 
+                51 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) + 
+                129 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 + 
+                11 ($CellContext`T24 + $CellContext`U)^3) + 
+              2 $CellContext`MT^2 ($CellContext`T14^4 + 
+                28 $CellContext`T14^3 ($CellContext`T24 + $CellContext`U) + 
+                54 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U)^2 + 
+                116 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 + 
+                5 ($CellContext`T24 + $CellContext`U)^4))) 
+            X`DiscB[$CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT]/
+            X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] + 
+            2 $CellContext`MH^2 (16 $CellContext`MT^4 + 
+              2 $CellContext`MH^2 $CellContext`T14 - 
+              2 $CellContext`T14^2 - $CellContext`T14 $CellContext`T24 + \
+$CellContext`T24^2 - $CellContext`T14 $CellContext`U + 
+              2 $CellContext`T24 $CellContext`U + $CellContext`U^2 + \
+$CellContext`MT^2 ((-4) $CellContext`T14 + 
+                8 ($CellContext`T24 + $CellContext`U))) 
+             X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U]^(-1) 
+             X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT]) - 
+           2 ((-4) $CellContext`MT^2 (-$CellContext`MH^2 + 
+               4 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U)^(-1) \
+(-$CellContext`MH^2 + 
+               8 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U)^(-1) \
+(-$CellContext`MH^2 + 8 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U + 
+              2 $CellContext`MT^2 
+               X`DiscB[$CellContext`MH^2 - 
+                 4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT]) ((-4) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) + 8 $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[5]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`e[2]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]]) + 8 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]] ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[4]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]]) + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[
+                 4]] ((2 $CellContext`S - $CellContext`S34 + $CellContext`T - 
+                  2 $CellContext`T24) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] - 4 (($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])))) - 
+            4 $CellContext`MT^2 (-$CellContext`MH^2 + 
+              8 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U)^(-1) (
+              16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+              8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) 
+            X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U]^(-1) \
+(((-2) $CellContext`S $CellContext`S34 - $CellContext`S34 $CellContext`T14 + \
+$CellContext`T $CellContext`T14 + 
+               2 $CellContext`MH^2 ($CellContext`S - $CellContext`T24) + 
+               2 $CellContext`T $CellContext`T24) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] - 
+             4 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[4]] $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[5]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`ec[5]] - 
+             4 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[5]] $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[5]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[1]] + 4 $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[
+                5]] (((-2) $CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[
+                  1]] + ($CellContext`S + $CellContext`T14 + \
+$CellContext`T24) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[
+                  4]] (((-2) $CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    2]] + ($CellContext`S + $CellContext`T14 + \
+$CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) - 
+             4 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[4]] $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[4]] $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[2]] - 
+             4 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`e[2]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[1]] $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[2]] - 8 ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] ($CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] - $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]]) + ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] - $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]]) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]]) ($CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]]) + 4 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                4]] (((-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] + (-$CellContext`MH^2 + $CellContext`T) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[
+                  5]] ((-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    1]] + (-$CellContext`MH^2 + $CellContext`T) \
+$CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]]))) (-$CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - 
+               8 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U) (
+               2 $CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T14 - $CellContext`T24 - \
+$CellContext`U) 
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MH^2 $CellContext`T14 ($CellContext`MH^2 - 
+               8 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U) (
+               4 $CellContext`MT^2 - $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) 
+              X`DiscB[$CellContext`T14, $CellContext`MT, $CellContext`MT] - (
+              64 $CellContext`MT^8 - 
+              2 $CellContext`MH^2 $CellContext`T14 (-$CellContext`MH^2 + \
+$CellContext`T24 + $CellContext`U)^2 + 
+              48 $CellContext`MT^6 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + 
+              4 $CellContext`MT^4 ((-20) $CellContext`MH^2 $CellContext`T14 + 
+                3 ($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2) + \
+$CellContext`MT^2 (
+                24 $CellContext`MH^4 $CellContext`T14 + ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^3 - 
+                4 $CellContext`MH^2 $CellContext`T14 ($CellContext`T14 + 
+                 7 ($CellContext`T24 + $CellContext`U)))) 
+             X`DiscB[$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] - ($CellContext`MH^2 - 
+              8 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U) (
+              4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) (
+              16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+              8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2)) 
+             X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT])) + 
+           4 (2 $CellContext`MT^2 (16 $CellContext`MT^4 - 
+                4 $CellContext`MH^2 $CellContext`T14 + 
+                8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2)^(-2) (-($CellContext`S34 - $CellContext`T) ((-2) \
+$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + 
+                 2 $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] - 
+               4 (2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - 
+                2 $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) - 
+               4 ($CellContext`S34 - $CellContext`T) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + 16 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])) (-(-$CellContext`MH^2 + 
+                  4 $CellContext`MT^2 + $CellContext`T24 + \
+$CellContext`U)^(-1) (
+                 12 $CellContext`MH^4 $CellContext`T14 - (
+                  4 $CellContext`MT^2 - $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) (
+                   4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 + 
+                 2 $CellContext`MH^2 (
+                   16 $CellContext`MT^4 - $CellContext`T14^2 - 
+                   6 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 + 
+                   8 $CellContext`MT^2 ((-3) $CellContext`T14 + \
+$CellContext`T24 + $CellContext`U))) + 
+               2 $CellContext`MH^2 (
+                  16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+                  8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) (
+                 1024 $CellContext`MT^12 - 
+                 1280 $CellContext`MT^10 ($CellContext`T14 - $CellContext`T24 - \
+$CellContext`U) + 128 $CellContext`MT^8 (7 $CellContext`MH^2 $CellContext`T14 - 
+                   15 $CellContext`T14^2 - 
+                   10 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                   5 ($CellContext`T24 + $CellContext`U)^2) + 
+                 32 $CellContext`MT^6 (2 $CellContext`MH^4 $CellContext`T14 - 
+                   5 (5 $CellContext`T14 - $CellContext`T24 - $CellContext`U) \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2 + 
+                   19 $CellContext`MH^2 $CellContext`T14 (
+                    3 $CellContext`T14 + $CellContext`T24 + $CellContext`U)) - 
+                 4 $CellContext`MT^4 (
+                  5 (7 $CellContext`T14 - $CellContext`T24 - $CellContext`U) \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^3 + 
+                  4 $CellContext`MH^4 $CellContext`T14 (55 $CellContext`T14 - 
+                    3 ($CellContext`T24 + $CellContext`U)) - 
+                  2 $CellContext`MH^2 $CellContext`T14 (91 $CellContext`T14^2 + 
+                   130 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                   15 ($CellContext`T24 + $CellContext`U)^2)) + \
+$CellContext`MH^2 $CellContext`T14 (
+                   2 $CellContext`MH^4 $CellContext`T14 (3 $CellContext`T14 + 
+                    13 ($CellContext`T24 + $CellContext`U)) - \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2 ($CellContext`T14^2 - 
+                    
+                    10 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2) + $CellContext`MH^2 ((-5) \
+$CellContext`T14^3 - 
+                    27 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) - 
+                    33 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 + \
+($CellContext`T24 + $CellContext`U)^3)) + $CellContext`MT^2 (
+                   104 $CellContext`MH^6 $CellContext`T14^2 - (
+                    9 $CellContext`T14 - $CellContext`T24 - $CellContext`U) \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^4 - 
+                   4 $CellContext`MH^4 $CellContext`T14 (
+                    37 $CellContext`T14^2 + 
+                    88 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                    3 ($CellContext`T24 + $CellContext`U)^2) + 
+                   2 $CellContext`MH^2 $CellContext`T14 (
+                    39 $CellContext`T14^3 + 
+                    127 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U) + 
+                    89 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 + \
+($CellContext`T24 + $CellContext`U)^3))) 
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT]/
+                X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] + 
+               2 $CellContext`T14 (
+                  16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+                  8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) ((-12) \
+$CellContext`MH^8 $CellContext`T14^2 + $CellContext`MT^2 (
+                    4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^5 - $CellContext`MH^2 (
+                   4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^3 (
+                  40 $CellContext`MT^4 + $CellContext`T14 ($CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-4) $CellContext`T14 + 
+                    10 ($CellContext`T24 + $CellContext`U))) - 
+                 2 $CellContext`MH^6 $CellContext`T14 (96 $CellContext`MT^4 - 
+                  5 $CellContext`T14^2 - 
+                  9 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                  6 ($CellContext`T24 + $CellContext`U)^2 + $CellContext`MT^2 \
+((-60) $CellContext`T14 + 48 ($CellContext`T24 + $CellContext`U))) + 
+                 2 $CellContext`MH^4 $CellContext`T14 (
+                   608 $CellContext`MT^6 + $CellContext`T14^3 - 
+                   5 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) + 
+                   6 ($CellContext`T24 + $CellContext`U)^3 + \
+$CellContext`MT^4 ((-64) $CellContext`T14 + 
+                    400 ($CellContext`T24 + $CellContext`U)) - 
+                   2 $CellContext`MT^2 (25 $CellContext`T14^2 + 
+                    8 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                    43 ($CellContext`T24 + $CellContext`U)^2))) 
+                X`DiscB[$CellContext`T14, $CellContext`MT, $CellContext`MT]/
+                X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] - 
+               2 ($CellContext`MH^4 + 32 $CellContext`MT^4 + 
+                 12 $CellContext`MT^2 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 - 
+                 2 $CellContext`MH^2 (
+                  6 $CellContext`MT^2 + $CellContext`T24 + \
+$CellContext`U))^(-1) (
+                 16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+                 8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) (
+                2 $CellContext`MH^12 $CellContext`T14^2 (52 $CellContext`MT^2 - 
+                  3 $CellContext`T14 + 
+                  13 ($CellContext`T24 + $CellContext`U)) + $CellContext`MT^2 \
+(4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^5 (
+                  16 $CellContext`MT^6 + $CellContext`T14 ($CellContext`T24 + \
+$CellContext`U)^2 + 
+                  8 $CellContext`MT^4 (
+                    5 $CellContext`T14 + $CellContext`T24 + $CellContext`U) + \
+$CellContext`MT^2 ($CellContext`T14^2 + 
+                    14 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2)) + $CellContext`MH^10 $CellContext`T14 \
+(64 $CellContext`MT^6 + 5 $CellContext`T14^3 + 
+                  3 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) - 
+                  97 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 + \
+($CellContext`T24 + $CellContext`U)^3 + $CellContext`MT^4 ((-2320) \
+$CellContext`T14 + 48 ($CellContext`T24 + $CellContext`U)) + 
+                  4 $CellContext`MT^2 (3 $CellContext`T14^2 - 
+                    242 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                    3 ($CellContext`T24 + $CellContext`U)^2)) + \
+$CellContext`MH^2 (
+                   4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^3 (
+                  512 $CellContext`MT^10 - $CellContext`T14^2 \
+($CellContext`T24 + $CellContext`U)^3 - 
+                  64 $CellContext`MT^8 (46 $CellContext`T14 - 
+                   7 ($CellContext`T24 + $CellContext`U)) - 
+                  16 $CellContext`MT^6 (26 $CellContext`T14^2 + 
+                   114 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                   9 ($CellContext`T24 + $CellContext`U)^2) - 
+                  4 $CellContext`MT^4 (6 $CellContext`T14^3 + 
+                   45 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) + 
+                   90 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 - 
+                   5 ($CellContext`T24 + $CellContext`U)^3) + \
+$CellContext`MT^2 ($CellContext`T24 + $CellContext`U) ((-2) \
+$CellContext`T14^3 - 
+                    23 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) - 
+                    22 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 + \
+($CellContext`T24 + $CellContext`U)^3)) + $CellContext`MH^8 $CellContext`T14 (
+                  128 $CellContext`MT^8 + $CellContext`T14^4 + 
+                  96 $CellContext`MT^6 (
+                    203 $CellContext`T14 - $CellContext`T24 - $CellContext`U) - 
+                  12 $CellContext`T14^3 ($CellContext`T24 + $CellContext`U) + 
+                  30 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U)^2 + 
+                  136 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 - 
+                  3 ($CellContext`T24 + $CellContext`U)^4 + 
+                  8 $CellContext`MT^4 (157 $CellContext`T14^2 + 
+                    1446 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                    15 ($CellContext`T24 + $CellContext`U)^2) - 
+                  2 $CellContext`MT^2 (33 $CellContext`T14^3 - 
+                   205 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) - 
+                   1109 $CellContext`T14 ($CellContext`T24 + \
+$CellContext`U)^2 + 
+                   17 ($CellContext`T24 + $CellContext`U)^3)) + \
+$CellContext`MH^6 (1024 $CellContext`MT^12 - 
+                  256 $CellContext`MT^10 (51 $CellContext`T14 - 
+                   5 ($CellContext`T24 + $CellContext`U)) - 
+                  128 $CellContext`MT^8 (609 $CellContext`T14^2 + 
+                   87 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                   5 ($CellContext`T24 + $CellContext`U)^2) - 
+                  32 $CellContext`MT^6 (381 $CellContext`T14^3 + 
+                   1892 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U) + 102 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 - 
+                   5 ($CellContext`T24 + $CellContext`U)^3) - \
+$CellContext`T14 ($CellContext`T24 + $CellContext`U) (3 $CellContext`T14^4 - 
+                   6 $CellContext`T14^3 ($CellContext`T24 + $CellContext`U) + 
+                   48 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^2 + 86 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 - 
+                   3 ($CellContext`T24 + $CellContext`U)^4) + 
+                  4 $CellContext`MT^4 ($CellContext`T14^4 - 
+                    1566 $CellContext`T14^3 ($CellContext`T24 + \
+$CellContext`U) - 
+                    4258 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^2 - 78 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 + 
+                    5 ($CellContext`T24 + $CellContext`U)^4) + \
+$CellContext`MT^2 ((-19) $CellContext`T14^5 + 
+                    43 $CellContext`T14^4 ($CellContext`T24 + $CellContext`U) - 
+                    996 $CellContext`T14^3 ($CellContext`T24 + \
+$CellContext`U)^2 - 
+                    2036 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^3 + 
+                    15 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^4 + \
+($CellContext`T24 + $CellContext`U)^5)) + $CellContext`MH^4 ((-12288) \
+$CellContext`MT^14 + 
+                  1024 $CellContext`MT^12 (80 $CellContext`T14 - 
+                    17 ($CellContext`T24 + $CellContext`U)) + 
+                  256 $CellContext`MT^10 (621 $CellContext`T14^2 + 
+                    361 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                    40 ($CellContext`T24 + $CellContext`U)^2) + 
+                  128 $CellContext`MT^8 (325 $CellContext`T14^3 + 
+                    1187 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U) + 320 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 - 
+                    25 ($CellContext`T24 + $CellContext`U)^3) + 
+                  16 $CellContext`MT^6 (157 $CellContext`T14^4 + 
+                    1832 $CellContext`T14^3 ($CellContext`T24 + \
+$CellContext`U) + 
+                    3484 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^2 + 
+                    550 $CellContext`T14 ($CellContext`T24 + \
+$CellContext`U)^3 - 
+                    35 ($CellContext`T24 + $CellContext`U)^4) + \
+$CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 (3 $CellContext`T14^4 + 
+                    4 $CellContext`T14^3 ($CellContext`T24 + $CellContext`U) + 
+                    24 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^2 + 
+                    22 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 - \
+($CellContext`T24 + $CellContext`U)^4) + 
+                  4 $CellContext`MT^4 (46 $CellContext`T14^5 + 
+                    263 $CellContext`T14^4 ($CellContext`T24 + \
+$CellContext`U) + 
+                    1810 $CellContext`T14^3 ($CellContext`T24 + \
+$CellContext`U)^2 + 
+                    2418 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^3 + 
+                    220 $CellContext`T14 ($CellContext`T24 + \
+$CellContext`U)^4 - 
+                    13 ($CellContext`T24 + $CellContext`U)^5) + \
+$CellContext`MT^2 ($CellContext`T14^6 + 
+                    43 $CellContext`T14^5 ($CellContext`T24 + $CellContext`U) + 
+                    122 $CellContext`T14^4 ($CellContext`T24 + \
+$CellContext`U)^2 + 
+                    724 $CellContext`T14^3 ($CellContext`T24 + \
+$CellContext`U)^3 + 
+                    775 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^4 + 25 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^5 - 
+                    2 ($CellContext`T24 + $CellContext`U)^6))) 
+               X`DiscB[$CellContext`MH^2 - 
+                 4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT]/
+               X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] + 
+               4 (256 $CellContext`MT^10 + 
+                 
+                 256 $CellContext`MT^8 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) - 32 $CellContext`MT^6 (7 $CellContext`MH^2 $CellContext`T14 - 
+                  3 ($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2) + 
+                 16 $CellContext`MT^4 (
+                   6 $CellContext`MH^4 $CellContext`T14 + ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^3 - 
+                   2 $CellContext`MH^2 $CellContext`T14 (2 $CellContext`T14 + 
+                    5 ($CellContext`T24 + $CellContext`U))) + \
+$CellContext`MT^2 (($CellContext`T14 + $CellContext`T24 + $CellContext`U)^4 + 
+                   16 $CellContext`MH^4 $CellContext`T14 ((-2) \
+$CellContext`T14 + 3 ($CellContext`T24 + $CellContext`U)) + 
+                   2 $CellContext`MH^2 $CellContext`T14 (5 $CellContext`T14^2 - 
+                    14 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                    19 ($CellContext`T24 + $CellContext`U)^2)) + 
+                 3 $CellContext`MH^2 $CellContext`T14 (
+                   2 $CellContext`MH^4 $CellContext`T14 + ($CellContext`T14 - \
+$CellContext`T24 - $CellContext`U) ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 - 
+                   2 $CellContext`MH^2 ($CellContext`T14^2 + $CellContext`T14 \
+($CellContext`T24 + $CellContext`U) - ($CellContext`T24 + $CellContext`U)^2)))
+                  X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                   4 $CellContext`MT^2 - $CellContext`T24 - \
+$CellContext`U]^(-1) 
+                X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                  4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT]) + 
+             2 $CellContext`MT^2 (16 $CellContext`MT^4 - 
+                4 $CellContext`MH^2 $CellContext`T14 + 
+                8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2)^(-2) (-($CellContext`S34 - $CellContext`T) ((-2) \
+$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + 
+                 2 $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] - 
+               4 (2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - 
+                2 $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) - 
+               4 ($CellContext`S34 - $CellContext`T) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + 16 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])) (-(-$CellContext`MH^2 + 
+                  4 $CellContext`MT^2 + $CellContext`T24 + \
+$CellContext`U)^(-1) (64 $CellContext`MT^6 - 3 $CellContext`T14^3 + 
+                 5 $CellContext`T14^2 $CellContext`T24 + 
+                 9 $CellContext`T14 $CellContext`T24^2 + $CellContext`T24^3 + 
+                 5 $CellContext`T14^2 $CellContext`U + 
+                 18 $CellContext`T14 $CellContext`T24 $CellContext`U + 
+                 3 $CellContext`T24^2 $CellContext`U + 
+                 9 $CellContext`T14 $CellContext`U^2 + 
+                 3 $CellContext`T24 $CellContext`U^2 + $CellContext`U^3 + 
+                 48 $CellContext`MT^4 (
+                   3 $CellContext`T14 + $CellContext`T24 + $CellContext`U) + 
+                 2 $CellContext`MH^2 $CellContext`T14 ($CellContext`T14 - 
+                   7 ($CellContext`T24 + $CellContext`U)) + 
+                 4 $CellContext`MT^2 ((-14) $CellContext`MH^2 \
+$CellContext`T14 + 5 $CellContext`T14^2 + 
+                   18 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                   3 ($CellContext`T24 + $CellContext`U)^2)) + (
+                  16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+                  8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) (
+                 4096 $CellContext`MT^14 + 
+                 2048 $CellContext`MT^12 (5 $CellContext`T14 + 
+                   3 ($CellContext`T24 + $CellContext`U)) + 
+                 256 $CellContext`MT^8 ($CellContext`MH^4 $CellContext`T14 + 
+                   5 ($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2 \
+(3 $CellContext`T14 + $CellContext`T24 + $CellContext`U) - $CellContext`MH^2 \
+$CellContext`T14 (25 $CellContext`T14 + 
+                    27 ($CellContext`T24 + $CellContext`U))) - 
+                 256 $CellContext`MT^10 (
+                  26 $CellContext`MH^2 $CellContext`T14 - 
+                  5 (7 $CellContext`T14^2 + 
+                   10 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                   3 ($CellContext`T24 + $CellContext`U)^2)) + 
+                 16 $CellContext`MT^6 (
+                   16 $CellContext`MH^4 $CellContext`T14 (
+                    8 $CellContext`T14 + $CellContext`T24 + $CellContext`U) + 
+                   5 ($CellContext`T14 + $CellContext`T24 + $CellContext`U)^3 \
+(11 $CellContext`T14 + 3 ($CellContext`T24 + $CellContext`U)) - 
+                   4 $CellContext`MH^2 $CellContext`T14 (
+                    34 $CellContext`T14^2 + 
+                    83 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                    43 ($CellContext`T24 + $CellContext`U)^2)) + \
+$CellContext`MT^2 (($CellContext`T14 + $CellContext`T24 + $CellContext`U)^5 (
+                    5 $CellContext`T14 + $CellContext`T24 + $CellContext`U) + 
+                   48 $CellContext`MH^6 $CellContext`T14^2 (
+                    10 $CellContext`T14 - 
+                    3 ($CellContext`T24 + $CellContext`U)) + 
+                   2 $CellContext`MH^2 $CellContext`T14 ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^2 ($CellContext`T14^2 - 
+                    56 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                    21 ($CellContext`T24 + $CellContext`U)^2) - 
+                   16 $CellContext`MH^4 $CellContext`T14 (
+                    14 $CellContext`T14^3 + 
+                    3 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) - 
+                    21 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 - \
+($CellContext`T24 + $CellContext`U)^3)) - 
+                 8 $CellContext`MT^4 (
+                  36 $CellContext`MH^6 $CellContext`T14^2 - ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^4 (13 $CellContext`T14 + 
+                   3 ($CellContext`T24 + $CellContext`U)) + 
+                  12 $CellContext`MH^4 $CellContext`T14 (3 $CellContext`T14^2 - 
+                    15 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - \
+($CellContext`T24 + $CellContext`U)^2) + 
+                  2 $CellContext`MH^2 $CellContext`T14 (17 $CellContext`T14^3 + 
+                    84 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) + 
+                    99 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 + 
+                    32 ($CellContext`T24 + $CellContext`U)^3)) - \
+$CellContext`MH^2 $CellContext`T14 (64 $CellContext`MH^6 $CellContext`T14^2 - 
+                  6 $CellContext`MH^4 $CellContext`T14 (7 $CellContext`T14^2 + 
+                   12 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                   3 ($CellContext`T24 + $CellContext`U)^2) - \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^3 (
+                   2 $CellContext`T14^2 - 
+                   5 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - \
+($CellContext`T24 + $CellContext`U)^2) + $CellContext`MH^2 (
+                    7 $CellContext`T14^4 + 
+                    26 $CellContext`T14^3 ($CellContext`T24 + $CellContext`U) - 
+                    6 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^2 - 
+                    26 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 - \
+($CellContext`T24 + $CellContext`U)^4))) 
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT]/
+                X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] - 
+               2 $CellContext`T14^2 (
+                 16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+                 8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) (
+                9 $CellContext`MT^2 (
+                   4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^4 - 
+                6 $CellContext`MH^6 $CellContext`T14 (
+                 20 $CellContext`MT^2 + $CellContext`T14 + 
+                 5 ($CellContext`T24 + $CellContext`U)) - $CellContext`MH^2 (
+                  4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 (
+                 104 $CellContext`MT^4 + $CellContext`T14 (-$CellContext`T14 + 
+                   10 ($CellContext`T24 + $CellContext`U)) + \
+$CellContext`MT^2 (86 $CellContext`T14 + 
+                   26 ($CellContext`T24 + $CellContext`U))) + \
+$CellContext`MH^4 $CellContext`T14 (1040 $CellContext`MT^4 + 
+                  5 $CellContext`T14^2 + 
+                  28 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                  39 ($CellContext`T24 + $CellContext`U)^2 + 
+                  8 $CellContext`MT^2 (19 $CellContext`T14 + 
+                    52 ($CellContext`T24 + $CellContext`U)))) 
+               X`DiscB[$CellContext`T14, $CellContext`MT, $CellContext`MT]/
+               X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] + \
+($CellContext`MH^4 + 32 $CellContext`MT^4 + 
+                  12 $CellContext`MT^2 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 - 
+                  2 $CellContext`MH^2 (
+                   6 $CellContext`MT^2 + $CellContext`T24 + \
+$CellContext`U))^(-1) (
+                  16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+                  8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) (
+                 64 $CellContext`MH^12 $CellContext`T14^3 + 
+                 2 $CellContext`MH^10 $CellContext`T14^2 (
+                   144 $CellContext`MT^4 - 27 $CellContext`T14^2 - 
+                   130 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                   9 ($CellContext`T24 + $CellContext`U)^2 + \
+$CellContext`MT^2 ((-744) $CellContext`T14 + 
+                    72 ($CellContext`T24 + $CellContext`U))) - \
+$CellContext`MH^8 $CellContext`T14 (256 $CellContext`MT^8 - 
+                  17 $CellContext`T14^4 - 
+                  190 $CellContext`T14^3 ($CellContext`T24 + $CellContext`U) - 
+                  400 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^2 + 
+                  62 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 + \
+($CellContext`T24 + $CellContext`U)^4 + 
+                  128 $CellContext`MT^6 (43 $CellContext`T14 + 
+                    2 ($CellContext`T24 + $CellContext`U)) - 
+                  32 $CellContext`MT^4 (404 $CellContext`T14^2 - 
+                   117 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                   3 ($CellContext`T24 + $CellContext`U)^2) - 
+                  8 $CellContext`MT^2 (159 $CellContext`T14^3 + 
+                   580 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) - 
+                   105 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 - 
+                   2 ($CellContext`T24 + $CellContext`U)^3)) - \
+$CellContext`MT^2 (
+                   4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^4 (640 $CellContext`MT^8 + 
+                  32 $CellContext`MT^6 (27 $CellContext`T14 + 
+                    17 ($CellContext`T24 + $CellContext`U)) - 
+                  24 $CellContext`MT^4 (19 $CellContext`T14^2 - 
+                   22 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                   7 ($CellContext`T24 + $CellContext`U)^2) + \
+($CellContext`T24 + $CellContext`U) ((-2) $CellContext`T14^3 - 
+                    15 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) + 
+                    6 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 + \
+($CellContext`T24 + $CellContext`U)^3) + 
+                  2 $CellContext`MT^2 ((-7) $CellContext`T14^3 - 
+                    87 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) + 
+                    51 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 + 
+                    11 ($CellContext`T24 + $CellContext`U)^3)) + \
+$CellContext`MH^6 $CellContext`T14 (9728 $CellContext`MT^10 + 
+                   256 $CellContext`MT^8 (148 $CellContext`T14 + 
+                    41 ($CellContext`T24 + $CellContext`U)) - 
+                   192 $CellContext`MT^6 (273 $CellContext`T14^2 - 
+                    172 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                    23 ($CellContext`T24 + $CellContext`U)^2) - 
+                   32 $CellContext`MT^4 (326 $CellContext`T14^3 + 
+                    905 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U) - 333 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 - 
+                    28 ($CellContext`T24 + $CellContext`U)^3) + \
+($CellContext`T24 + $CellContext`U) ((-51) $CellContext`T14^4 - 
+                    246 $CellContext`T14^3 ($CellContext`T24 + \
+$CellContext`U) - 
+                    280 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^2 + 78 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 + 
+                    3 ($CellContext`T24 + $CellContext`U)^4) + 
+                   2 $CellContext`MT^2 ((-221) $CellContext`T14^4 - 
+                    1664 $CellContext`T14^3 ($CellContext`T24 + \
+$CellContext`U) - 
+                    2542 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^2 + 
+                    752 $CellContext`T14 ($CellContext`T24 + \
+$CellContext`U)^3 + 
+                    43 ($CellContext`T24 + $CellContext`U)^4)) + \
+$CellContext`MH^2 (
+                    4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 (3072 $CellContext`MT^12 + 
+                   512 $CellContext`MT^10 (43 $CellContext`T14 + 
+                    
+                    7 ($CellContext`T24 + $CellContext`U)) + $CellContext`T14 \
+($CellContext`T24 + $CellContext`U)^3 ((-17) $CellContext`T14^2 + 
+                    6 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2) + 
+                   128 $CellContext`MT^8 (2 $CellContext`T14^2 + 
+                    155 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                    13 ($CellContext`T24 + $CellContext`U)^2) - 
+                   32 $CellContext`MT^6 (208 $CellContext`T14^3 - 
+                    24 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) - 
+                    209 $CellContext`T14 ($CellContext`T24 + \
+$CellContext`U)^2 - 12 ($CellContext`T24 + $CellContext`U)^3) + 
+                   4 $CellContext`MT^4 ((-83) $CellContext`T14^4 - 
+                    782 $CellContext`T14^3 ($CellContext`T24 + \
+$CellContext`U) + 
+                    108 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^2 + 
+                    254 $CellContext`T14 ($CellContext`T24 + \
+$CellContext`U)^3 + 11 ($CellContext`T24 + $CellContext`U)^4) + 
+                   2 $CellContext`MT^2 (-$CellContext`T14^5 - 
+                    27 $CellContext`T14^4 ($CellContext`T24 + $CellContext`U) - 
+                    217 $CellContext`T14^3 ($CellContext`T24 + \
+$CellContext`U)^2 + 
+                    44 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^3 + 
+                    32 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^4 + \
+($CellContext`T24 + $CellContext`U)^5)) - $CellContext`MH^4 (
+                  4096 $CellContext`MT^14 + 
+                  2048 $CellContext`MT^12 (49 $CellContext`T14 + 
+                    3 ($CellContext`T24 + $CellContext`U)) + 
+                  1280 $CellContext`MT^10 (95 $CellContext`T14^2 + 
+                    96 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                    3 ($CellContext`T24 + $CellContext`U)^2) - 
+                  256 $CellContext`MT^8 (401 $CellContext`T14^3 - 
+                   497 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) - 
+                   238 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 - 
+                   5 ($CellContext`T24 + $CellContext`U)^3) - 
+                  16 $CellContext`MT^6 (2297 $CellContext`T14^4 + 
+                   4760 $CellContext`T14^3 ($CellContext`T24 + \
+$CellContext`U) - 
+                   3282 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^2 - 
+                   968 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 - 
+                   15 ($CellContext`T24 + $CellContext`U)^4) + \
+$CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 ((-51) \
+$CellContext`T14^4 - 
+                    138 $CellContext`T14^3 ($CellContext`T24 + \
+$CellContext`U) - 80 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U)^2 + 
+                    42 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 + 
+                    3 ($CellContext`T24 + $CellContext`U)^4) - 
+                  8 $CellContext`MT^4 (431 $CellContext`T14^5 + 
+                   2349 $CellContext`T14^4 ($CellContext`T24 + \
+$CellContext`U) + 
+                   2514 $CellContext`T14^3 ($CellContext`T24 + \
+$CellContext`U)^2 - 
+                   1334 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^3 - 
+                   261 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^4 - 
+                   3 ($CellContext`T24 + $CellContext`U)^5) + \
+$CellContext`MT^2 ((-35) $CellContext`T14^6 - 
+                    920 $CellContext`T14^5 ($CellContext`T24 + \
+$CellContext`U) - 
+                    2953 $CellContext`T14^4 ($CellContext`T24 + \
+$CellContext`U)^2 - 
+                    2192 $CellContext`T14^3 ($CellContext`T24 + \
+$CellContext`U)^3 + 
+                    1067 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^4 + 
+                    136 $CellContext`T14 ($CellContext`T24 + \
+$CellContext`U)^5 + ($CellContext`T24 + $CellContext`U)^6))) 
+                X`DiscB[$CellContext`MH^2 - 
+                  4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT]/
+                X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] - 
+               6 $CellContext`T14 (128 $CellContext`MT^8 + 
+                32 $CellContext`MT^6 (5 $CellContext`T14 + 
+                  3 ($CellContext`T24 + $CellContext`U)) + 
+                2 $CellContext`MT^2 (
+                  20 $CellContext`MH^4 $CellContext`T14 + ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^2 (
+                    7 $CellContext`T14 + $CellContext`T24 + $CellContext`U) - 
+                  12 $CellContext`MH^2 $CellContext`T14 (2 $CellContext`T14 + 
+                   3 ($CellContext`T24 + $CellContext`U))) + 
+                8 $CellContext`MT^4 ((-20) $CellContext`MH^2 $CellContext`T14 + 
+                  3 (3 $CellContext`T14^2 + 
+                    4 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2)) + $CellContext`T14 (($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^3 + 
+                  2 $CellContext`MH^4 ($CellContext`T14 + 
+                    5 ($CellContext`T24 + $CellContext`U)) - 
+                  2 $CellContext`MH^2 ($CellContext`T14^2 + 
+                   5 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                   4 ($CellContext`T24 + $CellContext`U)^2))) 
+               X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                  4 $CellContext`MT^2 - $CellContext`T24 - \
+$CellContext`U]^(-1) 
+               X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                 4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT])))}, 0, 3, 1],
+        Editable->False], ")"}], "+", 
+      RowBox[{
+       FractionBox["1", 
+        RowBox[{
+         SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", "T24"}]], 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          FractionBox["1", "T"], 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"4", " ", 
+                RowBox[{"(", 
+                 RowBox[{"2", "+", 
+                  FractionBox["1", "\[Epsilon]"], "+", 
+                  RowBox[{"DiscB", "[", 
+                   RowBox[{"T", ",", "MT", ",", "MT"}], "]"}], "+", 
+                  RowBox[{"Log", "[", 
+                   FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "-", 
+               RowBox[{
+                FractionBox["1", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], "-", "T"}]], 
+                RowBox[{"4", " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                   FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                   RowBox[{"3", " ", "T"}], "-", 
+                   FractionBox["T", "\[Epsilon]"], "+", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                   RowBox[{"T", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                   RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                   RowBox[{"T", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                   RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                  ")"}]}]}]}], ")"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"4", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}], "-", 
+                  RowBox[{"4", " ", 
+                   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[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                  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", "[", "5", "]"}]}], "]"}]}], "-", 
+               RowBox[{"4", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                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", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "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", "[", "4", "]"}]}], "]"}]}], "+", 
+               RowBox[{"4", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                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", "[", "4", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 ")"}]}]}], ")"}]}], "-", 
+            RowBox[{
+             FractionBox["1", 
+              RowBox[{
+               SuperscriptBox["MH", "2"], "-", "T"}]], 
+             RowBox[{
+              RowBox[{"(", 
+               RowBox[{
+                SuperscriptBox[
+                 RowBox[{"Log", "[", 
+                  FractionBox[
+                   RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                   RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                SuperscriptBox[
+                 RowBox[{"Log", "[", 
+                  FractionBox[
+                   RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                   RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{"2", " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", 
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                   RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                  ")"}], " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"ec", "[", "4", "]"}], ",", 
+                   RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                RowBox[{"4", " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                   RowBox[{"S", " ", 
+                    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", "[", "5", "]"}]}], "]"}]}], "+", 
+                RowBox[{"4", " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"e", "[", "1", "]"}], ",", 
+                   RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                 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", "[", "4", "]"}], ",", 
+                   RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                RowBox[{"4", " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                   RowBox[{"S", " ", 
+                    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", "[", "4", "]"}]}], "]"}]}], "-", 
+                RowBox[{"4", " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"e", "[", "1", "]"}], ",", 
+                   RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                 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", "[", "4", "]"}]}], "]"}]}], "+", 
+                RowBox[{
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"e", "[", "1", "]"}], ",", 
+                   RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S", "-", 
+                    RowBox[{"2", " ", "T24"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                   RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                  ")"}]}], "+", 
+                RowBox[{"8", " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"e", "[", "1", "]"}], ",", 
+                   RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    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[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    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[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                  ")"}]}]}], ")"}]}]}], "-", 
+            RowBox[{
+             FractionBox["1", 
+              RowBox[{
+               SuperscriptBox["MH", "2"], "-", "T"}]], 
+             RowBox[{"4", " ", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{"DiscB", "[", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                "-", 
+                RowBox[{"DiscB", "[", 
+                 RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S", "-", 
+                    RowBox[{"2", " ", "T24"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "7"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"8", " ", "S34"}], "+", 
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"6", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "9"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"8", " ", "S34"}], "+", 
+                    RowBox[{"5", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                   RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    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"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", 
+                    RowBox[{"2", " ", "S"}], "-", "T", "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    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", "[", "5", "]"}]}], "]"}]}], "+", 
+                RowBox[{"4", " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"e", "[", "1", "]"}], ",", 
+                   RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                 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", "[", "4", "]"}], ",", 
+                   RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                RowBox[{"2", " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", 
+                    RowBox[{"2", " ", "S"}], "-", "T", "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    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", "[", "4", "]"}]}], "]"}]}], "-", 
+                RowBox[{"4", " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"e", "[", "1", "]"}], ",", 
+                   RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                 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", "[", "4", "]"}]}], "]"}]}], "+", 
+                RowBox[{
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"e", "[", "1", "]"}], ",", 
+                   RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S", "-", 
+                    RowBox[{"2", " ", "T24"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                   RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                  ")"}]}], "+", 
+                RowBox[{"16", " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"e", "[", "1", "]"}], ",", 
+                   RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                  ")"}]}]}], ")"}]}]}], "-", 
+            RowBox[{"8", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                FractionBox["1", 
+                 RowBox[{"2", " ", 
+                  SuperscriptBox[
+                   RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], "2"]}]], 
+                RowBox[{
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "-", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                   RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                   RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"e", "[", "1", "]"}], ",", 
+                   RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "-", 
+                    RowBox[{"4", " ", "S34"}], "-", "T", "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"2", " ", "S"}], "-", 
+                    RowBox[{"4", " ", "S34"}], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                   RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                   RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S"}], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                   RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "+", 
+               RowBox[{
+                FractionBox["1", 
+                 RowBox[{"2", " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}]}]], 
+                RowBox[{
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                   RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"e", "[", "1", "]"}], ",", 
+                   RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"4", " ", "S34"}], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"4", " ", "S34"}], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                   RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                   RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                   RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}]}], ")"}]}]}], ")"}]}], "+", 
+         RowBox[{
+          FractionBox["1", "S"], 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"2", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"2", "+", 
+                  FractionBox["1", "\[Epsilon]"], "+", 
+                  RowBox[{"DiscB", "[", 
+                   RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}], "+", 
+                  RowBox[{"Log", "[", 
+                   FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "4"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"8", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                  RowBox[{"8", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                  RowBox[{"8", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"8", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "U"}], "+", 
+                    RowBox[{"S", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T"}], "+", "U"}], ")"}]}]}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "T14", "+", "T24"}], ")"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "T", "-", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                   " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                   " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                   " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                   " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"8", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                  RowBox[{"4", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 ")"}], " ", 
+                RowBox[{"ScalarC0", "[", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], ",", 
+                  RowBox[{
+                   SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                   "T24"}], ",", 
+                  RowBox[{"-", 
+                   FractionBox[
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], 
+                    RowBox[{
+                    RowBox[{"-", "1"}], "+", 
+                    SuperscriptBox["\[Beta]", "2"]}]]}], ",", "MT", ",", "MT",
+                   ",", "MT"}], "]"}]}]}], ")"}]}], "-", 
+            RowBox[{"4", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", "T", "-", "U"}], ")"}], 
+                   " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                  RowBox[{"16", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", "T", "-", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "-", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", 
+                    RowBox[{"-", 
+                    FractionBox[
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], 
+                    RowBox[{
+                    RowBox[{"-", "1"}], "+", 
+                    SuperscriptBox["\[Beta]", "2"]}]]}], ",", "MT", ",", "MT",
+                     ",", "MT"}], "]"}], " ", 
+                   RowBox[{"(", 
+                    InterpretationBox[
+                    RowBox[{
+                    FractionBox[
+                    RowBox[{"24", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "2"]], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"14", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "3"]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    SuperscriptBox["\[Beta]", "2"]}], ")"}], "/", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "3"]}], "+", 
+                    InterpretationBox[
+                    SuperscriptBox[
+                    RowBox[{"O", "[", "\[Beta]", "]"}], "4"],
+                    SeriesData[$CellContext`\[Beta], 0, {}, 0, 4, 1],
+                    Editable->False]}],
+                    
+                    SeriesData[$CellContext`\[Beta], 0, {
+                    24 $CellContext`MT^4 ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 ((-16) $CellContext`MH^2 $CellContext`MT^2 + (
+                    
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-2), 0, 
+                    8 $CellContext`MT^4 (
+                    16 $CellContext`MH^2 $CellContext`MT^2 - (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-3) ((
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^3 (4 $CellContext`MT^2 - 
+                    5 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)) - 8 $CellContext`MH^4 (16 $CellContext`MT^4 + 
+                    3 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2) + 8 $CellContext`MH^2 (32 $CellContext`MT^6 + 
+                    16 $CellContext`MT^4 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) + 
+                    14 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 + 
+                    3 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^3))}, 0, 4, 1],
+                    Editable->False], ")"}]}], "+", 
+                  RowBox[{"(", 
+                   InterpretationBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "192"}], " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"20", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "3"], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}]}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "2"]}], ")"}]}], "+", 
+                    FractionBox[
+                    RowBox[{"48", " ", "\[ImaginaryI]", " ", 
+                    SuperscriptBox["MT", "4"], " ", "\[Pi]", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", "\[Beta]"}], 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "2"]], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    RowBox[{"112", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"24", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"768", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"512", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "-", 
+                    RowBox[{"96", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "3"]}], 
+                    "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"10", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"7", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"768", " ", 
+                    SuperscriptBox["MT", "8"]}], "-", 
+                    RowBox[{"512", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "3"]}], 
+                    "+", 
+                    RowBox[{"96", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"10", " ", 
+                    SuperscriptBox["MH", "4"]}], "-", 
+                    RowBox[{"13", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}]}]}], ")"}]}], 
+                    ")"}], " ", 
+                    SuperscriptBox["\[Beta]", "2"]}], ")"}], "/", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "3"]}], "+", 
+                    FractionBox[
+                    RowBox[{"96", " ", "\[ImaginaryI]", " ", 
+                    SuperscriptBox["MT", "4"], " ", "\[Pi]", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"]}], "-", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}]}], 
+                    ")"}], " ", 
+                    SuperscriptBox["\[Beta]", "3"]}], 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "3"]], "+", 
+                    InterpretationBox[
+                    SuperscriptBox[
+                    RowBox[{"O", "[", "\[Beta]", "]"}], "4"],
+                    SeriesData[$CellContext`\[Beta], 0, {}, 0, 4, 1],
+                    Editable->False]}],
+                    
+                    SeriesData[$CellContext`\[Beta], 0, {
+                    Rational[
+                    1, 2] ((-16) $CellContext`MH^2 $CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-2) (
+                    8 $CellContext`MT^2 ((-16) $CellContext`MH^2 \
+$CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2) + (-(
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 (
+                    12 $CellContext`MT^2 + $CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) + 
+                    8 $CellContext`MH^2 $CellContext`MT^2 (
+                    12 $CellContext`MT^2 + 
+                    5 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24))) 
+                    X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + ((-192) $CellContext`MT^6 + 
+                    16 $CellContext`MT^4 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) + 
+                    20 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 + ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^3 + 8 $CellContext`MH^2 (12 $CellContext`MT^4 - 
+                    5 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24))) 
+                    X`DiscB[$CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24, $CellContext`MT, $CellContext`MT]), 
+                    Complex[0, 48] $CellContext`MT^4 
+                    Pi ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) ((-16) $CellContext`MH^2 $CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-2), (-2) $CellContext`MT^2 (
+                    16 $CellContext`MH^2 $CellContext`MT^2 - (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-3) ((-2) (48 $CellContext`MH^2 $CellContext`MT^2 - 
+                    112 $CellContext`MT^4 - 
+                    24 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) + ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2) (16 $CellContext`MH^2 $CellContext`MT^2 - (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2) + (768 $CellContext`MT^8 + 
+                    512 $CellContext`MT^6 ($CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) - 
+                    96 $CellContext`MT^4 (
+                    5 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24) ($CellContext`S34 + $CellContext`T14 + $CellContext`T24) + (
+                    2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24) ($CellContext`S34 + $CellContext`T14 + $CellContext`T24)^3 + 
+                    16 $CellContext`MH^2 $CellContext`MT^2 ($CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) (10 $CellContext`MH^2 - 
+                    7 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24))) 
+                    X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + (768 $CellContext`MT^8 - 
+                    512 $CellContext`MT^6 ($CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) - (
+                    2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24) ($CellContext`S34 + $CellContext`T14 + $CellContext`T24)^3 + 
+                    96 $CellContext`MT^4 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) (5 $CellContext`MH^2 - 
+                    4 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)) - 
+                    16 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) (10 $CellContext`MH^4 - 
+                    13 $CellContext`MH^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) + 
+                    3 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)) 
+                    X`DiscB[$CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24, $CellContext`MT, $CellContext`MT]), 
+                    Complex[0, 96] $CellContext`MT^4 
+                    Pi (32 $CellContext`MT^6 - 
+                    6 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 + (
+                    2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24) ($CellContext`S34 + $CellContext`T14 + $CellContext`T24)^2) \
+(16 $CellContext`MH^2 $CellContext`MT^2 - (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-3)}, 0, 4, 1],
+                    Editable->False], ")"}]}], ")"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", "T", "-", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", "T", "-", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "-", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", 
+                    RowBox[{"-", 
+                    FractionBox[
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], 
+                    RowBox[{
+                    RowBox[{"-", "1"}], "+", 
+                    SuperscriptBox["\[Beta]", "2"]}]]}], ",", "MT", ",", "MT",
+                     ",", "MT"}], "]"}], " ", 
+                   RowBox[{"(", 
+                    InterpretationBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "3"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], ")"}], "/", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "2"]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "48"}], " ", 
+                    SuperscriptBox["MH", "6"], " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"14", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "4"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"208", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "3"]}]}], 
+                    ")"}]}]}], ")"}]}], ")"}], " ", 
+                    SuperscriptBox["\[Beta]", "2"]}], ")"}], "/", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "3"]}], "+", 
+                    InterpretationBox[
+                    SuperscriptBox[
+                    RowBox[{"O", "[", "\[Beta]", "]"}], "4"],
+                    SeriesData[$CellContext`\[Beta], 0, {}, 0, 4, 1],
+                    Editable->False]}],
+                    
+                    SeriesData[$CellContext`\[Beta], 
+                    0, {-$CellContext`MT^2 ((-16) $CellContext`MH^2 \
+$CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-2) ((-8) $CellContext`MH^2 ($CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^3 - 4 $CellContext`MH^4 (4 $CellContext`MT^2 - 
+                    3 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24))), 0, (-4) $CellContext`MT^2 (
+                    16 $CellContext`MH^2 $CellContext`MT^2 - (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-3) ((-48) $CellContext`MH^6 $CellContext`MT^2 \
+($CellContext`S34 + $CellContext`T14 + $CellContext`T24) - 
+                    2 $CellContext`MH^2 (
+                    14 $CellContext`MT^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24) ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 + $CellContext`MT^2 (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^4 + $CellContext`MH^4 (128 $CellContext`MT^6 + 
+                    208 $CellContext`MT^4 ($CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) + 
+                    64 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 - 
+                    3 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^3))}, 0, 4, 1],
+                    Editable->False], ")"}]}], "+", 
+                  RowBox[{"(", 
+                   InterpretationBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    RowBox[{"80", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MH", "4"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "48"}], " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"40", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}]}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "2"]}], ")"}]}], ")"}]}], 
+                    "-", 
+                    FractionBox[
+                    RowBox[{"2", " ", "\[ImaginaryI]", " ", 
+                    SuperscriptBox["MT", "2"], " ", "\[Pi]", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    RowBox[{"6", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", "\[Beta]"}], 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "2"]], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "4"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "24"}], " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MH", "6"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "3"]}], "-", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"24", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"14", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"240", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"28", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    "-", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "3"]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}]}]}], ")"}], " ", 
+                    SuperscriptBox["\[Beta]", "2"]}], ")"}], "/", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "3"]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", "\[ImaginaryI]", " ", 
+                    SuperscriptBox["MT", "2"], " ", "\[Pi]", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"96", " ", 
+                    SuperscriptBox["MH", "4"], " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "3"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "6"]}], "-", 
+                    RowBox[{"144", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "-", 
+                    RowBox[{"40", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "3"]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    SuperscriptBox["\[Beta]", "3"]}], ")"}], "/", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "3"]}], "+", 
+                    InterpretationBox[
+                    SuperscriptBox[
+                    RowBox[{"O", "[", "\[Beta]", "]"}], "4"],
+                    SeriesData[$CellContext`\[Beta], 0, {}, 0, 4, 1],
+                    Editable->False]}],
+                    
+                    SeriesData[$CellContext`\[Beta], 0, {
+                    Rational[-1, 
+                    2] ((-16) $CellContext`MH^2 $CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-2) ((
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) ((-16) $CellContext`MH^2 $CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2) + $CellContext`MH^2 (
+                    32 $CellContext`MH^2 $CellContext`MT^2 - 
+                    80 $CellContext`MT^4 - 
+                    16 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) + ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2) 
+                    X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] - (32 $CellContext`MH^4 $CellContext`MT^2 + 
+                    4 $CellContext`MT^2 (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 + $CellContext`MH^2 ((-48) $CellContext`MT^4 - 
+                    40 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) + ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)) 
+                    X`DiscB[$CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24, $CellContext`MT, $CellContext`MT]), 
+                    Complex[0, -2] $CellContext`MT^2 
+                    Pi ((-16) $CellContext`MH^2 $CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-2) ((
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 + $CellContext`MH^2 (8 $CellContext`MT^2 - 
+                    
+                    6 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24))), 2 $CellContext`MT^2 (
+                    16 $CellContext`MH^2 $CellContext`MT^2 - (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-3) ((
+                    16 $CellContext`MH^2 $CellContext`MT^2 - (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2) (
+                    16 $CellContext`MH^2 ($CellContext`MT^2 - \
+$CellContext`S34 - $CellContext`T14 - $CellContext`T24) + 
+                    3 (4 $CellContext`MT^2 + $CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24)^2) + 
+                    8 $CellContext`MH^2 (
+                    16 $CellContext`MH^4 $CellContext`MT^2 + (
+                    5 $CellContext`MT^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24) (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 + 2 $CellContext`MH^2 ((-24) $CellContext`MT^4 - 
+                    8 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) + ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)) 
+                    X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] - (128 $CellContext`MH^6 $CellContext`MT^2 - (
+                    4 $CellContext`MT^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24) (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^3 - 16 $CellContext`MH^4 (24 $CellContext`MT^4 + 
+                    14 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) - ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2) + 2 $CellContext`MH^2 (64 $CellContext`MT^6 + 
+                    240 $CellContext`MT^4 ($CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) + 
+                    28 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 - 
+                    7 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^3)) 
+                    X`DiscB[$CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24, $CellContext`MT, $CellContext`MT]), 
+                    Complex[0, -2] $CellContext`MT^2 
+                    Pi (16 $CellContext`MH^2 $CellContext`MT^2 - (
+                    
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-3) (
+                    96 $CellContext`MH^4 $CellContext`MT^2 ($CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) + (
+                    4 $CellContext`MT^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24) (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^3 + 2 $CellContext`MH^2 (256 $CellContext`MT^6 - 
+                    144 $CellContext`MT^4 ($CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) - 
+                    40 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 + 
+                    3 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^3))}, 0, 4, 1],
+                    Editable->False], ")"}]}], ")"}]}]}], ")"}]}], "-", 
+            RowBox[{"8", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", "4"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+               RowBox[{"8", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+               RowBox[{"8", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+               RowBox[{"8", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+               RowBox[{"8", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 ")"}]}]}], ")"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"ScalarC0", "[", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], ",", 
+                  RowBox[{
+                   SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                   "T24"}], ",", 
+                  RowBox[{"-", 
+                   FractionBox[
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], 
+                    RowBox[{
+                    RowBox[{"-", "1"}], "+", 
+                    SuperscriptBox["\[Beta]", "2"]}]]}], ",", "MT", ",", "MT",
+                   ",", "MT"}], "]"}], " ", 
+                RowBox[{"(", 
+                 InterpretationBox[
+                  RowBox[{
+                   RowBox[{"-", 
+                    FractionBox[
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}]}]]}], "-", 
+                   FractionBox[
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    ")"}]}], ")"}], " ", 
+                    SuperscriptBox["\[Beta]", "2"]}], 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "2"]], "+", 
+                   InterpretationBox[
+                    SuperscriptBox[
+                    RowBox[{"O", "[", "\[Beta]", "]"}], "4"],
+                    SeriesData[$CellContext`\[Beta], 0, {}, 0, 4, 1],
+                    Editable->False]}],
+                  
+                  SeriesData[$CellContext`\[Beta], 0, {
+                   Rational[-1, 2] $CellContext`MT^2 ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2/(
+                    16 $CellContext`MH^2 $CellContext`MT^2 - (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2), 
+                    0, (-2) $CellContext`MH^2 $CellContext`MT^2 \
+($CellContext`MH^2 - $CellContext`S34 - $CellContext`T14 - $CellContext`T24) (
+                    16 $CellContext`MT^4 - ($CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24)^2) ((-16) $CellContext`MH^2 \
+$CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-2)}, 0, 4, 1],
+                  Editable->False], ")"}]}], "+", 
+               RowBox[{"(", 
+                InterpretationBox[
+                 RowBox[{
+                  RowBox[{
+                   FractionBox["1", "4"], " ", 
+                   RowBox[{"(", 
+                    RowBox[{"3", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    FractionBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}]], "+", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}]}], 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}]], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "+", 
+                  FractionBox[
+                   RowBox[{"\[ImaginaryI]", " ", 
+                    SuperscriptBox["MT", "2"], " ", "\[Pi]", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", "\[Beta]"}], 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}]], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}]}]}], ")"}], " ", 
+                    SuperscriptBox["\[Beta]", "2"]}], ")"}], "/", 
+                   SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "2"]}], "-", 
+                  FractionBox[
+                   RowBox[{"\[ImaginaryI]", " ", 
+                    SuperscriptBox["MT", "2"], " ", "\[Pi]", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    SuperscriptBox["\[Beta]", "3"]}], 
+                   SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "2"]], "+", 
+                  InterpretationBox[
+                   SuperscriptBox[
+                    RowBox[{"O", "[", "\[Beta]", "]"}], "4"],
+                   SeriesData[$CellContext`\[Beta], 0, {}, 0, 4, 1],
+                   Editable->False]}],
+                 
+                 SeriesData[$CellContext`\[Beta], 0, {
+                  Rational[1, 4] (3 + 
+                    X`Eps^(-1) + $CellContext`MH^2 (
+                    4 $CellContext`MT^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24) (16 $CellContext`MH^2 $CellContext`MT^2 - (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-1) 
+                    X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24) (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) (16 $CellContext`MH^2 $CellContext`MT^2 - (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-1) 
+                    X`DiscB[$CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24, $CellContext`MT, $CellContext`MT] + 
+                    Log[$CellContext`MT^(-2) X`Mu^2]), 
+                   Complex[0, 1] $CellContext`MT^2 
+                   Pi ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)/((-16) $CellContext`MH^2 $CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2), $CellContext`MT^2 ((-16) $CellContext`MH^2 \
+$CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-2) ((-2) (2 $CellContext`MH^2 - 
+                    4 $CellContext`MT^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24) (16 $CellContext`MH^2 $CellContext`MT^2 - (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2) + $CellContext`MH^2 (16 $CellContext`MT^4 - 
+                    8 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) + ($CellContext`S34 + $CellContext`T14 + $CellContext`T24) (
+                    4 $CellContext`MH^2 - 
+                    
+                    3 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24))) 
+                    X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] - (
+                    4 $CellContext`MH^4 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) + ($CellContext`S34 + $CellContext`T14 + $CellContext`T24) (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 - $CellContext`MH^2 (16 $CellContext`MT^4 + 
+                    8 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) + 
+                    5 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)) 
+                    X`DiscB[$CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24, $CellContext`MT, $CellContext`MT]), 
+                   Complex[0, -1] $CellContext`MT^2 
+                   Pi ((-16) $CellContext`MH^2 $CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-2) (-($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 + 
+                    2 $CellContext`MH^2 (
+                    16 $CellContext`MT^4 + ($CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24)^2))}, 0, 4, 1],
+                 Editable->False], ")"}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              InterpretationBox[
+               RowBox[{
+                RowBox[{
+                 RowBox[{"(", 
+                  RowBox[{"4", " ", "S", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], ")"}], "/", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                   SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}]}], "-", 
+                RowBox[{
+                 RowBox[{"(", 
+                  RowBox[{"32", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", "S", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], ")"}], " ", 
+                   SuperscriptBox["\[Beta]", "2"]}], ")"}], "/", 
+                 SuperscriptBox[
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "2"]}], "+", 
+                InterpretationBox[
+                 SuperscriptBox[
+                  RowBox[{"O", "[", "\[Beta]", "]"}], "3"],
+                 SeriesData[$CellContext`\[Beta], 0, {}, 0, 3, 1],
+                 Editable->False]}],
+               
+               SeriesData[$CellContext`\[Beta], 0, {
+                4 $CellContext`S ((-16) $CellContext`MH^2 $CellContext`MT^2 + \
+(4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-1) (4 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - 2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 2 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]])) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + 8 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] - 8 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] - 8 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]] + 8 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[
+                    2]] ((-$CellContext`T - 2 $CellContext`T14 + 
+                    2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] - 4 ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] (-$CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) + ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))), 
+                 0, (-32) $CellContext`MT^2 $CellContext`S ((-2) \
+$CellContext`MH^2 + 
+                  4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) ((-16) $CellContext`MH^2 $CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-2) (4 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - 2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 2 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]])) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + 8 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] - 8 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] - 8 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]] + 8 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[
+                    2]] ((-$CellContext`T - 2 $CellContext`T14 + 
+                    2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] - 4 ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] (-$CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) + ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])))}, 0, 3, 1],
+               Editable->False], ")"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"ScalarC0", "[", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], ",", 
+                  RowBox[{
+                   SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                   "T24"}], ",", 
+                  RowBox[{"-", 
+                   FractionBox[
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], 
+                    RowBox[{
+                    RowBox[{"-", "1"}], "+", 
+                    SuperscriptBox["\[Beta]", "2"]}]]}], ",", "MT", ",", "MT",
+                   ",", "MT"}], "]"}], " ", 
+                RowBox[{"(", 
+                 InterpretationBox[
+                  RowBox[{
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}]}], "+", 
+                   RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox["\[Beta]", "2"]}], "+", 
+                   RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox["\[Beta]", "4"]}], "+", 
+                   InterpretationBox[
+                    SuperscriptBox[
+                    RowBox[{"O", "[", "\[Beta]", "]"}], "5"],
+                    SeriesData[$CellContext`\[Beta], 0, {}, 0, 5, 1],
+                    Editable->False]}],
+                  
+                  SeriesData[$CellContext`\[Beta], 
+                   0, {$CellContext`MH^2 (
+                    4 $CellContext`MT^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24), 0, 4 $CellContext`MH^2 $CellContext`MT^2, 0, 
+                    4 $CellContext`MH^2 $CellContext`MT^2}, 0, 5, 1],
+                  Editable->False], ")"}]}], "+", 
+               RowBox[{"(", 
+                InterpretationBox[
+                 RowBox[{
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}]}]}], ")"}], "+", 
+                  RowBox[{"\[ImaginaryI]", " ", "\[Pi]", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", "\[Beta]"}], "-", 
+                  RowBox[{"2", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24", "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}]}]}], ")"}], " ", 
+                   SuperscriptBox["\[Beta]", "2"]}], "+", 
+                  RowBox[{"4", " ", "\[ImaginaryI]", " ", 
+                   SuperscriptBox["MT", "2"], " ", "\[Pi]", " ", 
+                   SuperscriptBox["\[Beta]", "3"]}], "-", 
+                  RowBox[{
+                   FractionBox["2", "3"], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24", "+", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}]}]}], ")"}], " ", 
+                   SuperscriptBox["\[Beta]", "4"]}], "+", 
+                  InterpretationBox[
+                   SuperscriptBox[
+                    RowBox[{"O", "[", "\[Beta]", "]"}], "5"],
+                   SeriesData[$CellContext`\[Beta], 0, {}, 0, 5, 1],
+                   Editable->False]}],
+                 
+                 SeriesData[$CellContext`\[Beta], 
+                  0, {(-2) $CellContext`MH^2 
+                    X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + (2 $CellContext`MH^2 - 
+                    4 $CellContext`MT^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24) 
+                    X`DiscB[$CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24, $CellContext`MT, $CellContext`MT], 
+                   Complex[0, 1] 
+                   Pi (4 $CellContext`MT^2 + $CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24), (-2) (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24 + 2 $CellContext`MT^2 
+                    X`DiscB[$CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24, $CellContext`MT, $CellContext`MT]), 
+                   Complex[0, 4] $CellContext`MT^2 Pi, 
+                   Rational[-2, 3] (
+                    16 $CellContext`MT^2 + $CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24 + 
+                    6 $CellContext`MT^2 
+                    X`DiscB[$CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24, $CellContext`MT, $CellContext`MT])}, 0, 
+                  5, 1],
+                 Editable->False], ")"}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              InterpretationBox[
+               RowBox[{
+                RowBox[{"-", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", "S34", " ", "T"}], "-", 
+                    SuperscriptBox["T", "2"], "+", 
+                    RowBox[{"4", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "-", "U"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", 
+                    RowBox[{"2", " ", "T14"}], "-", 
+                    RowBox[{"2", " ", "T24"}], "-", "U"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "S34", " ", "U"}], "-", 
+                    RowBox[{"4", " ", "T14", " ", "U"}], "+", 
+                    SuperscriptBox["U", "2"]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "S34", "+", "T14", "+", "T24"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", "S34", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"32", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], ")"}], "/", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}]}], ")"}]}], "+", 
+                RowBox[{
+                 RowBox[{"(", 
+                  RowBox[{"16", " ", 
+                   SuperscriptBox["MT", "2"], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", "S34", " ", "T"}], "-", 
+                    SuperscriptBox["T", "2"], "+", 
+                    RowBox[{"4", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "-", "U"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", 
+                    RowBox[{"2", " ", "T14"}], "-", 
+                    RowBox[{"2", " ", "T24"}], "-", "U"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "S34", " ", "U"}], "-", 
+                    RowBox[{"4", " ", "T14", " ", "U"}], "+", 
+                    SuperscriptBox["U", "2"]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "S34", "+", "T14", "+", "T24"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", "S34", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"32", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                   SuperscriptBox["\[Beta]", "2"]}], ")"}], "/", 
+                 SuperscriptBox[
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "2"]}], "+", 
+                InterpretationBox[
+                 SuperscriptBox[
+                  RowBox[{"O", "[", "\[Beta]", "]"}], "3"],
+                 SeriesData[$CellContext`\[Beta], 0, {}, 0, 3, 1],
+                 Editable->False]}],
+               
+               SeriesData[$CellContext`\[Beta], 
+                0, {(-2) ((-16) $CellContext`MH^2 $CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-1) (((-2) $CellContext`S34 $CellContext`T - \
+$CellContext`T^2 + 4 $CellContext`T $CellContext`T24 + 
+                    2 $CellContext`S ($CellContext`T - $CellContext`U) + 
+                    2 $CellContext`MH^2 ($CellContext`T + 2 $CellContext`T14 - 
+                    2 $CellContext`T24 - $CellContext`U) + 
+                    2 $CellContext`S34 $CellContext`U - 
+                    4 $CellContext`T14 $CellContext`U + $CellContext`U^2) \
+$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] - 
+                  4 ((-2) ($CellContext`S - $CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] + ((-2) $CellContext`MH^2 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + 2 $CellContext`MH^2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`T $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`U $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + 2 $CellContext`S $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] - 
+                   2 $CellContext`S34 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 
+                   2 $CellContext`T14 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 
+                   2 $CellContext`T24 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 2 $CellContext`MH^2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] - $CellContext`T $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] - $CellContext`U $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] - 2 $CellContext`MH^2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] + $CellContext`T $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] + $CellContext`U $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + 
+                  8 ((-2) $CellContext`MH^2 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] - 
+                  8 ((-2) $CellContext`MH^2 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] + 32 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]]) ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) - ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) - 
+                  8 ((-2) $CellContext`MH^2 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]] + 
+                  8 ((-2) $CellContext`MH^2 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]] - 4 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] (
+                    2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - 
+                    2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    2]] + ($CellContext`T - $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    3]]) + ((-2) ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + 
+                    2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    2]] + (-$CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])), 0, 
+                 16 $CellContext`MT^2 ((-2) $CellContext`MH^2 + 
+                  4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) ((-16) $CellContext`MH^2 $CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-2) (((-2) $CellContext`S34 $CellContext`T - \
+$CellContext`T^2 + 4 $CellContext`T $CellContext`T24 + 
+                    2 $CellContext`S ($CellContext`T - $CellContext`U) + 
+                    2 $CellContext`MH^2 ($CellContext`T + 2 $CellContext`T14 - 
+                    2 $CellContext`T24 - $CellContext`U) + 
+                    2 $CellContext`S34 $CellContext`U - 
+                    4 $CellContext`T14 $CellContext`U + $CellContext`U^2) \
+$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] - 
+                  4 ((-2) ($CellContext`S - $CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] + ((-2) $CellContext`MH^2 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + 2 $CellContext`MH^2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`T $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`U $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + 2 $CellContext`S $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] - 
+                   2 $CellContext`S34 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 
+                   2 $CellContext`T14 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 
+                   2 $CellContext`T24 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 2 $CellContext`MH^2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] - $CellContext`T $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] - $CellContext`U $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] - 2 $CellContext`MH^2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] + $CellContext`T $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] + $CellContext`U $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + 
+                  8 ((-2) $CellContext`MH^2 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] - 
+                  8 ((-2) $CellContext`MH^2 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] + 32 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]]) ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) - ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) - 
+                  8 ((-2) $CellContext`MH^2 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]] + 
+                  8 ((-2) $CellContext`MH^2 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]] - 4 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] (
+                    2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - 
+                    2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    2]] + ($CellContext`T - $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    3]]) + ((-2) ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + 
+                    2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    2]] + (-$CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))}, 0, 3, 1],
+               Editable->False], ")"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"ScalarC0", "[", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], ",", 
+                  RowBox[{
+                   SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                   "T24"}], ",", 
+                  RowBox[{"-", 
+                   FractionBox[
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], 
+                    RowBox[{
+                    RowBox[{"-", "1"}], "+", 
+                    SuperscriptBox["\[Beta]", "2"]}]]}], ",", "MT", ",", "MT",
+                   ",", "MT"}], "]"}], " ", 
+                RowBox[{"(", 
+                 InterpretationBox[
+                  RowBox[{
+                   RowBox[{"-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}]}], ")"}]}]}], "-", 
+                   RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}]}], ")"}], " ", 
+                    SuperscriptBox["\[Beta]", "2"]}], "-", 
+                   RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}]}], ")"}], " ", 
+                    SuperscriptBox["\[Beta]", "4"]}], "+", 
+                   InterpretationBox[
+                    SuperscriptBox[
+                    RowBox[{"O", "[", "\[Beta]", "]"}], "5"],
+                    SeriesData[$CellContext`\[Beta], 0, {}, 0, 5, 1],
+                    Editable->False]}],
+                  
+                  SeriesData[$CellContext`\[Beta], 
+                   0, {(-4) $CellContext`MT^2 ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24), 0, (-4) $CellContext`MT^2 ((-2) $CellContext`MH^2 + 
+                    
+                    8 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24), 0, (-4) $CellContext`MT^2 ((-2) $CellContext`MH^2 + 
+                    12 $CellContext`MT^2 + $CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24)}, 0, 5, 1],
+                  Editable->False], ")"}]}], "+", 
+               RowBox[{"(", 
+                InterpretationBox[
+                 RowBox[{
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}]}]}], ")"}], "-", 
+                  RowBox[{"8", " ", "\[ImaginaryI]", " ", 
+                   SuperscriptBox["MT", "2"], " ", "\[Pi]", " ", "\[Beta]"}], 
+                  "+", 
+                  RowBox[{"4", " ", 
+                   SuperscriptBox["MT", "2"], " ", 
+                   RowBox[{"(", 
+                    RowBox[{"4", "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                   SuperscriptBox["\[Beta]", "2"]}], "-", 
+                  RowBox[{"8", " ", "\[ImaginaryI]", " ", 
+                   SuperscriptBox["MT", "2"], " ", "\[Pi]", " ", 
+                   SuperscriptBox["\[Beta]", "3"]}], "+", 
+                  RowBox[{
+                   FractionBox["4", "3"], " ", 
+                   SuperscriptBox["MT", "2"], " ", 
+                   RowBox[{"(", 
+                    RowBox[{"16", "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}]}]}], ")"}], " ", 
+                   SuperscriptBox["\[Beta]", "4"]}], "+", 
+                  InterpretationBox[
+                   SuperscriptBox[
+                    RowBox[{"O", "[", "\[Beta]", "]"}], "5"],
+                   SeriesData[$CellContext`\[Beta], 0, {}, 0, 5, 1],
+                   Editable->False]}],
+                 
+                 SeriesData[$CellContext`\[Beta], 
+                  0, {(4 $CellContext`MT^2 + $CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) 
+                    X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + (
+                    4 $CellContext`MT^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24) 
+                    X`DiscB[$CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24, $CellContext`MT, $CellContext`MT], 
+                   Complex[0, -8] $CellContext`MT^2 Pi, 
+                   4 $CellContext`MT^2 (4 + 
+                    X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + 
+                    X`DiscB[$CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24, $CellContext`MT, $CellContext`MT]), 
+                   Complex[0, -8] $CellContext`MT^2 Pi, 
+                   Rational[4, 3] $CellContext`MT^2 (16 + 
+                    3 X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + 3 
+                    X`DiscB[$CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24, $CellContext`MT, $CellContext`MT])}, 0, 
+                  5, 1],
+                 Editable->False], ")"}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], 
+     ")"}]}]}]}]], "Output",
+ CellChangeTimes->{3.778513163539002*^9},
+ CellLabel->
+  "Out[100]=",ExpressionUUID->"6849d88e-ad0f-49c4-99da-875ddf3df840"]
+}, Closed]],
+
+Cell[BoxData[""], "Input",
+ CellChangeTimes->{{3.778511510005802*^9, 
+  3.778511515077896*^9}},ExpressionUUID->"3bccd808-2d0d-4aed-ad5c-\
+f98dce1bb2fa"],
+
+Cell[BoxData[""], "Input",
+ CellChangeTimes->{{3.77851141463636*^9, 
+  3.778511424867489*^9}},ExpressionUUID->"9214d531-c1c4-4f0b-8067-\
+62d509d3780e"],
+
+Cell[BoxData[""], "Input",
+ CellChangeTimes->{{3.778511201027299*^9, 
+  3.778511260406787*^9}},ExpressionUUID->"5d134bbf-d270-4d46-9aad-\
+c35a20b3af10"],
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"listPV", "=", 
+   RowBox[{"ToExpression", "[", 
+    RowBox[{"Import", "[", 
+     RowBox[{"\"\<allPVs.m\>\"", ",", "\"\<Lines\>\""}], "]"}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"LRlist", "=", 
+   RowBox[{"Import", "[", "\"\<analyticPV.m\>\"", "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{
+   RowBox[{"LRlistVelSub", "=", 
+    RowBox[{"LRlist", "//.", "VelSub"}]}], ";"}], "\[IndentingNewLine]", 
+  RowBox[{"(*", " ", 
+   RowBox[{
+    RowBox[{
+    "Take", " ", "analytic", " ", "expansions", " ", "of", " ", "PV", " ", 
+     "coefficients", " ", "and", " ", "sub", " ", "S"}], "\[Rule]", 
+    RowBox[{"4", "*", 
+     RowBox[{
+      RowBox[{"MT", "^", "2"}], "/", 
+      RowBox[{"(", 
+       RowBox[{"1", "-", 
+        RowBox[{"\[Beta]", "^", "2"}]}], ")"}]}]}]}], 
+   "*)"}]}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"Export", "[", 
+   RowBox[{"\"\<analyticPVwVel.m\>\"", ",", "LRlistVelSub"}], "]"}], 
+  ";"}]}], "Input",
+ CellChangeTimes->{{3.776094397166354*^9, 3.776094421774979*^9}, {
+  3.776094465962419*^9, 3.77609447206217*^9}, {3.776097668612061*^9, 
+  3.776097774958314*^9}},
+ CellLabel->"In[23]:=",ExpressionUUID->"c9706e32-aa64-4bea-be5e-fca139f74b78"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{
+   "Copy", " ", "the", " ", "analytical", " ", "list", " ", "in", " ", 
+    "terms", " ", "of", " ", "\[Beta]", " ", "into", " ", "a", " ", "new", 
+    " ", "list", " ", "where", " ", "all", " ", "the", " ", "series", " ", 
+    "will", " ", 
+    RowBox[{"be", "."}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{"(*", 
+   RowBox[{
+    RowBox[{"LRlistVelSub", "=", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"Import", "[", "\"\<analyticPVwVel.m\>\"", "]"}], 
+       "\[IndentingNewLine]", "Serieslist"}], "=", "LRlistVelSub"}]}], ";", 
+    "\[IndentingNewLine]", 
+    RowBox[{"Export", "[", 
+     RowBox[{"\"\<SeriesPV.m\>\"", ",", "Serieslist"}], "]"}], ";"}], 
+   "*)"}]}]], "Input",
+ CellChangeTimes->{{3.7760979510647297`*^9, 3.776098054974638*^9}, {
+   3.776098200620619*^9, 3.776098218898759*^9}, {3.776441930928959*^9, 
+   3.7764419581321993`*^9}, {3.776784952061544*^9, 3.776785007236261*^9}, 
+   3.776785058756402*^9},ExpressionUUID->"2098a55c-4e04-413e-b48c-\
+2e3e1420aeba"],
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"listPV", "=", 
+   RowBox[{"ToExpression", "[", 
+    RowBox[{"Import", "[", 
+     RowBox[{"\"\<allPVs.m\>\"", ",", "\"\<Lines\>\""}], "]"}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"LRlistVelSub", "=", 
+   RowBox[{"Import", "[", "\"\<analyticPVwVel.m\>\"", "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"Serieslist", "=", 
+   RowBox[{"Import", "[", "\"\<SeriesPV.m\>\"", "]"}]}], ";"}]}], "Input",
+ CellChangeTimes->{{3.776098079828*^9, 3.776098100180982*^9}, {
+  3.776785024592134*^9, 3.7767850503846416`*^9}, {3.7770393437154408`*^9, 
+  3.777039344707755*^9}},
+ CellLabel->"In[50]:=",ExpressionUUID->"f11165e8-30f4-4621-91cb-e78cc1116c62"],
+
+Cell[BoxData[""], "Input",
+ CellChangeTimes->{{3.7764430997613564`*^9, 3.776443193530168*^9}, {
+  3.776785094676215*^9, 3.7767850983052683`*^9}, {3.7785115369627542`*^9, 
+  3.778511543496728*^9}, {3.778511607544853*^9, 
+  3.778511621841559*^9}},ExpressionUUID->"881beb7c-e557-4703-a5ed-\
+8b7345c6403b"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"MakeRefineSeriesOf", "[", 
+  RowBox[{"1", ",", "10"}], "]"}]], "Input",
+ CellChangeTimes->{{3.776443243134263*^9, 3.776443254122056*^9}},
+ CellLabel->"In[34]:=",ExpressionUUID->"86953094-992b-4ece-81d3-0f54f8c99910"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["1"], "Print",
+ CellChangeTimes->{3.7764432560233297`*^9, 3.77678515057268*^9},
+ CellLabel->
+  "During evaluation of \
+In[34]:=",ExpressionUUID->"8b88be0a-a13e-4a7b-8295-c1008ad658d6"],
+
+Cell[BoxData["2"], "Print",
+ CellChangeTimes->{3.7764432560233297`*^9, 3.776785163091247*^9},
+ CellLabel->
+  "During evaluation of \
+In[34]:=",ExpressionUUID->"f854acc1-f24a-43ce-9107-892da3741105"],
+
+Cell[BoxData["3"], "Print",
+ CellChangeTimes->{3.7764432560233297`*^9, 3.776785174993379*^9},
+ CellLabel->
+  "During evaluation of \
+In[34]:=",ExpressionUUID->"0ebf2041-29ad-490d-ae2c-fb00ea60e896"],
+
+Cell[BoxData["4"], "Print",
+ CellChangeTimes->{3.7764432560233297`*^9, 3.776785186604517*^9},
+ CellLabel->
+  "During evaluation of \
+In[34]:=",ExpressionUUID->"ce7c7420-29bb-4bc7-9fe1-c52d92b3c17c"],
+
+Cell[BoxData["5"], "Print",
+ CellChangeTimes->{3.7764432560233297`*^9, 3.776785198456546*^9},
+ CellLabel->
+  "During evaluation of \
+In[34]:=",ExpressionUUID->"bdb7f0f5-ae0e-47e3-bde4-add2b2e9172d"],
+
+Cell[BoxData["6"], "Print",
+ CellChangeTimes->{3.7764432560233297`*^9, 3.776785210430993*^9},
+ CellLabel->
+  "During evaluation of \
+In[34]:=",ExpressionUUID->"6ccc5234-8d31-4f80-b860-fb9bc1ead01e"],
+
+Cell[BoxData["7"], "Print",
+ CellChangeTimes->{3.7764432560233297`*^9, 3.776785222781147*^9},
+ CellLabel->
+  "During evaluation of \
+In[34]:=",ExpressionUUID->"9f6f5a15-4625-4559-aeb6-4e62d60ea660"],
+
+Cell[BoxData["8"], "Print",
+ CellChangeTimes->{3.7764432560233297`*^9, 3.7767852353323383`*^9},
+ CellLabel->
+  "During evaluation of \
+In[34]:=",ExpressionUUID->"cc753901-6a7d-4228-ac53-35d451b86d77"],
+
+Cell[BoxData["9"], "Print",
+ CellChangeTimes->{3.7764432560233297`*^9, 3.776785249113072*^9},
+ CellLabel->
+  "During evaluation of \
+In[34]:=",ExpressionUUID->"8fe1d30b-85ec-47bd-8e46-174bcc6be6cf"],
+
+Cell[BoxData["10"], "Print",
+ CellChangeTimes->{3.7764432560233297`*^9, 3.776785262024439*^9},
+ CellLabel->
+  "During evaluation of \
+In[34]:=",ExpressionUUID->"cd6b11e5-086b-4a28-ba23-c88ce09cbddb"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"{", "Null", "}"}]], "Output",
+ CellChangeTimes->{3.776443394718553*^9, 3.776785274825478*^9},
+ CellLabel->"Out[34]=",ExpressionUUID->"f9eb79c9-79ab-4972-ac5d-9bf4d7c5706c"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"MakeRefineSeriesOf", "[", 
+  RowBox[{"11", ",", "20"}], "]"}]], "Input",
+ CellChangeTimes->{{3.776443269263505*^9, 3.776443297130433*^9}},
+ CellLabel->"In[35]:=",ExpressionUUID->"f96bfd50-3c93-487b-b72c-0efa966db052"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["11"], "Print",
+ CellChangeTimes->{3.776443394822617*^9, 3.776785275132083*^9},
+ CellLabel->
+  "During evaluation of \
+In[35]:=",ExpressionUUID->"0df55f20-b51c-4417-8687-560b75680ad9"],
+
+Cell[BoxData["12"], "Print",
+ CellChangeTimes->{3.776443394822617*^9, 3.7767852879137363`*^9},
+ CellLabel->
+  "During evaluation of \
+In[35]:=",ExpressionUUID->"65afac5f-ac1b-405d-95ca-d88dcc034907"],
+
+Cell[BoxData["13"], "Print",
+ CellChangeTimes->{3.776443394822617*^9, 3.7767853015886583`*^9},
+ CellLabel->
+  "During evaluation of \
+In[35]:=",ExpressionUUID->"155d77b5-d5ca-47b5-bba8-036aff1d2443"],
+
+Cell[BoxData["14"], "Print",
+ CellChangeTimes->{3.776443394822617*^9, 3.7767853138957233`*^9},
+ CellLabel->
+  "During evaluation of \
+In[35]:=",ExpressionUUID->"6402840f-e54b-49d2-8ce8-0175340b2083"],
+
+Cell[BoxData["15"], "Print",
+ CellChangeTimes->{3.776443394822617*^9, 3.7767853287329063`*^9},
+ CellLabel->
+  "During evaluation of \
+In[35]:=",ExpressionUUID->"736736de-4f33-4375-9ad5-d9f98f5dba87"],
+
+Cell[BoxData["16"], "Print",
+ CellChangeTimes->{3.776443394822617*^9, 3.776785343544771*^9},
+ CellLabel->
+  "During evaluation of \
+In[35]:=",ExpressionUUID->"5d2d9825-5632-4457-8211-7dd6cee750a8"],
+
+Cell[BoxData["17"], "Print",
+ CellChangeTimes->{3.776443394822617*^9, 3.776785355100485*^9},
+ CellLabel->
+  "During evaluation of \
+In[35]:=",ExpressionUUID->"23906453-43f1-4403-92b6-e9fb94c0ae50"],
+
+Cell[BoxData["18"], "Print",
+ CellChangeTimes->{3.776443394822617*^9, 3.776785367047596*^9},
+ CellLabel->
+  "During evaluation of \
+In[35]:=",ExpressionUUID->"2ba2eb99-fc54-459f-85c0-ed99d7ad07c9"],
+
+Cell[BoxData["19"], "Print",
+ CellChangeTimes->{3.776443394822617*^9, 3.776785378980294*^9},
+ CellLabel->
+  "During evaluation of \
+In[35]:=",ExpressionUUID->"94070629-691b-4d0a-9eb7-69b91078a11e"],
+
+Cell[BoxData["20"], "Print",
+ CellChangeTimes->{3.776443394822617*^9, 3.776785394147324*^9},
+ CellLabel->
+  "During evaluation of \
+In[35]:=",ExpressionUUID->"3812bf93-11c7-45dc-bd0e-7ed9238191ce"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"{", "Null", "}"}]], "Output",
+ CellChangeTimes->{3.776443542586445*^9, 3.776785425375132*^9},
+ CellLabel->"Out[35]=",ExpressionUUID->"3f41a929-7beb-4259-8ecb-4fc1d8a69374"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"MakeRefineSeriesOf", "[", 
+  RowBox[{"21", ",", "30"}], "]"}]], "Input",
+ CellChangeTimes->{{3.7764432864380407`*^9, 3.776443300191421*^9}},
+ CellLabel->"In[36]:=",ExpressionUUID->"fe1a97a8-532e-4e7a-8a88-f565caae5f97"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["21"], "Print",
+ CellChangeTimes->{3.7764435427174063`*^9, 3.7767854255703907`*^9},
+ CellLabel->
+  "During evaluation of \
+In[36]:=",ExpressionUUID->"203826e8-d100-4a48-aa61-b8cae880ddf2"],
+
+Cell[BoxData["22"], "Print",
+ CellChangeTimes->{3.7764435427174063`*^9, 3.776785442882122*^9},
+ CellLabel->
+  "During evaluation of \
+In[36]:=",ExpressionUUID->"9a8a2d64-a921-4ebe-b6c4-e90419eee1c2"],
+
+Cell[BoxData["23"], "Print",
+ CellChangeTimes->{3.7764435427174063`*^9, 3.776785459608718*^9},
+ CellLabel->
+  "During evaluation of \
+In[36]:=",ExpressionUUID->"ceff1cb8-2c39-4c0f-a43a-efcbdbef0fe2"],
+
+Cell[BoxData["24"], "Print",
+ CellChangeTimes->{3.7764435427174063`*^9, 3.7767854716911592`*^9},
+ CellLabel->
+  "During evaluation of \
+In[36]:=",ExpressionUUID->"89a661a3-5c0c-4326-a393-6e4972db4a6b"],
+
+Cell[BoxData["25"], "Print",
+ CellChangeTimes->{3.7764435427174063`*^9, 3.7767854851652393`*^9},
+ CellLabel->
+  "During evaluation of \
+In[36]:=",ExpressionUUID->"6aa6f90c-6c91-4f86-8968-1103cba7975b"],
+
+Cell[BoxData["26"], "Print",
+ CellChangeTimes->{3.7764435427174063`*^9, 3.776785499030817*^9},
+ CellLabel->
+  "During evaluation of \
+In[36]:=",ExpressionUUID->"0dcb36c1-0668-4b8a-bc01-4945a598c78a"],
+
+Cell[BoxData["27"], "Print",
+ CellChangeTimes->{3.7764435427174063`*^9, 3.776785515033786*^9},
+ CellLabel->
+  "During evaluation of \
+In[36]:=",ExpressionUUID->"0fcfcd70-8d7b-435d-a163-acb028e6e16e"],
+
+Cell[BoxData["28"], "Print",
+ CellChangeTimes->{3.7764435427174063`*^9, 3.776785529395587*^9},
+ CellLabel->
+  "During evaluation of \
+In[36]:=",ExpressionUUID->"3b7724cb-54a4-4dde-8ea0-50e5610b792e"],
+
+Cell[BoxData["29"], "Print",
+ CellChangeTimes->{3.7764435427174063`*^9, 3.776785544335827*^9},
+ CellLabel->
+  "During evaluation of \
+In[36]:=",ExpressionUUID->"b613c9c7-96f4-4a6c-8f08-8e6df52762df"],
+
+Cell[BoxData["30"], "Print",
+ CellChangeTimes->{3.7764435427174063`*^9, 3.776785557473522*^9},
+ CellLabel->
+  "During evaluation of \
+In[36]:=",ExpressionUUID->"a6fd0189-8e91-469a-9897-389a4893d7b0"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"{", "Null", "}"}]], "Output",
+ CellChangeTimes->{3.776443670712986*^9, 3.776785570034812*^9},
+ CellLabel->"Out[36]=",ExpressionUUID->"4a8fef41-31e5-42c1-8bdc-68e9f7afbd6a"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"MakeRefineSeriesOf", "[", 
+  RowBox[{"31", ",", "40"}], "]"}]], "Input",
+ CellChangeTimes->{{3.7764435657641363`*^9, 3.77644357390454*^9}},
+ CellLabel->"In[37]:=",ExpressionUUID->"2aecbe65-4b44-4dfa-93ef-65fd39540c9b"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["31"], "Print",
+ CellChangeTimes->{3.776443670904154*^9, 3.776785570242344*^9},
+ CellLabel->
+  "During evaluation of \
+In[37]:=",ExpressionUUID->"2fca990b-8284-4e3f-8a3b-7f56db89acc5"],
+
+Cell[BoxData["32"], "Print",
+ CellChangeTimes->{3.776443670904154*^9, 3.776785587092491*^9},
+ CellLabel->
+  "During evaluation of \
+In[37]:=",ExpressionUUID->"3177b850-296d-49fe-8867-d3473a1b0c35"],
+
+Cell[BoxData["33"], "Print",
+ CellChangeTimes->{3.776443670904154*^9, 3.776785603039337*^9},
+ CellLabel->
+  "During evaluation of \
+In[37]:=",ExpressionUUID->"c0b4e928-89e9-4d85-8e51-5cbdf9ce41aa"],
+
+Cell[BoxData["34"], "Print",
+ CellChangeTimes->{3.776443670904154*^9, 3.776785615262904*^9},
+ CellLabel->
+  "During evaluation of \
+In[37]:=",ExpressionUUID->"a373700f-9836-44d5-8a5f-930119678171"],
+
+Cell[BoxData["35"], "Print",
+ CellChangeTimes->{3.776443670904154*^9, 3.776785628518416*^9},
+ CellLabel->
+  "During evaluation of \
+In[37]:=",ExpressionUUID->"ca822f7e-70c9-46a4-a25f-582acb77abcb"],
+
+Cell[BoxData["36"], "Print",
+ CellChangeTimes->{3.776443670904154*^9, 3.776785640345977*^9},
+ CellLabel->
+  "During evaluation of \
+In[37]:=",ExpressionUUID->"96e22b30-8c73-4518-8d23-873121d8fc48"],
+
+Cell[BoxData["37"], "Print",
+ CellChangeTimes->{3.776443670904154*^9, 3.776785654876864*^9},
+ CellLabel->
+  "During evaluation of \
+In[37]:=",ExpressionUUID->"83708b79-d67b-4c05-93e9-38073aa7fe05"],
+
+Cell[BoxData["38"], "Print",
+ CellChangeTimes->{3.776443670904154*^9, 3.776785669062007*^9},
+ CellLabel->
+  "During evaluation of \
+In[37]:=",ExpressionUUID->"78e88359-b700-4328-bea6-a2b0d14a7cac"],
+
+Cell[BoxData["39"], "Print",
+ CellChangeTimes->{3.776443670904154*^9, 3.776785684171424*^9},
+ CellLabel->
+  "During evaluation of \
+In[37]:=",ExpressionUUID->"704157f3-bfb2-4f43-b5f0-c5bfbc560aab"],
+
+Cell[BoxData["40"], "Print",
+ CellChangeTimes->{3.776443670904154*^9, 3.776785699617958*^9},
+ CellLabel->
+  "During evaluation of \
+In[37]:=",ExpressionUUID->"7565254f-9a77-48dc-9444-33b886723862"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"{", "Null", "}"}]], "Output",
+ CellChangeTimes->{3.7764437965534983`*^9, 3.7767857127548532`*^9},
+ CellLabel->"Out[37]=",ExpressionUUID->"2e1c38af-7450-4ecc-a05c-257dcdba5451"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"MakeRefineSeriesOf", "[", 
+  RowBox[{"41", ",", "50"}], "]"}]], "Input",
+ CellChangeTimes->{{3.776443577378374*^9, 3.776443584277933*^9}},
+ CellLabel->"In[38]:=",ExpressionUUID->"8ee863b5-d147-4e8a-bd18-9c421dd23787"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["41"], "Print",
+ CellChangeTimes->{3.776443982326789*^9, 3.776785714716011*^9},
+ CellLabel->
+  "During evaluation of \
+In[38]:=",ExpressionUUID->"2009a193-ceea-46ef-bd80-037d926017cf"],
+
+Cell[BoxData["42"], "Print",
+ CellChangeTimes->{3.776443982326789*^9, 3.7767857269185553`*^9},
+ CellLabel->
+  "During evaluation of \
+In[38]:=",ExpressionUUID->"0a74d1db-0a55-41c7-a355-eca543eb70e7"],
+
+Cell[BoxData["43"], "Print",
+ CellChangeTimes->{3.776443982326789*^9, 3.776785741022086*^9},
+ CellLabel->
+  "During evaluation of \
+In[38]:=",ExpressionUUID->"e55077bb-d892-44dc-b006-f69eb07618f5"],
+
+Cell[BoxData["44"], "Print",
+ CellChangeTimes->{3.776443982326789*^9, 3.776785753210094*^9},
+ CellLabel->
+  "During evaluation of \
+In[38]:=",ExpressionUUID->"55c1e9be-56a5-4944-b983-985ca4b80876"],
+
+Cell[BoxData["45"], "Print",
+ CellChangeTimes->{3.776443982326789*^9, 3.776785766312956*^9},
+ CellLabel->
+  "During evaluation of \
+In[38]:=",ExpressionUUID->"17abba4e-1848-488c-bde6-35cdf05998d4"],
+
+Cell[BoxData["46"], "Print",
+ CellChangeTimes->{3.776443982326789*^9, 3.7767857790050087`*^9},
+ CellLabel->
+  "During evaluation of \
+In[38]:=",ExpressionUUID->"8842af6b-8a1e-48e1-98ef-18ca8f39a91d"],
+
+Cell[BoxData["47"], "Print",
+ CellChangeTimes->{3.776443982326789*^9, 3.776785791100809*^9},
+ CellLabel->
+  "During evaluation of \
+In[38]:=",ExpressionUUID->"c65f5711-d87e-4702-85dc-948bb2237f08"],
+
+Cell[BoxData["48"], "Print",
+ CellChangeTimes->{3.776443982326789*^9, 3.776785802631966*^9},
+ CellLabel->
+  "During evaluation of \
+In[38]:=",ExpressionUUID->"c6fbe64a-ceca-439e-8b29-9c26adf965ef"],
+
+Cell[BoxData["49"], "Print",
+ CellChangeTimes->{3.776443982326789*^9, 3.7767858142527943`*^9},
+ CellLabel->
+  "During evaluation of \
+In[38]:=",ExpressionUUID->"9fcc8d20-19ef-45d4-bc4b-aefbb0a6e431"],
+
+Cell[BoxData["50"], "Print",
+ CellChangeTimes->{3.776443982326789*^9, 3.776785826998526*^9},
+ CellLabel->
+  "During evaluation of \
+In[38]:=",ExpressionUUID->"3f30f015-4bfc-47f5-99d8-e3f68011c8c2"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"{", "Null", "}"}]], "Output",
+ CellChangeTimes->{3.776444120895063*^9, 3.776785840151104*^9},
+ CellLabel->"Out[38]=",ExpressionUUID->"6069c659-d902-4918-a553-fc39b0ec194b"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"MakeRefineSeriesOf", "[", 
+  RowBox[{"51", ",", "60"}], "]"}]], "Input",
+ CellChangeTimes->{{3.776443586530539*^9, 3.776443592423757*^9}},
+ CellLabel->"In[39]:=",ExpressionUUID->"71acea69-b2b3-491d-ae15-f4df099b9b39"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["51"], "Print",
+ CellChangeTimes->{3.776443800474946*^9, 3.7767858419914427`*^9},
+ CellLabel->
+  "During evaluation of \
+In[39]:=",ExpressionUUID->"4145e9a2-b86f-444d-9e6f-514e102a7a17"],
+
+Cell[BoxData["52"], "Print",
+ CellChangeTimes->{3.776443800474946*^9, 3.776785854642742*^9},
+ CellLabel->
+  "During evaluation of \
+In[39]:=",ExpressionUUID->"0f110600-9945-4ce8-ada0-239cd91d8e03"],
+
+Cell[BoxData["53"], "Print",
+ CellChangeTimes->{3.776443800474946*^9, 3.7767858670519247`*^9},
+ CellLabel->
+  "During evaluation of \
+In[39]:=",ExpressionUUID->"f8453fc4-a721-4441-9016-2af31abf7022"],
+
+Cell[BoxData["54"], "Print",
+ CellChangeTimes->{3.776443800474946*^9, 3.77678587860671*^9},
+ CellLabel->
+  "During evaluation of \
+In[39]:=",ExpressionUUID->"e7b4daf0-0724-4551-8ded-34ecced4ec32"],
+
+Cell[BoxData["55"], "Print",
+ CellChangeTimes->{3.776443800474946*^9, 3.776785899077808*^9},
+ CellLabel->
+  "During evaluation of \
+In[39]:=",ExpressionUUID->"654cff30-d67b-463f-9d66-f38a5cbd6e2c"],
+
+Cell[BoxData["56"], "Print",
+ CellChangeTimes->{3.776443800474946*^9, 3.776785911675519*^9},
+ CellLabel->
+  "During evaluation of \
+In[39]:=",ExpressionUUID->"0398c397-cea0-48c6-adee-2da2335e66cb"],
+
+Cell[BoxData["57"], "Print",
+ CellChangeTimes->{3.776443800474946*^9, 3.776785970139532*^9},
+ CellLabel->
+  "During evaluation of \
+In[39]:=",ExpressionUUID->"0f95316d-23be-46b1-8fb4-6dfdb7e99fe2"],
+
+Cell[BoxData["58"], "Print",
+ CellChangeTimes->{3.776443800474946*^9, 3.7767860221105433`*^9},
+ CellLabel->
+  "During evaluation of \
+In[39]:=",ExpressionUUID->"0996f87d-8f52-4872-8581-efb748040ff9"],
+
+Cell[BoxData["59"], "Print",
+ CellChangeTimes->{3.776443800474946*^9, 3.776786035628929*^9},
+ CellLabel->
+  "During evaluation of \
+In[39]:=",ExpressionUUID->"6098c8b1-ad3d-4b8a-850a-4b9fb5e363cf"],
+
+Cell[BoxData["60"], "Print",
+ CellChangeTimes->{3.776443800474946*^9, 3.776786056778813*^9},
+ CellLabel->
+  "During evaluation of \
+In[39]:=",ExpressionUUID->"57383c2a-c8e3-461c-bd50-359a76498569"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"{", "Null", "}"}]], "Output",
+ CellChangeTimes->{3.776443976586389*^9, 3.776786068478281*^9},
+ CellLabel->"Out[39]=",ExpressionUUID->"abee5d57-ae1c-4b68-8896-520cd5335c43"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"MakeRefineSeriesOf", "[", 
+  RowBox[{"61", ",", "70"}], "]"}]], "Input",
+ CellChangeTimes->{{3.776443895676042*^9, 3.7764439025510397`*^9}},
+ CellLabel->"In[40]:=",ExpressionUUID->"75b90654-1ac3-4894-8e5d-81d701b5e39a"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["61"], "Print",
+ CellChangeTimes->{3.776444121014134*^9, 3.776786068647437*^9},
+ CellLabel->
+  "During evaluation of \
+In[40]:=",ExpressionUUID->"eea3546e-d9ee-471e-845d-31f4851702d4"],
+
+Cell[BoxData["62"], "Print",
+ CellChangeTimes->{3.776444121014134*^9, 3.77678608583508*^9},
+ CellLabel->
+  "During evaluation of \
+In[40]:=",ExpressionUUID->"aedb175e-f30c-4a30-9760-18498d2f5ebb"],
+
+Cell[BoxData["63"], "Print",
+ CellChangeTimes->{3.776444121014134*^9, 3.776786106159192*^9},
+ CellLabel->
+  "During evaluation of \
+In[40]:=",ExpressionUUID->"9ef01fde-35d5-4cdb-8e20-06150be4917d"],
+
+Cell[BoxData["64"], "Print",
+ CellChangeTimes->{3.776444121014134*^9, 3.77678612326231*^9},
+ CellLabel->
+  "During evaluation of \
+In[40]:=",ExpressionUUID->"801f39b3-2897-4def-aace-35be798602f1"],
+
+Cell[BoxData["65"], "Print",
+ CellChangeTimes->{3.776444121014134*^9, 3.7767862008943367`*^9},
+ CellLabel->
+  "During evaluation of \
+In[40]:=",ExpressionUUID->"4524b0a4-c3cf-4eee-9bae-4a4411158765"],
+
+Cell[BoxData["66"], "Print",
+ CellChangeTimes->{3.776444121014134*^9, 3.7767862141571617`*^9},
+ CellLabel->
+  "During evaluation of \
+In[40]:=",ExpressionUUID->"9ad23010-af47-4eb5-80b1-72cc7a2f8eb2"],
+
+Cell[BoxData["67"], "Print",
+ CellChangeTimes->{3.776444121014134*^9, 3.77678622905718*^9},
+ CellLabel->
+  "During evaluation of \
+In[40]:=",ExpressionUUID->"9a39c0cc-b71d-4bfb-b47a-e3532770aa9b"],
+
+Cell[BoxData["68"], "Print",
+ CellChangeTimes->{3.776444121014134*^9, 3.7767862419295692`*^9},
+ CellLabel->
+  "During evaluation of \
+In[40]:=",ExpressionUUID->"e9a4811a-4dfc-4847-9ed8-9f5e7fb0a1bd"],
+
+Cell[BoxData["69"], "Print",
+ CellChangeTimes->{3.776444121014134*^9, 3.776786261757922*^9},
+ CellLabel->
+  "During evaluation of \
+In[40]:=",ExpressionUUID->"4a551457-b8aa-425f-b484-9ebe7095e485"],
+
+Cell[BoxData["70"], "Print",
+ CellChangeTimes->{3.776444121014134*^9, 3.77678627337957*^9},
+ CellLabel->
+  "During evaluation of \
+In[40]:=",ExpressionUUID->"ed43c117-5a2c-4198-9efb-7da7dd4d4034"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"{", "Null", "}"}]], "Output",
+ CellChangeTimes->{3.776444349736045*^9, 3.776786285140325*^9},
+ CellLabel->"Out[40]=",ExpressionUUID->"1a9dd832-cded-404a-9e8e-55603b4d7433"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"MakeRefineSeriesOf", "[", 
+  RowBox[{"71", ",", "74"}], "]"}]], "Input",
+ CellChangeTimes->{{3.776443911251691*^9, 3.776443916249816*^9}, {
+  3.776689273159155*^9, 3.7766892742943563`*^9}},
+ CellLabel->"In[41]:=",ExpressionUUID->"f824d033-691a-4d1f-92f5-4ab01423a5ad"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["71"], "Print",
+ CellChangeTimes->{3.7767867569465714`*^9},
+ CellLabel->
+  "During evaluation of \
+In[41]:=",ExpressionUUID->"92d7c1bd-c362-4205-9f66-6a01b447a4eb"],
+
+Cell[BoxData["72"], "Print",
+ CellChangeTimes->{3.776786775814592*^9},
+ CellLabel->
+  "During evaluation of \
+In[41]:=",ExpressionUUID->"54df0102-003b-4884-bb53-111b767a4c0f"],
+
+Cell[BoxData["73"], "Print",
+ CellChangeTimes->{3.77678681709319*^9},
+ CellLabel->
+  "During evaluation of \
+In[41]:=",ExpressionUUID->"42fe5d37-9e86-4d1b-b9a2-35370152be1a"],
+
+Cell[BoxData["74"], "Print",
+ CellChangeTimes->{3.7767868301606617`*^9},
+ CellLabel->
+  "During evaluation of \
+In[41]:=",ExpressionUUID->"e05f68ba-59c9-4014-82ba-94955347b056"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"{", "Null", "}"}]], "Output",
+ CellChangeTimes->{3.776786842276802*^9},
+ CellLabel->"Out[41]=",ExpressionUUID->"52db8c9f-9b99-4b63-bfd9-226b29998173"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"listPV", "[", 
+  RowBox[{"[", "75", "]"}], "]"}]], "Input",
+ CellChangeTimes->{{3.776787459822847*^9, 3.776787465570936*^9}},
+ CellLabel->"In[19]:=",ExpressionUUID->"e1619147-dbd8-4b95-92c0-a0a9e3d6e05f"],
+
+Cell[BoxData[
+ RowBox[{"PVD", "[", 
+  RowBox[{"0", ",", "0", ",", "0", ",", "1", ",", "0", ",", 
+   SuperscriptBox["MH", "2"], ",", "T24", ",", "0", ",", 
+   RowBox[{
+    RowBox[{"2", " ", 
+     SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", "U"}], ",", 
+   RowBox[{
+    SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", "T14"}], ",", 
+   SqrtBox[
+    SuperscriptBox["MT", "2"]], ",", 
+   SqrtBox[
+    SuperscriptBox["MT", "2"]], ",", 
+   SqrtBox[
+    SuperscriptBox["MT", "2"]], ",", 
+   SqrtBox[
+    SuperscriptBox["MT", "2"]]}], "]"}]], "Output",
+ CellChangeTimes->{3.7767874660047407`*^9, 3.777039323951621*^9, 
+  3.77703936276413*^9},
+ CellLabel->"Out[19]=",ExpressionUUID->"6b31f62a-bb61-4325-bbb2-0f8b38f9d9b0"]
+}, Open  ]],
+
+Cell["75!!!", "Item",
+ CellChangeTimes->{{3.7766892897103367`*^9, 3.776689292589683*^9}, {
+  3.776771111675651*^9, 
+  3.7767711116789007`*^9}},ExpressionUUID->"b8f7dd32-654c-4d69-a388-\
+00e73e20b2c5"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{
+   RowBox[{
+    RowBox[{"Serieslist", "[", 
+     RowBox[{"[", "75", "]"}], "]"}], "=", 
+    RowBox[{"LoopRefineSeries", "[", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"Serieslist", "[", 
+        RowBox[{"[", "75", "]"}], "]"}], "//", "C0Expand"}], ",", 
+      RowBox[{"{", 
+       RowBox[{"\[Beta]", ",", "0", ",", "2"}], "}"}]}], "]"}]}], ";"}], 
+  "\[IndentingNewLine]"}]], "Input",
+ CellChangeTimes->{{3.776771115782947*^9, 3.776771166696539*^9}, {
+   3.776774759564896*^9, 3.776774774035293*^9}, 3.777039366299951*^9},
+ CellLabel->"In[20]:=",ExpressionUUID->"6385e4e6-3aa6-4ca7-8de4-83d30633a5ae"],
+
+Cell[BoxData["$Aborted"], "Output",
+ CellChangeTimes->{3.7770488168803797`*^9},
+ CellLabel->"Out[20]=",ExpressionUUID->"20e798ff-b0ce-4e4d-8da1-a093ebf96720"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"Export", "[", 
+   RowBox[{"\"\<SeriesPV.m\>\"", ",", "Serieslist"}], "]"}], ";"}]], "Input",E\
+xpressionUUID->"35538101-3df6-4320-82c6-fb90398dcf8b"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"MakeRefineSeriesOf", "[", 
+  RowBox[{"76", ",", "80"}], "]"}]], "Input",
+ CellChangeTimes->{{3.776689276561438*^9, 3.776689284488558*^9}},
+ CellLabel->"In[45]:=",ExpressionUUID->"c6f1e48f-f2b3-4633-a270-2d837481a3a1"],
+
+Cell[BoxData[
+ TemplateBox[{
+  "PowerMod","ninv",
+   "\"\\!\\(\\*RowBox[{\\\"0\\\"}]\\) is not invertible modulo \
+\\!\\(\\*RowBox[{\\\"12979\\\"}]\\).\"",2,45,18,17487480350447340170,
+   "Alternate Kernel"},
+  "MessageTemplate"]], "Message", "MSG",
+ CellChangeTimes->{3.776792950030538*^9},
+ CellLabel->
+  "During evaluation of \
+In[45]:=",ExpressionUUID->"da0ce5b5-a752-4f0c-81a9-b9f06d7ab115"],
+
+Cell[BoxData[
+ TemplateBox[{
+  "PowerMod","ninv",
+   "\"\\!\\(\\*RowBox[{\\\"0\\\"}]\\) is not invertible modulo \
+\\!\\(\\*RowBox[{\\\"12983\\\"}]\\).\"",2,45,19,17487480350447340170,
+   "Alternate Kernel"},
+  "MessageTemplate"]], "Message", "MSG",
+ CellChangeTimes->{3.7767940973463*^9},
+ CellLabel->
+  "During evaluation of \
+In[45]:=",ExpressionUUID->"be0f414f-c102-4bf4-9e35-0d311e65c76f"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["76"], "Print",
+ CellChangeTimes->{3.7768541523191643`*^9},
+ CellLabel->
+  "During evaluation of \
+In[45]:=",ExpressionUUID->"3bba7d8f-9b06-484f-b4d3-632f231afc37"],
+
+Cell[BoxData["77"], "Print",
+ CellChangeTimes->{3.7768541668859043`*^9},
+ CellLabel->
+  "During evaluation of \
+In[45]:=",ExpressionUUID->"f659f692-01ec-4858-acaa-d60f4b4998e6"],
+
+Cell[BoxData["78"], "Print",
+ CellChangeTimes->{3.776854212135365*^9},
+ CellLabel->
+  "During evaluation of \
+In[45]:=",ExpressionUUID->"e9e35560-6a98-4d85-ba46-29424be208af"],
+
+Cell[BoxData["79"], "Print",
+ CellChangeTimes->{3.7768542239248447`*^9},
+ CellLabel->
+  "During evaluation of \
+In[45]:=",ExpressionUUID->"5d1876d0-f98c-4bb2-9711-124711ea1dab"],
+
+Cell[BoxData["80"], "Print",
+ CellChangeTimes->{3.776854254612438*^9},
+ CellLabel->
+  "During evaluation of \
+In[45]:=",ExpressionUUID->"ae667c6d-6a3b-4b8a-9bf8-9c76aa4faf28"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"{", "Null", "}"}]], "Output",
+ CellChangeTimes->{3.776689267763878*^9, 3.776699593931198*^9, 
+  3.7767874206690207`*^9, 3.7768542661889467`*^9},
+ CellLabel->"Out[45]=",ExpressionUUID->"88acd967-1c2c-4b4e-b73d-ecbd06540448"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"MakeRefineSeriesOf", "[", 
+  RowBox[{"81", ",", "90"}], "]"}]], "Input",
+ CellChangeTimes->{{3.776443917783449*^9, 3.776443919685523*^9}},
+ CellLabel->"In[46]:=",ExpressionUUID->"8d487f69-3cc5-4b15-a17c-36b0f0a098da"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["81"], "Print",
+ CellChangeTimes->{3.776700119904262*^9},
+ CellLabel->
+  "During evaluation of \
+In[41]:=",ExpressionUUID->"2846bb9c-a0e3-4cc6-9863-49dc879372fb"],
+
+Cell[BoxData["82"], "Print",
+ CellChangeTimes->{3.776700154471498*^9},
+ CellLabel->
+  "During evaluation of \
+In[41]:=",ExpressionUUID->"8e8e94ae-2685-46cf-824c-9dccd6aaa7c9"],
+
+Cell[BoxData["83"], "Print",
+ CellChangeTimes->{3.776700232105164*^9},
+ CellLabel->
+  "During evaluation of \
+In[41]:=",ExpressionUUID->"ea5a6e57-459b-44f3-af8d-e27fd9f73504"],
+
+Cell[BoxData["84"], "Print",
+ CellChangeTimes->{3.776700243872916*^9},
+ CellLabel->
+  "During evaluation of \
+In[41]:=",ExpressionUUID->"236d0628-1541-4ee1-8294-d993f0d4fc6b"],
+
+Cell[BoxData["85"], "Print",
+ CellChangeTimes->{3.776700255672224*^9},
+ CellLabel->
+  "During evaluation of \
+In[41]:=",ExpressionUUID->"41931755-f8dd-4016-8ec3-12f189f6c48b"],
+
+Cell[BoxData["86"], "Print",
+ CellChangeTimes->{3.7767002710240192`*^9},
+ CellLabel->
+  "During evaluation of \
+In[41]:=",ExpressionUUID->"87cc3efa-15c5-4aac-9f59-fc77c411956d"],
+
+Cell[BoxData["87"], "Print",
+ CellChangeTimes->{3.776700312653447*^9},
+ CellLabel->
+  "During evaluation of \
+In[41]:=",ExpressionUUID->"c28fc9bb-8175-41ae-b5b8-a2af110aa01e"],
+
+Cell[BoxData["88"], "Print",
+ CellChangeTimes->{3.776700325253311*^9},
+ CellLabel->
+  "During evaluation of \
+In[41]:=",ExpressionUUID->"c804e0fc-13b8-404c-be08-a7e750465f41"],
+
+Cell[BoxData["89"], "Print",
+ CellChangeTimes->{3.776700337712092*^9},
+ CellLabel->
+  "During evaluation of \
+In[41]:=",ExpressionUUID->"017215f5-e5a5-412a-95b0-02e856ef17cf"],
+
+Cell[BoxData["90"], "Print",
+ CellChangeTimes->{3.776700369863812*^9},
+ CellLabel->
+  "During evaluation of \
+In[41]:=",ExpressionUUID->"27abe593-5557-4139-b432-a9d130c93652"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"{", "Null", "}"}]], "Output",
+ CellChangeTimes->{3.776700381356884*^9},
+ CellLabel->"Out[41]=",ExpressionUUID->"27df6f47-5fa2-4e39-b7f2-afc3c720e098"]
+}, Closed]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"91", "!!"}], "!"}]], "Input",
+ CellChangeTimes->{{3.776710137747867*^9, 
+  3.776710140512113*^9}},ExpressionUUID->"df98973f-1c7c-43bf-ada2-\
+bc8f065d9ee0"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"MakeRefineSeriesOf", "[", 
+  RowBox[{"92", ",", "93"}], "]"}]], "Input",
+ CellChangeTimes->{{3.776443921988063*^9, 3.776443924549123*^9}, {
+  3.776710129712762*^9, 3.776710129777527*^9}, {3.7767651224554663`*^9, 
+  3.776765122530267*^9}},ExpressionUUID->"2649d505-baee-414f-ba61-\
+a848c431375f"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["92"], "Print",
+ CellChangeTimes->{3.7767105057578077`*^9},
+ CellLabel->
+  "During evaluation of \
+In[16]:=",ExpressionUUID->"d990281d-da4e-44ce-bba0-3be9e51984c8"],
+
+Cell[BoxData["93"], "Print",
+ CellChangeTimes->{3.776710524276116*^9},
+ CellLabel->
+  "During evaluation of \
+In[16]:=",ExpressionUUID->"8e564ec2-2ba2-4af6-8839-241a48c4b011"]
+}, Open  ]]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"MakeRefineSeriesOf", "[", 
+  RowBox[{"94", ",", "96"}], "]"}]], "Input",
+ CellChangeTimes->{{3.776765131249621*^9, 3.77676513359492*^9}, {
+  3.776769027719905*^9, 
+  3.776769028143591*^9}},ExpressionUUID->"e440a8fa-6daf-4e52-952c-\
+f2a2da027d58"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["94"], "Print",
+ CellChangeTimes->{3.776765358159745*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"47e9eb29-eb3c-44eb-bde5-daa461e7965a"],
+
+Cell[BoxData["95"], "Print",
+ CellChangeTimes->{3.776766430832265*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"3c8d7c90-91f7-46fd-ac69-8701bacfe25a"],
+
+Cell[BoxData["96"], "Print",
+ CellChangeTimes->{3.776766650819006*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"44a1988b-44c7-4cc4-accc-daccc86bdfec"]
+}, Open  ]]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"MakeRefineSeriesOf", "[", 
+  RowBox[{"97", ",", "99"}], "]"}]], "Input",
+ CellChangeTimes->{{3.7767690384336767`*^9, 3.776769041527905*^9}, {
+  3.776769652566134*^9, 
+  3.776769652707741*^9}},ExpressionUUID->"ccd5003b-7be8-4452-a781-\
+58d0de738e3e"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["97"], "Print",
+ CellChangeTimes->{3.7767692848390903`*^9},
+ CellLabel->
+  "During evaluation of \
+In[20]:=",ExpressionUUID->"590c91e2-ef3c-4505-aa0b-95d55137b2bb"],
+
+Cell[BoxData["98"], "Print",
+ CellChangeTimes->{3.776769324118517*^9},
+ CellLabel->
+  "During evaluation of \
+In[20]:=",ExpressionUUID->"69d37e74-c56f-4a12-bc84-953b1ee45562"],
+
+Cell[BoxData["99"], "Print",
+ CellChangeTimes->{3.776769364155541*^9},
+ CellLabel->
+  "During evaluation of \
+In[20]:=",ExpressionUUID->"400a6676-c5b0-4df1-b6bb-83a59b331179"]
+}, Open  ]]
+}, Closed]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"100", "!!"}], "!"}]], "Input",
+ CellChangeTimes->{{3.77676980141416*^9, 
+  3.776769804422761*^9}},ExpressionUUID->"07237824-5e81-41b0-bd1d-\
+7d744858c3ed"],
+
+Cell[BoxData[
+ RowBox[{"MakeRefineSeriesOf", "[", 
+  RowBox[{"100", ",", "100"}], "]"}]], "Input",
+ CellChangeTimes->{{3.7767696618153877`*^9, 3.776769664581789*^9}},
+ CellLabel->"In[14]:=",ExpressionUUID->"4d28e53c-4af5-40ba-890a-a6a9f9544d99"],
+
+Cell[BoxData[
+ RowBox[{"MakeRefineSeriesOf", "[", 
+  RowBox[{"101", ",", "110"}], "]"}]], "Input",
+ CellChangeTimes->{{3.776444442314954*^9, 3.7764444486258802`*^9}},
+ CellLabel->"In[14]:=",ExpressionUUID->"712b80aa-b8c4-4294-a783-8d276a083f12"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"MakeRefineSeriesOf", "[", 
+  RowBox[{"111", ",", "120"}], "]"}]], "Input",
+ CellChangeTimes->{{3.776444452743092*^9, 3.7764444558555803`*^9}},
+ CellLabel->"In[18]:=",ExpressionUUID->"0121b0f2-33a2-4f93-abd0-b7335f00f4ba"],
+
+Cell[BoxData[
+ TemplateBox[{
+  "Part","partd",
+   "\"Part specification \\!\\(\\*RowBox[{\\\"Null\\\", \\\"\
+\[LeftDoubleBracket]\\\", \\\"111\\\", \\\"\[RightDoubleBracket]\\\"}]\\) is \
+longer than depth of object.\"",2,18,9,17487480350447340170,
+   "Alternate Kernel"},
+  "MessageTemplate"]], "Message", "MSG",
+ CellChangeTimes->{{3.776784888098915*^9, 3.7767849123546*^9}},
+ CellLabel->
+  "During evaluation of \
+In[18]:=",ExpressionUUID->"535114a6-b030-4308-8246-00c024410468"],
+
+Cell[BoxData[
+ TemplateBox[{
+  "Set","partd",
+   "\"Part specification \\!\\(\\*RowBox[{\\\"Serieslist\\\", \\\"\
+\[LeftDoubleBracket]\\\", \\\"n\\\", \\\"\[RightDoubleBracket]\\\"}]\\) is \
+longer than depth of object.\"",2,18,10,17487480350447340170,
+   "Alternate Kernel"},
+  "MessageTemplate"]], "Message", "MSG",
+ CellChangeTimes->{{3.776784888098915*^9, 3.776784912383677*^9}},
+ CellLabel->
+  "During evaluation of \
+In[18]:=",ExpressionUUID->"3fff711e-1dcc-463e-a740-414e01e7545b"],
+
+Cell[BoxData["111"], "Print",
+ CellChangeTimes->{{3.776784888135707*^9, 3.776784912404812*^9}},
+ CellLabel->
+  "During evaluation of \
+In[18]:=",ExpressionUUID->"02b1fe8c-97b1-4f62-af5e-560a0f061657"],
+
+Cell[BoxData[
+ TemplateBox[{
+  "Part","partd",
+   "\"Part specification \\!\\(\\*RowBox[{\\\"Null\\\", \\\"\
+\[LeftDoubleBracket]\\\", \\\"112\\\", \\\"\[RightDoubleBracket]\\\"}]\\) is \
+longer than depth of object.\"",2,18,11,17487480350447340170,
+   "Alternate Kernel"},
+  "MessageTemplate"]], "Message", "MSG",
+ CellChangeTimes->{{3.776784888098915*^9, 3.776784912411974*^9}},
+ CellLabel->
+  "During evaluation of \
+In[18]:=",ExpressionUUID->"4d229124-7f85-4bce-9345-8223a1b56caa"],
+
+Cell[BoxData[
+ TemplateBox[{
+  "Set","partd",
+   "\"Part specification \\!\\(\\*RowBox[{\\\"Serieslist\\\", \\\"\
+\[LeftDoubleBracket]\\\", \\\"n\\\", \\\"\[RightDoubleBracket]\\\"}]\\) is \
+longer than depth of object.\"",2,18,12,17487480350447340170,
+   "Alternate Kernel"},
+  "MessageTemplate"]], "Message", "MSG",
+ CellChangeTimes->{{3.776784888098915*^9, 3.776784912433069*^9}},
+ CellLabel->
+  "During evaluation of \
+In[18]:=",ExpressionUUID->"9b026f9b-c1da-4642-96e1-ffec3e99e1ad"],
+
+Cell[BoxData["112"], "Print",
+ CellChangeTimes->{{3.776784888135707*^9, 3.776784912454528*^9}},
+ CellLabel->
+  "During evaluation of \
+In[18]:=",ExpressionUUID->"ee45a9cb-8f55-46b4-86d8-aa90b6d7b196"],
+
+Cell[BoxData[
+ TemplateBox[{
+  "Part","partd",
+   "\"Part specification \\!\\(\\*RowBox[{\\\"Null\\\", \\\"\
+\[LeftDoubleBracket]\\\", \\\"113\\\", \\\"\[RightDoubleBracket]\\\"}]\\) is \
+longer than depth of object.\"",2,18,13,17487480350447340170,
+   "Alternate Kernel"},
+  "MessageTemplate"]], "Message", "MSG",
+ CellChangeTimes->{{3.776784888098915*^9, 3.7767849124617*^9}},
+ CellLabel->
+  "During evaluation of \
+In[18]:=",ExpressionUUID->"3f134fed-054a-4e7f-bf83-da4ec88b63a5"],
+
+Cell[BoxData[
+ TemplateBox[{
+  "General","stop",
+   "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"Part\\\", \\\"::\\\", \
+\\\"partd\\\"}], \\\"MessageName\\\"]\\) will be suppressed during this \
+calculation.\"",2,18,14,17487480350447340170,"Alternate Kernel"},
+  "MessageTemplate"]], "Message", "MSG",
+ CellChangeTimes->{{3.776784888098915*^9, 3.776784912483165*^9}},
+ CellLabel->
+  "During evaluation of \
+In[18]:=",ExpressionUUID->"deb651cd-9750-4f33-8892-dc4873ea19f8"],
+
+Cell[BoxData[
+ TemplateBox[{
+  "Set","partd",
+   "\"Part specification \\!\\(\\*RowBox[{\\\"Serieslist\\\", \\\"\
+\[LeftDoubleBracket]\\\", \\\"n\\\", \\\"\[RightDoubleBracket]\\\"}]\\) is \
+longer than depth of object.\"",2,18,15,17487480350447340170,
+   "Alternate Kernel"},
+  "MessageTemplate"]], "Message", "MSG",
+ CellChangeTimes->{{3.776784888098915*^9, 3.7767849125091677`*^9}},
+ CellLabel->
+  "During evaluation of \
+In[18]:=",ExpressionUUID->"5597723e-0b2d-4d43-b93e-f96034ffcb06"],
+
+Cell[BoxData[
+ TemplateBox[{
+  "General","stop",
+   "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"Set\\\", \\\"::\\\", \\\
+\"partd\\\"}], \\\"MessageName\\\"]\\) will be suppressed during this \
+calculation.\"",2,18,16,17487480350447340170,"Alternate Kernel"},
+  "MessageTemplate"]], "Message", "MSG",
+ CellChangeTimes->{{3.776784888098915*^9, 3.77678491253011*^9}},
+ CellLabel->
+  "During evaluation of \
+In[18]:=",ExpressionUUID->"8ef06157-c74b-48e8-9c7f-327d7302c28c"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["113"], "Print",
+ CellChangeTimes->{{3.776784888135707*^9, 3.776784912553726*^9}},
+ CellLabel->
+  "During evaluation of \
+In[18]:=",ExpressionUUID->"6d010356-450e-479a-ba67-eeb3e26ec291"],
+
+Cell[BoxData["114"], "Print",
+ CellChangeTimes->{{3.776784888135707*^9, 3.7767849125613317`*^9}},
+ CellLabel->
+  "During evaluation of \
+In[18]:=",ExpressionUUID->"3f15cc52-1ff6-45cb-a9fd-644d776c5f89"],
+
+Cell[BoxData["115"], "Print",
+ CellChangeTimes->{{3.776784888135707*^9, 3.776784912578126*^9}},
+ CellLabel->
+  "During evaluation of \
+In[18]:=",ExpressionUUID->"4feea194-42f6-4ca1-9312-62f92ec665a5"],
+
+Cell[BoxData["116"], "Print",
+ CellChangeTimes->{{3.776784888135707*^9, 3.7767849125886307`*^9}},
+ CellLabel->
+  "During evaluation of \
+In[18]:=",ExpressionUUID->"6258c9d5-91a7-48d5-8231-34e495c40fa5"],
+
+Cell[BoxData["117"], "Print",
+ CellChangeTimes->{{3.776784888135707*^9, 3.776784912599008*^9}},
+ CellLabel->
+  "During evaluation of \
+In[18]:=",ExpressionUUID->"ffc76446-691d-4b15-befd-5803a78522c1"],
+
+Cell[BoxData["118"], "Print",
+ CellChangeTimes->{{3.776784888135707*^9, 3.776784912609436*^9}},
+ CellLabel->
+  "During evaluation of \
+In[18]:=",ExpressionUUID->"0837e534-d7bb-47f7-aed6-303356623331"],
+
+Cell[BoxData["119"], "Print",
+ CellChangeTimes->{{3.776784888135707*^9, 3.7767849126170053`*^9}},
+ CellLabel->
+  "During evaluation of \
+In[18]:=",ExpressionUUID->"f10d2730-aa78-4b6e-80cd-badb4c9a088b"],
+
+Cell[BoxData["120"], "Print",
+ CellChangeTimes->{{3.776784888135707*^9, 3.776784912624434*^9}},
+ CellLabel->
+  "During evaluation of \
+In[18]:=",ExpressionUUID->"38a8da08-2436-4aa2-9ed3-acd6b62059aa"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"{", "Null", "}"}]], "Output",
+ CellChangeTimes->{{3.776784888384467*^9, 3.776784912631989*^9}},
+ CellLabel->"Out[18]=",ExpressionUUID->"3bacc01c-d443-45cd-8552-6920b7d54570"]
+}, Closed]],
+
+Cell[BoxData[
+ RowBox[{"MakeRefineSeriesOf", "[", 
+  RowBox[{"121", ",", "130"}], "]"}]], "Input",
+ CellChangeTimes->{{3.776444458244686*^9, 
+  3.776444461374363*^9}},ExpressionUUID->"0a825a05-32b2-4319-8639-\
+70ebb7dae721"],
+
+Cell[BoxData[
+ RowBox[{"MakeRefineSeriesOf", "[", 
+  RowBox[{"131", ",", "140"}], "]"}]], "Input",
+ CellChangeTimes->{{3.7764444638773613`*^9, 
+  3.776444468707367*^9}},ExpressionUUID->"e4a86cf3-8ee8-4a68-8635-\
+217b0ba4a640"],
+
+Cell[BoxData[
+ RowBox[{"MakeRefineSeriesOf", "[", 
+  RowBox[{"141", ",", "150"}], "]"}]], "Input",
+ CellChangeTimes->{{3.77644446538631*^9, 
+  3.776444471430943*^9}},ExpressionUUID->"4e14b37b-639b-46ea-b50a-\
+b14416358740"],
+
+Cell[BoxData[
+ RowBox[{"MakeRefineSeriesOf", "[", 
+  RowBox[{"151", ",", "160"}], "]"}]], "Input",
+ CellChangeTimes->{{3.7764444787943296`*^9, 
+  3.776444482084239*^9}},ExpressionUUID->"bf2275c2-8d1c-4d02-b7e4-\
+41137641140c"],
+
+Cell[BoxData[
+ RowBox[{"MakeRefineSeriesOf", "[", 
+  RowBox[{"161", ",", "170"}], "]"}]], "Input",
+ CellChangeTimes->{{3.776444494542491*^9, 
+  3.776444507655608*^9}},ExpressionUUID->"6e0c2be4-ee3a-45fa-b831-\
+83a1095ac1be"],
+
+Cell[BoxData[
+ RowBox[{"MakeRefineSeriesOf", "[", 
+  RowBox[{"171", ",", "180"}], "]"}]], "Input",
+ CellChangeTimes->{{3.776444496397092*^9, 
+  3.776444509668532*^9}},ExpressionUUID->"9186e914-9912-4033-a987-\
+f84144195af6"],
+
+Cell[BoxData[
+ RowBox[{"MakeRefineSeriesOf", "[", 
+  RowBox[{"181", ",", "190"}], "]"}]], "Input",
+ CellChangeTimes->{{3.776444498515769*^9, 
+  3.776444511347576*^9}},ExpressionUUID->"f6a2e77b-0b25-4468-8b4c-\
+79e5f414742d"],
+
+Cell[BoxData[
+ RowBox[{"MakeRefineSeriesOf", "[", 
+  RowBox[{"191", ",", "200"}], "]"}]], "Input",
+ CellChangeTimes->{{3.7764445005724*^9, 
+  3.776444513235516*^9}},ExpressionUUID->"a3b27975-8859-466d-a7c0-\
+b105c7fe73d9"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", 
+   RowBox[{"--", 
+    RowBox[{"--", 
+     RowBox[{"--", 
+      RowBox[{"--", 
+       RowBox[{"--", 
+        RowBox[{"--", 
+         RowBox[{"--", 
+          RowBox[{"--", 
+           RowBox[{"--", 
+            RowBox[{"--", 
+             RowBox[{"--", 
+              RowBox[{"--", 
+               RowBox[{"--", 
+                RowBox[{"--", 
+                 RowBox[{"--", 
+                  RowBox[{"--", 
+                   RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{
+                    "--", "-"}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}\
+]}]}]}]}]}]}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
+  "\[IndentingNewLine]"}]], "Input",
+ CellChangeTimes->{{3.778422435234481*^9, 
+  3.7784224443536377`*^9}},ExpressionUUID->"25926e05-bb3c-422b-8e2b-\
+9a57e964ba2b"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", "\[IndentingNewLine]", 
+  RowBox[{"(*", " ", 
+   RowBox[{
+   "Testing", " ", "best", " ", "way", " ", "to", " ", "do", " ", "a", " ", 
+    "velocity", " ", "expansion"}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{"PV1", "=", 
+   RowBox[{"listPV", "[", 
+    RowBox[{"[", "1", "]"}], "]"}]}]}]], "Input",
+ CellChangeTimes->{{3.7760942680435867`*^9, 3.776094278882065*^9}, {
+  3.776094338531843*^9, 3.776094352527562*^9}},
+ CellLabel->
+  "In[117]:=",ExpressionUUID->"a36cae1e-df45-49d4-a412-416ac62654e5"],
+
+Cell[BoxData[
+ RowBox[{"PVC", "[", 
+  RowBox[{"0", ",", "0", ",", "0", ",", "0", ",", 
+   RowBox[{
+    SuperscriptBox["MH", "2"], "-", "S", "-", "T24", "-", "U"}], ",", "T", 
+   ",", 
+   SqrtBox[
+    SuperscriptBox["MT", "2"]], ",", 
+   SqrtBox[
+    SuperscriptBox["MT", "2"]], ",", 
+   SqrtBox[
+    SuperscriptBox["MT", "2"]]}], "]"}]], "Output",
+ CellChangeTimes->{{3.776094343698943*^9, 3.7760943624781322`*^9}},
+ CellLabel->
+  "Out[117]=",ExpressionUUID->"a396975e-2717-4a82-90d1-7c091fb198e9"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"PV2", "=", 
+  RowBox[{"LRSlist", "[", 
+   RowBox[{"[", "1", "]"}], "]"}]}]], "Input",
+ CellChangeTimes->{{3.776094367741146*^9, 3.776094368596299*^9}},
+ CellLabel->
+  "In[119]:=",ExpressionUUID->"9b7c4721-c242-428f-936b-c73b023c8d5b"],
+
+Cell[BoxData[
+ RowBox[{"PVC", "[", 
+  RowBox[{"0", ",", "0", ",", "0", ",", "0", ",", 
+   RowBox[{
+    SuperscriptBox["MH", "2"], "-", "T24", "-", "U", "-", 
+    FractionBox[
+     RowBox[{"4", " ", 
+      SuperscriptBox["MT", "2"]}], 
+     RowBox[{"1", "-", 
+      SuperscriptBox["\[Beta]", "2"]}]]}], ",", "T", ",", 
+   SqrtBox[
+    SuperscriptBox["MT", "2"]], ",", 
+   SqrtBox[
+    SuperscriptBox["MT", "2"]], ",", 
+   SqrtBox[
+    SuperscriptBox["MT", "2"]]}], "]"}]], "Output",
+ CellChangeTimes->{{3.7760943646124887`*^9, 3.776094368962675*^9}},
+ CellLabel->
+  "Out[119]=",ExpressionUUID->"234fb216-0308-486e-aa4f-ee9ceb3aa02b"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"LRPV1", "=", 
+  RowBox[{"LRlist", "[", 
+   RowBox[{"[", "1", "]"}], "]"}]}]], "Input",
+ CellChangeTimes->{{3.7760945284004583`*^9, 3.776094540625855*^9}},
+ CellLabel->
+  "In[123]:=",ExpressionUUID->"38f9a86e-2833-456d-aa7a-12baa82bf6d4"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"-", 
+   FractionBox[
+    SuperscriptBox[
+     RowBox[{"Log", "[", 
+      FractionBox[
+       RowBox[{
+        RowBox[{"2", " ", 
+         SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+        SqrtBox[
+         RowBox[{
+          RowBox[{"-", 
+           RowBox[{"(", 
+            RowBox[{
+             RowBox[{"4", " ", 
+              SuperscriptBox["MT", "2"]}], "-", "T"}], ")"}]}], " ", "T"}]]}], 
+       RowBox[{"2", " ", 
+        SuperscriptBox["MT", "2"]}]], "]"}], "2"], 
+    RowBox[{"2", " ", 
+     RowBox[{"(", 
+      RowBox[{
+       SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", "T24", "-", "U"}], 
+      ")"}]}]]}], "+", 
+  FractionBox[
+   SuperscriptBox[
+    RowBox[{"Log", "[", 
+     FractionBox[
+      RowBox[{
+       RowBox[{"-", 
+        SuperscriptBox["MH", "2"]}], "+", 
+       RowBox[{"2", " ", 
+        SuperscriptBox["MT", "2"]}], "+", "S", "+", "T24", "+", "U", "+", 
+       SqrtBox[
+        RowBox[{
+         RowBox[{"-", 
+          RowBox[{"(", 
+           RowBox[{
+            SuperscriptBox["MH", "2"], "-", "S", "-", "T24", "-", "U"}], 
+           ")"}]}], " ", 
+         RowBox[{"(", 
+          RowBox[{
+           RowBox[{"-", 
+            SuperscriptBox["MH", "2"]}], "+", 
+           RowBox[{"4", " ", 
+            SuperscriptBox["MT", "2"]}], "+", "S", "+", "T24", "+", "U"}], 
+          ")"}]}]]}], 
+      RowBox[{"2", " ", 
+       SuperscriptBox["MT", "2"]}]], "]"}], "2"], 
+   RowBox[{"2", " ", 
+    RowBox[{"(", 
+     RowBox[{
+      SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", "T24", "-", "U"}], 
+     ")"}]}]]}]], "Output",
+ CellChangeTimes->{{3.776094534901574*^9, 3.776094541151403*^9}},
+ CellLabel->
+  "Out[123]=",ExpressionUUID->"1c05b19f-f3b9-494a-b37f-364f77e0b0b1"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"Case", " ", "1"}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{"(*", " ", 
+   RowBox[{
+    RowBox[{
+    "Use", " ", "our", " ", "already", " ", "expanded", " ", "PV", " ", 
+     "coefficient"}], ",", " ", 
+    RowBox[{
+     RowBox[{"sub", " ", "S"}], "\[Rule]", 
+     RowBox[{"4", "*", 
+      RowBox[{
+       RowBox[{"MT", "^", "2"}], "/", 
+       RowBox[{"(", 
+        RowBox[{"1", "-", 
+         RowBox[{"\[Beta]", "^", "2"}]}], ")"}]}]}]}], ",", " ", 
+    RowBox[{"use", " ", "LoopRefineSeries"}]}], "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"mLRPV1", "=", 
+     RowBox[{"LRPV1", "//.", "VelSub"}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{"mLRPV1LoopSeries", "=", 
+    RowBox[{
+     RowBox[{"LoopRefineSeries", "[", 
+      RowBox[{"mLRPV1", ",", 
+       RowBox[{"{", 
+        RowBox[{"\[Beta]", ",", "0", ",", "2"}], "}"}]}], "]"}], "//", 
+     "Simplify"}]}]}]}]], "Input",
+ CellChangeTimes->{{3.7760942132860537`*^9, 3.7760942177198477`*^9}, {
+  3.776094285750037*^9, 3.776094337363894*^9}, {3.77609437704847*^9, 
+  3.776094389854731*^9}, {3.776094549422592*^9, 3.7760946761359653`*^9}, {
+  3.7760947685302134`*^9, 3.77609476909201*^9}},
+ CellLabel->
+  "In[135]:=",ExpressionUUID->"b2c199ef-3321-44d3-a08a-1b1de3e1b269"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{
+      RowBox[{"-", 
+       SuperscriptBox[
+        RowBox[{"Log", "[", 
+         FractionBox[
+          RowBox[{
+           RowBox[{"2", " ", 
+            SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+           SqrtBox[
+            RowBox[{"T", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", "4"}], " ", 
+                SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+          RowBox[{"2", " ", 
+           SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+      SuperscriptBox[
+       RowBox[{"Log", "[", 
+        FractionBox[
+         RowBox[{
+          RowBox[{"-", 
+           SuperscriptBox["MH", "2"]}], "+", 
+          RowBox[{"6", " ", 
+           SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U", "+", 
+          SqrtBox[
+           RowBox[{
+            SuperscriptBox["MH", "4"], "+", 
+            RowBox[{"32", " ", 
+             SuperscriptBox["MT", "4"]}], "+", 
+            RowBox[{"12", " ", 
+             SuperscriptBox["MT", "2"], " ", 
+             RowBox[{"(", 
+              RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+            SuperscriptBox[
+             RowBox[{"(", 
+              RowBox[{"T24", "+", "U"}], ")"}], "2"], "-", 
+            RowBox[{"2", " ", 
+             SuperscriptBox["MH", "2"], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"6", " ", 
+                SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+              ")"}]}]}]]}], 
+         RowBox[{"2", " ", 
+          SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], 
+     RowBox[{"2", " ", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"-", 
+         SuperscriptBox["MH", "2"]}], "+", 
+        RowBox[{"4", " ", 
+         SuperscriptBox["MT", "2"]}], "+", "T", "+", "T24", "+", "U"}], 
+       ")"}]}]]}], "+", 
+   RowBox[{
+    FractionBox["1", 
+     SuperscriptBox[
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"-", 
+         SuperscriptBox["MH", "2"]}], "+", 
+        RowBox[{"4", " ", 
+         SuperscriptBox["MT", "2"]}], "+", "T", "+", "T24", "+", "U"}], ")"}],
+       "2"]], 
+    RowBox[{"2", " ", 
+     SuperscriptBox["MT", "2"], " ", 
+     RowBox[{"(", 
+      RowBox[{
+       RowBox[{"-", 
+        SuperscriptBox[
+         RowBox[{"Log", "[", 
+          FractionBox[
+           RowBox[{
+            RowBox[{"2", " ", 
+             SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+            SqrtBox[
+             RowBox[{"T", " ", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{
+                 RowBox[{"-", "4"}], " ", 
+                 SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+           RowBox[{"2", " ", 
+            SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "-", 
+       FractionBox[
+        RowBox[{"2", " ", 
+         RowBox[{"(", 
+          RowBox[{
+           RowBox[{"-", 
+            SuperscriptBox["MH", "2"]}], "+", 
+           RowBox[{"4", " ", 
+            SuperscriptBox["MT", "2"]}], "+", "T", "+", "T24", "+", "U"}], 
+          ")"}], " ", 
+         RowBox[{"Log", "[", 
+          FractionBox[
+           RowBox[{
+            RowBox[{"-", 
+             SuperscriptBox["MH", "2"]}], "+", 
+            RowBox[{"6", " ", 
+             SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U", "+", 
+            SqrtBox[
+             RowBox[{
+              SuperscriptBox["MH", "4"], "+", 
+              RowBox[{"32", " ", 
+               SuperscriptBox["MT", "4"]}], "+", 
+              RowBox[{"12", " ", 
+               SuperscriptBox["MT", "2"], " ", 
+               RowBox[{"(", 
+                RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+              SuperscriptBox[
+               RowBox[{"(", 
+                RowBox[{"T24", "+", "U"}], ")"}], "2"], "-", 
+              RowBox[{"2", " ", 
+               SuperscriptBox["MH", "2"], " ", 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{"6", " ", 
+                  SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+                ")"}]}]}]]}], 
+           RowBox[{"2", " ", 
+            SuperscriptBox["MT", "2"]}]], "]"}]}], 
+        SqrtBox[
+         RowBox[{
+          SuperscriptBox["MH", "4"], "+", 
+          RowBox[{"32", " ", 
+           SuperscriptBox["MT", "4"]}], "+", 
+          RowBox[{"12", " ", 
+           SuperscriptBox["MT", "2"], " ", 
+           RowBox[{"(", 
+            RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+          SuperscriptBox[
+           RowBox[{"(", 
+            RowBox[{"T24", "+", "U"}], ")"}], "2"], "-", 
+          RowBox[{"2", " ", 
+           SuperscriptBox["MH", "2"], " ", 
+           RowBox[{"(", 
+            RowBox[{
+             RowBox[{"6", " ", 
+              SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+            ")"}]}]}]]], "+", 
+       SuperscriptBox[
+        RowBox[{"Log", "[", 
+         FractionBox[
+          RowBox[{
+           RowBox[{"-", 
+            SuperscriptBox["MH", "2"]}], "+", 
+           RowBox[{"6", " ", 
+            SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U", "+", 
+           SqrtBox[
+            RowBox[{
+             SuperscriptBox["MH", "4"], "+", 
+             RowBox[{"32", " ", 
+              SuperscriptBox["MT", "4"]}], "+", 
+             RowBox[{"12", " ", 
+              SuperscriptBox["MT", "2"], " ", 
+              RowBox[{"(", 
+               RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+             SuperscriptBox[
+              RowBox[{"(", 
+               RowBox[{"T24", "+", "U"}], ")"}], "2"], "-", 
+             RowBox[{"2", " ", 
+              SuperscriptBox["MH", "2"], " ", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{"6", " ", 
+                 SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+               ")"}]}]}]]}], 
+          RowBox[{"2", " ", 
+           SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+     SuperscriptBox["\[Beta]", "2"]}]}], "+", 
+   InterpretationBox[
+    SuperscriptBox[
+     RowBox[{"O", "[", "\[Beta]", "]"}], "3"],
+    SeriesData[$CellContext`\[Beta], 0, {}, 0, 3, 1],
+    Editable->False]}],
+  SeriesData[$CellContext`\[Beta], 0, {
+   Rational[-1, 2] (-$CellContext`MH^2 + 
+      4 $CellContext`MT^2 + $CellContext`T + $CellContext`T24 + \
+$CellContext`U)^(-1) (-
+      Log[Rational[1, 2] $CellContext`MT^(-2) (
+          2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T ((-4) \
+$CellContext`MT^2 + $CellContext`T))^Rational[1, 2])]^2 + 
+     Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+         6 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U + \
+($CellContext`MH^4 + 32 $CellContext`MT^4 + 
+           12 $CellContext`MT^2 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 - 
+           2 $CellContext`MH^2 (
+            6 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U))^
+          Rational[1, 2])]^2), 0, 
+    2 $CellContext`MT^2 (-$CellContext`MH^2 + 
+      4 $CellContext`MT^2 + $CellContext`T + $CellContext`T24 + \
+$CellContext`U)^(-2) (-
+      Log[Rational[1, 2] $CellContext`MT^(-2) (
+          2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T ((-4) \
+$CellContext`MT^2 + $CellContext`T))^Rational[1, 2])]^2 - 
+     2 (-$CellContext`MH^2 + 
+      4 $CellContext`MT^2 + $CellContext`T + $CellContext`T24 + \
+$CellContext`U) ($CellContext`MH^4 + 32 $CellContext`MT^4 + 
+       12 $CellContext`MT^2 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 - 
+       2 $CellContext`MH^2 (
+        6 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U))^
+      Rational[-1, 2] 
+     Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+        6 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U + \
+($CellContext`MH^4 + 32 $CellContext`MT^4 + 
+          12 $CellContext`MT^2 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 - 
+          2 $CellContext`MH^2 (
+           6 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U))^
+         Rational[1, 2])] + 
+     Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+         6 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U + \
+($CellContext`MH^4 + 32 $CellContext`MT^4 + 
+           12 $CellContext`MT^2 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 - 
+           2 $CellContext`MH^2 (
+            6 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U))^
+          Rational[1, 2])]^2)}, 0, 3, 1],
+  Editable->False]], "Output",
+ CellChangeTimes->{{3.776094672071906*^9, 3.7760946764443398`*^9}, 
+   3.776094771951503*^9},
+ CellLabel->
+  "Out[136]=",ExpressionUUID->"f04f6eb6-3a6c-42bd-b978-23a251c30109"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"Case", " ", "2"}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{"(*", 
+   RowBox[{
+    RowBox[{" ", 
+     RowBox[{
+      RowBox[{
+      "Use", " ", "our", " ", "already", " ", "expanded", " ", "PV", " ", 
+       "coefficient"}], ",", " ", 
+      RowBox[{
+       RowBox[{"sub", " ", "S"}], "\[Rule]", 
+       RowBox[{"4", "*", 
+        RowBox[{
+         RowBox[{"MT", "^", "2"}], "/", 
+         RowBox[{"(", 
+          RowBox[{"1", "-", 
+           RowBox[{"\[Beta]", "^", "2"}]}], ")"}]}]}]}]}], ")"}], ",", " ", 
+    RowBox[{"use", " ", "Series"}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{"mLRPV1Series", "=", 
+   RowBox[{
+    RowBox[{"Series", "[", 
+     RowBox[{"mLRPV1", ",", 
+      RowBox[{"{", 
+       RowBox[{"\[Beta]", ",", "0", ",", "2"}], "}"}]}], "]"}], "//", 
+    "Simplify"}]}]}]], "Input",
+ CellChangeTimes->{{3.776094683105962*^9, 3.776094777128416*^9}},
+ CellLabel->
+  "In[137]:=",ExpressionUUID->"a7e9b28f-cd05-4629-a301-685337db32b1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{
+      RowBox[{"-", 
+       SuperscriptBox[
+        RowBox[{"Log", "[", 
+         FractionBox[
+          RowBox[{
+           RowBox[{"2", " ", 
+            SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+           SqrtBox[
+            RowBox[{"T", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", "4"}], " ", 
+                SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+          RowBox[{"2", " ", 
+           SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+      SuperscriptBox[
+       RowBox[{"Log", "[", 
+        FractionBox[
+         RowBox[{
+          RowBox[{"-", 
+           SuperscriptBox["MH", "2"]}], "+", 
+          RowBox[{"6", " ", 
+           SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U", "+", 
+          SqrtBox[
+           RowBox[{
+            SuperscriptBox["MH", "4"], "+", 
+            RowBox[{"32", " ", 
+             SuperscriptBox["MT", "4"]}], "+", 
+            RowBox[{"12", " ", 
+             SuperscriptBox["MT", "2"], " ", 
+             RowBox[{"(", 
+              RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+            SuperscriptBox[
+             RowBox[{"(", 
+              RowBox[{"T24", "+", "U"}], ")"}], "2"], "-", 
+            RowBox[{"2", " ", 
+             SuperscriptBox["MH", "2"], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"6", " ", 
+                SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+              ")"}]}]}]]}], 
+         RowBox[{"2", " ", 
+          SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], 
+     RowBox[{"2", " ", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"-", 
+         SuperscriptBox["MH", "2"]}], "+", 
+        RowBox[{"4", " ", 
+         SuperscriptBox["MT", "2"]}], "+", "T", "+", "T24", "+", "U"}], 
+       ")"}]}]]}], "+", 
+   RowBox[{
+    FractionBox["1", 
+     SuperscriptBox[
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"-", 
+         SuperscriptBox["MH", "2"]}], "+", 
+        RowBox[{"4", " ", 
+         SuperscriptBox["MT", "2"]}], "+", "T", "+", "T24", "+", "U"}], ")"}],
+       "2"]], 
+    RowBox[{"2", " ", 
+     SuperscriptBox["MT", "2"], " ", 
+     RowBox[{"(", 
+      RowBox[{
+       RowBox[{"-", 
+        SuperscriptBox[
+         RowBox[{"Log", "[", 
+          FractionBox[
+           RowBox[{
+            RowBox[{"2", " ", 
+             SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+            SqrtBox[
+             RowBox[{"T", " ", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{
+                 RowBox[{"-", "4"}], " ", 
+                 SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+           RowBox[{"2", " ", 
+            SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "-", 
+       FractionBox[
+        RowBox[{"2", " ", 
+         RowBox[{"(", 
+          RowBox[{
+           RowBox[{"-", 
+            SuperscriptBox["MH", "2"]}], "+", 
+           RowBox[{"4", " ", 
+            SuperscriptBox["MT", "2"]}], "+", "T", "+", "T24", "+", "U"}], 
+          ")"}], " ", 
+         RowBox[{"Log", "[", 
+          FractionBox[
+           RowBox[{
+            RowBox[{"-", 
+             SuperscriptBox["MH", "2"]}], "+", 
+            RowBox[{"6", " ", 
+             SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U", "+", 
+            SqrtBox[
+             RowBox[{
+              SuperscriptBox["MH", "4"], "+", 
+              RowBox[{"32", " ", 
+               SuperscriptBox["MT", "4"]}], "+", 
+              RowBox[{"12", " ", 
+               SuperscriptBox["MT", "2"], " ", 
+               RowBox[{"(", 
+                RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+              SuperscriptBox[
+               RowBox[{"(", 
+                RowBox[{"T24", "+", "U"}], ")"}], "2"], "-", 
+              RowBox[{"2", " ", 
+               SuperscriptBox["MH", "2"], " ", 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{"6", " ", 
+                  SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+                ")"}]}]}]]}], 
+           RowBox[{"2", " ", 
+            SuperscriptBox["MT", "2"]}]], "]"}]}], 
+        SqrtBox[
+         RowBox[{
+          SuperscriptBox["MH", "4"], "+", 
+          RowBox[{"32", " ", 
+           SuperscriptBox["MT", "4"]}], "+", 
+          RowBox[{"12", " ", 
+           SuperscriptBox["MT", "2"], " ", 
+           RowBox[{"(", 
+            RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+          SuperscriptBox[
+           RowBox[{"(", 
+            RowBox[{"T24", "+", "U"}], ")"}], "2"], "-", 
+          RowBox[{"2", " ", 
+           SuperscriptBox["MH", "2"], " ", 
+           RowBox[{"(", 
+            RowBox[{
+             RowBox[{"6", " ", 
+              SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+            ")"}]}]}]]], "+", 
+       SuperscriptBox[
+        RowBox[{"Log", "[", 
+         FractionBox[
+          RowBox[{
+           RowBox[{"-", 
+            SuperscriptBox["MH", "2"]}], "+", 
+           RowBox[{"6", " ", 
+            SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U", "+", 
+           SqrtBox[
+            RowBox[{
+             SuperscriptBox["MH", "4"], "+", 
+             RowBox[{"32", " ", 
+              SuperscriptBox["MT", "4"]}], "+", 
+             RowBox[{"12", " ", 
+              SuperscriptBox["MT", "2"], " ", 
+              RowBox[{"(", 
+               RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+             SuperscriptBox[
+              RowBox[{"(", 
+               RowBox[{"T24", "+", "U"}], ")"}], "2"], "-", 
+             RowBox[{"2", " ", 
+              SuperscriptBox["MH", "2"], " ", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{"6", " ", 
+                 SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+               ")"}]}]}]]}], 
+          RowBox[{"2", " ", 
+           SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+     SuperscriptBox["\[Beta]", "2"]}]}], "+", 
+   InterpretationBox[
+    SuperscriptBox[
+     RowBox[{"O", "[", "\[Beta]", "]"}], "3"],
+    SeriesData[$CellContext`\[Beta], 0, {}, 0, 3, 1],
+    Editable->False]}],
+  SeriesData[$CellContext`\[Beta], 0, {
+   Rational[-1, 2] (-$CellContext`MH^2 + 
+      4 $CellContext`MT^2 + $CellContext`T + $CellContext`T24 + \
+$CellContext`U)^(-1) (-
+      Log[Rational[1, 2] $CellContext`MT^(-2) (
+          2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T ((-4) \
+$CellContext`MT^2 + $CellContext`T))^Rational[1, 2])]^2 + 
+     Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+         6 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U + \
+($CellContext`MH^4 + 32 $CellContext`MT^4 + 
+           12 $CellContext`MT^2 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 - 
+           2 $CellContext`MH^2 (
+            6 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U))^
+          Rational[1, 2])]^2), 0, 
+    2 $CellContext`MT^2 (-$CellContext`MH^2 + 
+      4 $CellContext`MT^2 + $CellContext`T + $CellContext`T24 + \
+$CellContext`U)^(-2) (-
+      Log[Rational[1, 2] $CellContext`MT^(-2) (
+          2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T ((-4) \
+$CellContext`MT^2 + $CellContext`T))^Rational[1, 2])]^2 - 
+     2 (-$CellContext`MH^2 + 
+      4 $CellContext`MT^2 + $CellContext`T + $CellContext`T24 + \
+$CellContext`U) ($CellContext`MH^4 + 32 $CellContext`MT^4 + 
+       12 $CellContext`MT^2 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 - 
+       2 $CellContext`MH^2 (
+        6 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U))^
+      Rational[-1, 2] 
+     Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+        6 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U + \
+($CellContext`MH^4 + 32 $CellContext`MT^4 + 
+          12 $CellContext`MT^2 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 - 
+          2 $CellContext`MH^2 (
+           6 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U))^
+         Rational[1, 2])] + 
+     Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+         6 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U + \
+($CellContext`MH^4 + 32 $CellContext`MT^4 + 
+           12 $CellContext`MT^2 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 - 
+           2 $CellContext`MH^2 (
+            6 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U))^
+          Rational[1, 2])]^2)}, 0, 3, 1],
+  Editable->False]], "Output",
+ CellChangeTimes->{3.776094778441732*^9},
+ CellLabel->
+  "Out[137]=",ExpressionUUID->"fb8aa450-fac0-43d2-94fb-164b894fd43e"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{
+    RowBox[{"Case", " ", "1"}], ",", 
+    RowBox[{"2", " ", "give", " ", "the", " ", "same", " ", "value"}], ",", 
+    " ", 
+    RowBox[{"no", " ", "difference", " ", "in", " ", 
+     RowBox[{"performance", "?"}]}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{"mLRPV1LoopSeries", "\[Equal]", "mLRPV1Series"}]}]], "Input",
+ CellChangeTimes->{{3.776094786738435*^9, 3.776094815754766*^9}, {
+  3.77609488885246*^9, 
+  3.776094893262938*^9}},ExpressionUUID->"1e5b2a80-6558-4a6a-a208-\
+6ffd66be10ca"],
+
+Cell[BoxData["True"], "Output",
+ CellChangeTimes->{3.77609479503203*^9},
+ CellLabel->
+  "Out[138]=",ExpressionUUID->"ba76a9bc-1692-4293-93e4-3b98a9ab7916"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"Case", " ", "3"}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{"(*", " ", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"Use", " ", "un"}], "-", 
+     RowBox[{"expanded", " ", "PV", " ", "coefficient"}]}], ",", " ", 
+    RowBox[{
+     RowBox[{"sub", " ", "S"}], "\[Rule]", 
+     RowBox[{"4", "*", 
+      RowBox[{
+       RowBox[{"MT", "^", "2"}], "/", 
+       RowBox[{"(", 
+        RowBox[{"1", "-", 
+         RowBox[{"\[Beta]", "^", "2"}]}], ")"}]}]}]}], ",", " ", 
+    RowBox[{"use", " ", "LoopRefineSeries"}]}], " ", "*)"}], 
+  "\[IndentingNewLine]", 
+  RowBox[{"mLRPV2LoopSeries", "=", 
+   RowBox[{
+    RowBox[{"LoopRefineSeries", "[", 
+     RowBox[{"PV2", ",", 
+      RowBox[{"{", 
+       RowBox[{"\[Beta]", ",", "0", ",", "2"}], "}"}]}], "]"}], "//", 
+    "Simplify"}]}]}]], "Input",
+ CellChangeTimes->{{3.7760948569997253`*^9, 3.776095006903996*^9}},
+ CellLabel->
+  "In[139]:=",ExpressionUUID->"0c715131-89c6-40ef-8f9e-32d8bd8c07e3"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{
+      RowBox[{"-", 
+       SuperscriptBox[
+        RowBox[{"Log", "[", 
+         FractionBox[
+          RowBox[{
+           RowBox[{"2", " ", 
+            SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+           SqrtBox[
+            RowBox[{"T", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", "4"}], " ", 
+                SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+          RowBox[{"2", " ", 
+           SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+      SuperscriptBox[
+       RowBox[{"Log", "[", 
+        FractionBox[
+         RowBox[{
+          RowBox[{"-", 
+           SuperscriptBox["MH", "2"]}], "+", 
+          RowBox[{"6", " ", 
+           SuperscriptBox["MT", "2"]}], "+", "T24", "+", 
+          SqrtBox[
+           RowBox[{
+            RowBox[{"(", 
+             RowBox[{
+              SuperscriptBox["MH", "2"], "-", 
+              RowBox[{"8", " ", 
+               SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ")"}], 
+            " ", 
+            RowBox[{"(", 
+             RowBox[{
+              SuperscriptBox["MH", "2"], "-", 
+              RowBox[{"4", " ", 
+               SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ")"}]}]], 
+          "+", "U"}], 
+         RowBox[{"2", " ", 
+          SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], 
+     RowBox[{"2", " ", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"-", 
+         SuperscriptBox["MH", "2"]}], "+", 
+        RowBox[{"4", " ", 
+         SuperscriptBox["MT", "2"]}], "+", "T", "+", "T24", "+", "U"}], 
+       ")"}]}]]}], "+", 
+   RowBox[{
+    FractionBox["1", 
+     SuperscriptBox[
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"-", 
+         SuperscriptBox["MH", "2"]}], "+", 
+        RowBox[{"4", " ", 
+         SuperscriptBox["MT", "2"]}], "+", "T", "+", "T24", "+", "U"}], ")"}],
+       "2"]], 
+    RowBox[{"2", " ", 
+     SuperscriptBox["MT", "2"], " ", 
+     RowBox[{"(", 
+      RowBox[{
+       FractionBox[
+        RowBox[{"2", " ", 
+         RowBox[{"(", 
+          RowBox[{
+           RowBox[{"-", 
+            SuperscriptBox["MH", "2"]}], "+", 
+           RowBox[{"4", " ", 
+            SuperscriptBox["MT", "2"]}], "+", "T", "+", "T24", "+", "U"}], 
+          ")"}], " ", 
+         RowBox[{"DiscB", "[", 
+          RowBox[{
+           RowBox[{
+            SuperscriptBox["MH", "2"], "-", 
+            RowBox[{"4", " ", 
+             SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+           SqrtBox[
+            SuperscriptBox["MT", "2"]], ",", 
+           SqrtBox[
+            SuperscriptBox["MT", "2"]]}], "]"}]}], 
+        RowBox[{
+         RowBox[{"-", 
+          SuperscriptBox["MH", "2"]}], "+", 
+         RowBox[{"8", " ", 
+          SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}]], "-", 
+       SuperscriptBox[
+        RowBox[{"Log", "[", 
+         FractionBox[
+          RowBox[{
+           RowBox[{"2", " ", 
+            SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+           SqrtBox[
+            RowBox[{"T", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", "4"}], " ", 
+                SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+          RowBox[{"2", " ", 
+           SuperscriptBox["MT", "2"]}]], "]"}], "2"], "+", 
+       SuperscriptBox[
+        RowBox[{"Log", "[", 
+         FractionBox[
+          RowBox[{
+           RowBox[{"-", 
+            SuperscriptBox["MH", "2"]}], "+", 
+           RowBox[{"6", " ", 
+            SuperscriptBox["MT", "2"]}], "+", "T24", "+", 
+           SqrtBox[
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               SuperscriptBox["MH", "2"], "-", 
+               RowBox[{"8", " ", 
+                SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ")"}], 
+             " ", 
+             RowBox[{"(", 
+              RowBox[{
+               SuperscriptBox["MH", "2"], "-", 
+               RowBox[{"4", " ", 
+                SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ")"}]}]],
+            "+", "U"}], 
+          RowBox[{"2", " ", 
+           SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+     SuperscriptBox["\[Beta]", "2"]}]}], "+", 
+   InterpretationBox[
+    SuperscriptBox[
+     RowBox[{"O", "[", "\[Beta]", "]"}], "3"],
+    SeriesData[$CellContext`\[Beta], 0, {}, 0, 3, 1],
+    Editable->False]}],
+  SeriesData[$CellContext`\[Beta], 0, {
+   Rational[-1, 2] (-$CellContext`MH^2 + 
+      4 $CellContext`MT^2 + $CellContext`T + $CellContext`T24 + \
+$CellContext`U)^(-1) (-
+      Log[Rational[1, 2] $CellContext`MT^(-2) (
+          2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T ((-4) \
+$CellContext`MT^2 + $CellContext`T))^Rational[1, 2])]^2 + 
+     Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+         6 $CellContext`MT^2 + $CellContext`T24 + (($CellContext`MH^2 - 
+            8 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U) \
+($CellContext`MH^2 - 
+            4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U))^
+          Rational[1, 2] + $CellContext`U)]^2), 0, 
+    2 $CellContext`MT^2 (-$CellContext`MH^2 + 
+      4 $CellContext`MT^2 + $CellContext`T + $CellContext`T24 + \
+$CellContext`U)^(-2) (
+     2 (-$CellContext`MH^2 + 
+        8 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U)^(-1) \
+(-$CellContext`MH^2 + 
+       4 $CellContext`MT^2 + $CellContext`T + $CellContext`T24 + \
+$CellContext`U) 
+      X`DiscB[$CellContext`MH^2 - 
+        4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+($CellContext`MT^2)^Rational[1, 2], ($CellContext`MT^2)^Rational[1, 2]] - 
+     Log[Rational[1, 2] $CellContext`MT^(-2) (
+        2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T ((-4) \
+$CellContext`MT^2 + $CellContext`T))^Rational[1, 2])]^2 + 
+     Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+         6 $CellContext`MT^2 + $CellContext`T24 + (($CellContext`MH^2 - 
+            8 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U) \
+($CellContext`MH^2 - 
+            4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U))^
+          Rational[1, 2] + $CellContext`U)]^2)}, 0, 3, 1],
+  Editable->False]], "Output",
+ CellChangeTimes->{3.7760950081103888`*^9},
+ CellLabel->
+  "Out[139]=",ExpressionUUID->"ee09fd16-2531-4ab1-be6d-4d7237f2c0f6"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"Case", " ", "4"}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{"(*", " ", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"Use", " ", "un"}], "-", 
+     RowBox[{"expanded", " ", "PV", " ", "coefficient"}]}], ",", " ", 
+    RowBox[{
+     RowBox[{"sub", " ", "S"}], "\[Rule]", 
+     RowBox[{"4", "*", 
+      RowBox[{
+       RowBox[{"MT", "^", "2"}], "/", 
+       RowBox[{"(", 
+        RowBox[{"1", "-", 
+         RowBox[{"\[Beta]", "^", "2"}]}], ")"}]}]}]}], ",", " ", 
+    RowBox[{"use", " ", "LoopRefine"}], ",", " ", 
+    RowBox[{"then", " ", "LoopRefineSeries"}]}], " ", "*)"}], 
+  "\[IndentingNewLine]", 
+  RowBox[{"mLRPV2LoopSeries2", "=", 
+   RowBox[{
+    RowBox[{"LoopRefineSeries", "[", 
+     RowBox[{
+      RowBox[{"LoopRefine", "[", "PV2", "]"}], ",", 
+      RowBox[{"{", 
+       RowBox[{"\[Beta]", ",", "0", ",", "2"}], "}"}]}], "]"}], "//", 
+    "Simplify"}]}]}]], "Input",
+ CellChangeTimes->{{3.776094943833243*^9, 3.776094948875589*^9}, {
+  3.776095031975548*^9, 3.7760950965361834`*^9}},
+ CellLabel->
+  "In[142]:=",ExpressionUUID->"192cc319-c4e4-49c2-9aae-8c5e3d52b6b5"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{
+      RowBox[{"-", 
+       SuperscriptBox[
+        RowBox[{"Log", "[", 
+         FractionBox[
+          RowBox[{
+           RowBox[{"2", " ", 
+            SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+           SqrtBox[
+            RowBox[{"T", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", "4"}], " ", 
+                SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+          RowBox[{"2", " ", 
+           SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+      SuperscriptBox[
+       RowBox[{"Log", "[", 
+        FractionBox[
+         RowBox[{
+          RowBox[{"-", 
+           SuperscriptBox["MH", "2"]}], "+", 
+          RowBox[{"6", " ", 
+           SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U", "+", 
+          SqrtBox[
+           RowBox[{
+            SuperscriptBox["MH", "4"], "+", 
+            RowBox[{"32", " ", 
+             SuperscriptBox["MT", "4"]}], "+", 
+            RowBox[{"12", " ", 
+             SuperscriptBox["MT", "2"], " ", 
+             RowBox[{"(", 
+              RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+            SuperscriptBox[
+             RowBox[{"(", 
+              RowBox[{"T24", "+", "U"}], ")"}], "2"], "-", 
+            RowBox[{"2", " ", 
+             SuperscriptBox["MH", "2"], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"6", " ", 
+                SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+              ")"}]}]}]]}], 
+         RowBox[{"2", " ", 
+          SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], 
+     RowBox[{"2", " ", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"-", 
+         SuperscriptBox["MH", "2"]}], "+", 
+        RowBox[{"4", " ", 
+         SuperscriptBox["MT", "2"]}], "+", "T", "+", "T24", "+", "U"}], 
+       ")"}]}]]}], "+", 
+   RowBox[{
+    FractionBox["1", 
+     SuperscriptBox[
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"-", 
+         SuperscriptBox["MH", "2"]}], "+", 
+        RowBox[{"4", " ", 
+         SuperscriptBox["MT", "2"]}], "+", "T", "+", "T24", "+", "U"}], ")"}],
+       "2"]], 
+    RowBox[{"2", " ", 
+     SuperscriptBox["MT", "2"], " ", 
+     RowBox[{"(", 
+      RowBox[{
+       RowBox[{"-", 
+        SuperscriptBox[
+         RowBox[{"Log", "[", 
+          FractionBox[
+           RowBox[{
+            RowBox[{"2", " ", 
+             SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+            SqrtBox[
+             RowBox[{"T", " ", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{
+                 RowBox[{"-", "4"}], " ", 
+                 SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+           RowBox[{"2", " ", 
+            SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "-", 
+       FractionBox[
+        RowBox[{"2", " ", 
+         RowBox[{"(", 
+          RowBox[{
+           RowBox[{"-", 
+            SuperscriptBox["MH", "2"]}], "+", 
+           RowBox[{"4", " ", 
+            SuperscriptBox["MT", "2"]}], "+", "T", "+", "T24", "+", "U"}], 
+          ")"}], " ", 
+         RowBox[{"Log", "[", 
+          FractionBox[
+           RowBox[{
+            RowBox[{"-", 
+             SuperscriptBox["MH", "2"]}], "+", 
+            RowBox[{"6", " ", 
+             SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U", "+", 
+            SqrtBox[
+             RowBox[{
+              SuperscriptBox["MH", "4"], "+", 
+              RowBox[{"32", " ", 
+               SuperscriptBox["MT", "4"]}], "+", 
+              RowBox[{"12", " ", 
+               SuperscriptBox["MT", "2"], " ", 
+               RowBox[{"(", 
+                RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+              SuperscriptBox[
+               RowBox[{"(", 
+                RowBox[{"T24", "+", "U"}], ")"}], "2"], "-", 
+              RowBox[{"2", " ", 
+               SuperscriptBox["MH", "2"], " ", 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{"6", " ", 
+                  SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+                ")"}]}]}]]}], 
+           RowBox[{"2", " ", 
+            SuperscriptBox["MT", "2"]}]], "]"}]}], 
+        SqrtBox[
+         RowBox[{
+          SuperscriptBox["MH", "4"], "+", 
+          RowBox[{"32", " ", 
+           SuperscriptBox["MT", "4"]}], "+", 
+          RowBox[{"12", " ", 
+           SuperscriptBox["MT", "2"], " ", 
+           RowBox[{"(", 
+            RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+          SuperscriptBox[
+           RowBox[{"(", 
+            RowBox[{"T24", "+", "U"}], ")"}], "2"], "-", 
+          RowBox[{"2", " ", 
+           SuperscriptBox["MH", "2"], " ", 
+           RowBox[{"(", 
+            RowBox[{
+             RowBox[{"6", " ", 
+              SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+            ")"}]}]}]]], "+", 
+       SuperscriptBox[
+        RowBox[{"Log", "[", 
+         FractionBox[
+          RowBox[{
+           RowBox[{"-", 
+            SuperscriptBox["MH", "2"]}], "+", 
+           RowBox[{"6", " ", 
+            SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U", "+", 
+           SqrtBox[
+            RowBox[{
+             SuperscriptBox["MH", "4"], "+", 
+             RowBox[{"32", " ", 
+              SuperscriptBox["MT", "4"]}], "+", 
+             RowBox[{"12", " ", 
+              SuperscriptBox["MT", "2"], " ", 
+              RowBox[{"(", 
+               RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+             SuperscriptBox[
+              RowBox[{"(", 
+               RowBox[{"T24", "+", "U"}], ")"}], "2"], "-", 
+             RowBox[{"2", " ", 
+              SuperscriptBox["MH", "2"], " ", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{"6", " ", 
+                 SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+               ")"}]}]}]]}], 
+          RowBox[{"2", " ", 
+           SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+     SuperscriptBox["\[Beta]", "2"]}]}], "+", 
+   InterpretationBox[
+    SuperscriptBox[
+     RowBox[{"O", "[", "\[Beta]", "]"}], "3"],
+    SeriesData[$CellContext`\[Beta], 0, {}, 0, 3, 1],
+    Editable->False]}],
+  SeriesData[$CellContext`\[Beta], 0, {
+   Rational[-1, 2] (-$CellContext`MH^2 + 
+      4 $CellContext`MT^2 + $CellContext`T + $CellContext`T24 + \
+$CellContext`U)^(-1) (-
+      Log[Rational[1, 2] $CellContext`MT^(-2) (
+          2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T ((-4) \
+$CellContext`MT^2 + $CellContext`T))^Rational[1, 2])]^2 + 
+     Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+         6 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U + \
+($CellContext`MH^4 + 32 $CellContext`MT^4 + 
+           12 $CellContext`MT^2 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 - 
+           2 $CellContext`MH^2 (
+            6 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U))^
+          Rational[1, 2])]^2), 0, 
+    2 $CellContext`MT^2 (-$CellContext`MH^2 + 
+      4 $CellContext`MT^2 + $CellContext`T + $CellContext`T24 + \
+$CellContext`U)^(-2) (-
+      Log[Rational[1, 2] $CellContext`MT^(-2) (
+          2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T ((-4) \
+$CellContext`MT^2 + $CellContext`T))^Rational[1, 2])]^2 - 
+     2 (-$CellContext`MH^2 + 
+      4 $CellContext`MT^2 + $CellContext`T + $CellContext`T24 + \
+$CellContext`U) ($CellContext`MH^4 + 32 $CellContext`MT^4 + 
+       12 $CellContext`MT^2 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 - 
+       2 $CellContext`MH^2 (
+        6 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U))^
+      Rational[-1, 2] 
+     Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+        6 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U + \
+($CellContext`MH^4 + 32 $CellContext`MT^4 + 
+          12 $CellContext`MT^2 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 - 
+          2 $CellContext`MH^2 (
+           6 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U))^
+         Rational[1, 2])] + 
+     Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+         6 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U + \
+($CellContext`MH^4 + 32 $CellContext`MT^4 + 
+           12 $CellContext`MT^2 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 - 
+           2 $CellContext`MH^2 (
+            6 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U))^
+          Rational[1, 2])]^2)}, 0, 3, 1],
+  Editable->False]], "Output",
+ CellChangeTimes->{{3.7760950761911373`*^9, 3.776095096903057*^9}},
+ CellLabel->
+  "Out[142]=",ExpressionUUID->"72f30e8f-2cdf-4cf1-b2ac-4bad814133c2"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{
+    RowBox[{"Case", " ", "3"}], ",", 
+    RowBox[{"4", " ", "give", " ", "DIFFERENT", " ", "answers"}]}], " ", 
+   "*)"}], "\[IndentingNewLine]", 
+  RowBox[{"FullSimplify", "[", 
+   RowBox[{"mLRPV2LoopSeries", "\[Equal]", "mLRPV2LoopSeries2"}], 
+   "]"}]}]], "Input",
+ CellChangeTimes->{{3.7760951076835823`*^9, 
+  3.776095161154098*^9}},ExpressionUUID->"aa4bbc56-9042-4ac4-9da9-\
+d8a6a099ffb0"],
+
+Cell[BoxData[
+ RowBox[{
+  InterpretationBox[
+   RowBox[{
+    FractionBox[
+     RowBox[{"4", " ", 
+      SuperscriptBox["MT", "2"], " ", 
+      RowBox[{"(", 
+       RowBox[{
+        FractionBox[
+         RowBox[{"DiscB", "[", 
+          RowBox[{
+           RowBox[{
+            SuperscriptBox["MH", "2"], "-", 
+            RowBox[{"4", " ", 
+             SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+           SqrtBox[
+            SuperscriptBox["MT", "2"]], ",", 
+           SqrtBox[
+            SuperscriptBox["MT", "2"]]}], "]"}], 
+         RowBox[{
+          RowBox[{"-", 
+           SuperscriptBox["MH", "2"]}], "+", 
+          RowBox[{"8", " ", 
+           SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}]], "+", 
+        FractionBox[
+         RowBox[{"Log", "[", 
+          FractionBox[
+           RowBox[{
+            RowBox[{"-", 
+             SuperscriptBox["MH", "2"]}], "+", 
+            RowBox[{"6", " ", 
+             SuperscriptBox["MT", "2"]}], "+", "T24", "+", 
+            SqrtBox[
+             RowBox[{
+              RowBox[{"(", 
+               RowBox[{
+                SuperscriptBox["MH", "2"], "-", 
+                RowBox[{"8", " ", 
+                 SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ")"}], 
+              " ", 
+              RowBox[{"(", 
+               RowBox[{
+                SuperscriptBox["MH", "2"], "-", 
+                RowBox[{"4", " ", 
+                 SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], 
+               ")"}]}]], "+", "U"}], 
+           RowBox[{"2", " ", 
+            SuperscriptBox["MT", "2"]}]], "]"}], 
+         SqrtBox[
+          RowBox[{
+           RowBox[{"(", 
+            RowBox[{
+             SuperscriptBox["MH", "2"], "-", 
+             RowBox[{"8", " ", 
+              SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ")"}], " ", 
+           RowBox[{"(", 
+            RowBox[{
+             SuperscriptBox["MH", "2"], "-", 
+             RowBox[{"4", " ", 
+              SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], 
+            ")"}]}]]]}], ")"}], " ", 
+      SuperscriptBox["\[Beta]", "2"]}], 
+     RowBox[{
+      RowBox[{"-", 
+       SuperscriptBox["MH", "2"]}], "+", 
+      RowBox[{"4", " ", 
+       SuperscriptBox["MT", "2"]}], "+", "T", "+", "T24", "+", "U"}]], "+", 
+    InterpretationBox[
+     SuperscriptBox[
+      RowBox[{"O", "[", "\[Beta]", "]"}], "3"],
+     SeriesData[$CellContext`\[Beta], 0, {}, 2, 3, 1],
+     Editable->False]}],
+   SeriesData[$CellContext`\[Beta], 0, {
+    4 $CellContext`MT^2 (-$CellContext`MH^2 + 
+       4 $CellContext`MT^2 + $CellContext`T + $CellContext`T24 + \
+$CellContext`U)^(-1) ((-$CellContext`MH^2 + 
+         8 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U)^(-1) 
+       X`DiscB[$CellContext`MH^2 - 
+         4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+($CellContext`MT^2)^Rational[1, 2], ($CellContext`MT^2)^
+         Rational[1, 2]] + (($CellContext`MH^2 - 
+          8 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U) \
+($CellContext`MH^2 - 
+          4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U))^
+        Rational[-1, 2] 
+       Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+          6 $CellContext`MT^2 + $CellContext`T24 + (($CellContext`MH^2 - 
+             8 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U) \
+($CellContext`MH^2 - 
+             4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U))^
+           Rational[1, 2] + $CellContext`U)])}, 2, 3, 1],
+   Editable->False], "\[Equal]", "0"}]], "Output",
+ CellChangeTimes->{{3.7760951169017067`*^9, 3.776095125732332*^9}},
+ CellLabel->
+  "Out[144]=",ExpressionUUID->"5dd7bd0b-df4b-42b4-afa6-169da77820b0"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{
+    RowBox[{"Case", " ", "1"}], ",", 
+    RowBox[{
+    "2", " ", "and", " ", "4", " ", "give", " ", "the", " ", "same", " ", 
+     "result"}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{"mLRPV1LoopSeries", "\[Equal]", "mLRPV2LoopSeries2"}]}]], "Input",
+ CellChangeTimes->{{3.776095186462483*^9, 3.7760951971387672`*^9}, {
+  3.776095252021922*^9, 
+  3.776095266705385*^9}},ExpressionUUID->"acbb6382-4324-4bfb-aa84-\
+71272d55c7d4"],
+
+Cell[BoxData["True"], "Output",
+ CellChangeTimes->{3.776095198717999*^9},
+ CellLabel->
+  "Out[145]=",ExpressionUUID->"f4100da3-c681-47f2-ac13-8b324b099b4e"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"Case", " ", "3", " ", "is", " ", "different"}], " ", "*)"}], 
+  "\[IndentingNewLine]", 
+  RowBox[{"FullSimplify", "[", 
+   RowBox[{"mLRPV1LoopSeries", "\[Equal]", "mLRPV2LoopSeries"}], 
+   "]"}]}]], "Input",
+ CellChangeTimes->{{3.776095201801568*^9, 3.776095278918404*^9}},
+ CellLabel->
+  "In[149]:=",ExpressionUUID->"1be0f3b4-e047-4a26-9afa-df89d8bb25eb"],
+
+Cell[BoxData[
+ RowBox[{
+  InterpretationBox[
+   RowBox[{
+    FractionBox[
+     RowBox[{"4", " ", 
+      SuperscriptBox["MT", "2"], " ", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"-", 
+         FractionBox[
+          RowBox[{"DiscB", "[", 
+           RowBox[{
+            RowBox[{
+             SuperscriptBox["MH", "2"], "-", 
+             RowBox[{"4", " ", 
+              SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+            SqrtBox[
+             SuperscriptBox["MT", "2"]], ",", 
+            SqrtBox[
+             SuperscriptBox["MT", "2"]]}], "]"}], 
+          RowBox[{
+           RowBox[{"-", 
+            SuperscriptBox["MH", "2"]}], "+", 
+           RowBox[{"8", " ", 
+            SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}]]}], "-", 
+        FractionBox[
+         RowBox[{"Log", "[", 
+          FractionBox[
+           RowBox[{
+            RowBox[{"-", 
+             SuperscriptBox["MH", "2"]}], "+", 
+            RowBox[{"6", " ", 
+             SuperscriptBox["MT", "2"]}], "+", "T24", "+", 
+            SqrtBox[
+             RowBox[{
+              RowBox[{"(", 
+               RowBox[{
+                SuperscriptBox["MH", "2"], "-", 
+                RowBox[{"8", " ", 
+                 SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ")"}], 
+              " ", 
+              RowBox[{"(", 
+               RowBox[{
+                SuperscriptBox["MH", "2"], "-", 
+                RowBox[{"4", " ", 
+                 SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], 
+               ")"}]}]], "+", "U"}], 
+           RowBox[{"2", " ", 
+            SuperscriptBox["MT", "2"]}]], "]"}], 
+         SqrtBox[
+          RowBox[{
+           RowBox[{"(", 
+            RowBox[{
+             SuperscriptBox["MH", "2"], "-", 
+             RowBox[{"8", " ", 
+              SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ")"}], " ", 
+           RowBox[{"(", 
+            RowBox[{
+             SuperscriptBox["MH", "2"], "-", 
+             RowBox[{"4", " ", 
+              SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], 
+            ")"}]}]]]}], ")"}], " ", 
+      SuperscriptBox["\[Beta]", "2"]}], 
+     RowBox[{
+      RowBox[{"-", 
+       SuperscriptBox["MH", "2"]}], "+", 
+      RowBox[{"4", " ", 
+       SuperscriptBox["MT", "2"]}], "+", "T", "+", "T24", "+", "U"}]], "+", 
+    InterpretationBox[
+     SuperscriptBox[
+      RowBox[{"O", "[", "\[Beta]", "]"}], "3"],
+     SeriesData[$CellContext`\[Beta], 0, {}, 2, 3, 1],
+     Editable->False]}],
+   SeriesData[$CellContext`\[Beta], 0, {
+    4 $CellContext`MT^2 (-$CellContext`MH^2 + 
+       4 $CellContext`MT^2 + $CellContext`T + $CellContext`T24 + \
+$CellContext`U)^(-1) (-(-$CellContext`MH^2 + 
+         8 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U)^(-1) 
+       X`DiscB[$CellContext`MH^2 - 
+         4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+($CellContext`MT^2)^Rational[1, 2], ($CellContext`MT^2)^
+         Rational[1, 2]] - (($CellContext`MH^2 - 
+         8 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U) \
+($CellContext`MH^2 - 
+         4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U))^
+       Rational[-1, 2] 
+      Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+         6 $CellContext`MT^2 + $CellContext`T24 + (($CellContext`MH^2 - 
+            8 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U) \
+($CellContext`MH^2 - 
+            4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U))^
+          Rational[1, 2] + $CellContext`U)])}, 2, 3, 1],
+   Editable->False], "\[Equal]", "0"}]], "Output",
+ CellChangeTimes->{{3.776095218727405*^9, 3.776095249937913*^9}, 
+   3.776095280416049*^9},
+ CellLabel->
+  "Out[149]=",ExpressionUUID->"481fa417-77b8-4946-b4f9-04ed930e142d"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
+  "\[IndentingNewLine]", "\[IndentingNewLine]", 
+  "\[IndentingNewLine]"}]], "Input",
+ CellChangeTimes->{{3.776094017637576*^9, 
+  3.776094018336205*^9}},ExpressionUUID->"1e1abde8-f7ad-44b1-99b4-\
+1370e978f66d"]
+},
+WindowSize->{992, 755},
+WindowMargins->{{87, Automatic}, {Automatic, 0}},
+FrontEndVersion->"11.3 for Mac OS X x86 (32-bit, 64-bit Kernel) (March 5, \
+2018)",
+StyleDefinitions->"Default.nb"
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{}
+*)
+(*CellTagsIndex
+CellTagsIndex->{}
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[558, 20, 1118, 25, 94, "Input",ExpressionUUID->"a9eb43f9-c437-4ff0-ae8b-eb31f4d06b38"],
+Cell[CellGroupData[{
+Cell[1701, 49, 636, 12, 94, "Input",ExpressionUUID->"aa6e76d2-ec10-49c0-b6e0-1dd4d91b1a18"],
+Cell[CellGroupData[{
+Cell[2362, 65, 1820, 27, 46, "Print",ExpressionUUID->"9d8d0d32-258e-459a-8da1-f1a084891668"],
+Cell[4185, 94, 1687, 26, 101, "Print",ExpressionUUID->"52438396-54ab-417c-b161-36fd4cadc0e5"]
+}, Open  ]]
+}, Open  ]],
+Cell[5899, 124, 1328, 31, 94, "Input",ExpressionUUID->"1c12ba0e-fd6c-4b7e-8de6-2b784fa72d92"],
+Cell[7230, 157, 10661, 257, 1165, "Input",ExpressionUUID->"a5c5e12e-157e-4719-b09d-930d037e0d1b"],
+Cell[17894, 416, 371, 6, 30, "Input",ExpressionUUID->"7741718d-edbc-49e5-a241-fb84c7107f7d"],
+Cell[18268, 424, 1634, 39, 136, "Input",ExpressionUUID->"6f54e202-a28b-4a1d-9e81-76bb7154ddaa"],
+Cell[19905, 465, 2379, 58, 178, "Input",ExpressionUUID->"51e1abda-d831-4042-bf3b-c17c153412bc"],
+Cell[22287, 525, 1508, 34, 136, "Input",ExpressionUUID->"476a37c6-482c-4f61-9ced-5d80a625711e"],
+Cell[23798, 561, 261, 7, 30, "Input",ExpressionUUID->"705b77c9-9d55-4c91-a174-596c11435d8d"],
+Cell[CellGroupData[{
+Cell[24084, 572, 883, 16, 52, "Input",ExpressionUUID->"fd0c50cb-5e3d-46b2-a09e-275f25c954a6"],
+Cell[24970, 590, 202, 3, 34, "Output",ExpressionUUID->"9f7e9a1a-0e98-444b-a2d6-4f9b40f3790f"]
+}, Open  ]],
+Cell[25187, 596, 214, 5, 30, "Input",ExpressionUUID->"69614acb-c767-4819-96b5-beee59afcf6a"],
+Cell[25404, 603, 261, 6, 52, "Input",ExpressionUUID->"f1052ac6-e6f7-4371-afd6-ad461c58d053"],
+Cell[25668, 611, 810, 18, 73, "Input",ExpressionUUID->"47c35d70-ef0a-4ee5-9de6-a89da37d395a"],
+Cell[26481, 631, 263, 6, 52, "Input",ExpressionUUID->"e49bfcd0-2790-4662-b260-1251fbf55656"],
+Cell[26747, 639, 740, 18, 73, "Input",ExpressionUUID->"7c31e5a1-c9d7-4139-bcbf-d567355f68ac"],
+Cell[27490, 659, 263, 6, 52, "Input",ExpressionUUID->"df0e2446-e8a9-4c0f-ade0-6243ed23f014"],
+Cell[27756, 667, 704, 19, 73, "Input",ExpressionUUID->"b7439b12-cb51-47a1-a158-9fa93f157c7d"],
+Cell[28463, 688, 266, 6, 52, "Input",ExpressionUUID->"ba9ecf49-d2ba-4baa-bc4a-47072a88303d"],
+Cell[28732, 696, 683, 20, 73, "Input",ExpressionUUID->"c1cc9921-c84f-4990-9a13-a36935fe08f6"],
+Cell[29418, 718, 256, 5, 30, "Input",ExpressionUUID->"b325e442-757f-4122-a460-9727e5485960"],
+Cell[29677, 725, 435, 9, 30, "Input",ExpressionUUID->"64072172-75c1-400c-b4be-a5a76fc27e9f"],
+Cell[30115, 736, 607, 13, 52, "Input",ExpressionUUID->"75ac93f2-7474-4481-b70f-8b3ab1fc4f2c"],
+Cell[CellGroupData[{
+Cell[30747, 753, 1092, 27, 115, "Input",ExpressionUUID->"df43f43c-f3df-4d31-8f47-e316129e404e"],
+Cell[CellGroupData[{
+Cell[31864, 784, 410, 7, 24, "Print",ExpressionUUID->"13bb3e84-1aad-451c-9470-217fab9f697f"],
+Cell[32277, 793, 412, 7, 24, "Print",ExpressionUUID->"c6fece5c-a585-4c90-ab33-806fa3705b71"]
+}, Open  ]],
+Cell[32704, 803, 156, 2, 34, "Output",ExpressionUUID->"829f296d-4387-479f-92bc-7a626dfe607c"]
+}, Open  ]],
+Cell[32875, 808, 427, 9, 52, "Input",ExpressionUUID->"0d3ce3b6-3c94-4932-a9ed-194cea17f2b9"],
+Cell[33305, 819, 1058, 24, 56, "Input",ExpressionUUID->"5a89f228-5332-4b40-9dd2-0e3e845f3970"],
+Cell[34366, 845, 290, 7, 30, "Input",ExpressionUUID->"3a874326-a732-49f9-bf3f-018de4fbf690"],
+Cell[34659, 854, 243, 6, 52, "Input",ExpressionUUID->"37adef6f-081e-487c-bd44-ab449560d571"],
+Cell[CellGroupData[{
+Cell[34927, 864, 998, 26, 115, "Input",ExpressionUUID->"f3c0843b-be94-4b77-89a7-a517bd2df868"],
+Cell[CellGroupData[{
+Cell[35950, 894, 247, 5, 24, "Print",ExpressionUUID->"e2ec887b-8f74-4c58-b508-8180d0a5ab39"],
+Cell[36200, 901, 247, 5, 24, "Print",ExpressionUUID->"37e2fbaf-ebf4-468b-9e07-64d66403941b"],
+Cell[36450, 908, 249, 5, 24, "Print",ExpressionUUID->"2e78dfd3-252a-4510-977f-b4f27ff8aa4b"],
+Cell[36702, 915, 247, 5, 24, "Print",ExpressionUUID->"a0e44cf6-a61f-449f-8a34-2c8ce9d266f3"],
+Cell[36952, 922, 247, 5, 24, "Print",ExpressionUUID->"a931e414-5259-4e72-acd7-dcee07599a82"],
+Cell[37202, 929, 247, 5, 24, "Print",ExpressionUUID->"5594c2a5-c197-4faf-9ffb-e7ba76cbc538"],
+Cell[37452, 936, 247, 5, 24, "Print",ExpressionUUID->"8ecef3ea-5555-4307-bcb5-45617481fea4"],
+Cell[37702, 943, 249, 5, 24, "Print",ExpressionUUID->"84060125-ad1a-4df3-8ce7-b2dbb52a255e"],
+Cell[37954, 950, 247, 5, 24, "Print",ExpressionUUID->"ba89847a-a4aa-4bc8-bbdf-fc4fe94626a9"],
+Cell[38204, 957, 247, 5, 24, "Print",ExpressionUUID->"4ad9a298-9033-4f95-ba31-e459488b2078"],
+Cell[38454, 964, 249, 5, 24, "Print",ExpressionUUID->"0f51e120-6ffe-40ed-90a9-16ffc4b8cd7b"],
+Cell[38706, 971, 249, 5, 24, "Print",ExpressionUUID->"55f10a7d-2dd2-42de-9c51-a8b42913981b"],
+Cell[38958, 978, 247, 5, 24, "Print",ExpressionUUID->"4f770da7-96cd-4cb8-a4d4-ac8321d712cd"],
+Cell[39208, 985, 247, 5, 24, "Print",ExpressionUUID->"649189dd-7c36-4840-a8f2-e90ccecbefc1"],
+Cell[39458, 992, 247, 5, 24, "Print",ExpressionUUID->"69c8ff97-a48c-433d-a1af-293c970ff456"],
+Cell[39708, 999, 247, 5, 24, "Print",ExpressionUUID->"e5097cc9-3fd7-4356-82cc-935a8fd99f37"],
+Cell[39958, 1006, 249, 5, 24, "Print",ExpressionUUID->"2a4fa068-31d2-42b2-8e27-9cd47a215300"],
+Cell[40210, 1013, 247, 5, 24, "Print",ExpressionUUID->"d4490842-541b-4159-b08b-37254e2f02ee"],
+Cell[40460, 1020, 247, 5, 24, "Print",ExpressionUUID->"0ae6d1ae-d897-40b7-83ac-03676d9405d7"],
+Cell[40710, 1027, 247, 5, 24, "Print",ExpressionUUID->"dd1f2688-2c0e-4ed6-aa9d-d7b634519be6"],
+Cell[40960, 1034, 246, 5, 24, "Print",ExpressionUUID->"28b3e938-3807-4e3b-9426-e708dcec15b0"],
+Cell[41209, 1041, 247, 5, 24, "Print",ExpressionUUID->"b68ca497-f2d7-495a-b577-5f5f7cc0b776"],
+Cell[41459, 1048, 247, 5, 24, "Print",ExpressionUUID->"d67f7e5b-0500-4072-a004-7f5c73342e3a"],
+Cell[41709, 1055, 247, 5, 24, "Print",ExpressionUUID->"ce08a793-ce51-4874-b4c7-0d99e3e47784"],
+Cell[41959, 1062, 247, 5, 24, "Print",ExpressionUUID->"fbbc2328-d686-4169-8a45-f2f916e0d9d2"],
+Cell[42209, 1069, 249, 5, 24, "Print",ExpressionUUID->"1cb44eb4-a5e3-4f09-a2dc-7ed04f4bcf1f"],
+Cell[42461, 1076, 247, 5, 24, "Print",ExpressionUUID->"622b5b19-decc-4b43-aecb-2a18b830f72c"],
+Cell[42711, 1083, 249, 5, 24, "Print",ExpressionUUID->"f6dc26ef-5813-4857-bfe4-c26b87bc1f7b"],
+Cell[42963, 1090, 247, 5, 24, "Print",ExpressionUUID->"2d3735df-91e7-4795-8dfd-6ed011d79107"],
+Cell[43213, 1097, 249, 5, 24, "Print",ExpressionUUID->"50fe601d-1b2b-4d2e-807b-1d249afe001e"],
+Cell[43465, 1104, 249, 5, 24, "Print",ExpressionUUID->"2fdfacbd-80ef-4c9a-b71f-e2cc0d9afe5e"],
+Cell[43717, 1111, 247, 5, 24, "Print",ExpressionUUID->"da85be8b-7972-4185-b906-d61dc785a9fd"],
+Cell[43967, 1118, 249, 5, 24, "Print",ExpressionUUID->"1c79d656-868a-4326-8d0a-2659691bbe1c"],
+Cell[44219, 1125, 247, 5, 24, "Print",ExpressionUUID->"efa41b92-f275-451a-ac92-19e0f0f8ac9d"],
+Cell[44469, 1132, 249, 5, 24, "Print",ExpressionUUID->"37e28f01-8fd3-4b48-b1b2-21df0a6ba950"],
+Cell[44721, 1139, 247, 5, 24, "Print",ExpressionUUID->"e844650c-6ee0-4b56-bc47-625127c32e2b"],
+Cell[44971, 1146, 249, 5, 24, "Print",ExpressionUUID->"29f611a5-3fe6-49ea-ba52-f894c5b962a5"],
+Cell[45223, 1153, 247, 5, 24, "Print",ExpressionUUID->"0d1b53d7-40d6-416f-87a6-b7b7a755e497"],
+Cell[45473, 1160, 249, 5, 24, "Print",ExpressionUUID->"dcd3c150-23ea-4f93-8005-bdd7678c1c03"],
+Cell[45725, 1167, 247, 5, 24, "Print",ExpressionUUID->"fe002903-a338-4ec6-ab39-693bb8f32eff"],
+Cell[45975, 1174, 249, 5, 24, "Print",ExpressionUUID->"34a03c80-9c4e-4fcb-b5ff-f3ff0cb1f223"],
+Cell[46227, 1181, 247, 5, 24, "Print",ExpressionUUID->"6cb0347b-630c-40c9-be5c-e11d214769dc"],
+Cell[46477, 1188, 249, 5, 24, "Print",ExpressionUUID->"0815e5f7-0b7c-4ceb-83e7-8cfc79826245"],
+Cell[46729, 1195, 247, 5, 24, "Print",ExpressionUUID->"92f96f11-b3a8-42e5-98e6-6fee3c21c719"],
+Cell[46979, 1202, 247, 5, 24, "Print",ExpressionUUID->"f5dc0de3-7380-4b70-b0d3-54def93aedd4"],
+Cell[47229, 1209, 249, 5, 24, "Print",ExpressionUUID->"a1701a3b-5ef3-47a9-95a2-d8e512233777"],
+Cell[47481, 1216, 247, 5, 24, "Print",ExpressionUUID->"4097feba-7377-4752-bb38-a0921cc43c71"],
+Cell[47731, 1223, 247, 5, 24, "Print",ExpressionUUID->"dd3dbaf1-61f0-453b-9b9a-36874206af99"],
+Cell[47981, 1230, 249, 5, 24, "Print",ExpressionUUID->"40b1ffb0-1c9e-42ee-9160-2930f36cdfaa"],
+Cell[48233, 1237, 245, 5, 24, "Print",ExpressionUUID->"191f384d-858c-4d19-92a6-40c39817d766"],
+Cell[48481, 1244, 246, 5, 24, "Print",ExpressionUUID->"0ad5044a-36b0-4d57-a03e-5b3764fa61c2"],
+Cell[48730, 1251, 247, 5, 24, "Print",ExpressionUUID->"777e0a58-0441-45aa-bb77-379de521b4ea"],
+Cell[48980, 1258, 247, 5, 24, "Print",ExpressionUUID->"26958225-f0de-4b0d-8418-1d0e741744db"],
+Cell[49230, 1265, 247, 5, 24, "Print",ExpressionUUID->"aa153189-1719-4ec3-a6c4-faeae6eb825e"],
+Cell[49480, 1272, 247, 5, 24, "Print",ExpressionUUID->"ad84b383-b8b6-4501-8354-e87c74b4fe47"],
+Cell[49730, 1279, 247, 5, 24, "Print",ExpressionUUID->"fb83c3a6-a8b1-4afc-8465-6456a8260a4f"],
+Cell[49980, 1286, 246, 5, 24, "Print",ExpressionUUID->"cd5fc969-87ec-41e9-8094-20cb832c0cf2"],
+Cell[50229, 1293, 247, 5, 24, "Print",ExpressionUUID->"8f96c2e7-a606-44fd-9bd3-787dbc3507ca"],
+Cell[50479, 1300, 247, 5, 24, "Print",ExpressionUUID->"1cb89dfe-425a-4c52-9b55-b4a6014c9852"],
+Cell[50729, 1307, 247, 5, 24, "Print",ExpressionUUID->"ef7f8635-cadc-4f02-9e3b-547e00252d2e"],
+Cell[50979, 1314, 247, 5, 24, "Print",ExpressionUUID->"4f79ee0d-259f-4d53-809b-53a89f702a3d"],
+Cell[51229, 1321, 247, 5, 24, "Print",ExpressionUUID->"886f8afa-5606-4059-8b26-d7d6af479013"],
+Cell[51479, 1328, 246, 5, 24, "Print",ExpressionUUID->"cd7e7c7e-efdb-40bf-ae88-e79e89aee24f"],
+Cell[51728, 1335, 247, 5, 24, "Print",ExpressionUUID->"f3dba259-3e90-4a75-828b-055cb49c87c8"],
+Cell[51978, 1342, 249, 5, 24, "Print",ExpressionUUID->"37b1dcf0-6b49-4eb5-b721-89fc56a828df"],
+Cell[52230, 1349, 247, 5, 24, "Print",ExpressionUUID->"5f7c8d38-0599-40f0-9972-0a6d5997ecbf"],
+Cell[52480, 1356, 247, 5, 24, "Print",ExpressionUUID->"69c00823-96b0-4daa-9990-36f08fb6ce56"],
+Cell[52730, 1363, 247, 5, 24, "Print",ExpressionUUID->"fb97acd4-1d96-4a85-8bc6-3305a839a3da"],
+Cell[52980, 1370, 247, 5, 24, "Print",ExpressionUUID->"43bad5b4-c421-419d-9915-1b67c66f1036"],
+Cell[53230, 1377, 247, 5, 24, "Print",ExpressionUUID->"f5846949-e47a-4e77-914f-0a8f50e06332"],
+Cell[53480, 1384, 247, 5, 24, "Print",ExpressionUUID->"6a5ef075-fa3d-4ad6-b501-a5cb532fd6f5"],
+Cell[53730, 1391, 247, 5, 24, "Print",ExpressionUUID->"ee5772c0-100c-4ff4-83b0-096fcfc8e2a6"],
+Cell[53980, 1398, 249, 5, 24, "Print",ExpressionUUID->"fec2f95e-20ad-473c-80c7-bfbc2b46c85f"]
+}, Closed]]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[54278, 1409, 414, 10, 52, "Input",ExpressionUUID->"083fb79c-daba-4277-b94e-78bed80412be"],
+Cell[54695, 1421, 709, 19, 46, "Output",ExpressionUUID->"21437e94-a2d0-4030-9577-1fb730a2c01b"]
+}, Open  ]],
+Cell[55419, 1443, 910, 22, 56, "Input",ExpressionUUID->"c9749ffe-5ab8-4c9a-aef7-8af3843d725b"],
+Cell[56332, 1467, 290, 7, 30, "Input",ExpressionUUID->"2d6ff57e-8bdd-4f5e-9772-e77bcbd1d8d0"],
+Cell[56625, 1476, 147, 3, 52, "Input",ExpressionUUID->"2239b8d8-532e-4c08-ac3b-e377a166b460"],
+Cell[56775, 1481, 379, 8, 30, "Input",ExpressionUUID->"e40759ab-7c04-4bf0-a25e-f80786106946"],
+Cell[57157, 1491, 379, 8, 52, "Input",ExpressionUUID->"007158c3-a206-4cab-88ec-886b70f30fed"],
+Cell[CellGroupData[{
+Cell[57561, 1503, 268, 5, 30, "Input",ExpressionUUID->"743fd8ff-17f3-49f2-85d6-506c6d73e5ad"],
+Cell[57832, 1510, 12097, 315, 213, "Output",ExpressionUUID->"0fce6bb0-45fe-4e6c-a361-d7b5261cb38e"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[69966, 1830, 260, 4, 30, "Input",ExpressionUUID->"f774e49f-9f49-4e9e-8986-5d0680aa1203"],
+Cell[70229, 1836, 173, 2, 34, "Output",ExpressionUUID->"1a69893c-2615-4d54-91e8-335f2abb5de6"]
+}, Open  ]],
+Cell[70417, 1841, 278, 5, 136, "Input",ExpressionUUID->"9a42fe37-6411-44bf-809a-1046a3483503"],
+Cell[70698, 1848, 294, 6, 30, "Input",ExpressionUUID->"9e2a44fe-0bb9-4f67-9e8b-da5c10ecf6b1"],
+Cell[CellGroupData[{
+Cell[71017, 1858, 182, 2, 30, "Input",ExpressionUUID->"f396c3bc-ea1b-44d3-a6cc-f7fecc0fffe5"],
+Cell[71202, 1862, 12116, 317, 213, "Output",ExpressionUUID->"1d1b26d3-3d5a-4f24-a113-21f43e2027cf"]
+}, Open  ]],
+Cell[83333, 2182, 812, 19, 94, "Input",ExpressionUUID->"0484a78b-7482-4457-ac3e-5762b8c80c69"],
+Cell[CellGroupData[{
+Cell[84170, 2205, 247, 4, 30, "Input",ExpressionUUID->"6f58dd70-ec76-4b2e-8d7d-ae9f5adae4ca"],
+Cell[84420, 2211, 11414, 300, 191, "Output",ExpressionUUID->"b4f39a2e-5da3-4756-9d30-b57a024860f7"]
+}, Open  ]],
+Cell[95849, 2514, 414, 9, 30, "Input",ExpressionUUID->"6dc8539a-b6fb-45ed-bf01-82aab57aef98"],
+Cell[CellGroupData[{
+Cell[96288, 2527, 236, 4, 30, "Input",ExpressionUUID->"cb0ca33d-b1f5-4703-8d8e-8c263a31064a"],
+Cell[96527, 2533, 11410, 300, 196, "Output",ExpressionUUID->"1d5fa8ad-833f-46d5-a1dc-a4179db033a8"]
+}, Open  ]],
+Cell[107952, 2836, 417, 9, 30, "Input",ExpressionUUID->"5eff98d5-542a-4fb2-8a57-8b5bb386d93b"],
+Cell[CellGroupData[{
+Cell[108394, 2849, 230, 4, 30, "Input",ExpressionUUID->"6b8a882a-c4d7-48c9-bd9a-89d690e1775f"],
+Cell[108627, 2855, 11431, 302, 194, "Output",ExpressionUUID->"0dd69f7f-556b-4cf0-903b-9a63338f9b78"]
+}, Open  ]],
+Cell[120073, 3160, 413, 9, 30, "Input",ExpressionUUID->"786a397e-8276-4b59-936c-1058b86fa2b4"],
+Cell[CellGroupData[{
+Cell[120511, 3173, 232, 4, 30, "Input",ExpressionUUID->"cac28fd3-e795-47f1-a77e-e5a2fe196f33"],
+Cell[120746, 3179, 11631, 306, 199, "Output",ExpressionUUID->"fdf26c39-191c-4b8f-8ed6-4f24a3f9beeb"]
+}, Open  ]],
+Cell[132392, 3488, 462, 11, 52, "Input",ExpressionUUID->"c7feecf3-f47a-423b-924d-e06efe08d9d2"],
+Cell[132857, 3501, 419, 9, 157, "Input",ExpressionUUID->"7e7b9f75-0ed1-4382-a7dd-99907c1473ac"],
+Cell[CellGroupData[{
+Cell[133301, 3514, 248, 4, 30, "Input",ExpressionUUID->"ae98646f-6aec-43fc-bc4c-76b34b9d8371"],
+Cell[133552, 3520, 2181, 62, 146, "Output",ExpressionUUID->"b03d30ad-4939-46cf-b5fe-8b765a9784a2"]
+}, Open  ]],
+Cell[135748, 3585, 1054, 29, 115, "Input",ExpressionUUID->"24b1d6d5-8138-410c-bad0-4688d4069032"],
+Cell[136805, 3616, 396, 9, 136, "Input",ExpressionUUID->"1f278cce-b737-471d-abb8-571bd986d464"],
+Cell[137204, 3627, 265, 5, 30, "Input",ExpressionUUID->"9a2e8cfd-31b0-4513-b860-e5717141a96f"],
+Cell[137472, 3634, 851, 23, 73, "Input",ExpressionUUID->"f2581317-15ac-431d-858d-1506de0ee6ea"],
+Cell[138326, 3659, 239, 5, 30, "Input",ExpressionUUID->"935c66bf-fd6a-4022-88ef-839267449906"],
+Cell[138568, 3666, 255, 5, 115, "Input",ExpressionUUID->"e4eda86f-c0c1-4ed1-b09c-a197bbc299c9"],
+Cell[138826, 3673, 1202, 32, 136, "Input",ExpressionUUID->"e7549059-0b03-41c9-afd1-97986dde3359"],
+Cell[140031, 3707, 154, 3, 30, "Input",ExpressionUUID->"75c75df4-ee72-49af-9630-1cf0eef74f43"],
+Cell[140188, 3712, 128, 3, 30, "Input",ExpressionUUID->"a4013e44-a682-4c70-a84f-f4695f7dd230"],
+Cell[140319, 3717, 238, 5, 30, "Input",ExpressionUUID->"73dfc6d7-5c31-463e-8864-6b5bef17b11d"],
+Cell[CellGroupData[{
+Cell[140582, 3726, 524, 14, 30, "Input",ExpressionUUID->"b4100299-10f3-4c3c-90b5-db96319fb7d9"],
+Cell[141109, 3742, 3541, 105, 133, "Output",ExpressionUUID->"227ac9fd-122f-4bdd-8ce6-0421fc3101b9"]
+}, Open  ]],
+Cell[144665, 3850, 636, 18, 52, "Input",ExpressionUUID->"d027658a-37f9-489d-a307-4d535ae073b9"],
+Cell[CellGroupData[{
+Cell[145326, 3872, 203, 3, 30, "Input",ExpressionUUID->"55e4d6af-838f-45bf-ab25-da03c1c1d848"],
+Cell[145532, 3877, 3741, 113, 161, "Output",ExpressionUUID->"f7adf7fb-3d44-404a-b9d8-8367ef825cc7"]
+}, Open  ]],
+Cell[149288, 3993, 328, 6, 115, "Input",ExpressionUUID->"a9b9ca57-f825-4517-8b39-8ebebaffad8a"],
+Cell[149619, 4001, 1735, 50, 136, "Input",ExpressionUUID->"f261cfc3-9a94-4830-9195-aa48c3328d0f"],
+Cell[151357, 4053, 1023, 26, 178, "Input",ExpressionUUID->"5fb9542c-66c2-4b59-b6c0-3d1e3db1842f"],
+Cell[152383, 4081, 195, 4, 30, "Input",ExpressionUUID->"ce77b5bd-ebce-4c42-9263-53392240007e"],
+Cell[152581, 4087, 1358, 37, 115, "Input",ExpressionUUID->"9997d1a8-9d83-430a-8554-6cfc2a974c27"],
+Cell[153942, 4126, 1818, 48, 178, "Input",ExpressionUUID->"3e8bf30c-17cd-43d9-b2c2-32aaac3fabf4"],
+Cell[155763, 4176, 906, 22, 115, "Input",ExpressionUUID->"0faeac76-b8a2-41ff-a322-8a7cc20f5cdc"],
+Cell[CellGroupData[{
+Cell[156694, 4202, 547, 11, 52, "Input",ExpressionUUID->"0aeaadd3-5332-4530-a274-2d257367f236"],
+Cell[CellGroupData[{
+Cell[157266, 4217, 196, 4, 24, "Print",ExpressionUUID->"941d2971-0756-46af-bbfa-35b438dd0e63"],
+Cell[157465, 4223, 198, 4, 24, "Print",ExpressionUUID->"7f9fc3c9-6ddc-47d5-af72-107027ebb276"],
+Cell[157666, 4229, 196, 4, 24, "Print",ExpressionUUID->"da3f0120-fdef-4857-aa25-2ee29cd3ae1a"],
+Cell[157865, 4235, 198, 4, 24, "Print",ExpressionUUID->"b6c871c9-430f-4950-8ffa-bdb5d1f09ffe"],
+Cell[158066, 4241, 196, 4, 24, "Print",ExpressionUUID->"08b8650b-700a-4a81-98cd-762915822ac6"],
+Cell[158265, 4247, 196, 4, 24, "Print",ExpressionUUID->"dc323011-3d7c-4c71-98f9-fc651ab59bcd"],
+Cell[158464, 4253, 196, 4, 24, "Print",ExpressionUUID->"dcbc9173-996e-4615-8934-be1437da9dbc"],
+Cell[158663, 4259, 196, 4, 24, "Print",ExpressionUUID->"5235f72f-1e09-460f-a972-86c8776de7bf"],
+Cell[158862, 4265, 196, 4, 24, "Print",ExpressionUUID->"51d0dc87-3144-4105-a8ae-a650d049a319"],
+Cell[159061, 4271, 197, 4, 24, "Print",ExpressionUUID->"61f11d61-f008-44dc-96d0-db1dad10327b"],
+Cell[159261, 4277, 199, 4, 24, "Print",ExpressionUUID->"f3db9187-5fb7-4179-9d5d-fee11f151b8a"],
+Cell[159463, 4283, 197, 4, 24, "Print",ExpressionUUID->"55143390-2218-4242-8577-41b5b68bf26f"],
+Cell[159663, 4289, 197, 4, 24, "Print",ExpressionUUID->"de5e700a-5013-445e-b472-25d383ca5cf3"],
+Cell[159863, 4295, 197, 4, 24, "Print",ExpressionUUID->"04316d54-f297-424b-9b49-acfd45d21630"],
+Cell[160063, 4301, 199, 4, 24, "Print",ExpressionUUID->"017b3ad1-2b25-45a4-8b9d-111686161236"],
+Cell[160265, 4307, 199, 4, 24, "Print",ExpressionUUID->"cf381b0c-ac88-40ab-b951-874fcfdfa6c6"],
+Cell[160467, 4313, 197, 4, 24, "Print",ExpressionUUID->"67e161ed-8390-46fa-a181-f56c98936077"],
+Cell[160667, 4319, 197, 4, 24, "Print",ExpressionUUID->"12eddb76-c821-45d5-9119-d5d357f2d4eb"],
+Cell[160867, 4325, 197, 4, 24, "Print",ExpressionUUID->"f42cca31-6f52-49bc-b356-94d57c78fd27"],
+Cell[161067, 4331, 197, 4, 24, "Print",ExpressionUUID->"812113fc-a308-46fd-b058-9e34214fc722"],
+Cell[161267, 4337, 197, 4, 24, "Print",ExpressionUUID->"5f1deb06-8268-41a5-84bd-e5a8ada699a5"],
+Cell[161467, 4343, 199, 4, 24, "Print",ExpressionUUID->"28c127e4-f366-4435-9db7-8b114a82b320"],
+Cell[161669, 4349, 199, 4, 24, "Print",ExpressionUUID->"db1f8f22-c844-4e1e-892c-73ca3a41eaee"],
+Cell[161871, 4355, 197, 4, 24, "Print",ExpressionUUID->"ae692077-c31d-43f0-a099-c52e179f8dea"],
+Cell[162071, 4361, 196, 4, 24, "Print",ExpressionUUID->"8f0af9a8-1bc7-4b92-a518-3b7fb75be3ae"],
+Cell[162270, 4367, 197, 4, 24, "Print",ExpressionUUID->"60b61b67-6c61-4599-a20d-463c308eb270"],
+Cell[162470, 4373, 197, 4, 24, "Print",ExpressionUUID->"60c27d5d-d770-45b4-8b6e-611a3c03ef79"],
+Cell[162670, 4379, 197, 4, 24, "Print",ExpressionUUID->"e5c01ae9-55fc-47f8-9c3d-6f54b4b00756"],
+Cell[162870, 4385, 196, 4, 24, "Print",ExpressionUUID->"7f11c8de-f7aa-4313-ab85-f0bc8404662d"],
+Cell[163069, 4391, 199, 4, 24, "Print",ExpressionUUID->"9e154613-6e9c-4d11-8ddd-6170705528ab"],
+Cell[163271, 4397, 197, 4, 24, "Print",ExpressionUUID->"2f8e02d9-a5b4-4bd9-b9d9-aec02153dd7c"],
+Cell[163471, 4403, 199, 4, 24, "Print",ExpressionUUID->"650def7c-a65f-44fb-811b-1fa0b5a45d15"],
+Cell[163673, 4409, 199, 4, 24, "Print",ExpressionUUID->"6474532b-9599-4489-88db-58d38314ab6f"],
+Cell[163875, 4415, 197, 4, 24, "Print",ExpressionUUID->"226a40c4-f169-42d2-8ab6-1f67a2f873ea"],
+Cell[164075, 4421, 196, 4, 24, "Print",ExpressionUUID->"a1944f0f-52a8-49d8-b9c3-20fec2f3235a"],
+Cell[164274, 4427, 197, 4, 24, "Print",ExpressionUUID->"3b4b9b10-ab7e-4de6-ab0f-e0018abf925b"],
+Cell[164474, 4433, 196, 4, 24, "Print",ExpressionUUID->"6c480e69-9121-408a-8dec-f908c61e8d42"],
+Cell[164673, 4439, 199, 4, 24, "Print",ExpressionUUID->"cba40a3e-274e-4ca6-acca-4f9780f8640b"],
+Cell[164875, 4445, 197, 4, 24, "Print",ExpressionUUID->"e62616bb-5c74-4eeb-afa2-bb439d81b80e"],
+Cell[165075, 4451, 197, 4, 24, "Print",ExpressionUUID->"52e54f32-ac58-4414-93fa-68fcf6f14698"],
+Cell[165275, 4457, 197, 4, 24, "Print",ExpressionUUID->"50d0b363-2b99-4f39-bfc0-29a59ae13c83"],
+Cell[165475, 4463, 197, 4, 24, "Print",ExpressionUUID->"5dca03fa-6242-4056-b5c8-360525f873d4"],
+Cell[165675, 4469, 197, 4, 24, "Print",ExpressionUUID->"91a05c83-f424-4d73-8df9-fd9365c15c65"],
+Cell[165875, 4475, 197, 4, 24, "Print",ExpressionUUID->"e35ff97f-1b31-4eec-84d3-b936608c353c"],
+Cell[166075, 4481, 197, 4, 24, "Print",ExpressionUUID->"45f0eca5-0ad3-474d-8922-cc6c393a259f"]
+}, Open  ]],
+Cell[166287, 4488, 196, 3, 34, "Output",ExpressionUUID->"cfcdfb24-b305-466a-a1bb-a332ab352a9e"]
+}, Closed]],
+Cell[166498, 4494, 371, 8, 26, "Input",ExpressionUUID->"09576c11-deed-4e65-b168-19d328941f7e"],
+Cell[166872, 4504, 1052, 28, 115, "Input",ExpressionUUID->"e9cb917d-6bce-4b94-a047-15b919e9e4cc"],
+Cell[167927, 4534, 883, 22, 115, "Input",ExpressionUUID->"58da36ab-d8d7-464f-a677-c4ffb3b43015"],
+Cell[CellGroupData[{
+Cell[168835, 4560, 441, 10, 30, "Input",ExpressionUUID->"93d22a91-7738-43f2-ae38-e21755ca22f1"],
+Cell[169279, 4572, 515, 11, 42, "Message",ExpressionUUID->"dc04a919-7e52-45e2-bb44-a344b5d1d308"],
+Cell[169797, 4585, 513, 11, 42, "Message",ExpressionUUID->"99a74ed9-9abc-451d-8242-fd4078fd5891"],
+Cell[170313, 4598, 515, 11, 42, "Message",ExpressionUUID->"1070ad89-c66d-4906-aa54-fd4ac95964d8"],
+Cell[170831, 4611, 461, 10, 24, "Message",ExpressionUUID->"9dbf4032-8c2f-4bba-9001-aa2649499b6f"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[171329, 4626, 154, 3, 30, "Input",ExpressionUUID->"6e5f5a2d-f8d8-41cc-b7f7-193907c772e2"],
+Cell[171486, 4631, 4419372, 95030, 90964, "Output",ExpressionUUID->"6849d88e-ad0f-49c4-99da-875ddf3df840"]
+}, Closed]],
+Cell[4590873, 99664, 152, 3, 26, "Input",ExpressionUUID->"3bccd808-2d0d-4aed-ad5c-f98dce1bb2fa"],
+Cell[4591028, 99669, 151, 3, 30, "Input",ExpressionUUID->"9214d531-c1c4-4f0b-8067-62d509d3780e"],
+Cell[4591182, 99674, 152, 3, 30, "Input",ExpressionUUID->"5d134bbf-d270-4d46-9aad-c35a20b3af10"],
+Cell[4591337, 99679, 1248, 34, 115, "Input",ExpressionUUID->"c9706e32-aa64-4bea-be5e-fca139f74b78"],
+Cell[4592588, 99715, 1047, 24, 94, "Input",ExpressionUUID->"2098a55c-4e04-413e-b48c-2e3e1420aeba"],
+Cell[4593638, 99741, 716, 17, 73, "Input",ExpressionUUID->"f11165e8-30f4-4621-91cb-e78cc1116c62"],
+Cell[4594357, 99760, 302, 5, 30, "Input",ExpressionUUID->"881beb7c-e557-4703-a5ed-8b7345c6403b"],
+Cell[CellGroupData[{
+Cell[4594684, 99769, 240, 4, 30, "Input",ExpressionUUID->"86953094-992b-4ece-81d3-0f54f8c99910"],
+Cell[CellGroupData[{
+Cell[4594949, 99777, 197, 4, 24, "Print",ExpressionUUID->"8b88be0a-a13e-4a7b-8295-c1008ad658d6"],
+Cell[4595149, 99783, 198, 4, 24, "Print",ExpressionUUID->"f854acc1-f24a-43ce-9107-892da3741105"],
+Cell[4595350, 99789, 198, 4, 24, "Print",ExpressionUUID->"0ebf2041-29ad-490d-ae2c-fb00ea60e896"],
+Cell[4595551, 99795, 198, 4, 24, "Print",ExpressionUUID->"ce7c7420-29bb-4bc7-9fe1-c52d92b3c17c"],
+Cell[4595752, 99801, 198, 4, 24, "Print",ExpressionUUID->"bdb7f0f5-ae0e-47e3-bde4-add2b2e9172d"],
+Cell[4595953, 99807, 198, 4, 24, "Print",ExpressionUUID->"6ccc5234-8d31-4f80-b860-fb9bc1ead01e"],
+Cell[4596154, 99813, 198, 4, 24, "Print",ExpressionUUID->"9f6f5a15-4625-4559-aeb6-4e62d60ea660"],
+Cell[4596355, 99819, 200, 4, 24, "Print",ExpressionUUID->"cc753901-6a7d-4228-ac53-35d451b86d77"],
+Cell[4596558, 99825, 198, 4, 24, "Print",ExpressionUUID->"8fe1d30b-85ec-47bd-8e46-174bcc6be6cf"],
+Cell[4596759, 99831, 199, 4, 24, "Print",ExpressionUUID->"cd6b11e5-086b-4a28-ba23-c88ce09cbddb"]
+}, Open  ]],
+Cell[4596973, 99838, 196, 3, 34, "Output",ExpressionUUID->"f9eb79c9-79ab-4972-ac5d-9bf4d7c5706c"]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[4597206, 99846, 241, 4, 26, "Input",ExpressionUUID->"f96bfd50-3c93-487b-b72c-0efa966db052"],
+Cell[CellGroupData[{
+Cell[4597472, 99854, 197, 4, 24, "Print",ExpressionUUID->"0df55f20-b51c-4417-8687-560b75680ad9"],
+Cell[4597672, 99860, 199, 4, 24, "Print",ExpressionUUID->"65afac5f-ac1b-405d-95ca-d88dcc034907"],
+Cell[4597874, 99866, 199, 4, 24, "Print",ExpressionUUID->"155d77b5-d5ca-47b5-bba8-036aff1d2443"],
+Cell[4598076, 99872, 199, 4, 24, "Print",ExpressionUUID->"6402840f-e54b-49d2-8ce8-0175340b2083"],
+Cell[4598278, 99878, 199, 4, 24, "Print",ExpressionUUID->"736736de-4f33-4375-9ad5-d9f98f5dba87"],
+Cell[4598480, 99884, 197, 4, 24, "Print",ExpressionUUID->"5d2d9825-5632-4457-8211-7dd6cee750a8"],
+Cell[4598680, 99890, 197, 4, 24, "Print",ExpressionUUID->"23906453-43f1-4403-92b6-e9fb94c0ae50"],
+Cell[4598880, 99896, 197, 4, 24, "Print",ExpressionUUID->"2ba2eb99-fc54-459f-85c0-ed99d7ad07c9"],
+Cell[4599080, 99902, 197, 4, 24, "Print",ExpressionUUID->"94070629-691b-4d0a-9eb7-69b91078a11e"],
+Cell[4599280, 99908, 197, 4, 24, "Print",ExpressionUUID->"3812bf93-11c7-45dc-bd0e-7ed9238191ce"]
+}, Open  ]],
+Cell[4599492, 99915, 196, 3, 34, "Output",ExpressionUUID->"3f41a929-7beb-4259-8ecb-4fc1d8a69374"]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[4599725, 99923, 243, 4, 26, "Input",ExpressionUUID->"fe1a97a8-532e-4e7a-8a88-f565caae5f97"],
+Cell[CellGroupData[{
+Cell[4599993, 99931, 201, 4, 24, "Print",ExpressionUUID->"203826e8-d100-4a48-aa61-b8cae880ddf2"],
+Cell[4600197, 99937, 199, 4, 24, "Print",ExpressionUUID->"9a8a2d64-a921-4ebe-b6c4-e90419eee1c2"],
+Cell[4600399, 99943, 199, 4, 24, "Print",ExpressionUUID->"ceff1cb8-2c39-4c0f-a43a-efcbdbef0fe2"],
+Cell[4600601, 99949, 201, 4, 24, "Print",ExpressionUUID->"89a661a3-5c0c-4326-a393-6e4972db4a6b"],
+Cell[4600805, 99955, 201, 4, 24, "Print",ExpressionUUID->"6aa6f90c-6c91-4f86-8968-1103cba7975b"],
+Cell[4601009, 99961, 199, 4, 24, "Print",ExpressionUUID->"0dcb36c1-0668-4b8a-bc01-4945a598c78a"],
+Cell[4601211, 99967, 199, 4, 24, "Print",ExpressionUUID->"0fcfcd70-8d7b-435d-a163-acb028e6e16e"],
+Cell[4601413, 99973, 199, 4, 24, "Print",ExpressionUUID->"3b7724cb-54a4-4dde-8ea0-50e5610b792e"],
+Cell[4601615, 99979, 199, 4, 24, "Print",ExpressionUUID->"b613c9c7-96f4-4a6c-8f08-8e6df52762df"],
+Cell[4601817, 99985, 199, 4, 24, "Print",ExpressionUUID->"a6fd0189-8e91-469a-9897-389a4893d7b0"]
+}, Open  ]],
+Cell[4602031, 99992, 196, 3, 34, "Output",ExpressionUUID->"4a8fef41-31e5-42c1-8bdc-68e9f7afbd6a"]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[4602264, 100000, 242, 4, 26, "Input",ExpressionUUID->"2aecbe65-4b44-4dfa-93ef-65fd39540c9b"],
+Cell[CellGroupData[{
+Cell[4602531, 100008, 197, 4, 24, "Print",ExpressionUUID->"2fca990b-8284-4e3f-8a3b-7f56db89acc5"],
+Cell[4602731, 100014, 197, 4, 24, "Print",ExpressionUUID->"3177b850-296d-49fe-8867-d3473a1b0c35"],
+Cell[4602931, 100020, 197, 4, 24, "Print",ExpressionUUID->"c0b4e928-89e9-4d85-8e51-5cbdf9ce41aa"],
+Cell[4603131, 100026, 197, 4, 24, "Print",ExpressionUUID->"a373700f-9836-44d5-8a5f-930119678171"],
+Cell[4603331, 100032, 197, 4, 24, "Print",ExpressionUUID->"ca822f7e-70c9-46a4-a25f-582acb77abcb"],
+Cell[4603531, 100038, 197, 4, 24, "Print",ExpressionUUID->"96e22b30-8c73-4518-8d23-873121d8fc48"],
+Cell[4603731, 100044, 197, 4, 24, "Print",ExpressionUUID->"83708b79-d67b-4c05-93e9-38073aa7fe05"],
+Cell[4603931, 100050, 197, 4, 24, "Print",ExpressionUUID->"78e88359-b700-4328-bea6-a2b0d14a7cac"],
+Cell[4604131, 100056, 197, 4, 24, "Print",ExpressionUUID->"704157f3-bfb2-4f43-b5f0-c5bfbc560aab"],
+Cell[4604331, 100062, 197, 4, 24, "Print",ExpressionUUID->"7565254f-9a77-48dc-9444-33b886723862"]
+}, Open  ]],
+Cell[4604543, 100069, 200, 3, 34, "Output",ExpressionUUID->"2e1c38af-7450-4ecc-a05c-257dcdba5451"]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[4604780, 100077, 241, 4, 26, "Input",ExpressionUUID->"8ee863b5-d147-4e8a-bd18-9c421dd23787"],
+Cell[CellGroupData[{
+Cell[4605046, 100085, 197, 4, 24, "Print",ExpressionUUID->"2009a193-ceea-46ef-bd80-037d926017cf"],
+Cell[4605246, 100091, 199, 4, 24, "Print",ExpressionUUID->"0a74d1db-0a55-41c7-a355-eca543eb70e7"],
+Cell[4605448, 100097, 197, 4, 24, "Print",ExpressionUUID->"e55077bb-d892-44dc-b006-f69eb07618f5"],
+Cell[4605648, 100103, 197, 4, 24, "Print",ExpressionUUID->"55c1e9be-56a5-4944-b983-985ca4b80876"],
+Cell[4605848, 100109, 197, 4, 24, "Print",ExpressionUUID->"17abba4e-1848-488c-bde6-35cdf05998d4"],
+Cell[4606048, 100115, 199, 4, 24, "Print",ExpressionUUID->"8842af6b-8a1e-48e1-98ef-18ca8f39a91d"],
+Cell[4606250, 100121, 197, 4, 24, "Print",ExpressionUUID->"c65f5711-d87e-4702-85dc-948bb2237f08"],
+Cell[4606450, 100127, 197, 4, 24, "Print",ExpressionUUID->"c6fbe64a-ceca-439e-8b29-9c26adf965ef"],
+Cell[4606650, 100133, 199, 4, 24, "Print",ExpressionUUID->"9fcc8d20-19ef-45d4-bc4b-aefbb0a6e431"],
+Cell[4606852, 100139, 197, 4, 24, "Print",ExpressionUUID->"3f30f015-4bfc-47f5-99d8-e3f68011c8c2"]
+}, Open  ]],
+Cell[4607064, 100146, 196, 3, 34, "Output",ExpressionUUID->"6069c659-d902-4918-a553-fc39b0ec194b"]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[4607297, 100154, 241, 4, 26, "Input",ExpressionUUID->"71acea69-b2b3-491d-ae15-f4df099b9b39"],
+Cell[CellGroupData[{
+Cell[4607563, 100162, 199, 4, 24, "Print",ExpressionUUID->"4145e9a2-b86f-444d-9e6f-514e102a7a17"],
+Cell[4607765, 100168, 197, 4, 24, "Print",ExpressionUUID->"0f110600-9945-4ce8-ada0-239cd91d8e03"],
+Cell[4607965, 100174, 199, 4, 24, "Print",ExpressionUUID->"f8453fc4-a721-4441-9016-2af31abf7022"],
+Cell[4608167, 100180, 196, 4, 24, "Print",ExpressionUUID->"e7b4daf0-0724-4551-8ded-34ecced4ec32"],
+Cell[4608366, 100186, 197, 4, 24, "Print",ExpressionUUID->"654cff30-d67b-463f-9d66-f38a5cbd6e2c"],
+Cell[4608566, 100192, 197, 4, 24, "Print",ExpressionUUID->"0398c397-cea0-48c6-adee-2da2335e66cb"],
+Cell[4608766, 100198, 197, 4, 24, "Print",ExpressionUUID->"0f95316d-23be-46b1-8fb4-6dfdb7e99fe2"],
+Cell[4608966, 100204, 199, 4, 24, "Print",ExpressionUUID->"0996f87d-8f52-4872-8581-efb748040ff9"],
+Cell[4609168, 100210, 197, 4, 24, "Print",ExpressionUUID->"6098c8b1-ad3d-4b8a-850a-4b9fb5e363cf"],
+Cell[4609368, 100216, 197, 4, 24, "Print",ExpressionUUID->"57383c2a-c8e3-461c-bd50-359a76498569"]
+}, Open  ]],
+Cell[4609580, 100223, 196, 3, 34, "Output",ExpressionUUID->"abee5d57-ae1c-4b68-8896-520cd5335c43"]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[4609813, 100231, 243, 4, 26, "Input",ExpressionUUID->"75b90654-1ac3-4894-8e5d-81d701b5e39a"],
+Cell[CellGroupData[{
+Cell[4610081, 100239, 197, 4, 24, "Print",ExpressionUUID->"eea3546e-d9ee-471e-845d-31f4851702d4"],
+Cell[4610281, 100245, 196, 4, 24, "Print",ExpressionUUID->"aedb175e-f30c-4a30-9760-18498d2f5ebb"],
+Cell[4610480, 100251, 197, 4, 24, "Print",ExpressionUUID->"9ef01fde-35d5-4cdb-8e20-06150be4917d"],
+Cell[4610680, 100257, 196, 4, 24, "Print",ExpressionUUID->"801f39b3-2897-4def-aace-35be798602f1"],
+Cell[4610879, 100263, 199, 4, 24, "Print",ExpressionUUID->"4524b0a4-c3cf-4eee-9bae-4a4411158765"],
+Cell[4611081, 100269, 199, 4, 24, "Print",ExpressionUUID->"9ad23010-af47-4eb5-80b1-72cc7a2f8eb2"],
+Cell[4611283, 100275, 196, 4, 24, "Print",ExpressionUUID->"9a39c0cc-b71d-4bfb-b47a-e3532770aa9b"],
+Cell[4611482, 100281, 199, 4, 24, "Print",ExpressionUUID->"e9a4811a-4dfc-4847-9ed8-9f5e7fb0a1bd"],
+Cell[4611684, 100287, 197, 4, 24, "Print",ExpressionUUID->"4a551457-b8aa-425f-b484-9ebe7095e485"],
+Cell[4611884, 100293, 196, 4, 24, "Print",ExpressionUUID->"ed43c117-5a2c-4198-9efb-7da7dd4d4034"]
+}, Open  ]],
+Cell[4612095, 100300, 196, 3, 34, "Output",ExpressionUUID->"1a9dd832-cded-404a-9e8e-55603b4d7433"]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[4612328, 100308, 292, 5, 26, "Input",ExpressionUUID->"f824d033-691a-4d1f-92f5-4ab01423a5ad"],
+Cell[CellGroupData[{
+Cell[4612645, 100317, 177, 4, 24, "Print",ExpressionUUID->"92d7c1bd-c362-4205-9f66-6a01b447a4eb"],
+Cell[4612825, 100323, 175, 4, 24, "Print",ExpressionUUID->"54df0102-003b-4884-bb53-111b767a4c0f"],
+Cell[4613003, 100329, 174, 4, 24, "Print",ExpressionUUID->"42fe5d37-9e86-4d1b-b9a2-35370152be1a"],
+Cell[4613180, 100335, 177, 4, 24, "Print",ExpressionUUID->"e05f68ba-59c9-4014-82ba-94955347b056"]
+}, Open  ]],
+Cell[4613372, 100342, 174, 3, 34, "Output",ExpressionUUID->"52db8c9f-9b99-4b63-bfd9-226b29998173"]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[4613583, 100350, 228, 4, 26, "Input",ExpressionUUID->"e1619147-dbd8-4b95-92c0-a0a9e3d6e05f"],
+Cell[4613814, 100356, 729, 19, 46, "Output",ExpressionUUID->"6b31f62a-bb61-4325-bbb2-0f8b38f9d9b0"]
+}, Open  ]],
+Cell[4614558, 100378, 200, 4, 32, "Item",ExpressionUUID->"b8f7dd32-654c-4d69-a388-00e73e20b2c5"],
+Cell[CellGroupData[{
+Cell[4614783, 100386, 639, 16, 52, "Input",ExpressionUUID->"6385e4e6-3aa6-4ca7-8de4-83d30633a5ae"],
+Cell[4615425, 100404, 158, 2, 34, "Output",ExpressionUUID->"20e798ff-b0ce-4e4d-8da1-a093ebf96720"]
+}, Open  ]],
+Cell[4615598, 100409, 184, 4, 30, "Input",ExpressionUUID->"35538101-3df6-4320-82c6-fb90398dcf8b"],
+Cell[CellGroupData[{
+Cell[4615807, 100417, 241, 4, 30, "Input",ExpressionUUID->"c6f1e48f-f2b3-4633-a270-2d837481a3a1"],
+Cell[4616051, 100423, 396, 10, 24, "Message",ExpressionUUID->"da0ce5b5-a752-4f0c-81a9-b9f06d7ab115"],
+Cell[4616450, 100435, 394, 10, 24, "Message",ExpressionUUID->"be0f414f-c102-4bf4-9e35-0d311e65c76f"],
+Cell[CellGroupData[{
+Cell[4616869, 100449, 177, 4, 24, "Print",ExpressionUUID->"3bba7d8f-9b06-484f-b4d3-632f231afc37"],
+Cell[4617049, 100455, 177, 4, 24, "Print",ExpressionUUID->"f659f692-01ec-4858-acaa-d60f4b4998e6"],
+Cell[4617229, 100461, 175, 4, 24, "Print",ExpressionUUID->"e9e35560-6a98-4d85-ba46-29424be208af"],
+Cell[4617407, 100467, 177, 4, 24, "Print",ExpressionUUID->"5d1876d0-f98c-4bb2-9711-124711ea1dab"],
+Cell[4617587, 100473, 175, 4, 24, "Print",ExpressionUUID->"ae667c6d-6a3b-4b8a-9bf8-9c76aa4faf28"]
+}, Open  ]],
+Cell[4617777, 100480, 247, 4, 34, "Output",ExpressionUUID->"88acd967-1c2c-4b4e-b73d-ecbd06540448"]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[4618061, 100489, 241, 4, 26, "Input",ExpressionUUID->"8d487f69-3cc5-4b15-a17c-36b0f0a098da"],
+Cell[CellGroupData[{
+Cell[4618327, 100497, 175, 4, 24, "Print",ExpressionUUID->"2846bb9c-a0e3-4cc6-9863-49dc879372fb"],
+Cell[4618505, 100503, 175, 4, 24, "Print",ExpressionUUID->"8e8e94ae-2685-46cf-824c-9dccd6aaa7c9"],
+Cell[4618683, 100509, 175, 4, 24, "Print",ExpressionUUID->"ea5a6e57-459b-44f3-af8d-e27fd9f73504"],
+Cell[4618861, 100515, 175, 4, 24, "Print",ExpressionUUID->"236d0628-1541-4ee1-8294-d993f0d4fc6b"],
+Cell[4619039, 100521, 175, 4, 24, "Print",ExpressionUUID->"41931755-f8dd-4016-8ec3-12f189f6c48b"],
+Cell[4619217, 100527, 177, 4, 24, "Print",ExpressionUUID->"87cc3efa-15c5-4aac-9f59-fc77c411956d"],
+Cell[4619397, 100533, 175, 4, 24, "Print",ExpressionUUID->"c28fc9bb-8175-41ae-b5b8-a2af110aa01e"],
+Cell[4619575, 100539, 175, 4, 24, "Print",ExpressionUUID->"c804e0fc-13b8-404c-be08-a7e750465f41"],
+Cell[4619753, 100545, 175, 4, 24, "Print",ExpressionUUID->"017215f5-e5a5-412a-95b0-02e856ef17cf"],
+Cell[4619931, 100551, 175, 4, 24, "Print",ExpressionUUID->"27abe593-5557-4139-b432-a9d130c93652"]
+}, Open  ]],
+Cell[4620121, 100558, 174, 3, 34, "Output",ExpressionUUID->"27df6f47-5fa2-4e39-b7f2-afc3c720e098"]
+}, Closed]],
+Cell[4620310, 100564, 190, 5, 26, "Input",ExpressionUUID->"df98973f-1c7c-43bf-ada2-bc8f065d9ee0"],
+Cell[CellGroupData[{
+Cell[4620525, 100573, 319, 6, 30, "Input",ExpressionUUID->"2649d505-baee-414f-ba61-a848c431375f"],
+Cell[CellGroupData[{
+Cell[4620869, 100583, 177, 4, 24, "Print",ExpressionUUID->"d990281d-da4e-44ce-bba0-3be9e51984c8"],
+Cell[4621049, 100589, 175, 4, 24, "Print",ExpressionUUID->"8e564ec2-2ba2-4af6-8839-241a48c4b011"]
+}, Open  ]]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[4621273, 100599, 270, 6, 26, "Input",ExpressionUUID->"e440a8fa-6daf-4e52-952c-f2a2da027d58"],
+Cell[CellGroupData[{
+Cell[4621568, 100609, 175, 4, 24, "Print",ExpressionUUID->"47e9eb29-eb3c-44eb-bde5-daa461e7965a"],
+Cell[4621746, 100615, 175, 4, 24, "Print",ExpressionUUID->"3c8d7c90-91f7-46fd-ac69-8701bacfe25a"],
+Cell[4621924, 100621, 175, 4, 24, "Print",ExpressionUUID->"44a1988b-44c7-4cc4-accc-daccc86bdfec"]
+}, Open  ]]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[4622148, 100631, 273, 6, 26, "Input",ExpressionUUID->"ccd5003b-7be8-4452-a781-58d0de738e3e"],
+Cell[CellGroupData[{
+Cell[4622446, 100641, 177, 4, 24, "Print",ExpressionUUID->"590c91e2-ef3c-4505-aa0b-95d55137b2bb"],
+Cell[4622626, 100647, 175, 4, 24, "Print",ExpressionUUID->"69d37e74-c56f-4a12-bc84-953b1ee45562"],
+Cell[4622804, 100653, 175, 4, 24, "Print",ExpressionUUID->"400a6676-c5b0-4df1-b6bb-83a59b331179"]
+}, Open  ]]
+}, Closed]],
+Cell[4623006, 100661, 190, 5, 26, "Input",ExpressionUUID->"07237824-5e81-41b0-bd1d-7d744858c3ed"],
+Cell[4623199, 100668, 245, 4, 30, "Input",ExpressionUUID->"4d28e53c-4af5-40ba-890a-a6a9f9544d99"],
+Cell[4623447, 100674, 245, 4, 30, "Input",ExpressionUUID->"712b80aa-b8c4-4294-a783-8d276a083f12"],
+Cell[CellGroupData[{
+Cell[4623717, 100682, 245, 4, 30, "Input",ExpressionUUID->"0121b0f2-33a2-4f93-abd0-b7335f00f4ba"],
+Cell[4623965, 100688, 482, 11, 24, "Message",ExpressionUUID->"535114a6-b030-4308-8246-00c024410468"],
+Cell[4624450, 100701, 488, 11, 24, "Message",ExpressionUUID->"3fff711e-1dcc-463e-a740-414e01e7545b"],
+Cell[4624941, 100714, 200, 4, 24, "Print",ExpressionUUID->"02b1fe8c-97b1-4f62-af5e-560a0f061657"],
+Cell[4625144, 100720, 485, 11, 24, "Message",ExpressionUUID->"4d229124-7f85-4bce-9345-8223a1b56caa"],
+Cell[4625632, 100733, 488, 11, 24, "Message",ExpressionUUID->"9b026f9b-c1da-4642-96e1-ffec3e99e1ad"],
+Cell[4626123, 100746, 200, 4, 24, "Print",ExpressionUUID->"ee45a9cb-8f55-46b4-86d8-aa90b6d7b196"],
+Cell[4626326, 100752, 483, 11, 24, "Message",ExpressionUUID->"3f134fed-054a-4e7f-bf83-da4ec88b63a5"],
+Cell[4626812, 100765, 478, 10, 24, "Message",ExpressionUUID->"deb651cd-9750-4f33-8892-dc4873ea19f8"],
+Cell[4627293, 100777, 490, 11, 24, "Message",ExpressionUUID->"5597723e-0b2d-4d43-b93e-f96034ffcb06"],
+Cell[4627786, 100790, 476, 10, 24, "Message",ExpressionUUID->"8ef06157-c74b-48e8-9c7f-327d7302c28c"],
+Cell[CellGroupData[{
+Cell[4628287, 100804, 200, 4, 24, "Print",ExpressionUUID->"6d010356-450e-479a-ba67-eeb3e26ec291"],
+Cell[4628490, 100810, 202, 4, 24, "Print",ExpressionUUID->"3f15cc52-1ff6-45cb-a9fd-644d776c5f89"],
+Cell[4628695, 100816, 200, 4, 24, "Print",ExpressionUUID->"4feea194-42f6-4ca1-9312-62f92ec665a5"],
+Cell[4628898, 100822, 202, 4, 24, "Print",ExpressionUUID->"6258c9d5-91a7-48d5-8231-34e495c40fa5"],
+Cell[4629103, 100828, 200, 4, 24, "Print",ExpressionUUID->"ffc76446-691d-4b15-befd-5803a78522c1"],
+Cell[4629306, 100834, 200, 4, 24, "Print",ExpressionUUID->"0837e534-d7bb-47f7-aed6-303356623331"],
+Cell[4629509, 100840, 202, 4, 24, "Print",ExpressionUUID->"f10d2730-aa78-4b6e-80cd-badb4c9a088b"],
+Cell[4629714, 100846, 200, 4, 24, "Print",ExpressionUUID->"38a8da08-2436-4aa2-9ed3-acd6b62059aa"]
+}, Open  ]],
+Cell[4629929, 100853, 198, 3, 34, "Output",ExpressionUUID->"3bacc01c-d443-45cd-8552-6920b7d54570"]
+}, Closed]],
+Cell[4630142, 100859, 224, 5, 26, "Input",ExpressionUUID->"0a825a05-32b2-4319-8639-70ebb7dae721"],
+Cell[4630369, 100866, 226, 5, 30, "Input",ExpressionUUID->"e4a86cf3-8ee8-4a68-8635-217b0ba4a640"],
+Cell[4630598, 100873, 223, 5, 30, "Input",ExpressionUUID->"4e14b37b-639b-46ea-b50a-b14416358740"],
+Cell[4630824, 100880, 226, 5, 30, "Input",ExpressionUUID->"bf2275c2-8d1c-4d02-b7e4-41137641140c"],
+Cell[4631053, 100887, 224, 5, 30, "Input",ExpressionUUID->"6e0c2be4-ee3a-45fa-b831-83a1095ac1be"],
+Cell[4631280, 100894, 224, 5, 30, "Input",ExpressionUUID->"9186e914-9912-4033-a987-f84144195af6"],
+Cell[4631507, 100901, 224, 5, 30, "Input",ExpressionUUID->"f6a2e77b-0b25-4468-8b4c-79e5f414742d"],
+Cell[4631734, 100908, 222, 5, 30, "Input",ExpressionUUID->"a3b27975-8859-466d-a7c0-b105c7fe73d9"],
+Cell[4631959, 100915, 1318, 40, 94, "Input",ExpressionUUID->"25926e05-bb3c-422b-8e2b-9a57e964ba2b"],
+Cell[CellGroupData[{
+Cell[4633302, 100959, 553, 12, 94, "Input",ExpressionUUID->"a36cae1e-df45-49d4-a412-416ac62654e5"],
+Cell[4633858, 100973, 498, 14, 46, "Output",ExpressionUUID->"a396975e-2717-4a82-90d1-7c091fb198e9"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[4634393, 100992, 258, 6, 30, "Input",ExpressionUUID->"9b7c4721-c242-428f-936b-c73b023c8d5b"],
+Cell[4634654, 101000, 632, 18, 56, "Output",ExpressionUUID->"234fb216-0308-486e-aa4f-ee9ceb3aa02b"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[4635323, 101023, 261, 6, 30, "Input",ExpressionUUID->"38f9a86e-2833-456d-aa7a-12baa82bf6d4"],
+Cell[4635587, 101031, 1757, 56, 85, "Output",ExpressionUUID->"1c05b19f-f3b9-494a-b37f-364f77e0b0b1"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[4637381, 101092, 1315, 34, 94, "Input",ExpressionUUID->"b2c199ef-3321-44d3-a08a-1b1de3e1b269"],
+Cell[4638699, 101128, 8708, 229, 381, "Output",ExpressionUUID->"f04f6eb6-3a6c-42bd-b978-23a251c30109"]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[4647444, 101362, 1021, 29, 69, "Input",ExpressionUUID->"a7e9b28f-cd05-4629-a301-685337db32b1"],
+Cell[4648468, 101393, 8656, 228, 381, "Output",ExpressionUUID->"fb8aa450-fac0-43d2-94fb-164b894fd43e"]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[4657161, 101626, 558, 13, 48, "Input",ExpressionUUID->"1e5b2a80-6558-4a6a-a208-6ffd66be10ca"],
+Cell[4657722, 101641, 155, 3, 34, "Output",ExpressionUUID->"ba76a9bc-1692-4293-93e4-3b98a9ab7916"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[4657914, 101649, 993, 28, 73, "Input",ExpressionUUID->"0c715131-89c6-40ef-8f9e-32d8bd8c07e3"],
+Cell[4658910, 101679, 6402, 173, 229, "Output",ExpressionUUID->"ee09fd16-2531-4ab1-be6d-4d7237f2c0f6"]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[4665349, 101857, 1136, 31, 69, "Input",ExpressionUUID->"192cc319-c4e4-49c2-9aae-8c5e3d52b6b5"],
+Cell[4666488, 101890, 8682, 228, 381, "Output",ExpressionUUID->"72f30e8f-2cdf-4cf1-b2ac-4bad814133c2"]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[4675207, 102123, 453, 12, 48, "Input",ExpressionUUID->"aa4bbc56-9042-4ac4-9da9-d8a6a099ffb0"],
+Cell[4675663, 102137, 3697, 95, 120, "Output",ExpressionUUID->"5dd7bd0b-df4b-42b4-afa6-169da77820b0"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[4679397, 102237, 493, 12, 52, "Input",ExpressionUUID->"acbb6382-4324-4bfb-aa84-71272d55c7d4"],
+Cell[4679893, 102251, 156, 3, 34, "Output",ExpressionUUID->"f4100da3-c681-47f2-ac13-8b324b099b4e"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[4680086, 102259, 414, 10, 52, "Input",ExpressionUUID->"1be0f3b4-e047-4a26-9afa-df89d8bb25eb"],
+Cell[4680503, 102271, 3754, 97, 120, "Output",ExpressionUUID->"481fa417-77b8-4946-b4f9-04ed930e142d"]
+}, Open  ]],
+Cell[4684272, 102371, 304, 6, 157, "Input",ExpressionUUID->"1e1abde8-f7ad-44b1-99b4-1370e978f66d"]
+}
+]
+*)
+
diff --git a/tests/ggH.m b/tests/ggH.m
new file mode 100644
index 0000000000000000000000000000000000000000..369a5e16871cbcec5c664aac2d0c77dfa28b39b0
--- /dev/null
+++ b/tests/ggH.m
@@ -0,0 +1,7 @@
+(* Created with the Wolfram Language for Students - Personal Use Only : www.wolfram.com *)
+(Alfas*EL*MT2*Mat[SUNT[Glu1, Glu2, 0, 0]]*
+  ((B0i[bb0, MH2, MT2, MT2] - 4*C0i[cc00, 0, MH2, 0, MT2, MT2, MT2])*
+    Pair[e[1], e[2]] + 4*C0i[cc12, 0, MH2, 0, MT2, MT2, MT2]*Pair[e[1], k[2]]*
+    Pair[e[2], k[1]] - (C0i[cc0, 0, MH2, 0, MT2, MT2, MT2]*
+     (-(MH2*Pair[e[1], e[2]]) + 2*Pair[e[1], k[2]]*Pair[e[2], k[1]]))/2))/
+ (MW*Pi*SW)
diff --git a/tests/ggH_LR.m b/tests/ggH_LR.m
new file mode 100644
index 0000000000000000000000000000000000000000..e70966583d5f76935c9ae9968d710c2bb2b8b508
--- /dev/null
+++ b/tests/ggH_LR.m
@@ -0,0 +1,5 @@
+(* Created with the Wolfram Language for Students - Personal Use Only : www.wolfram.com *)
+(Alfas*EL*MT^2*(-4*MH^2 + (MH^2 - 4*MT^2)*
+    Log[(-MH^2 + 2*MT^2 + Sqrt[MH^4 - 4*MH^2*MT^2])/(2*MT^2)]^2)*
+  Mat[SUNT[Glu1, Glu2, 0, 0]]*(MH^2*Pair[e[1], e[2]] - 
+   2*Pair[e[1], k[2]]*Pair[e[2], k[1]]))/(4*MH^4*MW*Pi*SW)
diff --git a/tests/ggHg.m b/tests/ggHg.m
new file mode 100644
index 0000000000000000000000000000000000000000..bbd9f0ff616fc8ea676e6726c03f279af21810cb
--- /dev/null
+++ b/tests/ggHg.m
@@ -0,0 +1,125 @@
+(* Created with the Wolfram Language for Students - Personal Use Only : www.wolfram.com *)
+(Alfas*EL*GS*MT2*Mat[SUNT[Glu1, Glu2, Glu4, 0, 0]]*
+   (Den[S, 0]*((B0i[bb0, S, MT2, MT2] - 4*C0i[cc00, MH2, S, 0, MT2, MT2, 
+          MT2])*(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]])) - 
+      2*(C0i[cc11, MH2, S, 0, MT2, MT2, MT2] + C0i[cc12, MH2, S, 0, 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]] - 
+      C0i[cc1, MH2, S, 0, MT2, MT2, MT2]*(2*(-MH2 + S)*Pair[e[1], k[2]]*
+         Pair[e[2], ec[4]] + 2*(MH2 - S)*Pair[e[1], ec[4]]*Pair[e[2], k[1]] + 
+        8*(-(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[e[1], e[2]]*
+         (2*(T + U)*Pair[ec[4], k[1]] + (T - 3*U)*Pair[ec[4], k[3]])) - 
+      C0i[cc0, MH2, S, 0, MT2, MT2, MT2]*((-MH2 + S)*Pair[e[1], k[2]]*
+         Pair[e[2], ec[4]] + (MH2 - S)*Pair[e[1], ec[4]]*Pair[e[2], k[1]] + 
+        2*(-(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[e[1], e[2]]*
+         ((T + U)*Pair[ec[4], k[1]] - U*Pair[ec[4], k[3]]))) + 
+    Den[U, 0]*((B0i[bb0, U, MT2, MT2] - 4*C0i[cc00, 0, U, MH2, MT2, MT2, 
+          MT2])*(2*Pair[e[1], k[4]]*Pair[e[2], ec[4]] - 
+        Pair[e[1], ec[4]]*(Pair[e[2], k[1]] + Pair[e[2], k[4]]) + 
+        2*Pair[e[1], e[2]]*Pair[ec[4], k[1]]) - 
+      2*C0i[cc12, 0, U, MH2, MT2, MT2, MT2]*Pair[e[2], k[3]]*
+       ((-S + T)*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]])) - 
+      C0i[cc0, 0, U, MH2, MT2, MT2, MT2]*((-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*Pair[e[2], k[3]]) + (-MH2 + U)*Pair[e[1], e[2]]*
+         Pair[ec[4], k[1]] + 2*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]])) - 2*C0i[cc22, 0, U, MH2, MT2, MT2, MT2]*
+       Pair[e[2], k[3]]*((-S + 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]])) - C0i[cc2, 0, U, MH2, MT2, MT2, MT2]*
+       (2*(-MH2 + U)*Pair[e[1], k[4]]*Pair[e[2], ec[4]] + 
+        Pair[e[1], ec[4]]*(2*(S + T)*Pair[e[2], k[1]] + 
+          (-3*S + T)*Pair[e[2], k[3]]) + 2*(-MH2 + U)*Pair[e[1], e[2]]*
+         Pair[ec[4], k[1]] + 8*Pair[e[2], k[3]]*
+         (Pair[e[1], k[3]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*
+           Pair[ec[4], k[3]]))) - Den[T, 0]*
+     ((B0i[bb0, T, MT2, MT2] - 4*C0i[cc00, MH2, T, 0, MT2, MT2, MT2])*
+       (-((Pair[e[1], k[2]] + Pair[e[1], k[4]])*Pair[e[2], ec[4]]) + 
+        2*Pair[e[1], ec[4]]*Pair[e[2], k[4]] + 2*Pair[e[1], e[2]]*
+         Pair[ec[4], k[2]]) - C0i[cc0, MH2, T, 0, MT2, MT2, MT2]*
+       (((S + U)*Pair[e[1], k[2]] - S*Pair[e[1], k[3]])*Pair[e[2], ec[4]] - 
+        (MH2 - T)*(Pair[e[1], ec[4]]*Pair[e[2], k[4]] + Pair[e[1], e[2]]*
+           Pair[ec[4], k[2]]) + 2*Pair[e[1], k[3]]*
+         (Pair[e[2], k[4]]*Pair[ec[4], k[1]] + Pair[e[2], k[1]]*
+           Pair[ec[4], k[2]])) - C0i[cc1, MH2, T, 0, MT2, MT2, MT2]*
+       ((2*(S + U)*Pair[e[1], k[2]] + (-3*S + U)*Pair[e[1], k[3]])*
+         Pair[e[2], ec[4]] - 2*(MH2 - T)*(Pair[e[1], ec[4]]*
+           Pair[e[2], k[4]] + Pair[e[1], e[2]]*Pair[ec[4], k[2]]) + 
+        8*Pair[e[1], k[3]]*(Pair[e[2], k[3]]*Pair[ec[4], k[2]] + 
+          Pair[e[2], k[4]]*Pair[ec[4], k[3]])) - 
+      2*(C0i[cc12, MH2, T, 0, MT2, MT2, MT2]*Pair[e[1], k[3]]*
+         ((-S + U)*Pair[e[2], ec[4]] + 
+          4*(-(Pair[e[2], k[3]]*Pair[ec[4], k[1]]) + Pair[e[2], k[1]]*
+             Pair[ec[4], k[3]])) + C0i[cc11, MH2, T, 0, MT2, MT2, MT2]*
+         Pair[e[1], k[3]]*((-S + U)*Pair[e[2], ec[4]] + 
+          4*(Pair[e[2], k[3]]*Pair[ec[4], k[2]] + Pair[e[2], k[4]]*
+             Pair[ec[4], k[3]]))))))/(MW*Pi*SW) - 
+ (Alfas*EL*GS*MT2*Mat[SUNT[Glu1, Glu4, Glu2, 0, 0]]*
+   (Den[S, 0]*((B0i[bb0, S, MT2, MT2] - 4*C0i[cc00, MH2, S, 0, MT2, MT2, 
+          MT2])*(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]])) - 
+      2*(C0i[cc11, MH2, S, 0, MT2, MT2, MT2] + C0i[cc12, MH2, S, 0, 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]] - 
+      C0i[cc1, MH2, S, 0, MT2, MT2, MT2]*(2*(-MH2 + S)*Pair[e[1], k[2]]*
+         Pair[e[2], ec[4]] + 2*(MH2 - S)*Pair[e[1], ec[4]]*Pair[e[2], k[1]] + 
+        8*(-(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[e[1], e[2]]*
+         (2*(T + U)*Pair[ec[4], k[1]] + (T - 3*U)*Pair[ec[4], k[3]])) - 
+      C0i[cc0, MH2, S, 0, MT2, MT2, MT2]*((-MH2 + S)*Pair[e[1], k[2]]*
+         Pair[e[2], ec[4]] + (MH2 - S)*Pair[e[1], ec[4]]*Pair[e[2], k[1]] + 
+        2*(-(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[e[1], e[2]]*
+         ((T + U)*Pair[ec[4], k[1]] - U*Pair[ec[4], k[3]]))) + 
+    Den[U, 0]*((B0i[bb0, U, MT2, MT2] - 4*C0i[cc00, 0, U, MH2, MT2, MT2, 
+          MT2])*(2*Pair[e[1], k[4]]*Pair[e[2], ec[4]] - 
+        Pair[e[1], ec[4]]*(Pair[e[2], k[1]] + Pair[e[2], k[4]]) + 
+        2*Pair[e[1], e[2]]*Pair[ec[4], k[1]]) - 
+      2*C0i[cc12, 0, U, MH2, MT2, MT2, MT2]*Pair[e[2], k[3]]*
+       ((-S + T)*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]])) - 
+      C0i[cc0, 0, U, MH2, MT2, MT2, MT2]*((-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*Pair[e[2], k[3]]) + (-MH2 + U)*Pair[e[1], e[2]]*
+         Pair[ec[4], k[1]] + 2*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]])) - 2*C0i[cc22, 0, U, MH2, MT2, MT2, MT2]*
+       Pair[e[2], k[3]]*((-S + 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]])) - C0i[cc2, 0, U, MH2, MT2, MT2, MT2]*
+       (2*(-MH2 + U)*Pair[e[1], k[4]]*Pair[e[2], ec[4]] + 
+        Pair[e[1], ec[4]]*(2*(S + T)*Pair[e[2], k[1]] + 
+          (-3*S + T)*Pair[e[2], k[3]]) + 2*(-MH2 + U)*Pair[e[1], e[2]]*
+         Pair[ec[4], k[1]] + 8*Pair[e[2], k[3]]*
+         (Pair[e[1], k[3]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*
+           Pair[ec[4], k[3]]))) - Den[T, 0]*
+     ((B0i[bb0, T, MT2, MT2] - 4*C0i[cc00, MH2, T, 0, MT2, MT2, MT2])*
+       (-((Pair[e[1], k[2]] + Pair[e[1], k[4]])*Pair[e[2], ec[4]]) + 
+        2*Pair[e[1], ec[4]]*Pair[e[2], k[4]] + 2*Pair[e[1], e[2]]*
+         Pair[ec[4], k[2]]) - C0i[cc0, MH2, T, 0, MT2, MT2, MT2]*
+       (((S + U)*Pair[e[1], k[2]] - S*Pair[e[1], k[3]])*Pair[e[2], ec[4]] - 
+        (MH2 - T)*(Pair[e[1], ec[4]]*Pair[e[2], k[4]] + Pair[e[1], e[2]]*
+           Pair[ec[4], k[2]]) + 2*Pair[e[1], k[3]]*
+         (Pair[e[2], k[4]]*Pair[ec[4], k[1]] + Pair[e[2], k[1]]*
+           Pair[ec[4], k[2]])) - C0i[cc1, MH2, T, 0, MT2, MT2, MT2]*
+       ((2*(S + U)*Pair[e[1], k[2]] + (-3*S + U)*Pair[e[1], k[3]])*
+         Pair[e[2], ec[4]] - 2*(MH2 - T)*(Pair[e[1], ec[4]]*
+           Pair[e[2], k[4]] + Pair[e[1], e[2]]*Pair[ec[4], k[2]]) + 
+        8*Pair[e[1], k[3]]*(Pair[e[2], k[3]]*Pair[ec[4], k[2]] + 
+          Pair[e[2], k[4]]*Pair[ec[4], k[3]])) - 
+      2*(C0i[cc12, MH2, T, 0, MT2, MT2, MT2]*Pair[e[1], k[3]]*
+         ((-S + U)*Pair[e[2], ec[4]] + 
+          4*(-(Pair[e[2], k[3]]*Pair[ec[4], k[1]]) + Pair[e[2], k[1]]*
+             Pair[ec[4], k[3]])) + C0i[cc11, MH2, T, 0, MT2, MT2, MT2]*
+         Pair[e[1], k[3]]*((-S + U)*Pair[e[2], ec[4]] + 
+          4*(Pair[e[2], k[3]]*Pair[ec[4], k[2]] + Pair[e[2], k[4]]*
+             Pair[ec[4], k[3]]))))))/(MW*Pi*SW)
diff --git a/tests/ggHg_LR.m b/tests/ggHg_LR.m
new file mode 100644
index 0000000000000000000000000000000000000000..eecf972ab3d1ef3c7c3cf225129fdb83e117142e
--- /dev/null
+++ b/tests/ggHg_LR.m
@@ -0,0 +1,93 @@
+(* Created with the Wolfram Language for Students - Personal Use Only : www.wolfram.com *)
+(Alfas*EL*GS*MT^2*(Mat[SUNT[Glu1, Glu2, Glu4, 0, 0]] - 
+   Mat[SUNT[Glu1, Glu4, Glu2, 0, 0]])*
+  (-((2*(MH^2 - S)*(MH^2 - S + MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]] - 
+        MH^2*DiscB[S, Sqrt[MT^2], Sqrt[MT^2]] + 
+        MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[MH^4 - 4*MH^2*MT^2])/(2*MT^2)]^2 - 
+        MT^2*Log[(2*MT^2 - S + Sqrt[S*(-4*MT^2 + S)])/(2*MT^2)]^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]])) + 2*(MH^2 - S + (2*MH^2 - S)*
+         DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]] + (-2*MH^2 + S)*
+         DiscB[S, Sqrt[MT^2], Sqrt[MT^2]] + 
+        MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[MH^4 - 4*MH^2*MT^2])/(2*MT^2)]^2 - 
+        MT^2*Log[(2*MT^2 - S + Sqrt[S*(-4*MT^2 + S)])/(2*MT^2)]^2)*
+       ((T - U)*Pair[e[1], e[2]] + 4*Pair[e[1], k[3]]*Pair[e[2], k[1]] - 
+        4*Pair[e[1], k[2]]*Pair[e[2], k[3]])*Pair[ec[4], k[3]] + 
+      2*(MH^2 - S)*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]] - 
+        DiscB[S, Sqrt[MT^2], Sqrt[MT^2]])*(2*(-MH^2 + S)*Pair[e[1], k[2]]*
+         Pair[e[2], ec[4]] + 2*(MH^2 - S)*Pair[e[1], ec[4]]*
+         Pair[e[2], k[1]] + 8*(-(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[e[1], e[2]]*(2*(T + U)*Pair[ec[4], k[1]] + 
+          (T - 3*U)*Pair[ec[4], k[3]])) + (MH^2 - S)*
+       (Log[(-MH^2 + 2*MT^2 + Sqrt[MH^4 - 4*MH^2*MT^2])/(2*MT^2)]^2 - 
+        Log[(2*MT^2 - S + Sqrt[S*(-4*MT^2 + S)])/(2*MT^2)]^2)*
+       ((-MH^2 + S)*Pair[e[1], k[2]]*Pair[e[2], ec[4]] + 
+        (MH^2 - S)*Pair[e[1], ec[4]]*Pair[e[2], k[1]] + 
+        2*(-(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[e[1], e[2]]*
+         ((T + U)*Pair[ec[4], k[1]] - U*Pair[ec[4], k[3]])))/
+     ((MH^2 - S)^2*S)) + 
+   (-2*(MH^2 - U)*(MH^2 - U + MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]] - 
+       MH^2*DiscB[U, Sqrt[MT^2], Sqrt[MT^2]] + 
+       MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[MH^4 - 4*MH^2*MT^2])/(2*MT^2)]^2 - 
+       MT^2*Log[(2*MT^2 - U + Sqrt[U*(-4*MT^2 + U)])/(2*MT^2)]^2)*
+      (2*Pair[e[1], k[4]]*Pair[e[2], ec[4]] - Pair[e[1], ec[4]]*
+        (Pair[e[2], k[1]] + Pair[e[2], k[4]]) + 2*Pair[e[1], e[2]]*
+        Pair[ec[4], k[1]]) + 
+     2*(MH^2 - U + MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]] - 
+       MH^2*DiscB[U, Sqrt[MT^2], Sqrt[MT^2]] + 
+       MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[MH^4 - 4*MH^2*MT^2])/(2*MT^2)]^2 - 
+       MT^2*Log[(2*MT^2 - U + Sqrt[U*(-4*MT^2 + U)])/(2*MT^2)]^2)*
+      Pair[e[2], k[3]]*((-S + T)*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]])) - (MH^2 - U)*
+      (Log[(-MH^2 + 2*MT^2 + Sqrt[MH^4 - 4*MH^2*MT^2])/(2*MT^2)]^2 - 
+       Log[(2*MT^2 - U + Sqrt[U*(-4*MT^2 + U)])/(2*MT^2)]^2)*
+      (Pair[e[1], ec[4]]*((MH^2 - U)*Pair[e[2], k[1]] - S*Pair[e[2], k[3]]) + 
+       ((-MH^2 + U)*Pair[e[1], e[2]] + 2*Pair[e[1], k[2]]*Pair[e[2], k[3]])*
+        Pair[ec[4], k[1]] + Pair[e[1], k[4]]*((-MH^2 + U)*Pair[e[2], ec[4]] + 
+         2*Pair[e[2], k[3]]*Pair[ec[4], k[2]])) + 
+     2*(MH^2 - U)*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]] - 
+       DiscB[U, Sqrt[MT^2], Sqrt[MT^2]])*Pair[e[2], k[3]]*
+      ((-S + 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]])) - 
+     2*(MH^2 - U)*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]] - 
+       DiscB[U, Sqrt[MT^2], Sqrt[MT^2]])*
+      (Pair[e[1], ec[4]]*(2*(S + T)*Pair[e[2], k[1]] + 
+         (-3*S + T)*Pair[e[2], k[3]]) + 2*((-MH^2 + U)*Pair[e[1], e[2]] + 
+         4*Pair[e[1], k[3]]*Pair[e[2], k[3]])*Pair[ec[4], k[1]] + 
+       Pair[e[1], k[4]]*(-2*(MH^2 - U)*Pair[e[2], ec[4]] + 
+         8*Pair[e[2], k[3]]*Pair[ec[4], k[3]])))/((MH^2 - U)^2*U) + 
+   (-2*(MH^2 - T)*(MH^2 - T + MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]] - 
+       MH^2*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]] + 
+       MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[MH^4 - 4*MH^2*MT^2])/(2*MT^2)]^2 - 
+       MT^2*Log[(2*MT^2 - T + Sqrt[T*(-4*MT^2 + T)])/(2*MT^2)]^2)*
+      (Pair[e[1], k[2]]*Pair[e[2], ec[4]] + Pair[e[1], k[4]]*
+        Pair[e[2], ec[4]] - 2*(Pair[e[1], ec[4]]*Pair[e[2], k[4]] + 
+         Pair[e[1], e[2]]*Pair[ec[4], k[2]])) + 
+     (MH^2 - T)*(Log[(-MH^2 + 2*MT^2 + Sqrt[MH^4 - 4*MH^2*MT^2])/(2*MT^2)]^
+        2 - Log[(2*MT^2 - T + Sqrt[T*(-4*MT^2 + T)])/(2*MT^2)]^2)*
+      ((S + U)*Pair[e[1], k[2]]*Pair[e[2], ec[4]] - 
+       (MH^2 - T)*(Pair[e[1], ec[4]]*Pair[e[2], k[4]] + 
+         Pair[e[1], e[2]]*Pair[ec[4], k[2]]) + Pair[e[1], k[3]]*
+        (-(S*Pair[e[2], ec[4]]) + 2*Pair[e[2], k[4]]*Pair[ec[4], k[1]] + 
+         2*Pair[e[2], k[1]]*Pair[ec[4], k[2]])) - 2*Pair[e[1], k[3]]*
+      ((MH^2 - T + MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]] - 
+         MH^2*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]] + 
+         MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[MH^4 - 4*MH^2*MT^2])/(2*MT^2)]^2 - 
+         MT^2*Log[(2*MT^2 - T + Sqrt[T*(-4*MT^2 + T)])/(2*MT^2)]^2)*
+        ((-S + U)*Pair[e[2], ec[4]] - 4*Pair[e[2], k[3]]*Pair[ec[4], k[1]] + 
+         4*Pair[e[2], k[1]]*Pair[ec[4], k[3]]) + 
+       (MH^2 - T)*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]] - 
+         DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])*((-S + U)*Pair[e[2], ec[4]] + 
+         4*(Pair[e[2], k[3]]*Pair[ec[4], k[2]] + Pair[e[2], k[4]]*
+            Pair[ec[4], k[3]]))) + 2*(MH^2 - T)*
+      (DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]] - DiscB[T, Sqrt[MT^2], 
+        Sqrt[MT^2]])*(2*(S + U)*Pair[e[1], k[2]]*Pair[e[2], ec[4]] - 
+       2*(MH^2 - T)*(Pair[e[1], ec[4]]*Pair[e[2], k[4]] + 
+         Pair[e[1], e[2]]*Pair[ec[4], k[2]]) + Pair[e[1], k[3]]*
+        ((-3*S + U)*Pair[e[2], ec[4]] + 
+         8*(Pair[e[2], k[3]]*Pair[ec[4], k[2]] + Pair[e[2], k[4]]*
+            Pair[ec[4], k[3]]))))/((MH^2 - T)^2*T)))/(2*MW*Pi*SW)
diff --git a/tests/ggHgg_LR_triangle_2diags.m b/tests/ggHgg_LR_triangle_2diags.m
new file mode 100644
index 0000000000000000000000000000000000000000..ffc67c9bc6a01a91bbdea07de3e0f27b673571f3
--- /dev/null
+++ b/tests/ggHgg_LR_triangle_2diags.m
@@ -0,0 +1,281 @@
+(* Created with the Wolfram Language for Students - Personal Use Only : www.wolfram.com *)
+Amp[{{V[5, {Glu1}], k[1], 0, {Sqrt[3]*ColorCharge}}, 
+    {V[5, {Glu2}], k[2], 0, {Sqrt[3]*ColorCharge}}} -> 
+   {{S[1], k[3], MH, {}}, {V[5, {Glu4}], k[4], 0, {Sqrt[3]*ColorCharge}}, 
+    {V[5, {Glu5}], k[5], 0, {Sqrt[3]*ColorCharge}}}][
+ (B*((-4*Alfas^2*EL*MT^2*(2 + Eps^(-1) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]] + 
+        Log[Mu^2/MT^2])*(-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]]))/(MW*SW) + 
+     (16*Alfas^2*EL*MT^2*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+         (4*(MH^2 - T)) - (T*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/
+         (4*(MH^2 - T)) + 
+        (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^
+           2)/(4*(MH^2 - T)) + (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+        (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+         (4*(MH^2 - T)))*(-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]]))/(MW*SW) - 
+     (16*Alfas^2*EL*MT^2*(-1/(2*(MH^2 - T)) - 
+        (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - T)^2) + 
+        (MH^2*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - T)^2) - 
+        (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^
+           2)/(2*(MH^2 - T)^2) + 
+        (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+         (2*(MH^2 - T)^2))*Pair[e[1], k[3]]*
+       (-(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]]))/
+      (MW*SW) + (2*Alfas^2*EL*MT^2*
+       (Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+         (2*(MH^2 - T)) - Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/
+            (2*MT^2)]^2/(2*(MH^2 - T)))*
+       (((-MH^2 + 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]]*
+         ((-MH^2 + T)*Pair[e[1], ec[4]] + 2*Pair[e[1], k[3]]*
+           Pair[ec[4], k[1]]) - 2*Pair[e[2], ec[4]]*
+         ((-MH^2 + T)*Pair[e[1], ec[5]] + 2*Pair[e[1], k[3]]*
+           Pair[ec[5], k[1]])))/(MW*SW) + 
+     (16*Alfas^2*EL*MT^2*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+         (2*(MH^2 - T)) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - T)))*
+       Pair[e[1], k[3]]*(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]]))/(MW*SW) + 
+     (4*Alfas^2*EL*MT^2*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T) - 
+        DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T))*
+       (((-MH^2 + 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]]*((-MH^2 + T)*Pair[e[1], ec[4]] + 
+          2*Pair[e[1], k[3]]*(Pair[ec[4], k[1]] + Pair[ec[4], k[3]])) - 
+        2*Pair[e[2], ec[4]]*((-MH^2 + T)*Pair[e[1], ec[5]] + 
+          2*Pair[e[1], k[3]]*(Pair[ec[5], k[1]] + Pair[ec[5], k[3]]))))/
+      (MW*SW)))/T + 
+  (C*((-4*Alfas^2*EL*MT^2*(2 + Eps^(-1) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]] + 
+        Log[Mu^2/MT^2])*(-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]]))/(MW*SW) + 
+     (16*Alfas^2*EL*MT^2*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+         (4*(MH^2 - T)) - (T*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/
+         (4*(MH^2 - T)) + 
+        (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^
+           2)/(4*(MH^2 - T)) + (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+        (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+         (4*(MH^2 - T)))*(-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]]))/(MW*SW) - 
+     (16*Alfas^2*EL*MT^2*(-1/(2*(MH^2 - T)) - 
+        (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - T)^2) + 
+        (MH^2*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - T)^2) - 
+        (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^
+           2)/(2*(MH^2 - T)^2) + 
+        (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+         (2*(MH^2 - T)^2))*Pair[e[1], k[3]]*
+       (-(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]]))/
+      (MW*SW) + (2*Alfas^2*EL*MT^2*
+       (Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+         (2*(MH^2 - T)) - Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/
+            (2*MT^2)]^2/(2*(MH^2 - T)))*
+       (((-MH^2 + 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]]*
+         ((-MH^2 + T)*Pair[e[1], ec[4]] + 2*Pair[e[1], k[3]]*
+           Pair[ec[4], k[1]]) - 2*Pair[e[2], ec[4]]*
+         ((-MH^2 + T)*Pair[e[1], ec[5]] + 2*Pair[e[1], k[3]]*
+           Pair[ec[5], k[1]])))/(MW*SW) + 
+     (16*Alfas^2*EL*MT^2*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+         (2*(MH^2 - T)) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - T)))*
+       Pair[e[1], k[3]]*(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]]))/(MW*SW) + 
+     (4*Alfas^2*EL*MT^2*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T) - 
+        DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T))*
+       (((-MH^2 + 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]]*((-MH^2 + T)*Pair[e[1], ec[4]] + 
+          2*Pair[e[1], k[3]]*(Pair[ec[4], k[1]] + Pair[ec[4], k[3]])) - 
+        2*Pair[e[2], ec[4]]*((-MH^2 + T)*Pair[e[1], ec[5]] + 
+          2*Pair[e[1], k[3]]*(Pair[ec[5], k[1]] + Pair[ec[5], k[3]]))))/
+      (MW*SW)))/T + 
+  (A*((-4*Alfas^2*EL*MT^2*(2 + Eps^(-1) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]] + 
+        Log[Mu^2/MT^2])*(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]]))/(MW*SW) + 
+     (16*Alfas^2*EL*MT^2*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+         (4*(MH^2 - T)) - (T*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/
+         (4*(MH^2 - T)) + 
+        (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^
+           2)/(4*(MH^2 - T)) + (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+        (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+         (4*(MH^2 - T)))*(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]]))/(MW*SW) + 
+     (16*Alfas^2*EL*MT^2*(-1/(2*(MH^2 - T)) - 
+        (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - T)^2) + 
+        (MH^2*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - T)^2) - 
+        (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^
+           2)/(2*(MH^2 - T)^2) + 
+        (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+         (2*(MH^2 - T)^2))*Pair[e[1], k[3]]*
+       (-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]]))/(MW*SW) - 
+     (2*Alfas^2*EL*MT^2*
+       (Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+         (2*(MH^2 - T)) - Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/
+            (2*MT^2)]^2/(2*(MH^2 - T)))*
+       (2*((-MH^2 + 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]]*
+         ((-MH^2 + T)*Pair[e[1], ec[4]] + 2*Pair[e[1], k[3]]*
+           Pair[ec[4], k[1]]) - Pair[e[2], ec[4]]*
+         ((-MH^2 + T)*Pair[e[1], ec[5]] + 2*Pair[e[1], k[3]]*
+           Pair[ec[5], k[1]])))/(MW*SW) - 
+     (16*Alfas^2*EL*MT^2*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+         (2*(MH^2 - T)) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - T)))*
+       Pair[e[1], k[3]]*(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]]))/(MW*SW) - 
+     (4*Alfas^2*EL*MT^2*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T) - 
+        DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T))*
+       (2*((-MH^2 + 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]]*((-MH^2 + 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]]*((-MH^2 + T)*Pair[e[1], ec[5]] + 
+          2*Pair[e[1], k[3]]*(Pair[ec[5], k[1]] + Pair[ec[5], k[3]]))))/
+      (MW*SW)))/T + 
+  (D*((-4*Alfas^2*EL*MT^2*(2 + Eps^(-1) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]] + 
+        Log[Mu^2/MT^2])*(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]]))/(MW*SW) + 
+     (16*Alfas^2*EL*MT^2*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+         (4*(MH^2 - T)) - (T*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/
+         (4*(MH^2 - T)) + 
+        (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^
+           2)/(4*(MH^2 - T)) + (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+        (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+         (4*(MH^2 - T)))*(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]]))/(MW*SW) + 
+     (16*Alfas^2*EL*MT^2*(-1/(2*(MH^2 - T)) - 
+        (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - T)^2) + 
+        (MH^2*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - T)^2) - 
+        (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^
+           2)/(2*(MH^2 - T)^2) + 
+        (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+         (2*(MH^2 - T)^2))*Pair[e[1], k[3]]*
+       (-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]]))/(MW*SW) - 
+     (2*Alfas^2*EL*MT^2*
+       (Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+         (2*(MH^2 - T)) - Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/
+            (2*MT^2)]^2/(2*(MH^2 - T)))*
+       (2*((-MH^2 + 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]]*
+         ((-MH^2 + T)*Pair[e[1], ec[4]] + 2*Pair[e[1], k[3]]*
+           Pair[ec[4], k[1]]) - Pair[e[2], ec[4]]*
+         ((-MH^2 + T)*Pair[e[1], ec[5]] + 2*Pair[e[1], k[3]]*
+           Pair[ec[5], k[1]])))/(MW*SW) - 
+     (16*Alfas^2*EL*MT^2*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+         (2*(MH^2 - T)) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - T)))*
+       Pair[e[1], k[3]]*(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]]))/(MW*SW) - 
+     (4*Alfas^2*EL*MT^2*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T) - 
+        DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T))*
+       (2*((-MH^2 + 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]]*((-MH^2 + 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]]*((-MH^2 + T)*Pair[e[1], ec[5]] + 
+          2*Pair[e[1], k[3]]*(Pair[ec[5], k[1]] + Pair[ec[5], k[3]]))))/
+      (MW*SW)))/T + 
+  (F*((4*Alfas^2*EL*MT^2*(2 + Eps^(-1) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]] + 
+        Log[Mu^2/MT^2])*(-(Pair[e[1], ec[5]]*Pair[e[2], ec[4]]) + 
+        2*Pair[e[1], ec[4]]*Pair[e[2], ec[5]] - Pair[e[1], e[2]]*
+         Pair[ec[4], ec[5]]))/(MW*SW) - 
+     (16*Alfas^2*EL*MT^2*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+         (4*(MH^2 - T)) - (T*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/
+         (4*(MH^2 - T)) + 
+        (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^
+           2)/(4*(MH^2 - T)) + (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+        (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+         (4*(MH^2 - T)))*(-(Pair[e[1], ec[5]]*Pair[e[2], ec[4]]) + 
+        2*Pair[e[1], ec[4]]*Pair[e[2], ec[5]] - Pair[e[1], e[2]]*
+         Pair[ec[4], ec[5]]))/(MW*SW) + 
+     (16*Alfas^2*EL*MT^2*(-1/(2*(MH^2 - T)) - 
+        (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - T)^2) + 
+        (MH^2*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - T)^2) - 
+        (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^
+           2)/(2*(MH^2 - T)^2) + 
+        (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+         (2*(MH^2 - T)^2))*Pair[e[1], k[3]]*
+       (Pair[e[2], k[1]]*Pair[ec[4], ec[5]] - 2*Pair[e[2], ec[5]]*
+         Pair[ec[4], k[1]] + Pair[e[2], ec[4]]*Pair[ec[5], k[1]]))/(MW*SW) + 
+     (2*Alfas^2*EL*MT^2*
+       (Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+         (2*(MH^2 - T)) - Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/
+            (2*MT^2)]^2/(2*(MH^2 - T)))*
+       (((-MH^2 + T)*Pair[e[1], e[2]] + 2*Pair[e[1], k[3]]*Pair[e[2], k[1]])*
+         Pair[ec[4], ec[5]] - 2*Pair[e[2], ec[5]]*
+         ((-MH^2 + T)*Pair[e[1], ec[4]] + 2*Pair[e[1], k[3]]*
+           Pair[ec[4], k[1]]) + Pair[e[2], ec[4]]*
+         ((-MH^2 + T)*Pair[e[1], ec[5]] + 2*Pair[e[1], k[3]]*
+           Pair[ec[5], k[1]])))/(MW*SW) + 
+     (16*Alfas^2*EL*MT^2*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+         (2*(MH^2 - T)) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - T)))*
+       Pair[e[1], k[3]]*(Pair[e[2], k[3]]*Pair[ec[4], ec[5]] - 
+        2*Pair[e[2], ec[5]]*Pair[ec[4], k[3]] + Pair[e[2], ec[4]]*
+         Pair[ec[5], k[3]]))/(MW*SW) + 
+     (4*Alfas^2*EL*MT^2*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T) - 
+        DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T))*
+       (((-MH^2 + 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]] - 
+        2*Pair[e[2], ec[5]]*((-MH^2 + 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]]*((-MH^2 + T)*Pair[e[1], ec[5]] + 
+          2*Pair[e[1], k[3]]*(Pair[ec[5], k[1]] + Pair[ec[5], k[3]]))))/
+      (MW*SW)))/T + 
+  (G*((4*Alfas^2*EL*MT^2*(2 + Eps^(-1) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]] + 
+        Log[Mu^2/MT^2])*(-(Pair[e[1], ec[5]]*Pair[e[2], ec[4]]) + 
+        2*Pair[e[1], ec[4]]*Pair[e[2], ec[5]] - Pair[e[1], e[2]]*
+         Pair[ec[4], ec[5]]))/(MW*SW) - 
+     (16*Alfas^2*EL*MT^2*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+         (4*(MH^2 - T)) - (T*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/
+         (4*(MH^2 - T)) + 
+        (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^
+           2)/(4*(MH^2 - T)) + (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+        (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+         (4*(MH^2 - T)))*(-(Pair[e[1], ec[5]]*Pair[e[2], ec[4]]) + 
+        2*Pair[e[1], ec[4]]*Pair[e[2], ec[5]] - Pair[e[1], e[2]]*
+         Pair[ec[4], ec[5]]))/(MW*SW) + 
+     (16*Alfas^2*EL*MT^2*(-1/(2*(MH^2 - T)) - 
+        (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - T)^2) + 
+        (MH^2*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - T)^2) - 
+        (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^
+           2)/(2*(MH^2 - T)^2) + 
+        (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+         (2*(MH^2 - T)^2))*Pair[e[1], k[3]]*
+       (Pair[e[2], k[1]]*Pair[ec[4], ec[5]] - 2*Pair[e[2], ec[5]]*
+         Pair[ec[4], k[1]] + Pair[e[2], ec[4]]*Pair[ec[5], k[1]]))/(MW*SW) + 
+     (2*Alfas^2*EL*MT^2*
+       (Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+         (2*(MH^2 - T)) - Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/
+            (2*MT^2)]^2/(2*(MH^2 - T)))*
+       (((-MH^2 + T)*Pair[e[1], e[2]] + 2*Pair[e[1], k[3]]*Pair[e[2], k[1]])*
+         Pair[ec[4], ec[5]] - 2*Pair[e[2], ec[5]]*
+         ((-MH^2 + T)*Pair[e[1], ec[4]] + 2*Pair[e[1], k[3]]*
+           Pair[ec[4], k[1]]) + Pair[e[2], ec[4]]*
+         ((-MH^2 + T)*Pair[e[1], ec[5]] + 2*Pair[e[1], k[3]]*
+           Pair[ec[5], k[1]])))/(MW*SW) + 
+     (16*Alfas^2*EL*MT^2*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+         (2*(MH^2 - T)) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - T)))*
+       Pair[e[1], k[3]]*(Pair[e[2], k[3]]*Pair[ec[4], ec[5]] - 
+        2*Pair[e[2], ec[5]]*Pair[ec[4], k[3]] + Pair[e[2], ec[4]]*
+         Pair[ec[5], k[3]]))/(MW*SW) + 
+     (4*Alfas^2*EL*MT^2*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T) - 
+        DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T))*
+       (((-MH^2 + 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]] - 
+        2*Pair[e[2], ec[5]]*((-MH^2 + 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]]*((-MH^2 + T)*Pair[e[1], ec[5]] + 
+          2*Pair[e[1], k[3]]*(Pair[ec[5], k[1]] + Pair[ec[5], k[3]]))))/
+      (MW*SW)))/T]
diff --git a/tests/ggHgg_triangle_FeynAmp_2diags.m b/tests/ggHgg_triangle_FeynAmp_2diags.m
new file mode 100644
index 0000000000000000000000000000000000000000..a0e51a8b7289b9d3f1a521e5a23619ce6318bf95
--- /dev/null
+++ b/tests/ggHgg_triangle_FeynAmp_2diags.m
@@ -0,0 +1,167 @@
+(* Created with the Wolfram Language for Students - Personal Use Only : www.wolfram.com *)
+Amp[{{V[5, {Glu1}], k[1], 0, {Sqrt[3]*ColorCharge}}, 
+    {V[5, {Glu2}], k[2], 0, {Sqrt[3]*ColorCharge}}} -> 
+   {{S[1], k[3], MH, {}}, {V[5, {Glu4}], k[4], 0, {Sqrt[3]*ColorCharge}}, 
+    {V[5, {Glu5}], k[5], 0, {Sqrt[3]*ColorCharge}}}][
+ Den[T, 0]*Mat[SUNT[Glu1, Glu2, Glu5, Glu4, 0, 0]]*
+   ((-4*Alfas2*EL*MT2*B0i[bb0, T, 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]]))/(MW*SW) + 
+    (16*Alfas2*EL*MT2*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]]))/(MW*SW) - 
+    (16*Alfas2*EL*MT2*C0i[cc12, MH2, T, 0, MT2, MT2, MT2]*Pair[e[1], k[3]]*
+      (-(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]]))/(MW*SW) + 
+    (2*Alfas2*EL*MT2*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]])))/(MW*SW) + 
+    (16*Alfas2*EL*MT2*C0i[cc11, MH2, T, 0, MT2, MT2, MT2]*Pair[e[1], k[3]]*
+      (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]]))/(MW*SW) + 
+    (4*Alfas2*EL*MT2*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]]*
+        ((-MH2 + T)*Pair[e[1], ec[4]] + 2*Pair[e[1], k[3]]*
+          (Pair[ec[4], k[1]] + Pair[ec[4], k[3]])) - 2*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]]))))/(MW*SW)) + 
+  Den[T, 0]*Mat[SUNT[Glu1, Glu4, Glu5, Glu2, 0, 0]]*
+   ((-4*Alfas2*EL*MT2*B0i[bb0, T, 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]]))/(MW*SW) + 
+    (16*Alfas2*EL*MT2*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]]))/(MW*SW) - 
+    (16*Alfas2*EL*MT2*C0i[cc12, MH2, T, 0, MT2, MT2, MT2]*Pair[e[1], k[3]]*
+      (-(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]]))/(MW*SW) + 
+    (2*Alfas2*EL*MT2*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]])))/(MW*SW) + 
+    (16*Alfas2*EL*MT2*C0i[cc11, MH2, T, 0, MT2, MT2, MT2]*Pair[e[1], k[3]]*
+      (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]]))/(MW*SW) + 
+    (4*Alfas2*EL*MT2*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]]*
+        ((-MH2 + T)*Pair[e[1], ec[4]] + 2*Pair[e[1], k[3]]*
+          (Pair[ec[4], k[1]] + Pair[ec[4], k[3]])) - 2*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]]))))/(MW*SW)) + 
+  Den[T, 0]*Mat[SUNT[Glu1, Glu4, Glu2, Glu5, 0, 0]]*
+   ((-4*Alfas2*EL*MT2*B0i[bb0, T, 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]]))/(MW*SW) + 
+    (16*Alfas2*EL*MT2*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]]))/(MW*SW) + 
+    (16*Alfas2*EL*MT2*C0i[cc12, MH2, T, 0, MT2, MT2, MT2]*Pair[e[1], k[3]]*
+      (-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]]))/(MW*SW) - 
+    (2*Alfas2*EL*MT2*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]])))/(MW*SW) - 
+    (16*Alfas2*EL*MT2*C0i[cc11, MH2, T, 0, MT2, MT2, MT2]*Pair[e[1], k[3]]*
+      (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]]))/(MW*SW) - 
+    (4*Alfas2*EL*MT2*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]]))))/
+     (MW*SW)) + Den[T, 0]*Mat[SUNT[Glu1, Glu5, Glu2, Glu4, 0, 0]]*
+   ((-4*Alfas2*EL*MT2*B0i[bb0, T, 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]]))/(MW*SW) + 
+    (16*Alfas2*EL*MT2*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]]))/(MW*SW) + 
+    (16*Alfas2*EL*MT2*C0i[cc12, MH2, T, 0, MT2, MT2, MT2]*Pair[e[1], k[3]]*
+      (-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]]))/(MW*SW) - 
+    (2*Alfas2*EL*MT2*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]])))/(MW*SW) - 
+    (16*Alfas2*EL*MT2*C0i[cc11, MH2, T, 0, MT2, MT2, MT2]*Pair[e[1], k[3]]*
+      (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]]))/(MW*SW) - 
+    (4*Alfas2*EL*MT2*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]]))))/
+     (MW*SW)) + Den[T, 0]*Mat[SUNT[Glu1, Glu2, Glu4, Glu5, 0, 0]]*
+   ((4*Alfas2*EL*MT2*B0i[bb0, T, MT2, MT2]*
+      (-(Pair[e[1], ec[5]]*Pair[e[2], ec[4]]) + 2*Pair[e[1], ec[4]]*
+        Pair[e[2], ec[5]] - Pair[e[1], e[2]]*Pair[ec[4], ec[5]]))/(MW*SW) - 
+    (16*Alfas2*EL*MT2*C0i[cc00, MH2, T, 0, MT2, MT2, MT2]*
+      (-(Pair[e[1], ec[5]]*Pair[e[2], ec[4]]) + 2*Pair[e[1], ec[4]]*
+        Pair[e[2], ec[5]] - Pair[e[1], e[2]]*Pair[ec[4], ec[5]]))/(MW*SW) + 
+    (16*Alfas2*EL*MT2*C0i[cc12, MH2, T, 0, MT2, MT2, MT2]*Pair[e[1], k[3]]*
+      (Pair[e[2], k[1]]*Pair[ec[4], ec[5]] - 2*Pair[e[2], ec[5]]*
+        Pair[ec[4], k[1]] + Pair[e[2], ec[4]]*Pair[ec[5], k[1]]))/(MW*SW) + 
+    (2*Alfas2*EL*MT2*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]] - 2*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]])))/(MW*SW) + 
+    (16*Alfas2*EL*MT2*C0i[cc11, MH2, T, 0, MT2, MT2, MT2]*Pair[e[1], k[3]]*
+      (Pair[e[2], k[3]]*Pair[ec[4], ec[5]] - 2*Pair[e[2], ec[5]]*
+        Pair[ec[4], k[3]] + Pair[e[2], ec[4]]*Pair[ec[5], k[3]]))/(MW*SW) + 
+    (4*Alfas2*EL*MT2*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]] - 2*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]]))))/(MW*SW)) + 
+  Den[T, 0]*Mat[SUNT[Glu1, Glu5, Glu4, Glu2, 0, 0]]*
+   ((4*Alfas2*EL*MT2*B0i[bb0, T, MT2, MT2]*
+      (-(Pair[e[1], ec[5]]*Pair[e[2], ec[4]]) + 2*Pair[e[1], ec[4]]*
+        Pair[e[2], ec[5]] - Pair[e[1], e[2]]*Pair[ec[4], ec[5]]))/(MW*SW) - 
+    (16*Alfas2*EL*MT2*C0i[cc00, MH2, T, 0, MT2, MT2, MT2]*
+      (-(Pair[e[1], ec[5]]*Pair[e[2], ec[4]]) + 2*Pair[e[1], ec[4]]*
+        Pair[e[2], ec[5]] - Pair[e[1], e[2]]*Pair[ec[4], ec[5]]))/(MW*SW) + 
+    (16*Alfas2*EL*MT2*C0i[cc12, MH2, T, 0, MT2, MT2, MT2]*Pair[e[1], k[3]]*
+      (Pair[e[2], k[1]]*Pair[ec[4], ec[5]] - 2*Pair[e[2], ec[5]]*
+        Pair[ec[4], k[1]] + Pair[e[2], ec[4]]*Pair[ec[5], k[1]]))/(MW*SW) + 
+    (2*Alfas2*EL*MT2*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]] - 2*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]])))/(MW*SW) + 
+    (16*Alfas2*EL*MT2*C0i[cc11, MH2, T, 0, MT2, MT2, MT2]*Pair[e[1], k[3]]*
+      (Pair[e[2], k[3]]*Pair[ec[4], ec[5]] - 2*Pair[e[2], ec[5]]*
+        Pair[ec[4], k[3]] + Pair[e[2], ec[4]]*Pair[ec[5], k[3]]))/(MW*SW) + 
+    (4*Alfas2*EL*MT2*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]] - 2*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]]))))/(MW*SW))]
diff --git a/tests/triangle_++++.m b/tests/triangle_++++.m
new file mode 100644
index 0000000000000000000000000000000000000000..b7dd41648927ff8d607b1485a472a201550095f8
--- /dev/null
+++ b/tests/triangle_++++.m
@@ -0,0 +1,38214 @@
+(* Created with the Wolfram Language for Students - Personal Use Only : www.wolfram.com *)
+(-2*Alfas^2*c2*EL*MT^2*
+   (((4*(2 + Eps^(-1) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]] + Log[Mu^2/MT^2]) - 
+        16*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - T)) - 
+          (T*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - T)) + 
+          (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*
+                MT^2)]^2)/(4*(MH^2 - T)) + (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+          (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+           (4*(MH^2 - T))))*
+       (-(((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+          Sqrt[2]) - (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                  kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                    Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                   kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                    Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                    \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+         (2*Sqrt[2]) - (Sech[\[Eta]4]*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]) - 
+      2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+         (2*(MH^2 - T)) - Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/
+            (2*MT^2)]^2/(2*(MH^2 - T)))*
+       (-(Sech[\[Eta]4]*(((-MH^2 + T)*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] - 
+           (kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                   Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                  kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                   Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                 (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+             (Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2])*
+          (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4])) + 
+        ((MH^2 - T)*Sech[\[Eta]4]*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] + 
+        (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+          (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/2 - 
+           ((-MH^2 + T)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2))/Sqrt[2]) - 
+      8*Sqrt[2]*kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+       ((-1/(2*(MH^2 - T)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+           (2*(MH^2 - T)^2) + (MH^2*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/
+           (2*(MH^2 - T)^2) - (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[
+                 -(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/(2*(MH^2 - T)^2) + 
+          (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+           (2*(MH^2 - T)^2))*
+         (-(Sqrt[S]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4])/4 + 
+          (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+            (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2) + 
+        (-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - T)) + 
+          DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - T)))*
+         (kT3*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                  kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          (kT3*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/2 + 
+          (kT3*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + 
+             Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2)) - 
+      4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T) - 
+        DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T))*
+       (-(Sech[\[Eta]4]*(((-MH^2 + T)*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+           Sqrt[2]*kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+            (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 - 
+             kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])))*
+          (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4])) + 
+        (Sech[\[Eta]4]*(MH^2 - T + kT3^2*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+            (Cos[\[Phi]3] + I*Sin[\[Phi]3]))*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] + 
+        (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+          (-((-MH^2 + T)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[
+                \[Eta]4 + I*\[Phi]4]))/2 + Sqrt[2]*kT3*(Cos[\[Phi]3] + 
+             I*Sin[\[Phi]3])*(-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+             (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                  I*\[Phi]4]))/Sqrt[2])))/Sqrt[2]))/T + 
+    ((4*(2 + Eps^(-1) + DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]] + 
+          Log[Mu^2/MT^2]) - 16*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+             Sqrt[MT^2]])/(4*(MH^2 - S34)) - 
+          (S34*DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - S34)) + 
+          (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*
+                MT^2)]^2)/(4*(MH^2 - S34)) + (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+          (MT^2*Log[(2*MT^2 - S34 + Sqrt[-((4*MT^2 - S34)*S34)])/(2*MT^2)]^2)/
+           (4*(MH^2 - S34))))*
+       (-(((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+          Sqrt[2]) - (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                  kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                    Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                   kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                    Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                    \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+         (2*Sqrt[2]) - (Sech[\[Eta]4]*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]) + 
+      (kT3*Sech[\[Eta]4]*(-16*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+            (2*(MH^2 - S34)) + DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]]/
+            (2*(MH^2 - S34)))*
+          (-(kT3*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(Cos[\[Phi]3] - 
+              I*Sin[\[Phi]3])) + (kT3*((-I)*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(Cos[\[Phi]3] + 
+              I*Sin[\[Phi]3]))/2 + 
+           kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])) + 
+         16*(-1/(2*(MH^2 - S34)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+            (2*(MH^2 - S34)^2) + (MH^2*DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]])/
+            (2*(MH^2 - S34)^2) - (MT^2*Log[(-MH^2 + 2*MT^2 + 
+                 Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/
+            (2*(MH^2 - S34)^2) + (MT^2*Log[(2*MT^2 - S34 + Sqrt[
+                  -((4*MT^2 - S34)*S34)])/(2*MT^2)]^2)/(2*(MH^2 - S34)^2))*
+          (-(kT4*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(Cos[\[Phi]4] - 
+              I*Sin[\[Phi]4])) + (kT4*((-I)*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(Cos[\[Phi]4] + 
+              I*Sin[\[Phi]4]))/2 + 
+           kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])))*
+        (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2] - 
+      4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - S34) - 
+        DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - S34))*
+       (-(((-MH^2 + S34)*Sech[\[Eta]4]*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]) - 
+        Sqrt[2]*kT3*Sech[\[Eta]4]*
+         (-(kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])) + 
+          kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]))*
+         (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]) - 
+        Sqrt[2]*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+          Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+              Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[
+                kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*
+                kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+         (((-MH^2 + S34)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 + Sqrt[2]*kT3*Sech[\[Eta]4]*
+           ((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] - 
+            (kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/Sqrt[2])*
+           (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4])) + 
+        (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+          (-((-MH^2 + S34)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[
+                \[Eta]4 + I*\[Phi]4]))/2 + Sqrt[2]*kT3*Sech[\[Eta]4]*
+            ((kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2] - 
+             (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4]))/Sqrt[2])*
+            (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4])))/
+         Sqrt[2]) - 2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+            (2*MT^2)]^2/(2*(MH^2 - S34)) - 
+        Log[(2*MT^2 - S34 + Sqrt[-((4*MT^2 - S34)*S34)])/(2*MT^2)]^2/
+         (2*(MH^2 - S34)))*(((MH^2 - S34)*Sech[\[Eta]4]*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] - 
+        Sqrt[2]*kT3*kT4*Sech[\[Eta]4]*
+         (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+          Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+          Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+         (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]) + 
+        Sqrt[2]*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+          Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+              Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[
+                kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*
+                kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+         (((MH^2 - S34)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 + kT3*kT4*Sech[\[Eta]4]*
+           (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-Sinh[\[Eta]3] + 
+            Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4])) - 
+        (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+          (-((MH^2 - S34)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[
+                \[Eta]4 + I*\[Phi]4]))/2 + kT3*kT4*Sech[\[Eta]4]*
+            (Cos[\[Phi]4] + I*Sin[\[Phi]4])*(-Sinh[\[Eta]3] + 
+             Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4])))/Sqrt[2]) - 
+      ((4*(2 + Eps^(-1) + DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]] + 
+            Log[Mu^2/MT^2]) - 16*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[
+                MT^2]])/(4*(MH^2 - S34)) - (S34*DiscB[S34, Sqrt[MT^2], Sqrt[
+                MT^2]])/(4*(MH^2 - S34)) + 
+            (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                 (2*MT^2)]^2)/(4*(MH^2 - S34)) + (Eps^(-1) + Log[Mu^2/MT^2])/
+             4 - (MT^2*Log[(2*MT^2 - S34 + Sqrt[-((4*MT^2 - S34)*S34)])/
+                 (2*MT^2)]^2)/(4*(MH^2 - S34))))*
+         (-(((-T - T14 + T24 + U)*Sech[\[Eta]4]*
+             (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                 I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                 I*\[Phi]4]))/Sqrt[2]) - (kT3*Sqrt[S]*Conjugate[
+             1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                    \[Phi]4])]]*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + 
+             Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]) - 
+        4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - S34) - 
+          DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - S34))*
+         (-((S*(MH^2 - S34)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                   Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                  kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                   Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                 (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+             Sech[\[Eta]4])/Sqrt[2]) - (S*(-MH^2 + S34)*
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4])/Sqrt[2] - 
+          ((MH^2 - S34)*(T + T14 - T24 - U)*Sech[\[Eta]4]*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] - (kT3*Sech[\[Eta]4]*
+            ((Sqrt[S]*(-7*MH^2 + 2*S + 3*S34 + 8*T)*Conjugate[
+                1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                     Cos[\[Phi]3 - \[Phi]4])]])/2 - (Sqrt[S]*(7*MH^2 - 2*S - 
+                3*S34 - 8*U)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 - 
+             4*kT3*(-2*MH^2 + S + S34 + 2*T24 + 2*U)*
+              (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))*
+            (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+           Sqrt[2]) + 8*((kT3*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+              (2*(MH^2 - S34)) + DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]]/
+              (2*(MH^2 - S34)))*Sech[\[Eta]4]*(-(Sqrt[S]*(3*MH^2 - S34 - 4*T)*
+                Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+             (Sqrt[S]*(-3*MH^2 + S34 + 4*U)*Conjugate[
+                1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                     Cos[\[Phi]3 - \[Phi]4])]])/2 + 2*kT3*(T + T14 - T24 - U)*
+              (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))*
+            (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+           Sqrt[2] + (kT3*(-1/(2*(MH^2 - S34)) - (MH^2*DiscB[MH^2, 
+                Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - S34)^2) + 
+             (MH^2*DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - S34)^2) - 
+             (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                  (2*MT^2)]^2)/(2*(MH^2 - S34)^2) + 
+             (MT^2*Log[(2*MT^2 - S34 + Sqrt[-((4*MT^2 - S34)*S34)])/(2*MT^2)]^
+                2)/(2*(MH^2 - S34)^2))*Sech[\[Eta]4]*
+            ((Sqrt[S]*(MH^2 - S34 - 2*(T14 + T24))*Conjugate[
+                1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                     Cos[\[Phi]3 - \[Phi]4])]])/2 - (Sqrt[S]*(-MH^2 + S34 + 
+                2*(T14 + T24))*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 - 
+             2*kT3*(-T14 + T24)*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]3] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]3]) - 2*kT4*(T - U)*(Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]4] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]4]))*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+               I*\[Phi]4]))/Sqrt[2]) - 
+        2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+           (2*(MH^2 - S34)) - Log[(2*MT^2 - S34 + Sqrt[-((4*MT^2 - S34)*
+                  S34)])/(2*MT^2)]^2/(2*(MH^2 - S34)))*
+         (-(((MH^2 - S34)*(T + T14 - T24 - U)*Sech[\[Eta]4]*
+             (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                 I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                 I*\[Phi]4]))/Sqrt[2]) - 
+          2*(-(S*(-MH^2 + S34)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[
+                \[Eta]4])/(2*Sqrt[2]) + (Sqrt[S]*(MH^2 - S34)*Sech[\[Eta]4]*
+              (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                2 + kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+                 Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]) + kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+                 Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4])))/Sqrt[2] + (kT3*Sech[\[Eta]4]*
+              (-(Sqrt[S]*(T14 + T24)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                      4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                        2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                       Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                       Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                        \[Phi]3 - \[Phi]4])]]) + 2*kT3*T14*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]) - kT4*(T - T14 - T24 - U)*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4]))*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                 I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2])))/S)/S34 + 
+    ((4*(2 + Eps^(-1) + DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]] + 
+          Log[Mu^2/MT^2]) - 16*(3/4 - (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+             Sqrt[MT^2]])/(4*(MH^2 - S34 - T - U)) + 
+          ((2*MH^2 - S34 - T - U)*DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], 
+             Sqrt[MT^2]])/(4*(MH^2 - S34 - T - U)) - 
+          (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*
+                MT^2)]^2)/(4*(MH^2 - S34 - T - U)) + 
+          (Eps^(-1) + Log[Mu^2/MT^2])/4 + 
+          (MT^2*Log[(-2*MH^2 + 2*MT^2 + S34 + T + U + Sqrt[
+                 -((2*MH^2 - S34 - T - U)*(-2*MH^2 + 4*MT^2 + S34 + T + U))])/
+               (2*MT^2)]^2)/(4*(MH^2 - S34 - T - U))))*
+       (-(((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+          Sqrt[2]) - (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                  kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                    Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                   kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                    Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                    \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+         (2*Sqrt[2]) - (Sech[\[Eta]4]*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]) - 
+      2*(-Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+         (2*(MH^2 - S34 - T - U)) + 
+        Log[(-2*MH^2 + 2*MT^2 + S34 + T + U + Sqrt[-((2*MH^2 - S34 - T - U)*
+                (-2*MH^2 + 4*MT^2 + S34 + T + U))])/(2*MT^2)]^2/
+         (2*(MH^2 - S34 - T - U)))*
+       (Sech[\[Eta]4]*(((-MH^2 + S34 + T + U)*
+            (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]))/Sqrt[2] + Sqrt[2]*kT3*
+           (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+              kT4*Sin[\[Phi]4]))*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                  kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))*
+         (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]) + 
+        (Sech[\[Eta]4]*(((-MH^2 + S34 + T + U)*((-I)*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] - 
+           Sqrt[2]*kT3*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+             I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+            (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))*
+          (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+        ((-MH^2 + S34 + T + U)*Sech[\[Eta]4]*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] - 
+        Sqrt[2]*kT3^2*Sech[\[Eta]4]*
+         (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+          Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+          Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+         (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4])) - 
+      kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+              Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+             Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+              Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                 Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                 Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+              2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+              4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+              kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+              4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+        Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+              Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+             Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+              Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                 Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                 Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+              2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+              4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+              kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+              4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+        Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+              4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+               Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                 \[Phi]4])]]*Sinh[\[Eta]3])*
+       (16*(1/(2*(MH^2 - S34 - T - U)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+             Sqrt[MT^2]])/(2*(MH^2 - S34 - T - U)^2) + 
+          (MH^2*DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]])/
+           (2*(MH^2 - S34 - T - U)^2) - 
+          (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*
+                MT^2)]^2)/(2*(MH^2 - S34 - T - U)^2) + 
+          (MT^2*Log[(-2*MH^2 + 2*MT^2 + S34 + T + U + Sqrt[
+                 -((2*MH^2 - S34 - T - U)*(-2*MH^2 + 4*MT^2 + S34 + T + U))])/
+               (2*MT^2)]^2)/(2*(MH^2 - S34 - T - U)^2))*
+         ((Sech[\[Eta]4]*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+             I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+            (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+           Sqrt[2] - (Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+             I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+           (2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+             Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]) - 
+        16*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - S34 - T - U)) - 
+          DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]]/
+           (2*(MH^2 - S34 - T - U)))*
+         (-((kT3*Sech[\[Eta]4]*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+             (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+            Sqrt[2]) - (kT3*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+           (2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + 
+             Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2])) - 
+      4*(-(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - S34 - T - U)) + 
+        DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]]/
+         (MH^2 - S34 - T - U))*(Sech[\[Eta]4]*
+         (((-MH^2 + S34 + T + U)*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                 (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]))/Sqrt[2] + 
+          2*kT3*((kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2] + 
+            (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                kT4*Sin[\[Phi]4]))/Sqrt[2])*
+           (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))*
+         (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]) + 
+        (Sech[\[Eta]4]*(((-MH^2 + S34 + T + U)*((-I)*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+           2*kT3*((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] - 
+             (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))/Sqrt[2])*
+            (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))*
+          (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+        ((-MH^2 + S34 + T + U)*Sech[\[Eta]4]*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] + 
+        2*kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+          Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+          Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+         (-((kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                I*\[Phi]4]))/Sqrt[2]) + (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + 
+             Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2])) - 
+      (4*(2 + Eps^(-1) + DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], 
+           Sqrt[MT^2]] + Log[Mu^2/MT^2])*
+         ((Sqrt[S]*Sech[\[Eta]4]*(2*Sqrt[S]*Conjugate[1/Sqrt[
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]] - 
+             kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])))/
+           (2*Sqrt[2]) - (Sqrt[S]*Sech[\[Eta]4]*
+            (2*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                    Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                   kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                    Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                  (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] + 
+             kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])))/
+           (2*Sqrt[2]) - ((-T14 + T24)*Sech[\[Eta]4]*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2]) - 
+        16*(3/4 - (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+           (4*(MH^2 - S34 - T - U)) + ((2*MH^2 - S34 - T - U)*
+            DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]])/
+           (4*(MH^2 - S34 - T - U)) - 
+          (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*
+                MT^2)]^2)/(4*(MH^2 - S34 - T - U)) + 
+          (Eps^(-1) + Log[Mu^2/MT^2])/4 + 
+          (MT^2*Log[(-2*MH^2 + 2*MT^2 + S34 + T + U + Sqrt[
+                 -((2*MH^2 - S34 - T - U)*(-2*MH^2 + 4*MT^2 + S34 + T + U))])/
+               (2*MT^2)]^2)/(4*(MH^2 - S34 - T - U)))*
+         ((Sqrt[S]*Sech[\[Eta]4]*(2*Sqrt[S]*Conjugate[1/Sqrt[
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]] - 
+             kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])))/
+           (2*Sqrt[2]) - (Sqrt[S]*Sech[\[Eta]4]*
+            (2*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                    Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                   kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                    Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                  (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] + 
+             kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])))/
+           (2*Sqrt[2]) - ((-T14 + T24)*Sech[\[Eta]4]*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2]) - 
+        4*(-(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - S34 - T - U)) + 
+          DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]]/
+           (MH^2 - S34 - T - U))*((Sqrt[S]*Sech[\[Eta]4]*
+            (-2*Sqrt[S]*(MH^2 - S - T14 - T24)*Conjugate[1/
+                Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]] - kT3*(-7*MH^2 + 5*S + 8*T + 3*
+                T14 + 3*T24)*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]3] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]3])))/(2*Sqrt[2]) - (Sqrt[S]*Sech[\[Eta]4]*
+            (2*Sqrt[S]*(-MH^2 + S + T14 + T24)*Conjugate[1/
+                Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]] - kT3*(7*MH^2 - 5*S - 3*T14 - 3*
+                T24 - 8*U)*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]3] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]3])))/(2*Sqrt[2]) - ((MH^2 - S - T14 - T24)*
+            (T14 - T24)*Sech[\[Eta]4]*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                 (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] - 2*Sqrt[2]*kT3^2*(T14 - T24)*
+           Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                  kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+           (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4])) - 
+        8*(-(kT3*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - S34 - T - 
+                U)) - DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]]/
+              (2*(MH^2 - S34 - T - U)))*
+            (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+            (-(Sqrt[S]*(MH^2 + S34 + T - 3*U)*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+             (Sqrt[S]*(MH^2 + S34 - 3*T + U)*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+             Sqrt[2]*kT3*(-T14 + T24)*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[
+                \[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))) - 
+          kT3*(1/(2*(MH^2 - S34 - T - U)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+               Sqrt[MT^2]])/(2*(MH^2 - S34 - T - U)^2) + 
+            (MH^2*DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]])/
+             (2*(MH^2 - S34 - T - U)^2) - 
+            (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                 (2*MT^2)]^2)/(2*(MH^2 - S34 - T - U)^2) + 
+            (MT^2*Log[(-2*MH^2 + 2*MT^2 + S34 + T + U + Sqrt[
+                   -((2*MH^2 - S34 - T - U)*(-2*MH^2 + 4*MT^2 + S34 + T + 
+                      U))])/(2*MT^2)]^2)/(2*(MH^2 - S34 - T - U)^2))*
+           (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+           (-(Sqrt[S]*(3*MH^2 - 3*S - 4*T - T14 - T24)*Sech[\[Eta]4])/
+             (2*Sqrt[2]) + (Sqrt[S]*(-3*MH^2 + 3*S + T14 + T24 + 4*U)*
+              Sech[\[Eta]4])/(2*Sqrt[2]) - Sqrt[2]*kT3*(-T14 + T24)*
+             Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                I*\[Phi]4]))) - 
+        2*(-Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+           (2*(MH^2 - S34 - T - U)) + 
+          Log[(-2*MH^2 + 2*MT^2 + S34 + T + U + Sqrt[-((2*MH^2 - S34 - T - U)*
+                  (-2*MH^2 + 4*MT^2 + S34 + T + U))])/(2*MT^2)]^2/
+           (2*(MH^2 - S34 - T - U)))*(-(((MH^2 - S - T14 - T24)*(T14 - T24)*
+             Sech[\[Eta]4]*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+              I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[
+                \[Eta]4 + I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                 I*\[Phi]4]))/Sqrt[2]) - 
+          2*((Sqrt[S]*Sech[\[Eta]4]*(Sqrt[S]*(MH^2 - S34 - T - U)*
+                Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - kT3*(-2*MH^2 + 
+                 2*S34 + 2*T + T14 + T24)*(Conjugate[
+                   (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3])))/(2*Sqrt[2]) + (Sqrt[S]*Sech[\[Eta]4]*
+              (-(Sqrt[S]*(MH^2 - S34 - T - U)*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]) - kT3*
+                (-2*MH^2 + 2*S34 + T14 + T24 + 2*U)*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3])))/(2*Sqrt[2]) - (kT3^2*(-T14 + T24)*
+              Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]3] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]3])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/Sqrt[2])))/S - 
+      (4*(2 + Eps^(-1) + DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], 
+           Sqrt[MT^2]] + Log[Mu^2/MT^2])*
+         (-(Sech[\[Eta]4]*(((-S + T24)*((-I)*Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+              (kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*(2*Sqrt[S]*Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                 kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]3])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+          2*(-(kT4*Sqrt[S]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                    (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(
+                Cos[\[Phi]4] + I*Sin[\[Phi]4]))/(2*Sqrt[2]) - 
+            (Sqrt[S]*Sech[\[Eta]4]*(-(Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]) - kT4*
+                (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(Cos[\[Phi]4] - 
+                 I*Sin[\[Phi]4]) - kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+                 Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3])))/(2*Sqrt[2]) + 
+            (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*((Sech[\[Eta]4]*
+                 (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]] + kT3*(Conjugate[
+                      (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]3]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                  Sinh[\[Eta]4 + I*\[Phi]4]))/2 - kT4*Sech[\[Eta]4]*
+                (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                 I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                 Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4])))/Sqrt[2])) - 
+        16*(3/4 - (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+           (4*(MH^2 - S34 - T - U)) + ((2*MH^2 - S34 - T - U)*
+            DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]])/
+           (4*(MH^2 - S34 - T - U)) - 
+          (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*
+                MT^2)]^2)/(4*(MH^2 - S34 - T - U)) + 
+          (Eps^(-1) + Log[Mu^2/MT^2])/4 + 
+          (MT^2*Log[(-2*MH^2 + 2*MT^2 + S34 + T + U + Sqrt[
+                 -((2*MH^2 - S34 - T - U)*(-2*MH^2 + 4*MT^2 + S34 + T + U))])/
+               (2*MT^2)]^2)/(4*(MH^2 - S34 - T - U)))*
+         (-(Sech[\[Eta]4]*(((-S + T24)*((-I)*Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+              (kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*(2*Sqrt[S]*Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                 kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]3])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+          2*(-(kT4*Sqrt[S]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                    (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(
+                Cos[\[Phi]4] + I*Sin[\[Phi]4]))/(2*Sqrt[2]) - 
+            (Sqrt[S]*Sech[\[Eta]4]*(-(Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]) - kT4*
+                (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(Cos[\[Phi]4] - 
+                 I*Sin[\[Phi]4]) - kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+                 Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3])))/(2*Sqrt[2]) + 
+            (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*((Sech[\[Eta]4]*
+                 (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]] + kT3*(Conjugate[
+                      (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]3]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                  Sinh[\[Eta]4 + I*\[Phi]4]))/2 - kT4*Sech[\[Eta]4]*
+                (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                 I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                 Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4])))/Sqrt[2])) + 
+        8*(-(kT3*(1/(2*(MH^2 - S34 - T - U)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+                Sqrt[MT^2]])/(2*(MH^2 - S34 - T - U)^2) + 
+             (MH^2*DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]])/
+              (2*(MH^2 - S34 - T - U)^2) - (MT^2*Log[(-MH^2 + 2*MT^2 + 
+                   Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/
+              (2*(MH^2 - S34 - T - U)^2) + (MT^2*Log[(-2*MH^2 + 2*MT^2 + 
+                   S34 + T + U + Sqrt[-((2*MH^2 - S34 - T - U)*(-2*MH^2 + 
+                       4*MT^2 + S34 + T + U))])/(2*MT^2)]^2)/
+              (2*(MH^2 - S34 - T - U)^2))*
+            (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+            (-((Sqrt[S]*(MH^2 - S34 - T - 2*T14 + U)*Sech[\[Eta]4])/Sqrt[
+                2]) - (kT4*(MH^2 - S34 - T - 2*T14 + U)*Sech[\[Eta]4]*(
+                Cos[\[Phi]4] + I*Sin[\[Phi]4])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] + 
+             (Sech[\[Eta]4]*(-(Sqrt[2]*kT3*(S - T24)*(Cos[\[Phi]3] - 
+                   I*Sin[\[Phi]3])) + (kT4*(-3*MH^2 + S + 4*T + 3*T14 + T24)*
+                  (Cos[\[Phi]4] - I*Sin[\[Phi]4]))/Sqrt[2])*(
+                Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+             8*(-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+                  (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                   I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/(4*Sqrt[2]) - 
+               (kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                 (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])))/(4*Sqrt[2]) + (kT4*(Cos[\[Phi]4] + 
+                  I*Sin[\[Phi]4])*(-(kT3^2*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+                      I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - 
+                        I*\[Phi]3 + I*\[Phi]4]))/2 + (kT3*Sech[\[Eta]4]*
+                    (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                     I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                    (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                   2))/Sqrt[2]))) - kT3*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+             (2*(MH^2 - S34 - T - U)) - DiscB[2*MH^2 - S34 - T - U, 
+              Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - S34 - T - U)))*
+           (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+           (-((Sqrt[S]*(MH^2 - S34 - T + U)*Sech[\[Eta]4])/Sqrt[2]) - 
+            (kT4*(MH^2 - S34 - T + U)*Sech[\[Eta]4]*(Cos[\[Phi]4] + I*
+                Sin[\[Phi]4])*(Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + 
+                 I*\[Phi]4]))/Sqrt[2] - (Sech[\[Eta]4]*(Sqrt[2]*kT3*(S - T24)*
+                (Cos[\[Phi]3] - I*Sin[\[Phi]3]) + (kT4*(MH^2 + S34 - 3*T + U)*
+                 (Cos[\[Phi]4] - I*Sin[\[Phi]4]))/Sqrt[2])*
+              (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+            8*(-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+                 (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/(4*Sqrt[2]) - 
+              (kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])))/(4*Sqrt[2]) + (kT4*(Cos[\[Phi]4] + 
+                 I*Sin[\[Phi]4])*(-(kT3^2*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+                     I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - 
+                       I*\[Phi]3 + I*\[Phi]4]))/2 + (kT3*Sech[\[Eta]4]*
+                   (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                    I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                   (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                  2))/Sqrt[2]))) - 
+        2*(-Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+           (2*(MH^2 - S34 - T - U)) + 
+          Log[(-2*MH^2 + 2*MT^2 + S34 + T + U + Sqrt[-((2*MH^2 - S34 - T - U)*
+                  (-2*MH^2 + 4*MT^2 + S34 + T + U))])/(2*MT^2)]^2/
+           (2*(MH^2 - S34 - T - U)))*
+         (-(Sech[\[Eta]4]*(-(((S - T24)*(-MH^2 + S + T14 + T24)*
+                 ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2]) - 
+              2*(-((kT3^2*(S - T24)*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                   (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]3]))/Sqrt[2]) + (kT4*(Cos[\[Phi]4] - 
+                   I*Sin[\[Phi]4])*(-(Sqrt[S]*(MH^2 - S34 - T - U)*Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]) - kT3*(-2*MH^2 + S + 2*S34 + T24 + 
+                     2*U)*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                         (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[
+                          kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                        Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                      Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                          (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                          Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]3])))/Sqrt[2]))*
+             (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+          4*(-(kT4*Sqrt[S]*(MH^2 - S34 - T - U)*(I*Conjugate[
+                  (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(
+                Cos[\[Phi]4] - I*Sin[\[Phi]4]))/(4*Sqrt[2]) + 
+            (kT4*Sqrt[S]*(MH^2 - S34 - T - U)*((-I)*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (Cos[\[Phi]4] + I*Sin[\[Phi]4]))/(4*Sqrt[2]) + 
+            (Sqrt[S]*Sech[\[Eta]4]*((Sqrt[S]*(-MH^2 + S34 + T + U)*
+                 Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                       Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                       Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                        \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                2 - kT3*(-MH^2 + S + T24 + U)*(Conjugate[
+                   (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3])))/(2*Sqrt[2]) + 
+            (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*((Sech[\[Eta]4]*
+                 ((Sqrt[S]*(-MH^2 + S34 + T + U)*Conjugate[1/Sqrt[
+                       (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 - 
+                  kT3*(-MH^2 + S + T24 + U)*(Conjugate[
+                      (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]3]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                  Sinh[\[Eta]4 + I*\[Phi]4]))/2 + (kT4*(MH^2 - S34 - T - U)*
+                 Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                 (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                  I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                  Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/2))/
+             Sqrt[2] + 2*kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+             (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+                 (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/(4*Sqrt[2]) - 
+              (kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])))/(4*Sqrt[2]) + (kT4*(Cos[\[Phi]4] + 
+                 I*Sin[\[Phi]4])*(-(kT3^2*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+                     I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - 
+                       I*\[Phi]3 + I*\[Phi]4]))/2 + (kT3*Sech[\[Eta]4]*
+                   (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                    I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                   (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                  2))/Sqrt[2]))) - 4*(-(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+            (MH^2 - S34 - T - U)) + DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], 
+            Sqrt[MT^2]]/(MH^2 - S34 - T - U))*
+         (-(Sech[\[Eta]4]*(-(((S - T24)*(-MH^2 + S + T14 + T24)*
+                 ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2]) - 
+              2*Sqrt[2]*kT3^2*(-S + T24)*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*(
+                Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                       Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                  (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+                Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                       Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                       Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                        \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 Sinh[\[Eta]3]) + (kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                (-2*Sqrt[S]*(MH^2 - S - T14 - T24)*Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                 kT3*(-7*MH^2 + 3*S + 8*T + 5*T14 + 3*T24)*
+                  (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]3])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+          2*(-(kT4*Sqrt[S]*(MH^2 - S34 - T - U)*(I*Conjugate[
+                  (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(
+                Cos[\[Phi]4] - I*Sin[\[Phi]4]))/(2*Sqrt[2]) + 
+            (kT4*Sqrt[S]*(MH^2 - S34 - T - U)*((-I)*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (Cos[\[Phi]4] + I*Sin[\[Phi]4]))/(2*Sqrt[2]) + 
+            (Sqrt[S]*Sech[\[Eta]4]*(Sqrt[S]*(-MH^2 + S34 + T + U)*
+                Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - kT3*(3*MH^2 - 
+                 3*S34 - 3*T - 2*T14 + U)*(Conjugate[
+                   (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3])))/(2*Sqrt[2]) + 
+            (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*((Sech[\[Eta]4]*
+                 (Sqrt[S]*(-MH^2 + S34 + T + U)*Conjugate[1/Sqrt[
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                        2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                  kT3*(3*MH^2 - 3*S34 - 3*T - 2*T14 + U)*(Conjugate[
+                      (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]3]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                  Sinh[\[Eta]4 + I*\[Phi]4]))/2 + kT4*(MH^2 - S34 - T - U)*
+                Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                        Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                        Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                         \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                 I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                 Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4])))/Sqrt[2] + 
+            8*kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                     Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+             (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+                 (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/(4*Sqrt[2]) - 
+              (kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])))/(4*Sqrt[2]) + (kT4*(Cos[\[Phi]4] + 
+                 I*Sin[\[Phi]4])*(-(kT3^2*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+                     I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - 
+                       I*\[Phi]3 + I*\[Phi]4]))/2 + (kT3*Sech[\[Eta]4]*
+                   (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                    I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                   (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                  2))/Sqrt[2]))))/T14)/(2*MH^2 - S34 - T - U) + 
+    ((4*T14*((-2*MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+           Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U] + 
+          ((S + T14 + T24 + U)*DiscB[T14, Sqrt[MT^2], Sqrt[MT^2]])/
+           Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U] + 
+          ((2*MH^2 - S - T14 - T24 - U)*DiscB[MH^2 - S - T24 - U, Sqrt[MT^2], 
+             Sqrt[MT^2]])/Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U] - 
+          (MH^2*(S - T14 + T24 + U)*ScalarC0[MH^2, T14, MH^2 - S - T24 - U, 
+             Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]])/Kallen\[Lambda][MH^2, T14, 
+            MH^2 - S - T24 - U])*(-2*Sqrt[2]*Sqrt[S]*Sech[\[Eta]4]*
+           (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+            ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                       \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(-(kT3*Cos[\[Phi]3]) - 
+               kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/
+             2) - (Sech[\[Eta]4]*(((2*S - S34 + T - 2*T24)*(
+                (-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] - 
+             4*((kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 (Cos[\[Phi]4] - I*Sin[\[Phi]4]))/(2*Sqrt[2]) + 
+               ((-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                 (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]])/2 - kT4*(Conjugate[
+                      (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4])))/Sqrt[2]))*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 4*Sqrt[2]*kT4*
+           (Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+           ((Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+              (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/4 + 
+            (Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*
+                (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]))/2) - 2*Sqrt[2]*
+           ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*((Sqrt[S]*Sech[\[Eta]4]*
+              (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])))/4 + (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+              ((Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) + (kT3*Sech[\[Eta]4]*
+                 (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                Sqrt[2]))/Sqrt[2])) - 
+        8*(3/4 + (MH^2*(S - T14 + T24 + U)*DiscB[MH^2, Sqrt[MT^2], 
+             Sqrt[MT^2]])/(4*Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - 
+              U]) - (T14*(2*MH^2 - S - T14 - T24 - U)*DiscB[T14, Sqrt[MT^2], 
+             Sqrt[MT^2]])/(4*Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - 
+              U]) - ((MH^2 - S - T24 - U)*(S + T14 + T24 + U)*
+            DiscB[MH^2 - S - T24 - U, Sqrt[MT^2], Sqrt[MT^2]])/
+           (4*Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U]) + 
+          (Eps^(-1) + Log[Mu^2/MT^2])/4 + 
+          ((MT^2*S^2 + MH^4*T14 - 4*MH^2*MT^2*T14 - MH^2*S*T14 + 
+             2*MT^2*S*T14 + MT^2*T14^2 + 2*MT^2*S*T24 - MH^2*T14*T24 + 
+             2*MT^2*T14*T24 + MT^2*T24^2 + 2*MT^2*S*U - MH^2*T14*U + 
+             2*MT^2*T14*U + 2*MT^2*T24*U + MT^2*U^2)*ScalarC0[MH^2, T14, 
+             MH^2 - S - T24 - U, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]])/
+           (2*Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U]))*
+         (-2*Sqrt[2]*Sqrt[S]*Sech[\[Eta]4]*
+           (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+            ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                       \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(-(kT3*Cos[\[Phi]3]) - 
+               kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/
+             2) - (Sech[\[Eta]4]*(((2*S - S34 + T - 2*T24)*(
+                (-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] - 
+             4*((kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 (Cos[\[Phi]4] - I*Sin[\[Phi]4]))/(2*Sqrt[2]) + 
+               ((-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                 (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]])/2 - kT4*(Conjugate[
+                      (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4])))/Sqrt[2]))*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 4*Sqrt[2]*kT4*
+           (Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+           ((Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+              (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/4 + 
+            (Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*
+                (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]))/2) - 2*Sqrt[2]*
+           ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*((Sqrt[S]*Sech[\[Eta]4]*
+              (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])))/4 + (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+              ((Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) + (kT3*Sech[\[Eta]4]*
+                 (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                Sqrt[2]))/Sqrt[2])) - 
+        2*(((S + T14 + T24 + U)*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+           Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U] - 
+          (2*T14*DiscB[T14, Sqrt[MT^2], Sqrt[MT^2]])/Kallen\[Lambda][MH^2, 
+            T14, MH^2 - S - T24 - U] - ((S - T14 + T24 + U)*
+            DiscB[MH^2 - S - T24 - U, Sqrt[MT^2], Sqrt[MT^2]])/
+           Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U] + 
+          (T14*(2*MH^2 - S - T14 - T24 - U)*ScalarC0[MH^2, T14, 
+             MH^2 - S - T24 - U, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]])/
+           Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U])*
+         (Sqrt[2]*S*(-2*MH^2 + S34 + T)*Conjugate[
+            1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                 Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                 Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                   \[Phi]4])]]*Sech[\[Eta]4] - Sqrt[2]*Sqrt[S]*
+           (-2*MH^2 + S34 + T)*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - 
+            kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])) + 
+          Sqrt[2]*kT4*Sqrt[S]*(-2*MH^2 + S34 + T)*Conjugate[
+            1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                 Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                 Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                   \[Phi]4])]]*Sech[\[Eta]4]*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          ((4*S*S34 - S34^2 + T^2 + 2*S34*T14 - 2*T*T14 - 
+             2*MH^2*(2*S - S34 + T - 2*T24) - 4*T*T24 - 2*S34*U + 2*T*U)*
+            ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+           (2*Sqrt[2]) + 2*Sech[\[Eta]4]*
+           ((Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*((kT3*(S34 - T)*
+                 (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + Sqrt[2]*kT4*
+                (-MH^2 + T)*(Cos[\[Phi]4] - I*Sin[\[Phi]4])))/2 + 
+            ((-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))*(Sqrt[S]*(MH^2 - S34)*Conjugate[
+                 1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                       \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                       2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - kT3*(S34 - T)*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]) - 2*kT4*(-MH^2 + T)*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Sinh[\[Eta]4 + I*\[Phi]4]) + 2*Sqrt[2]*kT4*(-2*MH^2 + S34 + T)*
+           Sech[\[Eta]4]*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+           (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+            I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          32*((kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                    Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                   kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                    Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                  (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+              (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/(2*Sqrt[2]) - 
+            (kT3*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*
+                (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))/
+             Sqrt[2])*((kT3*Sech[\[Eta]4]*(kT3*Cos[\[Phi]3] + kT4*
+                Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2 + 
+            (kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(Sqrt[S]*Sech[\[Eta]4])/
+                (2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + 
+                  Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/
+             Sqrt[2]) - 2*Sqrt[2]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*(-(kT3*Sqrt[S]*(6*MH^2 - 3*S34 - 3*T - 
+                4*U)*Sech[\[Eta]4]*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/4 + 
+            (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*((Sqrt[S]*(-2*MH^2 + S34 + 
+                  T)*Sech[\[Eta]4])/Sqrt[2] + (kT3*(6*MH^2 - 3*S34 - 3*T - 
+                  4*U)*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                    I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2])) - 
+        4*((-((S^3 - 10*MH^2*S*T14 + 5*S^2*T14 - 6*MH^2*T14^2 + 7*S*T14^2 + 
+                3*T14^3 + 3*S^2*T24 - 10*MH^2*T14*T24 + 10*S*T14*T24 + 
+                7*T14^2*T24 + 3*S*T24^2 + 5*T14*T24^2 + T24^3 + 3*S^2*U - 
+                10*MH^2*T14*U + 10*S*T14*U + 7*T14^2*U + 6*S*T24*U + 
+                10*T14*T24*U + 3*T24^2*U + 3*S*U^2 + 5*T14*U^2 + 3*T24*U^2 + 
+                U^3)*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+             (2*Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U]^2) - 
+            (3*T14^2*(2*MH^2 - S - T14 - T24 - U)*DiscB[T14, Sqrt[MT^2], Sqrt[
+                MT^2]])/Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U]^2 + 
+            ((S^3 - 10*MH^2*S*T14 + 5*S^2*T14 + 6*MH^2*T14^2 + S*T14^2 - 3*
+                T14^3 + 3*S^2*T24 - 10*MH^2*T14*T24 + 10*S*T14*T24 + T14^2*
+                T24 + 3*S*T24^2 + 5*T14*T24^2 + T24^3 + 3*S^2*U - 10*MH^2*T14*
+                U + 10*S*T14*U + T14^2*U + 6*S*T24*U + 10*T14*T24*U + 3*T24^2*
+                U + 3*S*U^2 + 5*T14*U^2 + 3*T24*U^2 + U^3)*DiscB[MH^2 - S - 
+                T24 - U, Sqrt[MT^2], Sqrt[MT^2]])/(2*Kallen\[Lambda][MH^2, 
+                T14, MH^2 - S - T24 - U]^2) + T14/Kallen\[Lambda][MH^2, T14, 
+              MH^2 - S - T24 - U] + (T14*(2*MT^2*S^2 + 6*MH^4*T14 - 8*MH^2*
+                MT^2*T14 - 6*MH^2*S*T14 + 4*MT^2*S*T14 + S^2*T14 - 4*MH^2*
+                T14^2 + 2*MT^2*T14^2 + 2*S*T14^2 + T14^3 + 4*MT^2*S*T24 - 6*
+                MH^2*T14*T24 + 4*MT^2*T14*T24 + 2*S*T14*T24 + 2*T14^2*T24 + 2*
+                MT^2*T24^2 + T14*T24^2 + 4*MT^2*S*U - 6*MH^2*T14*U + 4*MT^2*
+                T14*U + 2*S*T14*U + 2*T14^2*U + 4*MT^2*T24*U + 2*T14*T24*U + 
+               2*MT^2*U^2 + T14*U^2)*ScalarC0[MH^2, T14, MH^2 - S - T24 - 
+                U, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]])/
+             Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U]^2)*
+           (((S34 - T)*(-2*MH^2 + S34 + T + 2*U)*((-I)*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (2*Sqrt[2]) + 2*(S34 - T)*Sech[\[Eta]4]*
+             ((kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/(2*Sqrt[2]) - 
+              (kT3*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+              Sinh[\[Eta]4 + I*\[Phi]4]) - 2*Sqrt[2]*(2*MH^2 - S34 - T - 2*U)*
+             ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+             (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/
+               4 + (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+                (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+               2) + 16*((kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                     4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                       2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                      Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                      Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                        \[Phi]4])]]*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/(2*
+                Sqrt[2]) - (kT3*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2])*(-(kT3*Sqrt[S]*Sech[\[Eta]4]*
+                 (Cos[\[Phi]3] + I*Sin[\[Phi]3]))/4 + (kT3*kT4*Sech[\[Eta]4]*
+                (Cos[\[Phi]4] + I*Sin[\[Phi]4])*(-Sinh[\[Eta]3] + 
+                 Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2)) + 
+          (-(MH^2*(S^2 + 8*MH^2*T14 - 4*S*T14 - 5*T14^2 + 2*S*T24 - 
+                4*T14*T24 + T24^2 + 2*S*U - 4*T14*U + 2*T24*U + U^2)*DiscB[
+                MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(2*Kallen\[Lambda][MH^2, T14, 
+                MH^2 - S - T24 - U]^2) + (T14*(6*MH^2*S - S^2 - 2*MH^2*T14 - 
+               2*S*T14 - T14^2 + 6*MH^2*T24 - 2*S*T24 - 2*T14*T24 - T24^2 + 6*
+                MH^2*U - 2*S*U - 2*T14*U - 2*T24*U - U^2)*DiscB[T14, Sqrt[
+                MT^2], Sqrt[MT^2]])/(2*Kallen\[Lambda][MH^2, T14, 
+                MH^2 - S - T24 - U]^2) + ((MH^2*S^2 + 8*MH^4*T14 - 10*MH^2*S*
+                T14 + S^2*T14 - 3*MH^2*T14^2 + 2*S*T14^2 + T14^3 + 2*MH^2*S*
+                T24 - 10*MH^2*T14*T24 + 2*S*T14*T24 + 2*T14^2*T24 + MH^2*
+                T24^2 + T14*T24^2 + 2*MH^2*S*U - 10*MH^2*T14*U + 2*S*T14*U + 
+               2*T14^2*U + 2*MH^2*T24*U + 2*T14*T24*U + MH^2*U^2 + T14*U^2)*
+              DiscB[MH^2 - S - T24 - U, Sqrt[MT^2], Sqrt[MT^2]])/
+             (2*Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U]^2) - 
+            (S + T14 + T24 + U)/(2*Kallen\[Lambda][MH^2, T14, MH^2 - S - 
+                T24 - U]) - ((MT^2*S^3 + 3*MH^4*S*T14 - 4*MH^2*MT^2*S*T14 - 2*
+                MH^2*S^2*T14 + 3*MT^2*S^2*T14 - MH^4*T14^2 - 4*MH^2*MT^2*
+                T14^2 - MH^2*S*T14^2 + 3*MT^2*S*T14^2 + MH^2*T14^3 + MT^2*
+                T14^3 + 3*MT^2*S^2*T24 + 3*MH^4*T14*T24 - 4*MH^2*MT^2*T14*
+                T24 - 4*MH^2*S*T14*T24 + 6*MT^2*S*T14*T24 - MH^2*T14^2*T24 + 
+               3*MT^2*T14^2*T24 + 3*MT^2*S*T24^2 - 2*MH^2*T14*T24^2 + 3*MT^2*
+                T14*T24^2 + MT^2*T24^3 + 3*MT^2*S^2*U + 3*MH^4*T14*U - 4*MH^2*
+                MT^2*T14*U - 4*MH^2*S*T14*U + 6*MT^2*S*T14*U - MH^2*T14^2*
+                U + 3*MT^2*T14^2*U + 6*MT^2*S*T24*U - 4*MH^2*T14*T24*U + 6*
+                MT^2*T14*T24*U + 3*MT^2*T24^2*U + 3*MT^2*S*U^2 - 2*MH^2*T14*
+                U^2 + 3*MT^2*T14*U^2 + 3*MT^2*T24*U^2 + MT^2*U^3)*
+              ScalarC0[MH^2, T14, MH^2 - S - T24 - U, Sqrt[MT^2], Sqrt[MT^2], 
+               Sqrt[MT^2]])/Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U]^2)*
+           (((S34 - T)*(-2*MH^2 + S34 + T + 2*U)*((-I)*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (2*Sqrt[2]) + 2*(S34 - T)*Sech[\[Eta]4]*
+             ((kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/(2*Sqrt[2]) - 
+              (kT3*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+              Sinh[\[Eta]4 + I*\[Phi]4]) - 2*Sqrt[2]*(2*MH^2 - S34 - T - 2*U)*
+             ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+             (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/
+               4 + (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+                (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+               2) + 16*((kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                     4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                       2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                      Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                      Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                        \[Phi]4])]]*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/(2*
+                Sqrt[2]) - (kT3*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2])*((kT3*Sech[\[Eta]4]*
+                (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4]))*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                   I*\[Phi]3 + I*\[Phi]4]))/2 + (kT3*(Cos[\[Phi]3] + 
+                 I*Sin[\[Phi]3])*(-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+                 (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                      I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2]))) + 
+        2*((2 + Eps^(-1) + DiscB[MH^2 - S - T24 - U, Sqrt[MT^2], 
+             Sqrt[MT^2]] + Log[Mu^2/MT^2])*(-2*Sqrt[2]*Sqrt[S]*Sech[\[Eta]4]*
+             (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+               2 + ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(-(kT3*Cos[\[Phi]3]) - 
+                 kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/
+               2) - (Sech[\[Eta]4]*(((2*S - S34 + T - 2*T24)*
+                 ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] - 4*
+                ((kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/
+                  (2*Sqrt[2]) + ((-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                    I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                   (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]])/2 - kT4*(Conjugate[
+                        (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                        (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[1/Sqrt[
+                          (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                          kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                       Sinh[\[Eta]4])))/Sqrt[2]))*(Cosh[\[Eta]4 + 
+                 I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+            4*Sqrt[2]*kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+             ((Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + 
+                   I*\[Phi]4]))/4 + (Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - 
+                 kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                        Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                        Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                         \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                 I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                 Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/2) - 
+            2*Sqrt[2]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*((Sqrt[S]*Sech[\[Eta]4]*
+                (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])))/4 + (kT4*(Cos[\[Phi]4] + 
+                 I*Sin[\[Phi]4])*((Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+                 (kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - 
+                      I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2])) + 
+          ScalarC0[MH^2, T14, MH^2 - S - T24 - U, Sqrt[MT^2], Sqrt[MT^2], 
+            Sqrt[MT^2]]*(-((S*(-2*MH^2 + S34 + T)*Conjugate[
+                1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                     Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4])/Sqrt[2]) + 
+            (Sqrt[S]*(-2*MH^2 + S34 + T)*(I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])))/Sqrt[2] - 
+            (kT4*Sqrt[S]*(-2*MH^2 + S34 + T)*Conjugate[1/Sqrt[
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*(Cos[\[Phi]4] + I*
+                Sin[\[Phi]4])*(Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + 
+                 I*\[Phi]4]))/Sqrt[2] - ((-2*S*S34 - S34*T14 + T*T14 + 2*MH^2*
+                (S - T24) + 2*T*T24)*((-I)*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (2*Sqrt[2]) - 2*Sech[\[Eta]4]*((kT4*Sqrt[S]*(-MH^2 + T)*
+                Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]4] - 
+                 I*Sin[\[Phi]4]))/(2*Sqrt[2]) + ((-(kT3*Cos[\[Phi]3]) - 
+                 kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (-(Sqrt[S]*(-MH^2 + S34)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])]])/2 - kT4*(-MH^2 + T)*
+                  (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]4])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+              Sinh[\[Eta]4 + I*\[Phi]4]) - Sqrt[2]*kT4*(-2*MH^2 + S34 + T)*
+             Sech[\[Eta]4]*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+             (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                kT4*Sin[\[Phi]4]))*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                 I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                 I*\[Phi]4]) - 8*((kT3*Sqrt[S]*Conjugate[
+                 1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                       \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                       2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]3] - 
+                 I*Sin[\[Phi]3]))/(2*Sqrt[2]) - (kT3*(-(kT3*Cos[\[Phi]3]) - 
+                 kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2])*((kT3*Sech[\[Eta]4]*
+                (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4]))*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                   I*\[Phi]3 + I*\[Phi]4]))/2 + (kT3*(Cos[\[Phi]3] + 
+                 I*Sin[\[Phi]3])*(-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+                 (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                      I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2]) + 
+            2*Sqrt[2]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+             (-(kT3*Sqrt[S]*(S + T14 + T24)*Sech[\[Eta]4]*(Cos[\[Phi]3] + 
+                  I*Sin[\[Phi]3]))/4 + (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+                ((Sqrt[S]*(-2*MH^2 + S34 + T)*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+                 (kT3*(S + T14 + T24)*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + 
+                    Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[
+                2]))))/T14 + 
+      (8*((kT3*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - S34)) + 
+             DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - S34)))*
+            Sech[\[Eta]4]*(-(Sqrt[S]*(-MH^2 + S34 + 2*T)*Conjugate[
+                1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                     Cos[\[Phi]3 - \[Phi]4])]]) - 
+             (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(
+                -((kT3*(MH^2 - 2*S + S34 + 2*T24 - 2*U)*(Cos[\[Phi]3] + 
+                    I*Sin[\[Phi]3]))/Sqrt[2]) + (kT4*(-3*MH^2 + S34 + 4*U)*
+                  (Cos[\[Phi]4] + I*Sin[\[Phi]4]))/Sqrt[2]))/Sqrt[2] + 
+             (-MH^2 + S34 + 2*T)*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(-(kT3*Cos[\[Phi]3]) - 
+               kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])) + 
+             8*(-((kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*((kT3*Sqrt[S]*
+                     Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/(2*Sqrt[2]) - 
+                   (kT3*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                      I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                     (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                        (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[1/Sqrt[
+                          (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                          kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                       Sinh[\[Eta]3]))/Sqrt[2]))/Sqrt[2]) + (kT3*
+                 (Cos[\[Phi]3] + I*Sin[\[Phi]3])*((kT4*Sqrt[S]*Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    (Cos[\[Phi]4] - I*Sin[\[Phi]4]))/(2*Sqrt[2]) - 
+                  (kT4*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                     I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                    (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]4]))/Sqrt[2]))/Sqrt[2]))*
+            (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+           Sqrt[2] + (kT3*(-1/(2*(MH^2 - S34)) - (MH^2*DiscB[MH^2, 
+                Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - S34)^2) + 
+             (MH^2*DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - S34)^2) - 
+             (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                  (2*MT^2)]^2)/(2*(MH^2 - S34)^2) + 
+             (MT^2*Log[(2*MT^2 - S34 + Sqrt[-((4*MT^2 - S34)*S34)])/(2*MT^2)]^
+                2)/(2*(MH^2 - S34)^2))*Sech[\[Eta]4]*
+            (-(Sqrt[S]*(MH^2 - S34 - 2*T14)*Conjugate[
+                1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                     Cos[\[Phi]3 - \[Phi]4])]]) + 
+             (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*((kT3*(-MH^2 + S34 + 
+                   4*T24)*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2] + 
+                (kT4*(MH^2 + 2*S - S34 + 2*T24 - 2*U)*(Cos[\[Phi]4] + 
+                   I*Sin[\[Phi]4]))/Sqrt[2]))/Sqrt[2] + (MH^2 - S34 - 2*T14)*
+              (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                       \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(-(kT3*Cos[\[Phi]3]) - 
+               kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])) + 
+             8*(-((kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*((kT3*Sqrt[S]*
+                     Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/(2*Sqrt[2]) - 
+                   (kT3*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                      I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                     (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                        (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[1/Sqrt[
+                          (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                          kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                       Sinh[\[Eta]3]))/Sqrt[2]))/Sqrt[2]) + (kT3*
+                 (Cos[\[Phi]3] + I*Sin[\[Phi]3])*((kT4*Sqrt[S]*Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    (Cos[\[Phi]4] - I*Sin[\[Phi]4]))/(2*Sqrt[2]) - 
+                  (kT4*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                     I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                    (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]4]))/Sqrt[2]))/Sqrt[2]))*
+            (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+           Sqrt[2]) + (4*(2 + Eps^(-1) + DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]] + 
+            Log[Mu^2/MT^2]) - 16*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[
+                MT^2]])/(4*(MH^2 - S34)) - (S34*DiscB[S34, Sqrt[MT^2], Sqrt[
+                MT^2]])/(4*(MH^2 - S34)) + 
+            (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                 (2*MT^2)]^2)/(4*(MH^2 - S34)) + (Eps^(-1) + Log[Mu^2/MT^2])/
+             4 - (MT^2*Log[(2*MT^2 - S34 + Sqrt[-((4*MT^2 - S34)*S34)])/
+                 (2*MT^2)]^2)/(4*(MH^2 - S34))))*
+         ((Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+            (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*
+                Sin[\[Phi]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] - 
+          (Sech[\[Eta]4]*(((-MH^2 + 2*S + T + T14)*((-I)*Conjugate[
+                  (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+             Sqrt[2]*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                    Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                   kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                    Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                  (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+              (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])))*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 + Sqrt[2]*Sech[\[Eta]4]*
+           (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+            I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*(kT3*Cos[\[Phi]3] + 
+            kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+           (-((Sqrt[S]*Sech[\[Eta]4])/Sqrt[2]) - (kT3*Sech[\[Eta]4]*
+              (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+             Sqrt[2]) + (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+            I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-((Sqrt[S]*Sech[\[Eta]4])/Sqrt[2]) - (kT3*Sech[\[Eta]4]*
+              (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+             Sqrt[2]) + (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                 (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+             I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+            (-(Sqrt[2]*Sqrt[S]*Sech[\[Eta]4]) + (kT3*Sech[\[Eta]4]*(
+                -Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+              Sqrt[2]))/2) - 4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+           (MH^2 - S34) - DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - S34))*
+         (-(Sech[\[Eta]4]*(((MH^2 - S34)*(MH^2 - 2*S - T - T14)*
+                ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] - 
+              Sqrt[2]*Sqrt[S]*(MH^2 - S34)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])]]*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))*
+             (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+          2*(-(Sqrt[S]*(MH^2 - S34)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])]]*Sech[\[Eta]4]*(kT3*Cos[\[Phi]3] + 
+                kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (2*Sqrt[2]) - ((MH^2 - S34)*Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - 
+               kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                     4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                       2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                      Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                      Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                        \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]))/Sqrt[2] - 4*Sqrt[2]*kT3*Sech[\[Eta]4]*
+             (-((kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*((kT3*Sqrt[S]*Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/(2*Sqrt[2]) - 
+                  (kT3*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                     I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                    (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]3]))/Sqrt[2]))/Sqrt[2]) + 
+              (kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*((kT4*Sqrt[S]*Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   (Cos[\[Phi]4] - I*Sin[\[Phi]4]))/(2*Sqrt[2]) - 
+                 (kT4*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                    I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                   (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4]))/Sqrt[2]))/Sqrt[2])*(-Sinh[\[Eta]3] + 
+              Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]) - 
+            (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*((Sqrt[S]*(MH^2 - S34)*
+                 Sech[\[Eta]4])/Sqrt[2] + (kT3*(MH^2 - S34 - 2*T + 2*T14)*
+                 Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                    I*\[Phi]4]))/Sqrt[2]))/2 + 
+            ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                       \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(-(kT3*Cos[\[Phi]3]) - 
+               kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              ((Sqrt[S]*(MH^2 - S34)*Sech[\[Eta]4])/Sqrt[2] + 
+               (kT3*(MH^2 - S34 - 2*T + 2*T14)*Sech[\[Eta]4]*
+                 (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                Sqrt[2]))/2) - 
+          (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*((kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*(
+                -(Sqrt[2]*Sqrt[S]*(MH^2 - S34)*Sech[\[Eta]4]) + 
+                (kT3*(5*MH^2 + 2*S - 3*S34 + 2*T24 - 6*U)*Sech[\[Eta]4]*
+                  (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                 Sqrt[2]))/Sqrt[2] + (kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*(
+                -(Sqrt[2]*Sqrt[S]*(MH^2 - S34)*Sech[\[Eta]4]) + 
+                (kT3*(MH^2 - 2*S + S34 + 6*T24 - 2*U)*Sech[\[Eta]4]*
+                  (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                 Sqrt[2]))/Sqrt[2]))/Sqrt[2]) - 
+        2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+           (2*(MH^2 - S34)) - Log[(2*MT^2 - S34 + Sqrt[-((4*MT^2 - S34)*
+                  S34)])/(2*MT^2)]^2/(2*(MH^2 - S34)))*
+         (-(Sech[\[Eta]4]*(((MH^2 - S34)*(MH^2 - 2*S - T - T14)*
+                ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] - 
+              Sqrt[2]*Sqrt[S]*(MH^2 - S34)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])]]*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))*
+             (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+          2*((Sqrt[S]*(MH^2 - S34)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]]*Sech[\[Eta]4]*(kT3*Cos[\[Phi]3] + kT4*
+                Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (2*Sqrt[2]) + ((MH^2 - S34)*Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - 
+               kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                     4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                       2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                      Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                      Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                        \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]))/Sqrt[2] + 2*Sqrt[2]*kT3*Sech[\[Eta]4]*
+             (-((kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*((kT3*Sqrt[S]*Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/(2*Sqrt[2]) - 
+                  (kT3*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                     I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                    (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]3]))/Sqrt[2]))/Sqrt[2]) + 
+              (kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*((kT4*Sqrt[S]*Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   (Cos[\[Phi]4] - I*Sin[\[Phi]4]))/(2*Sqrt[2]) - 
+                 (kT4*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                    I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                   (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4]))/Sqrt[2]))/Sqrt[2])*(-Sinh[\[Eta]3] + 
+              Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]) + 
+            Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+             (-(Sqrt[S]*(-MH^2 + S34)*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+              (kT3*T14*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                   I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]) - 
+            (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(-(kT3*Cos[\[Phi]3]) - 
+              kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+             (-(Sqrt[S]*(-MH^2 + S34)*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+              (kT3*T14*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                   I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]) + 
+            (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                       \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*((kT3*(Cos[\[Phi]3] + 
+                  I*Sin[\[Phi]3])*(-((Sqrt[S]*(MH^2 - S34)*Sech[\[Eta]4])/
+                    Sqrt[2]) + Sqrt[2]*kT3*T24*Sech[\[Eta]4]*
+                   (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4])))/
+                Sqrt[2] + (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+                 (-((Sqrt[S]*(MH^2 - S34)*Sech[\[Eta]4])/Sqrt[2]) + 
+                  (kT3*(MH^2 + S - S34 + T24 - U)*Sech[\[Eta]4]*
+                    (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                   Sqrt[2]))/Sqrt[2]))/Sqrt[2])))/S34 - 
+      (-4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T) - 
+          DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T))*
+         ((Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+            ((kT3*(MH^2 - 2*S34 - T + 2*T14)*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/
+              Sqrt[2] + Sqrt[2]*kT4*(MH^2 - T)*(Cos[\[Phi]4] + I*
+                Sin[\[Phi]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+          (Sech[\[Eta]4]*(((MH^2 - T)*(MH^2 - S34 - T14 - 2*T24)*(
+                (-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] - 
+             4*(MH^2 - T)*((kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                      4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                        2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                       Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                       Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                        \[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]4] - 
+                  I*Sin[\[Phi]4]))/(2*Sqrt[2]) - (kT4*(-(kT3*Cos[\[Phi]3]) - 
+                  kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4]))/Sqrt[2]))*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 + Sech[\[Eta]4]*
+           ((kT3*(MH^2 - 2*S34 - T + 2*T14)*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/
+             Sqrt[2] + Sqrt[2]*kT4*(MH^2 - T)*(Cos[\[Phi]4] + 
+              I*Sin[\[Phi]4]))*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+            I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          2*Sqrt[S]*(MH^2 - T)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+           (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+            (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/Sqrt[2]) + 2*(MH^2 - T)*
+           (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+            I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+            (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/Sqrt[2]) + 
+          (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(kT4*Sqrt[S]*(-MH^2 + T)*Sech[\[Eta]4]*
+              (Cos[\[Phi]4] + I*Sin[\[Phi]4]) + (kT3*(Cos[\[Phi]3] + 
+                I*Sin[\[Phi]3])*(-((Sqrt[S]*(MH^2 - 2*S34 - T + 2*T14)*
+                   Sech[\[Eta]4])/Sqrt[2]) - (Sqrt[S]*(9*MH^2 - 2*S34 - 5*T - 
+                   2*T14 - 8*U)*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+                (kT3*(3*MH^2 - 8*S - 2*S34 - 3*T - 2*T14)*Sech[\[Eta]4]*
+                  (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                 Sqrt[2]))/Sqrt[2]))/Sqrt[2] + 8*Sqrt[2]*kT3*
+           (Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+           ((kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                    Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                   kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                    Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                  (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+              (Cos[\[Phi]3] - I*Sin[\[Phi]3])*((Sqrt[S]*Sech[\[Eta]4])/
+                (2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+                  Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/
+             (2*Sqrt[2]) + (kT3*kT4*Sqrt[S]*Conjugate[1/Sqrt[
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*
+                Sin[\[Phi]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/4 + ((-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+               I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                     (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]3]))/(2*Sqrt[2]) + (kT3^2*Sech[\[Eta]4]*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                    I*\[Phi]4]))/Sqrt[2] - (kT3*kT4*Sech[\[Eta]4]*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                    I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2])) + 
+        (4*(2 + Eps^(-1) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]] + 
+            Log[Mu^2/MT^2]) - 16*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[
+                MT^2]])/(4*(MH^2 - T)) - (T*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/
+             (4*(MH^2 - T)) + (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[
+                   -(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/(4*(MH^2 - T)) + 
+            (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+            (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+             (4*(MH^2 - T))))*(-(Sech[\[Eta]4]*(((-MH^2 + S34 + T14 + 2*T24)*
+                ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+              4*((kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  (Cos[\[Phi]4] - I*Sin[\[Phi]4]))/(2*Sqrt[2]) - 
+                (kT4*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                   I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                  (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]4]))/Sqrt[2]))*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+          (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(Sqrt[S]*Sech[\[Eta]4]*
+              (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])) - (kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*(
+                (Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) + (kT3*Sech[\[Eta]4]*
+                  (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                 Sqrt[2]))/Sqrt[2]))/Sqrt[2] - 
+          2*((Sech[\[Eta]4]*((kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2] + 
+               Sqrt[2]*kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4]))*
+              (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                     4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                       2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                      Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                      Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                        \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]))/2 + (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(-(kT3*Cos[\[Phi]3]) - 
+              kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+             (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*
+                (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+               Sqrt[2]) + (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]]*((Sech[\[Eta]4]*((kT3*(Cos[\[Phi]3] + 
+                     I*Sin[\[Phi]3]))/Sqrt[2] + Sqrt[2]*kT4*(Cos[\[Phi]4] + 
+                    I*Sin[\[Phi]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                  Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 2*(-(Sqrt[S]*Sech[\[Eta]4])/
+                  (2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + 
+                    Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2])))/2)) - 
+        2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+           (2*(MH^2 - T)) - Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/
+              (2*MT^2)]^2/(2*(MH^2 - T)))*
+         (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+           ((kT3*T14*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2] + 
+            (kT4*(MH^2 - T)*(Cos[\[Phi]4] + I*Sin[\[Phi]4]))/Sqrt[2])*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          (Sech[\[Eta]4]*(((MH^2 - T)*(MH^2 - S34 - T14 - 2*T24)*(
+                (-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] - 
+             4*(MH^2 - T)*((kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                      4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                        2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                       Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                       Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                        \[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]4] - 
+                  I*Sin[\[Phi]4]))/(2*Sqrt[2]) - (kT4*(-(kT3*Cos[\[Phi]3]) - 
+                  kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4]))/Sqrt[2]))*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 2*Sech[\[Eta]4]*
+           ((kT3*T14*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2] + 
+            (kT4*(MH^2 - T)*(Cos[\[Phi]4] + I*Sin[\[Phi]4]))/Sqrt[2])*
+           (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+            I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          4*Sqrt[2]*kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+           (-(kT4*S*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*(
+                Cos[\[Phi]4] - I*Sin[\[Phi]4]))/8 + 
+            ((-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))*(-(S*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                       4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                         2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                        Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                        Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                         \[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4])/(4*Sqrt[2]) + 
+               (kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                    (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4]))/(2*Sqrt[2]) + (kT3*Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+                 (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                (2*Sqrt[2])))/Sqrt[2]) - 2*Sqrt[S]*(MH^2 - T)*
+           Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+           (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+            (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/Sqrt[2]) + 2*(MH^2 - T)*
+           (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+            I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+            (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/Sqrt[2]) + Sqrt[2]*
+           ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*((kT4*Sqrt[S]*(-MH^2 + T)*Sech[\[Eta]4]*
+              (Cos[\[Phi]4] + I*Sin[\[Phi]4]))/2 + 
+            (kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(Sqrt[S]*(-MH^2 + 2*S + 
+                   S34 + T14 + 2*T24)*Sech[\[Eta]4])/(2*Sqrt[2]) - 2*
+                ((Sqrt[S]*T14*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+                 (kT3*S*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                      I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2])))/Sqrt[2])) - 
+        8*((kT3*(-1/(2*(MH^2 - T)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+                Sqrt[MT^2]])/(2*(MH^2 - T)^2) + (MH^2*DiscB[T, Sqrt[MT^2], 
+                Sqrt[MT^2]])/(2*(MH^2 - T)^2) - 
+             (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                  (2*MT^2)]^2)/(2*(MH^2 - T)^2) + 
+             (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+              (2*(MH^2 - T)^2))*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+            ((Sqrt[S]*(-MH^2 + T + 2*T14)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])]]*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                Sinh[\[Eta]4 + I*\[Phi]4]))/2 + (-MH^2 + T + 2*T14)*
+              Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*
+                (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]) + (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                    (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*((Sqrt[S]*(-3*MH^2 + 
+                   2*S34 + T - 2*T14 + 4*U)*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+                (kT3*(5*MH^2 - 2*S34 - 3*T - 2*T14 - 4*U)*Sech[\[Eta]4]*
+                  (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                 Sqrt[2] + Sqrt[2]*kT3*(-MH^2 + S34 + T14 + 2*T24)*
+                 Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                    I*\[Phi]4])))/Sqrt[2] + 8*((kT3*S*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+                 (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/8 + ((-(kT3*Cos[\[Phi]3]) - 
+                  kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                 (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                        (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                        (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[1/Sqrt[
+                          (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                          kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                       Sinh[\[Eta]3]))/(2*Sqrt[2]) - (kT3*Sqrt[S]*Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                       I*\[Phi]3 + I*\[Phi]4]))/(2*Sqrt[2])))/Sqrt[2])))/
+           Sqrt[2] + (kT3*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+              (2*(MH^2 - T)) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/
+              (2*(MH^2 - T)))*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+            ((Sqrt[S]*(MH^2 - 2*S34 - T)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])]]*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                Sinh[\[Eta]4 + I*\[Phi]4]))/2 + (MH^2 - 2*S34 - T)*
+              Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*
+                (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]) + (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                    (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*((Sqrt[S]*(-5*MH^2 + 
+                   4*S34 + 3*T + 4*U)*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+                (kT3*(3*MH^2 - T - 4*U)*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+                   Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2] + 
+                Sqrt[2]*kT3*(-MH^2 + S34 + T14 + 2*T24)*Sech[\[Eta]4]*
+                 (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4])))/
+              Sqrt[2] + 8*((kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                      4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                        2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                       Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                       Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                        \[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                 ((Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*
+                    (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                   Sqrt[2]))/(2*Sqrt[2]) + (kT3*kT4*Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+                 (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-Sinh[\[Eta]3] + 
+                  Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/4 + 
+               ((-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                 (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                        (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                        (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[1/Sqrt[
+                          (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                          kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                       Sinh[\[Eta]3]))/(2*Sqrt[2]) + (kT3^2*Sech[\[Eta]4]*
+                    (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]3])*(Sinh[\[Eta]3] - 
+                     Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2] - 
+                  (kT3*kT4*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[
+                          \[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                         kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                          Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]4])*(-Sinh[\[Eta]3] + 
+                     Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/
+                Sqrt[2])))/Sqrt[2]))/T)/(MH^2 - S - T24 - U) - 
+    ((2*((2 + Eps^(-1) + DiscB[MH^2 - S34 - T14 - T24, Sqrt[MT^2], 
+             Sqrt[MT^2]] + Log[Mu^2/MT^2])*
+           (-(((-T - 2*T14 + 2*T24 + U)*Sech[\[Eta]4]*(-Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                       Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]) + 
+            4*((kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                   (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4]))/Sqrt[2] + (kT3*Sqrt[S]*Conjugate[
+                 1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                       \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                       2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+                (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[
+                2])) + ScalarC0[MH^2, S, MH^2 - S34 - T14 - T24, Sqrt[MT^2], 
+            Sqrt[MT^2], Sqrt[MT^2]]*(-(((-2*MH^2*T14 + 2*MH^2*T24 - 2*T*T24 + 
+                2*T14*U + S*(-T + U))*Sech[\[Eta]4]*(-Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                       Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]) - 
+            4*(-(kT4*((Sqrt[S]*(MH^2 - T)*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+                 (Sqrt[S]*(-MH^2 + U)*Sech[\[Eta]4])/(2*Sqrt[2]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4])) + (kT3*((Sqrt[S]*(-MH^2 + T)*Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                  2 - (Sqrt[S]*(MH^2 - U)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                        4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                         Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                         Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])]])/2)*Sech[\[Eta]4]*
+                (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[
+                2]))) + 4*S*((-2*MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+           Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - T24] + 
+          ((S + S34 + T14 + T24)*DiscB[S, Sqrt[MT^2], Sqrt[MT^2]])/
+           Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - T24] + 
+          ((2*MH^2 - S - S34 - T14 - T24)*DiscB[MH^2 - S34 - T14 - T24, 
+             Sqrt[MT^2], Sqrt[MT^2]])/Kallen\[Lambda][MH^2, S, 
+            MH^2 - S34 - T14 - T24] + (MH^2*(S - S34 - T14 - T24)*
+            ScalarC0[MH^2, S, MH^2 - S34 - T14 - T24, Sqrt[MT^2], Sqrt[MT^2], 
+             Sqrt[MT^2]])/Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - T24])*
+         (-(((-T - 2*T14 + 2*T24 + U)*Sech[\[Eta]4]*
+             (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                 I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                 I*\[Phi]4]))/Sqrt[2]) + 
+          4*((kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]4] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]4]))/Sqrt[2] + (kT3*Sqrt[S]*Conjugate[1/
+                Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+               Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2])) - 
+        8*(3/4 - (MH^2*(S - S34 - T14 - T24)*DiscB[MH^2, Sqrt[MT^2], 
+             Sqrt[MT^2]])/(4*Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - 
+              T24]) - (S*(2*MH^2 - S - S34 - T14 - T24)*DiscB[S, Sqrt[MT^2], 
+             Sqrt[MT^2]])/(4*Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - 
+              T24]) - ((MH^2 - S34 - T14 - T24)*(S + S34 + T14 + T24)*
+            DiscB[MH^2 - S34 - T14 - T24, Sqrt[MT^2], Sqrt[MT^2]])/
+           (4*Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - T24]) + 
+          (Eps^(-1) + Log[Mu^2/MT^2])/4 + ((MH^4*S - 4*MH^2*MT^2*S + 
+             MT^2*S^2 - MH^2*S*S34 + 2*MT^2*S*S34 + MT^2*S34^2 - MH^2*S*T14 + 
+             2*MT^2*S*T14 + 2*MT^2*S34*T14 + MT^2*T14^2 - MH^2*S*T24 + 
+             2*MT^2*S*T24 + 2*MT^2*S34*T24 + 2*MT^2*T14*T24 + MT^2*T24^2)*
+            ScalarC0[MH^2, S, MH^2 - S34 - T14 - T24, Sqrt[MT^2], Sqrt[MT^2], 
+             Sqrt[MT^2]])/(2*Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - 
+              T24]))*(-(((-T - 2*T14 + 2*T24 + U)*Sech[\[Eta]4]*
+             (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                 I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                 I*\[Phi]4]))/Sqrt[2]) + 
+          4*((kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]4] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]4]))/Sqrt[2] + (kT3*Sqrt[S]*Conjugate[1/
+                Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+               Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2])) - 
+        2*(((S + S34 + T14 + T24)*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+           Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - T24] - 
+          (2*S*DiscB[S, Sqrt[MT^2], Sqrt[MT^2]])/Kallen\[Lambda][MH^2, S, 
+            MH^2 - S34 - T14 - T24] + ((S - S34 - T14 - T24)*
+            DiscB[MH^2 - S34 - T14 - T24, Sqrt[MT^2], Sqrt[MT^2]])/
+           Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - T24] + 
+          (S*(2*MH^2 - S - S34 - T14 - T24)*ScalarC0[MH^2, S, 
+             MH^2 - S34 - T14 - T24, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]])/
+           Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - T24])*
+         (-(((-2*S34*T - T^2 + 4*T*T24 + 2*S*(T - U) + 2*MH^2*(T + 2*T14 - 
+                2*T24 - U) + 2*S34*U - 4*T14*U + U^2)*Sech[\[Eta]4]*
+             (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                 I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                 I*\[Phi]4]))/Sqrt[2]) + 
+          4*((kT3*Sech[\[Eta]4]*(-(Sqrt[S]*(MH^2 - T)*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]) - Sqrt[S]*
+                (MH^2 - U)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+               kT3*(T - U)*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+                 Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/Sqrt[2] - 
+            kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                     Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+             ((Sqrt[S]*(MH^2 - T)*Sech[\[Eta]4])/Sqrt[2] + 
+              (Sqrt[S]*(MH^2 - U)*Sech[\[Eta]4])/Sqrt[2] + (kT3*(-T + U)*
+                Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                   I*\[Phi]4]))/Sqrt[2]))) - 
+        4*((((6*MH^2*S^2 - 3*S^3 + 10*MH^2*S*S34 - 7*S^2*S34 - 5*S*S34^2 - 
+               S34^3 + 10*MH^2*S*T14 - 7*S^2*T14 - 10*S*S34*T14 - 3*S34^2*
+                T14 - 5*S*T14^2 - 3*S34*T14^2 - T14^3 + 10*MH^2*S*T24 - 7*S^2*
+                T24 - 10*S*S34*T24 - 3*S34^2*T24 - 10*S*T14*T24 - 6*S34*T14*
+                T24 - 3*T14^2*T24 - 5*S*T24^2 - 3*S34*T24^2 - 3*T14*T24^2 - 
+               T24^3)*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+             (2*Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - T24]^2) - 
+            (3*S^2*(2*MH^2 - S - S34 - T14 - T24)*DiscB[S, Sqrt[MT^2], Sqrt[
+                MT^2]])/Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - T24]^2 + 
+            ((6*MH^2*S^2 - 3*S^3 - 10*MH^2*S*S34 + S^2*S34 + 5*S*S34^2 + S34^
+                3 - 10*MH^2*S*T14 + S^2*T14 + 10*S*S34*T14 + 3*S34^2*T14 + 5*
+                S*T14^2 + 3*S34*T14^2 + T14^3 - 10*MH^2*S*T24 + S^2*T24 + 10*
+                S*S34*T24 + 3*S34^2*T24 + 10*S*T14*T24 + 6*S34*T14*T24 + 3*
+                T14^2*T24 + 5*S*T24^2 + 3*S34*T24^2 + 3*T14*T24^2 + T24^3)*
+              DiscB[MH^2 - S34 - T14 - T24, Sqrt[MT^2], Sqrt[MT^2]])/
+             (2*Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - T24]^2) + 
+            S/Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - T24] + 
+            (S*(6*MH^4*S - 8*MH^2*MT^2*S - 4*MH^2*S^2 + 2*MT^2*S^2 + S^3 - 6*
+                MH^2*S*S34 + 4*MT^2*S*S34 + 2*S^2*S34 + 2*MT^2*S34^2 + S*
+                S34^2 - 6*MH^2*S*T14 + 4*MT^2*S*T14 + 2*S^2*T14 + 4*MT^2*S34*
+                T14 + 2*S*S34*T14 + 2*MT^2*T14^2 + S*T14^2 - 6*MH^2*S*T24 + 4*
+                MT^2*S*T24 + 2*S^2*T24 + 4*MT^2*S34*T24 + 2*S*S34*T24 + 4*
+                MT^2*T14*T24 + 2*S*T14*T24 + 2*MT^2*T24^2 + S*T24^2)*
+              ScalarC0[MH^2, S, MH^2 - S34 - T14 - T24, Sqrt[MT^2], Sqrt[
+                MT^2], Sqrt[MT^2]])/Kallen\[Lambda][MH^2, S, MH^2 - S34 - 
+                T14 - T24]^2)*(-(((2*MH^2 - 2*S34 - T - U)*(T - U)*Sech[
+                \[Eta]4]*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                       Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]) + 
+            4*(T - U)*(-((kT3^2*Sech[\[Eta]4]*(Conjugate[
+                    (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                    I*\[Phi]4]))/Sqrt[2]) + (kT3*kT4*Sech[\[Eta]4]*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                   I*\[Phi]4]))/Sqrt[2])) + 
+          (-(MH^2*(8*MH^2*S - 5*S^2 - 4*S*S34 + S34^2 - 4*S*T14 + 2*S34*T14 + 
+                T14^2 - 4*S*T24 + 2*S34*T24 + 2*T14*T24 + T24^2)*DiscB[MH^2, 
+                Sqrt[MT^2], Sqrt[MT^2]])/(2*Kallen\[Lambda][MH^2, S, 
+                MH^2 - S34 - T14 - T24]^2) - (S*(2*MH^2*S + S^2 - 6*MH^2*
+                S34 + 2*S*S34 + S34^2 - 6*MH^2*T14 + 2*S*T14 + 2*S34*T14 + 
+               T14^2 - 6*MH^2*T24 + 2*S*T24 + 2*S34*T24 + 2*T14*T24 + T24^2)*
+              DiscB[S, Sqrt[MT^2], Sqrt[MT^2]])/(2*Kallen\[Lambda][MH^2, S, 
+                MH^2 - S34 - T14 - T24]^2) + ((8*MH^4*S - 3*MH^2*S^2 + S^3 - 
+               10*MH^2*S*S34 + 2*S^2*S34 + MH^2*S34^2 + S*S34^2 - 10*MH^2*S*
+                T14 + 2*S^2*T14 + 2*MH^2*S34*T14 + 2*S*S34*T14 + MH^2*T14^2 + 
+               S*T14^2 - 10*MH^2*S*T24 + 2*S^2*T24 + 2*MH^2*S34*T24 + 2*S*S34*
+                T24 + 2*MH^2*T14*T24 + 2*S*T14*T24 + MH^2*T24^2 + S*T24^2)*
+              DiscB[MH^2 - S34 - T14 - T24, Sqrt[MT^2], Sqrt[MT^2]])/
+             (2*Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - T24]^2) - 
+            (S + S34 + T14 + T24)/(2*Kallen\[Lambda][MH^2, S, MH^2 - S34 - 
+                T14 - T24]) + ((MH^4*S^2 + 4*MH^2*MT^2*S^2 - MH^2*S^3 - MT^2*
+                S^3 - 3*MH^4*S*S34 + 4*MH^2*MT^2*S*S34 + MH^2*S^2*S34 - 3*
+                MT^2*S^2*S34 + 2*MH^2*S*S34^2 - 3*MT^2*S*S34^2 - MT^2*S34^3 - 
+               3*MH^4*S*T14 + 4*MH^2*MT^2*S*T14 + MH^2*S^2*T14 - 3*MT^2*S^2*
+                T14 + 4*MH^2*S*S34*T14 - 6*MT^2*S*S34*T14 - 3*MT^2*S34^2*
+                T14 + 2*MH^2*S*T14^2 - 3*MT^2*S*T14^2 - 3*MT^2*S34*T14^2 - 
+               MT^2*T14^3 - 3*MH^4*S*T24 + 4*MH^2*MT^2*S*T24 + MH^2*S^2*T24 - 
+               3*MT^2*S^2*T24 + 4*MH^2*S*S34*T24 - 6*MT^2*S*S34*T24 - 3*MT^2*
+                S34^2*T24 + 4*MH^2*S*T14*T24 - 6*MT^2*S*T14*T24 - 6*MT^2*S34*
+                T14*T24 - 3*MT^2*T14^2*T24 + 2*MH^2*S*T24^2 - 3*MT^2*S*
+                T24^2 - 3*MT^2*S34*T24^2 - 3*MT^2*T14*T24^2 - MT^2*T24^3)*
+              ScalarC0[MH^2, S, MH^2 - S34 - T14 - T24, Sqrt[MT^2], Sqrt[
+                MT^2], Sqrt[MT^2]])/Kallen\[Lambda][MH^2, S, MH^2 - S34 - 
+                T14 - T24]^2)*(-(((2*MH^2 - 2*S34 - T - U)*(T - U)*Sech[
+                \[Eta]4]*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                       Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]) + 
+            4*(T - U)*(-((kT3^2*Sech[\[Eta]4]*(Conjugate[
+                    (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                    I*\[Phi]4]))/Sqrt[2]) + (kT3*kT4*Sech[\[Eta]4]*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                   I*\[Phi]4]))/Sqrt[2]))))/S + 
+      ((4*(2 + Eps^(-1) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]] + 
+            Log[Mu^2/MT^2]) - 16*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[
+                MT^2]])/(4*(MH^2 - T)) - (T*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/
+             (4*(MH^2 - T)) + (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[
+                   -(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/(4*(MH^2 - T)) + 
+            (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+            (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+             (4*(MH^2 - T))))*(-((kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]3] + 
+              I*Sin[\[Phi]3])*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+             (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+            Sqrt[2]) - Sqrt[2]*kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+            I*Sin[\[Phi]3])*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                  kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+           (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          ((-MH^2 + S + 2*T24 + U)*Sech[\[Eta]4]*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] + (Sech[\[Eta]4]*
+            (-2*kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*(-(kT3*Cos[\[Phi]3]) - 
+               kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])) - 
+             2*kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*(kT3*Cos[\[Phi]3] + kT4*
+                Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])) + 
+             (kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*((kT4*(Cos[\[Phi]4] - 
+                   I*Sin[\[Phi]4]))/Sqrt[2] - (-(kT3*Cos[\[Phi]3]) - 
+                  kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))/
+                 Sqrt[2]))/Sqrt[2])*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                 (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] - 
+          4*(-(kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                  (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+                Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]))/
+             (2*Sqrt[2]) - (kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]]*Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[
+                \[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/(2*Sqrt[2])) + 
+          Sqrt[2]*kT3^2*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+            I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+              I*\[Phi]4]) - (kT3^2*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                 (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] + 
+             I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*
+                \[Phi]4]))/Sqrt[2]) - 
+        2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+           (2*(MH^2 - T)) - Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/
+              (2*MT^2)]^2/(2*(MH^2 - T)))*(Sqrt[2]*kT3*kT4*S*Sech[\[Eta]4]*
+           (Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+           (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          Sqrt[2]*kT3*kT4*(MH^2 - T)*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+            I*Sin[\[Phi]3])*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                  kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+           (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          ((MH^2 - T)*(MH^2 - S - 2*T24 - U)*Sech[\[Eta]4]*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] + Sqrt[2]*Sech[\[Eta]4]*
+           ((kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(Sqrt[2]*kT3*T14*
+                 (Cos[\[Phi]3] - I*Sin[\[Phi]3])) + Sqrt[2]*kT4*S*
+                (Cos[\[Phi]4] - I*Sin[\[Phi]4])))/Sqrt[2] - 
+            kT3*kT4*(MH^2 - T)*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+             (Cos[\[Phi]4] + I*Sin[\[Phi]4]))*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          4*Sqrt[2]*kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+           ((kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*((kT4*Sqrt[S]*Sech[\[Eta]4]*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4]))/(2*Sqrt[2]) + (kT3*Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+                 (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                (2*Sqrt[2])))/Sqrt[2] + ((-(kT3*Cos[\[Phi]3]) - kT4*
+                Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              ((kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                    (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4]))/(2*Sqrt[2]) + (kT3*Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+                 (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                (2*Sqrt[2])))/Sqrt[2]) - 4*(MH^2 - T)*
+           ((kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]4] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]4]))/(2*Sqrt[2]) + (kT3*Sqrt[S]*Conjugate[1/
+                Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+               Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/(2*Sqrt[2])) - 
+          Sqrt[2]*kT3^2*(MH^2 - T)*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+            I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+              I*\[Phi]4]) + Sqrt[2]*kT3^2*S*
+           ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] + 
+            I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+              I*\[Phi]4])) - 4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+           (MH^2 - T) - DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T))*
+         ((kT3*kT4*(MH^2 + 2*S - T - 2*U)*Sech[\[Eta]4]*(Cos[\[Phi]3] + 
+             I*Sin[\[Phi]3])*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+            (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+           Sqrt[2] + Sqrt[2]*kT3*kT4*(MH^2 - T)*Sech[\[Eta]4]*
+           (Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+           (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+           (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          ((MH^2 - T)*(MH^2 - S - 2*T24 - U)*Sech[\[Eta]4]*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] + (Sech[\[Eta]4]*
+            (-((kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*(2*Sqrt[2]*kT3*
+                  (MH^2 - S - 2*T24 - U)*(Cos[\[Phi]3] - I*Sin[\[Phi]3]) + 
+                 (kT4*(-7*MH^2 - 2*S + 8*S34 + 3*T + 6*U)*(Cos[\[Phi]4] - 
+                    I*Sin[\[Phi]4]))/Sqrt[2] + ((-9*MH^2 + 2*S + 8*S34 + 
+                    5*T + 2*U)*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                    I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/Sqrt[2]))/Sqrt[
+                2]) - 4*(MH^2 - T)*(-(kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+                  (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                   I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/2 - 
+               (kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*(kT3*Cos[\[Phi]3] + 
+                  kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                      \[Phi]4])))/2))*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                 (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] - 4*(MH^2 - T)*
+           ((kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]4] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]4]))/(2*Sqrt[2]) + (kT3*Sqrt[S]*Conjugate[1/
+                Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+               Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/(2*Sqrt[2])) - 
+          Sqrt[2]*kT3^2*(MH^2 - T)*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+            I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+              I*\[Phi]4]) + (kT3^2*(MH^2 + 2*S - T - 2*U)*
+            ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] + 
+             I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*
+                \[Phi]4]))/Sqrt[2] + 8*Sqrt[2]*kT3*(Cos[\[Phi]3] + 
+            I*Sin[\[Phi]3])*((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+              (-(kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                     (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]4]))/(2*Sqrt[2]) - (kT3*Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+                 (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                (2*Sqrt[2])))/Sqrt[2] - ((kT4*(Cos[\[Phi]4] - 
+                 I*Sin[\[Phi]4]))/Sqrt[2] + (-(kT3*Cos[\[Phi]3]) - 
+                kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))/
+               Sqrt[2])*(-((kT3^2*Sech[\[Eta]4]*(Conjugate[
+                    (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                    I*\[Phi]4]))/Sqrt[2]) + (kT3*kT4*Sech[\[Eta]4]*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                   I*\[Phi]4]))/Sqrt[2]))) - 
+        8*((kT3*(-1/(2*(MH^2 - T)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+                Sqrt[MT^2]])/(2*(MH^2 - T)^2) + (MH^2*DiscB[T, Sqrt[MT^2], 
+                Sqrt[MT^2]])/(2*(MH^2 - T)^2) - 
+             (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                  (2*MT^2)]^2)/(2*(MH^2 - T)^2) + 
+             (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+              (2*(MH^2 - T)^2))*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+            (-(kT4*(MH^2 - 2*S - T)*Sech[\[Eta]4]*(Conjugate[
+                  (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+                Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4])) + 
+             (Sech[\[Eta]4]*(Sqrt[2]*kT3*(-MH^2 + S + 2*T24 + U)*
+                 (Cos[\[Phi]3] - I*Sin[\[Phi]3]) + (kT4*(3*MH^2 + 2*S - 
+                   4*S34 - T - 2*U)*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/
+                 Sqrt[2] + ((5*MH^2 - 2*S - 4*S34 - 3*T - 2*U)*
+                  (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                   I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/Sqrt[2])*(
+                -Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                       Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                       Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                        \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                       Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] + 
+             kT3*(-MH^2 + 2*S + T)*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]) + 
+             8*((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                 (-(kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                        (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                        (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[1/Sqrt[
+                          (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                          kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                       Sinh[\[Eta]4]))/(2*Sqrt[2]) - (kT3*Sqrt[S]*Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                       I*\[Phi]4]))/(2*Sqrt[2])))/Sqrt[2] - 
+               ((kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/Sqrt[2] + 
+                 (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                   I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))/Sqrt[2])*
+                (-((kT3^2*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                          (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                          Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]3])*(Sinh[\[Eta]3] - 
+                     Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]) + 
+                 (kT3*kT4*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                         (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                         Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                      I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))))/Sqrt[2] + 
+          (kT3*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - T)) + 
+             DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - T)))*
+            (Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(kT4*(-MH^2 + T + 2*U)*Sech[
+                \[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+                Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4])) + 
+             (Sech[\[Eta]4]*(Sqrt[2]*kT3*(-MH^2 + S + 2*T24 + U)*
+                 (Cos[\[Phi]3] - I*Sin[\[Phi]3]) + (kT4*(5*MH^2 - 4*S34 - 
+                   3*T - 4*U)*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/Sqrt[2] + 
+                ((3*MH^2 - 4*S34 - T)*(-(kT3*Cos[\[Phi]3]) - 
+                   kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                       \[Phi]4])))/Sqrt[2])*(-Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                       Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] + 
+             kT3*(MH^2 - T - 2*U)*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]) + 
+             8*((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                 (-(kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                        (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                        (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[1/Sqrt[
+                          (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                          kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                       Sinh[\[Eta]4]))/(2*Sqrt[2]) - (kT3*Sqrt[S]*Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                       I*\[Phi]4]))/(2*Sqrt[2])))/Sqrt[2] - 
+               ((kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/Sqrt[2] + 
+                 (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                   I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))/Sqrt[2])*
+                (-((kT3^2*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                          (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                          Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]3])*(Sinh[\[Eta]3] - 
+                     Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]) + 
+                 (kT3*kT4*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                         (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                         Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                      I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))))/Sqrt[2]))/T)/
+     (MH^2 - S34 - T14 - T24) + 
+    (4*(2 + Eps^(-1) + DiscB[U, Sqrt[MT^2], Sqrt[MT^2]] + Log[Mu^2/MT^2])*
+       (-(((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+          Sqrt[2]) - (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                  kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                    Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                   kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                    Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                    \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+         (2*Sqrt[2]) - (Sech[\[Eta]4]*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]) + 
+      2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+         (2*(MH^2 - U)) - Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/
+            (2*MT^2)]^2/(2*(MH^2 - U)))*
+       (Sqrt[2]*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+          Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+              Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[
+                kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*
+                kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+         ((kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/2 + 
+          ((-MH^2 + U)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2) + 
+        (Sech[\[Eta]4]*(((-MH^2 + U)*((-I)*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+           (kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                   Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                  kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                   Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                 (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+             (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2])*
+          (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+        ((MH^2 - U)*Sech[\[Eta]4]*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]) + 
+      (-8*((kT3*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - U)) + 
+             DiscB[U, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - U)))*
+            (Cos[\[Phi]3] - I*Sin[\[Phi]3])*(kT4*(-MH^2 + 2*T + U)*
+              Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]4] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]4])*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[
+                \[Eta]4 + I*\[Phi]4]) - (Sech[\[Eta]4]*((kT3*(MH^2 - 2*S34 - 
+                   2*T14 + 2*T24 + U)*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/
+                 Sqrt[2] + Sqrt[2]*kT4*(-MH^2 + 2*T + U)*(Cos[\[Phi]4] + 
+                  I*Sin[\[Phi]4]))*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                      4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                        2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                       Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                       Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                        \[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                  (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                   I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                   I*\[Phi]4]))/Sqrt[2] + 4*Sqrt[2]*kT3*(Cos[\[Phi]3] + I*
+                Sin[\[Phi]3])*((kT4*Sqrt[S]*Sech[\[Eta]4]*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4]))/(2*Sqrt[2]) + (kT3*Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+                 (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                (2*Sqrt[2])) + kT3*(MH^2 - 2*T - U)*(I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4])))/
+           Sqrt[2] + (kT3*(-1/(2*(MH^2 - U)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+                Sqrt[MT^2]])/(2*(MH^2 - U)^2) + (MH^2*DiscB[U, Sqrt[MT^2], 
+                Sqrt[MT^2]])/(2*(MH^2 - U)^2) - 
+             (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                  (2*MT^2)]^2)/(2*(MH^2 - U)^2) + 
+             (MT^2*Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/(2*MT^2)]^2)/
+              (2*(MH^2 - U)^2))*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+            (kT4*(MH^2 - 2*S - U)*Sech[\[Eta]4]*(Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]4] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]4])*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[
+                \[Eta]4 + I*\[Phi]4]) - (Sech[\[Eta]4]*((kT3*(-MH^2 + 4*T24 + 
+                   U)*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2] + 
+                Sqrt[2]*kT4*(MH^2 - 2*S - U)*(Cos[\[Phi]4] + I*Sin[\[Phi]4]))*
+               (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                       Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                       Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                        \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                       Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] + 
+             4*Sqrt[2]*kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+              ((kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                    (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4]))/(2*Sqrt[2]) + (kT3*Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+                 (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                (2*Sqrt[2])) + kT3*(-MH^2 + 2*S + U)*(I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4])))/
+           Sqrt[2]) + (4*(2 + Eps^(-1) + DiscB[U, Sqrt[MT^2], Sqrt[MT^2]] + 
+            Log[Mu^2/MT^2]) - 16*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[
+                MT^2]])/(4*(MH^2 - U)) - (U*DiscB[U, Sqrt[MT^2], Sqrt[MT^2]])/
+             (4*(MH^2 - U)) + (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[
+                   -(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/(4*(MH^2 - U)) + 
+            (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+            (MT^2*Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/(2*MT^2)]^2)/
+             (4*(MH^2 - U))))*(Sqrt[2]*kT3*kT4*Sech[\[Eta]4]*
+           (Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+           (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+            (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+           Sqrt[2] - ((-MH^2 + S + T + 2*T14)*Sech[\[Eta]4]*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] + (Sech[\[Eta]4]*
+            ((kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*((kT3*(Cos[\[Phi]3] - 
+                   I*Sin[\[Phi]3]))/Sqrt[2] + 2*Sqrt[2]*
+                 (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))))/Sqrt[2] - 
+             ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4]))*((3*kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/
+                 Sqrt[2] + 2*Sqrt[2]*(-(kT3*Cos[\[Phi]3]) - 
+                  kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                      \[Phi]4]))))/Sqrt[2])*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] - 
+          4*((kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]4] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]4]))/(2*Sqrt[2]) + (kT3*Sqrt[S]*Conjugate[1/
+                Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+               Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/(2*Sqrt[2])) - 
+          (kT3^2*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+             I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*
+                \[Phi]4]))/Sqrt[2] + Sqrt[2]*kT3^2*
+           ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] + 
+            I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+              I*\[Phi]4])) - 
+        2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+           (2*(MH^2 - U)) - Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/
+              (2*MT^2)]^2/(2*(MH^2 - U)))*
+         (-(Sqrt[2]*kT3*kT4*(MH^2 - U)*Sech[\[Eta]4]*(Cos[\[Phi]3] + 
+             I*Sin[\[Phi]3])*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+            (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4])) - 
+          Sqrt[2]*kT3*kT4*S*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+           (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+           (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          ((MH^2 - S - T - 2*T14)*(MH^2 - U)*Sech[\[Eta]4]*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] - Sqrt[2]*Sech[\[Eta]4]*
+           (Sqrt[2]*kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+             ((kT3*T24*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + 
+              (kT4*(MH^2 - U)*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/Sqrt[2]) - 
+            kT3*kT4*S*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*(Cos[\[Phi]4] + 
+              I*Sin[\[Phi]4]))*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+             Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          4*(MH^2 - U)*(-(kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                  (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+                Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]))/
+             (2*Sqrt[2]) - (kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]]*Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[
+                \[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/(2*Sqrt[2])) + 
+          4*kT3^2*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*(Cos[\[Phi]3] + 
+            I*Sin[\[Phi]3])*((kT4*Sqrt[S]*Sech[\[Eta]4]*
+              (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]4] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]))/
+             (2*Sqrt[2]) + (kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]]*Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[
+                \[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/(2*Sqrt[2])) + 
+          Sqrt[2]*kT3^2*S*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+            I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+              I*\[Phi]4]) - Sqrt[2]*kT3^2*(MH^2 - U)*
+           ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] + 
+            I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+              I*\[Phi]4])) - 4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+           (MH^2 - U) - DiscB[U, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - U))*
+         (-(Sqrt[2]*kT3*kT4*(MH^2 - U)*Sech[\[Eta]4]*(Cos[\[Phi]3] + 
+             I*Sin[\[Phi]3])*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+            (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4])) - 
+          (kT3*kT4*(MH^2 + 2*S - 2*T - U)*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+             I*Sin[\[Phi]3])*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+           Sqrt[2] - ((MH^2 - S - T - 2*T14)*(MH^2 - U)*Sech[\[Eta]4]*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] - (Sech[\[Eta]4]*
+            ((kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*((kT3*(MH^2 - 2*S34 - 
+                   2*T14 + 6*T24 + U)*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/
+                 Sqrt[2] + 2*Sqrt[2]*kT4*(MH^2 - U)*(Cos[\[Phi]4] - 
+                  I*Sin[\[Phi]4])))/Sqrt[2] + kT3*kT4*(-MH^2 - 2*S + 2*T + U)*
+              (Cos[\[Phi]3] - I*Sin[\[Phi]3])*(Cos[\[Phi]4] + I*
+                Sin[\[Phi]4]))*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                 (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] - 4*(MH^2 - U)*
+           (-(kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+                Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]))/
+             (2*Sqrt[2]) - (kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]]*Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[
+                \[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/(2*Sqrt[2])) + 
+          8*kT3^2*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*(Cos[\[Phi]3] + 
+            I*Sin[\[Phi]3])*((kT4*Sqrt[S]*Sech[\[Eta]4]*
+              (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]4] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]))/
+             (2*Sqrt[2]) + (kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]]*Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[
+                \[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/(2*Sqrt[2])) + 
+          (kT3^2*(MH^2 + 2*S - 2*T - U)*
+            (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+             I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*
+                \[Phi]4]))/Sqrt[2] - Sqrt[2]*kT3^2*(MH^2 - U)*
+           ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] + 
+            I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+              I*\[Phi]4])))/(MH^2 - S34 - T14 - T24) - 
+      4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - U) - 
+        DiscB[U, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - U))*
+       (-(Sech[\[Eta]4]*(((-MH^2 + U)*((-I)*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+            Sqrt[2]*kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+             ((Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 - 
+              kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                       Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                  (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+                Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                       Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                       Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                        \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 Sinh[\[Eta]3])))*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+        (Sech[\[Eta]4]*(MH^2 - U + kT3^2*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+            (Cos[\[Phi]3] + I*Sin[\[Phi]3]))*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] - 
+        Sqrt[2]*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+          Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+              Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[
+                kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*
+                kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+         (((-MH^2 + U)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 + Sqrt[2]*kT3*(Cos[\[Phi]3] - 
+            I*Sin[\[Phi]3])*((Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+            (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/Sqrt[2]))) - 
+      16*((3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - U)) - 
+          (U*DiscB[U, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - U)) + 
+          (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*
+                MT^2)]^2)/(4*(MH^2 - U)) + (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+          (MT^2*Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/(2*MT^2)]^2)/
+           (4*(MH^2 - U)))*
+         (-(((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+             (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+            Sqrt[2]) - (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                 (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+           (2*Sqrt[2]) - (Sech[\[Eta]4]*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                 (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2]) + (kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+          ((-1/(2*(MH^2 - U)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+              (2*(MH^2 - U)^2) + (MH^2*DiscB[U, Sqrt[MT^2], Sqrt[MT^2]])/
+              (2*(MH^2 - U)^2) - (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[
+                    -(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/(2*(MH^2 - U)^
+                2) + (MT^2*Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/
+                  (2*MT^2)]^2)/(2*(MH^2 - U)^2))*
+            (-(Sqrt[S]*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                     (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                  (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4])/2 - 
+             (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[
+                \[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + 
+                  I*\[Phi]4]))/4) + (-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+              (2*(MH^2 - U)) + DiscB[U, Sqrt[MT^2], Sqrt[MT^2]]/
+              (2*(MH^2 - U)))*((kT3*Sech[\[Eta]4]*(Conjugate[
+                  (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+                Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*(
+                Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+             (kT3*Sech[\[Eta]4]*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*(
+                -Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                       Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                       Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                        \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                       Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+             kT3*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                       \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))))/
+         Sqrt[2]) - ((4*(2 + Eps^(-1) + DiscB[U, Sqrt[MT^2], Sqrt[MT^2]] + 
+            Log[Mu^2/MT^2]) - 16*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[
+                MT^2]])/(4*(MH^2 - U)) - (U*DiscB[U, Sqrt[MT^2], Sqrt[MT^2]])/
+             (4*(MH^2 - U)) + (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[
+                   -(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/(4*(MH^2 - U)) + 
+            (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+            (MT^2*Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/(2*MT^2)]^2)/
+             (4*(MH^2 - U))))*
+         ((Sqrt[S]*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+            ((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + 
+             Sqrt[2]*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*
+                (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))))/2 + 
+          Sqrt[2]*Sqrt[S]*Sech[\[Eta]4]*
+           (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+            kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                     Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])) - 
+          (Sech[\[Eta]4]*(((-S + S34 - T + T24)*((-I)*Conjugate[
+                  (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+             Sqrt[2]*kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]]*(Cos[\[Phi]4] - I*Sin[\[Phi]4]) - 
+             (kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*(-(Sqrt[S]*Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                 2 - kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                      (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                       (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+                  Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+          (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*(2*Sech[\[Eta]4]*
+              (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                2 + kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+                 Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[
+                \[Eta]4 + I*\[Phi]4]) - Sqrt[2]*Sech[\[Eta]4]*
+              ((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + Sqrt[2]*
+                (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))*
+              (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4])))/Sqrt[2] + 2*Sqrt[2]*
+           ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*((Sqrt[S]*Sech[\[Eta]4]*
+              (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])))/4 + (kT3*kT4*Sech[\[Eta]4]*
+              (Cos[\[Phi]4] + I*Sin[\[Phi]4])*(Sinh[\[Eta]3] - Sinh[
+                \[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2)) - 
+        8*((kT3*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - U)) + 
+             DiscB[U, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - U)))*
+            (Cos[\[Phi]3] - I*Sin[\[Phi]3])*(-(Sqrt[S]*(-3*MH^2 + 2*S34 + 
+                 2*T + U)*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                     (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                  (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4])/2 + 
+             (Sech[\[Eta]4]*(-(Sqrt[S]*(-3*MH^2 + 4*S34 + U)*Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                 2 - 2*kT3*(S - S34 + T - T24)*(Conjugate[
+                    (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3]) - kT4*(-3*MH^2 + 4*T + U)*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+                Sinh[\[Eta]4 + I*\[Phi]4]))/2 + kT4*(-3*MH^2 + 2*S34 + 2*T + 
+               U)*Sech[\[Eta]4]*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+              (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]) + 8*(-(kT3*Sqrt[S]*Sech[\[Eta]4]*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+                   I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                  (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]3]))/4 - (kT3*Sqrt[S]*Sech[\[Eta]4]*
+                 (Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(Sqrt[S]*Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]])/2 + kT4*(Conjugate[
+                      (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4])))/4 + (kT4*(Cos[\[Phi]4] + 
+                  I*Sin[\[Phi]4])*(-((kT3^2*Sech[\[Eta]4]*(Conjugate[
+                        (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                        (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[1/Sqrt[
+                          (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                          kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                       Sinh[\[Eta]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - 
+                        I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]) + 
+                  (kT3*Sech[\[Eta]4]*(-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+                     kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                         (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[1/Sqrt[
+                          (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                          kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                        Sinh[\[Eta]4]))*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                       I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2])))/
+           Sqrt[2] + (kT3*(-1/(2*(MH^2 - U)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+                Sqrt[MT^2]])/(2*(MH^2 - U)^2) + (MH^2*DiscB[U, Sqrt[MT^2], 
+                Sqrt[MT^2]])/(2*(MH^2 - U)^2) - 
+             (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                  (2*MT^2)]^2)/(2*(MH^2 - U)^2) + 
+             (MT^2*Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/(2*MT^2)]^2)/
+              (2*(MH^2 - U)^2))*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+            ((Sqrt[S]*(-MH^2 + 2*S + 2*T24 + U)*(I*Conjugate[
+                  (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4])/2 - 
+             (Sech[\[Eta]4]*(Sqrt[S]*(S34 - T)*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                (Sqrt[S]*(-MH^2 + 2*S + 2*T24 + U)*Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+                2*kT3*S*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                      (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                       (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+                  Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3]) - 2*kT3*T24*(Conjugate[
+                    (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3]) + kT4*MH^2*(Conjugate[
+                    (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4]) - 2*kT4*S*(Conjugate[
+                    (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4]) - 2*kT4*T24*(Conjugate[
+                    (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4]) - kT4*U*(Conjugate[
+                    (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+                Sinh[\[Eta]4 + I*\[Phi]4]))/2 - kT4*(-MH^2 + 2*S + 2*T24 + U)*
+              Sech[\[Eta]4]*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+              (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]) + 8*(-(kT3*Sqrt[S]*Sech[\[Eta]4]*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+                   I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                  (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]3]))/4 - (kT3*Sqrt[S]*Sech[\[Eta]4]*
+                 (Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(Sqrt[S]*Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]])/2 + kT4*(Conjugate[
+                      (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4])))/4 + (kT4*(Cos[\[Phi]4] + 
+                  I*Sin[\[Phi]4])*(-((kT3^2*Sech[\[Eta]4]*(Conjugate[
+                        (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                        (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[1/Sqrt[
+                          (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                          kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                       Sinh[\[Eta]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - 
+                        I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]) + 
+                  (kT3*Sech[\[Eta]4]*(-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+                     kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                         (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[1/Sqrt[
+                          (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                          kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                        Sinh[\[Eta]4]))*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                       I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2])))/
+           Sqrt[2]) - 
+        2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+           (2*(MH^2 - U)) - Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/
+              (2*MT^2)]^2/(2*(MH^2 - U)))*
+         (-(Sech[\[Eta]4]*(((S - S34 + T - T24)*(MH^2 - U)*
+                ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+              2*(-((kT4*Sqrt[S]*(MH^2 - U)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                        4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                         Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                         Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]4] - 
+                    I*Sin[\[Phi]4]))/Sqrt[2]) + (kT3*(Cos[\[Phi]3] - 
+                   I*Sin[\[Phi]3])*(-(Sqrt[S]*(S + T24)*Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]) + (Sqrt[S]*(S + S34 - T + T24)*
+                     Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]])/2 + 2*kT3*S*(Conjugate[
+                       (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]3])))/Sqrt[2]))*
+             (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+          4*(-(Sqrt[S]*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                    (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(
+                (kT3*(S + T24)*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + 
+                (kT4*(MH^2 - U)*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/Sqrt[2]))/
+             4 + (Sqrt[S]*(MH^2 - U)*Sech[\[Eta]4]*
+              (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                2 + kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+                 Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4])))/(2*Sqrt[2]) + 
+            (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*(((MH^2 - U)*Sech[\[Eta]4]*
+                 (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]])/2 + kT4*(Conjugate[
+                      (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                  Sinh[\[Eta]4 + I*\[Phi]4]))/2 + (Sech[\[Eta]4]*
+                 ((kT3*(S + T24)*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + 
+                  (kT4*(MH^2 - U)*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/Sqrt[2])*
+                 (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                  I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                  Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]))/
+             Sqrt[2] + ((MH^2 - U)*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*((Sqrt[S]*Sech[\[Eta]4]*
+                 (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])))/4 + (kT3*kT4*Sech[\[Eta]4]*
+                 (Cos[\[Phi]4] + I*Sin[\[Phi]4])*(Sinh[\[Eta]3] - 
+                  Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2))/Sqrt[2] - 
+            Sqrt[2]*kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+             (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(kT3*Cos[\[Phi]3] + 
+                  kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3]))/4 - (kT3*Sqrt[S]*Sech[\[Eta]4]*
+                (Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(Sqrt[S]*Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                  2 + kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                       (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                        (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                         4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                    Cos[\[Phi]4] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                        (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                       (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                        (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                         4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                    Sin[\[Phi]4] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])))/4 + 
+              (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*(-((kT3^2*Sech[\[Eta]4]*
+                    (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]3])*(Sinh[\[Eta]3] - 
+                     Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]) + 
+                 (kT3*Sech[\[Eta]4]*(-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+                    kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                          (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[
+                          kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                         Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                       Cos[\[Phi]4] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                          (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                         Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                       Sin[\[Phi]4] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]))*
+                   (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                  Sqrt[2]))/Sqrt[2]))) - 
+        4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - U) - 
+          DiscB[U, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - U))*
+         (-(Sech[\[Eta]4]*(((S - S34 + T - T24)*(MH^2 - U)*
+                ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] - 
+              Sqrt[2]*kT4*Sqrt[S]*(MH^2 - U)*Conjugate[
+                1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                     Cos[\[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]4] - 
+                I*Sin[\[Phi]4]) + (kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                (-(Sqrt[S]*(7*MH^2 - 8*S34 - 2*T14 - 3*U)*Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                  2 - 4*kT3*(-2*MH^2 + 2*S34 + T14 + 2*T24 + U)*
+                  (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]3]) - kT4*(7*MH^2 - 8*T - 2*T14 - 3*U)*
+                  (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]4])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+          2*(-(Sqrt[S]*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                    (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(
+                (kT3*(-5*MH^2 + 4*S34 + 4*T + 2*T14 + U)*(Cos[\[Phi]3] - 
+                   I*Sin[\[Phi]3]))/Sqrt[2] + Sqrt[2]*(MH^2 - U)*
+                 (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))))/4 - 
+            (Sqrt[S]*(MH^2 - U)*Sech[\[Eta]4]*(-(Sqrt[S]*Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + kT4*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4])))/Sqrt[2] + (kT4*(Cos[\[Phi]4] + I*
+                Sin[\[Phi]4])*(-((MH^2 - U)*Sech[\[Eta]4]*
+                 (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]])/2 + kT4*(Conjugate[
+                      (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                  Sinh[\[Eta]4 + I*\[Phi]4])) + (Sech[\[Eta]4]*
+                 ((kT3*(-5*MH^2 + 4*S34 + 4*T + 2*T14 + U)*(Cos[\[Phi]3] - 
+                     I*Sin[\[Phi]3]))/Sqrt[2] + Sqrt[2]*(MH^2 - U)*
+                   (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                    I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))*
+                 (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                  I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                  Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]))/
+             Sqrt[2] - Sqrt[2]*(MH^2 - U)*((-I)*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*((Sqrt[S]*Sech[\[Eta]4]*
+                (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])))/4 + (kT3*kT4*Sech[\[Eta]4]*
+                (Cos[\[Phi]4] + I*Sin[\[Phi]4])*(Sinh[\[Eta]3] - 
+                 Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2) + 
+            4*Sqrt[2]*kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+             (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(kT3*Cos[\[Phi]3] + 
+                  kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3]))/4 - (kT3*Sqrt[S]*Sech[\[Eta]4]*
+                (Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(Sqrt[S]*Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                  2 + kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                       (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                        (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                         4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                    Cos[\[Phi]4] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                        (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                       (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                        (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                         4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                    Sin[\[Phi]4] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])))/4 + 
+              (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*(-((kT3^2*Sech[\[Eta]4]*
+                    (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]3])*(Sinh[\[Eta]3] - 
+                     Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]) + 
+                 (kT3*Sech[\[Eta]4]*(-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+                    kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                          (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[
+                          kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                         Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                       Cos[\[Phi]4] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                          (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                         Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                       Sin[\[Phi]4] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]))*
+                   (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                  Sqrt[2]))/Sqrt[2]))))/T14)/U))/(MW*SW) - 
+ (2*Alfas^2*c1*EL*MT^2*
+   (((4*(2 + Eps^(-1) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]] + Log[Mu^2/MT^2]) - 
+        16*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - T)) - 
+          (T*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - T)) + 
+          (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*
+                MT^2)]^2)/(4*(MH^2 - T)) + (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+          (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+           (4*(MH^2 - T))))*
+       (((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+         (2*Sqrt[2]) + 
+        (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] - 
+        (Sech[\[Eta]4]*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                  Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                 kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                  Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]) - 
+      2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+         (2*(MH^2 - T)) - Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/
+            (2*MT^2)]^2/(2*(MH^2 - T)))*
+       ((Sech[\[Eta]4]*(((-MH^2 + T)*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] - 
+           (kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                   Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                  kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                   Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                 (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+             (Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2])*
+          (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+        ((MH^2 - T)*Sech[\[Eta]4]*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] - 
+        Sqrt[2]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+          Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+              Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[
+                kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*
+                kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+         (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/2 - 
+          ((-MH^2 + T)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2)) - 8*Sqrt[2]*kT3*
+       (Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+       ((-1/(2*(MH^2 - T)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+           (2*(MH^2 - T)^2) + (MH^2*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/
+           (2*(MH^2 - T)^2) - (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[
+                 -(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/(2*(MH^2 - T)^2) + 
+          (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+           (2*(MH^2 - T)^2))*
+         ((Sqrt[S]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                  Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+             Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4])/2 - 
+          (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+            (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/4) + 
+        (-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - T)) + 
+          DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - T)))*
+         (-(kT3*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+             (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+          (kT3*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/2 - 
+          kT3*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + 
+            Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))) - 
+      4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T) - 
+        DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T))*
+       ((Sech[\[Eta]4]*(((-MH^2 + T)*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+           Sqrt[2]*kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+            (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 - 
+             kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])))*
+          (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+        (Sech[\[Eta]4]*(MH^2 - T + kT3^2*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+            (Cos[\[Phi]3] + I*Sin[\[Phi]3]))*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] - 
+        Sqrt[2]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+          Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+              Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[
+                kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*
+                kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+         (-((-MH^2 + T)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2 + Sqrt[2]*kT3*
+           (Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(Sqrt[S]*Sech[\[Eta]4])/
+             (2*Sqrt[2]) + (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[
+                \[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))))/T + 
+    ((4*(2 + Eps^(-1) + DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]] + 
+          Log[Mu^2/MT^2]) - 16*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+             Sqrt[MT^2]])/(4*(MH^2 - S34)) - 
+          (S34*DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - S34)) + 
+          (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*
+                MT^2)]^2)/(4*(MH^2 - S34)) + (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+          (MT^2*Log[(2*MT^2 - S34 + Sqrt[-((4*MT^2 - S34)*S34)])/(2*MT^2)]^2)/
+           (4*(MH^2 - S34))))*
+       (((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+         (2*Sqrt[2]) + 
+        (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] - 
+        (Sech[\[Eta]4]*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                  Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                 kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                  Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]) + 
+      (kT3*Sech[\[Eta]4]*(-16*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+            (2*(MH^2 - S34)) + DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]]/
+            (2*(MH^2 - S34)))*
+          ((kT3*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(Cos[\[Phi]3] - 
+              I*Sin[\[Phi]3]))/2 - 
+           kT3*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(Cos[\[Phi]3] + I*Sin[\[Phi]3]) + 
+           kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])) + 
+         16*(-1/(2*(MH^2 - S34)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+            (2*(MH^2 - S34)^2) + (MH^2*DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]])/
+            (2*(MH^2 - S34)^2) - (MT^2*Log[(-MH^2 + 2*MT^2 + 
+                 Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/
+            (2*(MH^2 - S34)^2) + (MT^2*Log[(2*MT^2 - S34 + Sqrt[
+                  -((4*MT^2 - S34)*S34)])/(2*MT^2)]^2)/(2*(MH^2 - S34)^2))*
+          ((kT4*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(Cos[\[Phi]4] - 
+              I*Sin[\[Phi]4]))/2 - 
+           kT4*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(Cos[\[Phi]4] + I*Sin[\[Phi]4]) + 
+           kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])))*
+        (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2] + 
+      4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - S34) - 
+        DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - S34))*
+       (((-MH^2 + S34)*Sech[\[Eta]4]*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] + 
+        Sqrt[2]*kT3*Sech[\[Eta]4]*
+         (-(kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])) + 
+          kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]))*
+         (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]) - 
+        ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+          (((-MH^2 + S34)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2 + Sqrt[2]*kT3*Sech[\[Eta]4]*
+            ((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] - 
+             (kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/Sqrt[2])*
+            (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4])))/
+         Sqrt[2] + Sqrt[2]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                 kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                   Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                  kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                   Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+               Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                   \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+          Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+              Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[
+                kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*
+                kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+         (-((-MH^2 + S34)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2 + Sqrt[2]*kT3*Sech[\[Eta]4]*
+           ((kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2] - 
+            (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4]))/Sqrt[2])*
+           (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))) + 
+      2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+         (2*(MH^2 - S34)) - Log[(2*MT^2 - S34 + Sqrt[-((4*MT^2 - S34)*S34)])/
+            (2*MT^2)]^2/(2*(MH^2 - S34)))*
+       (-(((MH^2 - S34)*Sech[\[Eta]4]*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]) + 
+        Sqrt[2]*kT3*kT4*Sech[\[Eta]4]*
+         (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+          Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+          Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+         (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]) + 
+        ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+          (((MH^2 - S34)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2 + kT3*kT4*Sech[\[Eta]4]*
+            (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-Sinh[\[Eta]3] + 
+             Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4])))/Sqrt[2] - 
+        Sqrt[2]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+          Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+              Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[
+                kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*
+                kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+         (-((MH^2 - S34)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2 + kT3*kT4*Sech[\[Eta]4]*
+           (Cos[\[Phi]4] + I*Sin[\[Phi]4])*(-Sinh[\[Eta]3] + 
+            Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))) + 
+      ((4*(2 + Eps^(-1) + DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]] + 
+            Log[Mu^2/MT^2]) - 16*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[
+                MT^2]])/(4*(MH^2 - S34)) - (S34*DiscB[S34, Sqrt[MT^2], Sqrt[
+                MT^2]])/(4*(MH^2 - S34)) + 
+            (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                 (2*MT^2)]^2)/(4*(MH^2 - S34)) + (Eps^(-1) + Log[Mu^2/MT^2])/
+             4 - (MT^2*Log[(2*MT^2 - S34 + Sqrt[-((4*MT^2 - S34)*S34)])/
+                 (2*MT^2)]^2)/(4*(MH^2 - S34))))*
+         (-(((-T - T14 + T24 + U)*Sech[\[Eta]4]*
+             (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                 I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                 I*\[Phi]4]))/Sqrt[2]) - (kT3*Sqrt[S]*Conjugate[
+             1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                    \[Phi]4])]]*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + 
+             Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]) - 
+        4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - S34) - 
+          DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - S34))*
+         (-((S*(MH^2 - S34)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                   Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                  kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                   Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                 (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+             Sech[\[Eta]4])/Sqrt[2]) - (S*(-MH^2 + S34)*
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4])/Sqrt[2] - 
+          ((MH^2 - S34)*(T + T14 - T24 - U)*Sech[\[Eta]4]*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] - (kT3*Sech[\[Eta]4]*
+            ((Sqrt[S]*(-7*MH^2 + 2*S + 3*S34 + 8*T)*Conjugate[
+                1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                     Cos[\[Phi]3 - \[Phi]4])]])/2 - (Sqrt[S]*(7*MH^2 - 2*S - 
+                3*S34 - 8*U)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 - 
+             4*kT3*(-2*MH^2 + S + S34 + 2*T24 + 2*U)*
+              (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))*
+            (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+           Sqrt[2]) + 8*((kT3*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+              (2*(MH^2 - S34)) + DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]]/
+              (2*(MH^2 - S34)))*Sech[\[Eta]4]*(-(Sqrt[S]*(3*MH^2 - S34 - 4*T)*
+                Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+             (Sqrt[S]*(-3*MH^2 + S34 + 4*U)*Conjugate[
+                1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                     Cos[\[Phi]3 - \[Phi]4])]])/2 + 2*kT3*(T + T14 - T24 - U)*
+              (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))*
+            (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+           Sqrt[2] + (kT3*(-1/(2*(MH^2 - S34)) - (MH^2*DiscB[MH^2, 
+                Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - S34)^2) + 
+             (MH^2*DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - S34)^2) - 
+             (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                  (2*MT^2)]^2)/(2*(MH^2 - S34)^2) + 
+             (MT^2*Log[(2*MT^2 - S34 + Sqrt[-((4*MT^2 - S34)*S34)])/(2*MT^2)]^
+                2)/(2*(MH^2 - S34)^2))*Sech[\[Eta]4]*
+            ((Sqrt[S]*(MH^2 - S34 - 2*(T14 + T24))*Conjugate[
+                1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                     Cos[\[Phi]3 - \[Phi]4])]])/2 - (Sqrt[S]*(-MH^2 + S34 + 
+                2*(T14 + T24))*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 - 
+             2*kT3*(-T14 + T24)*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]3] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]3]) - 2*kT4*(T - U)*(Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]4] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]4]))*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+               I*\[Phi]4]))/Sqrt[2]) - 
+        2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+           (2*(MH^2 - S34)) - Log[(2*MT^2 - S34 + Sqrt[-((4*MT^2 - S34)*
+                  S34)])/(2*MT^2)]^2/(2*(MH^2 - S34)))*
+         (-(((MH^2 - S34)*(T + T14 - T24 - U)*Sech[\[Eta]4]*
+             (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                 I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                 I*\[Phi]4]))/Sqrt[2]) - 
+          2*(-(S*(-MH^2 + S34)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[
+                \[Eta]4])/(2*Sqrt[2]) + (Sqrt[S]*(MH^2 - S34)*Sech[\[Eta]4]*
+              (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                2 + kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+                 Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]) + kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+                 Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4])))/Sqrt[2] + (kT3*Sech[\[Eta]4]*
+              (-(Sqrt[S]*(T14 + T24)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                      4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                        2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                       Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                       Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                        \[Phi]3 - \[Phi]4])]]) + 2*kT3*T14*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]) - kT4*(T - T14 - T24 - U)*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4]))*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                 I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2])))/S + 
+      (-8*((kT3*(-1/(2*(MH^2 - S34)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+                Sqrt[MT^2]])/(2*(MH^2 - S34)^2) + (MH^2*DiscB[S34, 
+                Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - S34)^2) - 
+             (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                  (2*MT^2)]^2)/(2*(MH^2 - S34)^2) + 
+             (MT^2*Log[(2*MT^2 - S34 + Sqrt[-((4*MT^2 - S34)*S34)])/(2*MT^2)]^
+                2)/(2*(MH^2 - S34)^2))*Sech[\[Eta]4]*
+            (Sqrt[S]*(-MH^2 + S34 + 2*T24)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]] - ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                    (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*((kT3*(-MH^2 + S34 + 
+                   4*T14)*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + 
+                (kT4*(MH^2 + 2*S - S34 - 2*T + 2*T14)*(Cos[\[Phi]4] - 
+                   I*Sin[\[Phi]4]))/Sqrt[2]))/Sqrt[2] - (-MH^2 + S34 + 2*T24)*
+              ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                       \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(kT3*Cos[\[Phi]3] + kT4*
+                Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])) + 
+             8*(-(kT3*kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  (Cos[\[Phi]3] + I*Sin[\[Phi]3])*(Cos[\[Phi]4] - 
+                   I*Sin[\[Phi]4]))/4 + (kT3*kT4*Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]3] - 
+                  I*Sin[\[Phi]3])*(Cos[\[Phi]4] + I*Sin[\[Phi]4]))/4 - 
+               ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4]))*(-((kT3*kT4*(Cos[\[Phi]4] - 
+                      I*Sin[\[Phi]4])*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                          (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                         Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                       Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                          (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                         Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                       Sin[\[Phi]3] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))/Sqrt[2]) + 
+                  (kT3*kT4*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                    (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]4]))/Sqrt[2]))/Sqrt[2]))*
+            (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+           Sqrt[2] + (kT3*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+              (2*(MH^2 - S34)) + DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]]/
+              (2*(MH^2 - S34)))*Sech[\[Eta]4]*(Sqrt[S]*(MH^2 - S34 - 2*U)*
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] + 
+             ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(
+                -((kT3*(MH^2 - 2*S + S34 - 2*T + 2*T14)*(Cos[\[Phi]3] - 
+                    I*Sin[\[Phi]3]))/Sqrt[2]) + (kT4*(-3*MH^2 + S34 + 4*T)*
+                  (Cos[\[Phi]4] - I*Sin[\[Phi]4]))/Sqrt[2]))/Sqrt[2] - 
+             (MH^2 - S34 - 2*U)*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(kT3*Cos[\[Phi]3] + kT4*
+                Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])) + 
+             8*(-(kT3*kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  (Cos[\[Phi]3] + I*Sin[\[Phi]3])*(Cos[\[Phi]4] - 
+                   I*Sin[\[Phi]4]))/4 + (kT3*kT4*Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]3] - 
+                  I*Sin[\[Phi]3])*(Cos[\[Phi]4] + I*Sin[\[Phi]4]))/4 - 
+               ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4]))*(-((kT3*kT4*(Cos[\[Phi]4] - 
+                      I*Sin[\[Phi]4])*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                          (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                         Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                       Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                          (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                         Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                       Sin[\[Phi]3] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))/Sqrt[2]) + 
+                  (kT3*kT4*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                    (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]4]))/Sqrt[2]))/Sqrt[2]))*
+            (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+           Sqrt[2]) + (4*(2 + Eps^(-1) + DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]] + 
+            Log[Mu^2/MT^2]) - 16*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[
+                MT^2]])/(4*(MH^2 - S34)) - (S34*DiscB[S34, Sqrt[MT^2], Sqrt[
+                MT^2]])/(4*(MH^2 - S34)) + 
+            (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                 (2*MT^2)]^2)/(4*(MH^2 - S34)) + (Eps^(-1) + Log[Mu^2/MT^2])/
+             4 - (MT^2*Log[(2*MT^2 - S34 + Sqrt[-((4*MT^2 - S34)*S34)])/
+                 (2*MT^2)]^2)/(4*(MH^2 - S34))))*
+         ((Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+            (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*
+                Sin[\[Phi]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] - 
+          (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+            (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+             I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+           Sqrt[2] + Sqrt[2]*Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - 
+            kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+              kT4*Sin[\[Phi]4]))*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+             Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+           ((Sqrt[S]*Sech[\[Eta]4])/Sqrt[2] - (kT3*Sech[\[Eta]4]*
+              (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+             Sqrt[2]) - ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+            I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           ((Sqrt[S]*Sech[\[Eta]4])/Sqrt[2] - (kT3*Sech[\[Eta]4]*
+              (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+             Sqrt[2]) + ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                 (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(((-MH^2 + 2*S + T24 + U)*Sech[\[Eta]4]*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+             ((-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4]))*(Sqrt[2]*Sqrt[S]*Sech[\[Eta]4] + 
+                (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                     I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2]))/Sqrt[2]) - 
+        2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+           (2*(MH^2 - S34)) - Log[(2*MT^2 - S34 + Sqrt[-((4*MT^2 - S34)*
+                  S34)])/(2*MT^2)]^2/(2*(MH^2 - S34)))*
+         (((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(((MH^2 - S34)*(MH^2 - 2*S - T24 - U)*
+               Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + 
+                  I*\[Phi]4]))/2 - 2*((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                 ((Sqrt[S]*(MH^2 - S34)*Sech[\[Eta]4])/Sqrt[2] + Sqrt[2]*kT3*
+                   T14*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                      I*\[Phi]3 + I*\[Phi]4])))/Sqrt[2] + (kT4*
+                 (Cos[\[Phi]4] - I*Sin[\[Phi]4])*((Sqrt[S]*(MH^2 - S34)*
+                    Sech[\[Eta]4])/Sqrt[2] + (kT3*(MH^2 + S - S34 - T + T14)*
+                    Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                       I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2])))/
+           Sqrt[2] + 4*(-(Sqrt[S]*(MH^2 - S34)*Conjugate[
+                1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                     Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*(
+                kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                Sinh[\[Eta]4 + I*\[Phi]4]))/(4*Sqrt[2]) + 
+            (Sqrt[S]*(MH^2 - S34)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]]*Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - kT4*
+                Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (4*Sqrt[2]) + Sqrt[2]*kT3*Sech[\[Eta]4]*
+             (-(kT3*kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 (Cos[\[Phi]3] + I*Sin[\[Phi]3])*(Cos[\[Phi]4] - 
+                  I*Sin[\[Phi]4]))/4 + (kT3*kT4*Sqrt[S]*Conjugate[
+                 1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                       \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                       2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]3] - 
+                 I*Sin[\[Phi]3])*(Cos[\[Phi]4] + I*Sin[\[Phi]4]))/4 - 
+              ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4]))*(-((kT3*kT4*(Cos[\[Phi]4] - 
+                     I*Sin[\[Phi]4])*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                          (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                          Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]3]))/Sqrt[2]) + 
+                 (kT3*kT4*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                   (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4]))/Sqrt[2]))/Sqrt[2])*(-Sinh[\[Eta]3] + 
+              Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]) + 
+            (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+              ((Sqrt[S]*(-MH^2 + S34)*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+               (kT3*T24*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                    I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/2 - 
+            ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))*(((MH^2 - S34)*Sech[\[Eta]4]*
+                 (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                 (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                  I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                  Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+               (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+                 ((Sqrt[S]*(-MH^2 + S34)*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+                  (kT3*T24*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                       I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2]))/
+             Sqrt[2])) - 4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+           (MH^2 - S34) - DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - S34))*
+         (-(((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+             (-((MH^2 - S34)*(MH^2 - 2*S - T24 - U)*Sech[\[Eta]4]*
+                 (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+              (kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*(Sqrt[2]*Sqrt[S]*
+                  (MH^2 - S34)*Sech[\[Eta]4] + (kT3*(5*MH^2 + 2*S - 3*S34 - 
+                    6*T + 2*T14)*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + 
+                    Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[
+                2] + (kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*(Sqrt[2]*Sqrt[S]*
+                  (MH^2 - S34)*Sech[\[Eta]4] + (kT3*(MH^2 - 2*S + S34 - 2*T + 
+                    6*T14)*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                      I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2]))/Sqrt[2]) + 
+          2*(-(Sqrt[S]*(MH^2 - S34)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])]]*Sech[\[Eta]4]*(kT3*Cos[\[Phi]3] + 
+                kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (2*Sqrt[2]) + (Sqrt[S]*(MH^2 - S34)*Conjugate[1/
+                Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+              (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[
+                \[Eta]4 + I*\[Phi]4]))/(2*Sqrt[2]) + 4*Sqrt[2]*kT3*
+             Sech[\[Eta]4]*(-(kT3*kT4*Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]3] + 
+                  I*Sin[\[Phi]3])*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/4 + 
+              (kT3*kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                (Cos[\[Phi]3] - I*Sin[\[Phi]3])*(Cos[\[Phi]4] + 
+                 I*Sin[\[Phi]4]))/4 - ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (-((kT3*kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                    (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]3]))/Sqrt[2]) + 
+                 (kT3*kT4*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                   (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4]))/Sqrt[2]))/Sqrt[2])*(-Sinh[\[Eta]3] + 
+              Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]) + 
+            (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+              (-((Sqrt[S]*(MH^2 - S34)*Sech[\[Eta]4])/Sqrt[2]) + 
+               (kT3*(MH^2 - S34 + 2*T24 - 2*U)*Sech[\[Eta]4]*
+                 (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                Sqrt[2]))/2 - ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*
+                (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*((MH^2 - S34)*
+                Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                        Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                        Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                         \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                 I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                 Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) + 
+               (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+                 (-((Sqrt[S]*(MH^2 - S34)*Sech[\[Eta]4])/Sqrt[2]) + 
+                  (kT3*(MH^2 - S34 + 2*T24 - 2*U)*Sech[\[Eta]4]*
+                    (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                   Sqrt[2]))/Sqrt[2]))/Sqrt[2])))/(MH^2 - S - T - T14))/S34 + 
+    ((4*(2 + Eps^(-1) + DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]] + 
+          Log[Mu^2/MT^2]) - 16*(3/4 - (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+             Sqrt[MT^2]])/(4*(MH^2 - S34 - T - U)) + 
+          ((2*MH^2 - S34 - T - U)*DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], 
+             Sqrt[MT^2]])/(4*(MH^2 - S34 - T - U)) - 
+          (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*
+                MT^2)]^2)/(4*(MH^2 - S34 - T - U)) + 
+          (Eps^(-1) + Log[Mu^2/MT^2])/4 + 
+          (MT^2*Log[(-2*MH^2 + 2*MT^2 + S34 + T + U + Sqrt[
+                 -((2*MH^2 - S34 - T - U)*(-2*MH^2 + 4*MT^2 + S34 + T + U))])/
+               (2*MT^2)]^2)/(4*(MH^2 - S34 - T - U))))*
+       (((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+         (2*Sqrt[2]) + 
+        (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] - 
+        (Sech[\[Eta]4]*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                  Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                 kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                  Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]) + 
+      2*(-Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+         (2*(MH^2 - S34 - T - U)) + 
+        Log[(-2*MH^2 + 2*MT^2 + S34 + T + U + Sqrt[-((2*MH^2 - S34 - T - U)*
+                (-2*MH^2 + 4*MT^2 + S34 + T + U))])/(2*MT^2)]^2/
+         (2*(MH^2 - S34 - T - U)))*
+       ((Sech[\[Eta]4]*(((-MH^2 + S34 + T + U)*(I*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+           Sqrt[2]*kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+             I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+            (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))*
+          (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+        Sech[\[Eta]4]*(((-MH^2 + S34 + T + U)*
+            ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]))/Sqrt[2] - Sqrt[2]*kT3*
+           (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+            I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))*
+         (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]) - 
+        ((-MH^2 + S34 + T + U)*Sech[\[Eta]4]*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] + 
+        Sqrt[2]*kT3^2*Sech[\[Eta]4]*
+         (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+          Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+          Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+         (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4])) - 
+      kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+              Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+             Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+              Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                 Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                 Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+              2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+              4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+              kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+              4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+        Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+              Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+             Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+              Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                 Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                 Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+              2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+              4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+              kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+              4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+        Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+              4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+               Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                 \[Phi]4])]]*Sinh[\[Eta]3])*
+       (16*(1/(2*(MH^2 - S34 - T - U)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+             Sqrt[MT^2]])/(2*(MH^2 - S34 - T - U)^2) + 
+          (MH^2*DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]])/
+           (2*(MH^2 - S34 - T - U)^2) - 
+          (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*
+                MT^2)]^2)/(2*(MH^2 - S34 - T - U)^2) + 
+          (MT^2*Log[(-2*MH^2 + 2*MT^2 + S34 + T + U + Sqrt[
+                 -((2*MH^2 - S34 - T - U)*(-2*MH^2 + 4*MT^2 + S34 + T + U))])/
+               (2*MT^2)]^2)/(2*(MH^2 - S34 - T - U)^2))*
+         (-(Sech[\[Eta]4]*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+              I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+             (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+           (2*Sqrt[2]) + (Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - 
+             kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+           Sqrt[2] - (kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+             Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]) - 
+        16*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - S34 - T - U)) - 
+          DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]]/
+           (2*(MH^2 - S34 - T - U)))*((kT3*Sech[\[Eta]4]*(Cos[\[Phi]3] + 
+             I*Sin[\[Phi]3])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/(2*Sqrt[2]) + 
+          (kT3*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+           Sqrt[2] - (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + 
+             Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2])) + 
+      4*(-(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - S34 - T - U)) + 
+        DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]]/
+         (MH^2 - S34 - T - U))*
+       ((Sech[\[Eta]4]*(((-MH^2 + S34 + T + U)*(I*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+           2*kT3*((kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2] + 
+             (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))/Sqrt[2])*
+            (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))*
+          (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+        Sech[\[Eta]4]*(((-MH^2 + S34 + T + U)*
+            ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]))/Sqrt[2] + 
+          2*kT3*((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] - 
+            (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                kT4*Sin[\[Phi]4]))/Sqrt[2])*
+           (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))*
+         (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]) - 
+        ((-MH^2 + S34 + T + U)*Sech[\[Eta]4]*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] - 
+        2*kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+          Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+          Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+         (-((kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                I*\[Phi]4]))/Sqrt[2]) + (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + 
+             Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2])) + 
+      ((4*(2 + Eps^(-1) + DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], 
+             Sqrt[MT^2]] + Log[Mu^2/MT^2]) - 
+          16*(3/4 - (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+             (4*(MH^2 - S34 - T - U)) + ((2*MH^2 - S34 - T - U)*
+              DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]])/
+             (4*(MH^2 - S34 - T - U)) - (MT^2*Log[(-MH^2 + 2*MT^2 + 
+                  Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/
+             (4*(MH^2 - S34 - T - U)) + (Eps^(-1) + Log[Mu^2/MT^2])/4 + 
+            (MT^2*Log[(-2*MH^2 + 2*MT^2 + S34 + T + U + Sqrt[
+                   -((2*MH^2 - S34 - T - U)*(-2*MH^2 + 4*MT^2 + S34 + T + 
+                      U))])/(2*MT^2)]^2)/(4*(MH^2 - S34 - T - U))))*
+         ((Sqrt[S]*Sech[\[Eta]4]*(2*Sqrt[S]*Conjugate[1/Sqrt[
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]] - 
+             kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])))/
+           (2*Sqrt[2]) - (Sqrt[S]*Sech[\[Eta]4]*
+            (2*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                    Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                   kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                    Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                  (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] + 
+             kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])))/
+           (2*Sqrt[2]) - ((-T14 + T24)*Sech[\[Eta]4]*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2]) - 
+        4*(-(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - S34 - T - U)) + 
+          DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]]/
+           (MH^2 - S34 - T - U))*((Sqrt[S]*Sech[\[Eta]4]*
+            (-2*Sqrt[S]*(MH^2 - S - T14 - T24)*Conjugate[1/
+                Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]] - kT3*(-7*MH^2 + 5*S + 8*T + 3*
+                T14 + 3*T24)*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]3] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]3])))/(2*Sqrt[2]) - (Sqrt[S]*Sech[\[Eta]4]*
+            (2*Sqrt[S]*(-MH^2 + S + T14 + T24)*Conjugate[1/
+                Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]] - kT3*(7*MH^2 - 5*S - 3*T14 - 3*
+                T24 - 8*U)*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]3] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]3])))/(2*Sqrt[2]) - ((MH^2 - S - T14 - T24)*
+            (T14 - T24)*Sech[\[Eta]4]*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                 (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] - 2*Sqrt[2]*kT3^2*(T14 - T24)*
+           Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                  kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+           (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4])) - 
+        8*(-(kT3*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - S34 - T - 
+                U)) - DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]]/
+              (2*(MH^2 - S34 - T - U)))*
+            (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+            (-(Sqrt[S]*(MH^2 + S34 + T - 3*U)*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+             (Sqrt[S]*(MH^2 + S34 - 3*T + U)*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+             Sqrt[2]*kT3*(-T14 + T24)*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[
+                \[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))) - 
+          kT3*(1/(2*(MH^2 - S34 - T - U)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+               Sqrt[MT^2]])/(2*(MH^2 - S34 - T - U)^2) + 
+            (MH^2*DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]])/
+             (2*(MH^2 - S34 - T - U)^2) - 
+            (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                 (2*MT^2)]^2)/(2*(MH^2 - S34 - T - U)^2) + 
+            (MT^2*Log[(-2*MH^2 + 2*MT^2 + S34 + T + U + Sqrt[
+                   -((2*MH^2 - S34 - T - U)*(-2*MH^2 + 4*MT^2 + S34 + T + 
+                      U))])/(2*MT^2)]^2)/(2*(MH^2 - S34 - T - U)^2))*
+           (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+           (-(Sqrt[S]*(3*MH^2 - 3*S - 4*T - T14 - T24)*Sech[\[Eta]4])/
+             (2*Sqrt[2]) + (Sqrt[S]*(-3*MH^2 + 3*S + T14 + T24 + 4*U)*
+              Sech[\[Eta]4])/(2*Sqrt[2]) - Sqrt[2]*kT3*(-T14 + T24)*
+             Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                I*\[Phi]4]))) - 
+        2*(-Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+           (2*(MH^2 - S34 - T - U)) + 
+          Log[(-2*MH^2 + 2*MT^2 + S34 + T + U + Sqrt[-((2*MH^2 - S34 - T - U)*
+                  (-2*MH^2 + 4*MT^2 + S34 + T + U))])/(2*MT^2)]^2/
+           (2*(MH^2 - S34 - T - U)))*(-(((MH^2 - S - T14 - T24)*(T14 - T24)*
+             Sech[\[Eta]4]*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+              I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[
+                \[Eta]4 + I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                 I*\[Phi]4]))/Sqrt[2]) - 
+          2*((Sqrt[S]*Sech[\[Eta]4]*(Sqrt[S]*(MH^2 - S34 - T - U)*
+                Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - kT3*(-2*MH^2 + 
+                 2*S34 + 2*T + T14 + T24)*(Conjugate[
+                   (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3])))/(2*Sqrt[2]) + (Sqrt[S]*Sech[\[Eta]4]*
+              (-(Sqrt[S]*(MH^2 - S34 - T - U)*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]) - kT3*
+                (-2*MH^2 + 2*S34 + T14 + T24 + 2*U)*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3])))/(2*Sqrt[2]) - (kT3^2*(-T14 + T24)*
+              Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]3] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]3])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/Sqrt[2])))/S - 
+      ((4*(2 + Eps^(-1) + DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], 
+             Sqrt[MT^2]] + Log[Mu^2/MT^2]) - 
+          16*(3/4 - (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+             (4*(MH^2 - S34 - T - U)) + ((2*MH^2 - S34 - T - U)*
+              DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]])/
+             (4*(MH^2 - S34 - T - U)) - (MT^2*Log[(-MH^2 + 2*MT^2 + 
+                  Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/
+             (4*(MH^2 - S34 - T - U)) + (Eps^(-1) + Log[Mu^2/MT^2])/4 + 
+            (MT^2*Log[(-2*MH^2 + 2*MT^2 + S34 + T + U + Sqrt[
+                   -((2*MH^2 - S34 - T - U)*(-2*MH^2 + 4*MT^2 + S34 + T + 
+                      U))])/(2*MT^2)]^2)/(4*(MH^2 - S34 - T - U))))*
+         (((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(-(kT4*Sqrt[S]*Sech[\[Eta]4]*(
+                Cos[\[Phi]4] - I*Sin[\[Phi]4])) + ((-S + T14)*Sech[\[Eta]4]*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2))/
+           Sqrt[2] + (kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+            (-2*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                    Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                   kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                    Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                  (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))*
+            (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+           (2*Sqrt[2]) - 2*((Sqrt[S]*Sech[\[Eta]4]*(Sqrt[S]*Conjugate[
+                 1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                       \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                       2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - kT4*
+                ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(Cos[\[Phi]4] + 
+                 I*Sin[\[Phi]4]) - kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+                 Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3])))/(2*Sqrt[2]) - (kT4*Sech[\[Eta]4]*
+              (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-(Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]) + kT3*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[
+                \[Eta]4 + I*\[Phi]4]))/(2*Sqrt[2]) - 
+            (kT4^2*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+              (Cos[\[Phi]4] + I*Sin[\[Phi]4])*(-Conjugate[
+                 1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                       \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                       2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]))/Sqrt[2])) - 
+        2*(-Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+           (2*(MH^2 - S34 - T - U)) + 
+          Log[(-2*MH^2 + 2*MT^2 + S34 + T + U + Sqrt[-((2*MH^2 - S34 - T - U)*
+                  (-2*MH^2 + 4*MT^2 + S34 + T + U))])/(2*MT^2)]^2/
+           (2*(MH^2 - S34 - T - U)))*((kT4*Sqrt[S]*(MH^2 - S34 - T - U)*
+            ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]4] + 
+             I*Sin[\[Phi]4]))/Sqrt[2] - Sqrt[2]*Sqrt[S]*Sech[\[Eta]4]*
+           (-(Sqrt[S]*(-MH^2 + S34 + T + U)*Conjugate[
+                1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                     Cos[\[Phi]3 - \[Phi]4])]])/2 - 
+            kT3*(MH^2 - S34 - T24 - U)*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])) + 
+          ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(-(kT4*Sqrt[S]*(MH^2 - S34 - T - U)*Sech[
+                \[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])) - 
+             ((S - T14)*(-MH^2 + S + T14 + T24)*Sech[\[Eta]4]*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2))/
+           Sqrt[2] - Sech[\[Eta]4]*(-((kT3^2*(S - T14)*(Cos[\[Phi]3] + 
+                I*Sin[\[Phi]3])*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+                Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))/
+              Sqrt[2]) + (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+              (Sqrt[S]*(MH^2 - S34 - T - U)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                     4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                       2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                      Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                      Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                        \[Phi]4])]] - kT3*(S34 + T - T24 - U)*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+            Sinh[\[Eta]4 + I*\[Phi]4]) - Sqrt[2]*kT4*Sech[\[Eta]4]*
+           (Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+           (-(Sqrt[S]*(-MH^2 + S34 + T + U)*Conjugate[
+                1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                     Cos[\[Phi]3 - \[Phi]4])]])/2 - 
+            kT3*(MH^2 - S34 - T24 - U)*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))*
+           (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          Sqrt[2]*kT4^2*(MH^2 - S34 - T - U)*Sech[\[Eta]4]*
+           (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          8*kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+           ((kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*((Sqrt[S]*Sech[\[Eta]4]*
+                 (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/4 + (kT3*kT4*
+                 Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                 (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2))/
+             Sqrt[2] + ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*
+                (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*((kT3*Sqrt[S]*
+                 Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/4 + 
+               (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                 (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                2))/Sqrt[2])) - 
+        8*(-(kT3*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - S34 - T - 
+                U)) - DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]]/
+              (2*(MH^2 - S34 - T - U)))*
+            (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+            (-((Sqrt[S]*(MH^2 - S34 + T - U)*Sech[\[Eta]4])/Sqrt[2]) - 
+             (Sech[\[Eta]4]*(Sqrt[2]*kT3*(S - T14)*(Cos[\[Phi]3] + 
+                  I*Sin[\[Phi]3]) + (kT4*(MH^2 + S34 + T - 3*U)*
+                  (Cos[\[Phi]4] + I*Sin[\[Phi]4]))/Sqrt[2])*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+             (kT4*(MH^2 - S34 + T - U)*Sech[\[Eta]4]*(Cos[\[Phi]4] - 
+                I*Sin[\[Phi]4])*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+                Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] + 
+             8*((kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*((Sqrt[S]*Sech[\[Eta]4]*
+                    (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                     I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/4 + 
+                  (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                    (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                   2))/Sqrt[2] + ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                 ((kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/
+                   4 + (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                    (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                   2))/Sqrt[2]))) - kT3*(1/(2*(MH^2 - S34 - T - U)) - 
+            (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+             (2*(MH^2 - S34 - T - U)^2) + (MH^2*DiscB[2*MH^2 - S34 - T - 
+                U, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - S34 - T - U)^2) - 
+            (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                 (2*MT^2)]^2)/(2*(MH^2 - S34 - T - U)^2) + 
+            (MT^2*Log[(-2*MH^2 + 2*MT^2 + S34 + T + U + Sqrt[
+                   -((2*MH^2 - S34 - T - U)*(-2*MH^2 + 4*MT^2 + S34 + T + 
+                      U))])/(2*MT^2)]^2)/(2*(MH^2 - S34 - T - U)^2))*
+           (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+           (-((Sqrt[S]*(MH^2 - S34 + T - 2*T24 - U)*Sech[\[Eta]4])/Sqrt[2]) - 
+            (Sech[\[Eta]4]*(Sqrt[2]*kT3*(S - T14)*(Cos[\[Phi]3] + 
+                 I*Sin[\[Phi]3]) + (kT4*(MH^2 + S34 + T - 2*T24 - 3*U)*
+                 (Cos[\[Phi]4] + I*Sin[\[Phi]4]))/Sqrt[2])*
+              (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+            (kT4*(MH^2 - S34 + T - 2*T24 - U)*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*
+                Sin[\[Phi]4])*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + 
+                 I*\[Phi]4]))/Sqrt[2] + 8*((kT3*(Cos[\[Phi]3] + 
+                 I*Sin[\[Phi]3])*((Sqrt[S]*Sech[\[Eta]4]*
+                   (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                    I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/4 + 
+                 (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                   (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                  2))/Sqrt[2] + ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                ((kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/
+                  4 + (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                   (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                  2))/Sqrt[2]))) - 4*(-(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+            (MH^2 - S34 - T - U)) + DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], 
+            Sqrt[MT^2]]/(MH^2 - S34 - T - U))*
+         (((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(-(kT4*Sqrt[S]*(MH^2 - S34 - T - U)*Sech[
+                \[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])) - 
+             ((S - T14)*(-MH^2 + S + T14 + T24)*Sech[\[Eta]4]*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2))/
+           Sqrt[2] - (Sech[\[Eta]4]*(-2*Sqrt[2]*kT3^2*(S - T14)*
+              (Cos[\[Phi]3] + I*Sin[\[Phi]3])*(Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]3] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]3]) + (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*(
+                2*Sqrt[S]*(MH^2 - S34 - T - U)*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                kT3*(MH^2 + 3*S34 + 3*T - 2*T24 - 5*U)*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+          2*((kT4*Sqrt[S]*(MH^2 - S34 - T - U)*((-I)*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (Cos[\[Phi]4] + I*Sin[\[Phi]4]))/(2*Sqrt[2]) - 
+            (Sqrt[S]*Sech[\[Eta]4]*(-(Sqrt[S]*(-MH^2 + S34 + T + U)*
+                 Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                       Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                       Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                        \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]) - 
+               kT3*(3*MH^2 - 3*S34 + T - 2*T24 - 3*U)*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3])))/(2*Sqrt[2]) - (kT4*Sech[\[Eta]4]*
+              (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-(Sqrt[S]*(-MH^2 + S34 + T + 
+                  U)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                       Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                       Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                        \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]) - 
+               kT3*(3*MH^2 - 3*S34 + T - 2*T24 - 3*U)*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[
+                \[Eta]4 + I*\[Phi]4]))/(2*Sqrt[2]) + 
+            (kT4^2*(MH^2 - S34 - T - U)*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*
+                Sin[\[Phi]4])*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+              (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]))/Sqrt[2] - 8*kT3*
+             (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                     Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+             ((kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*((Sqrt[S]*Sech[\[Eta]4]*
+                   (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                    I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/4 + 
+                 (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                   (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                  2))/Sqrt[2] + ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                ((kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/
+                  4 + (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                   (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                  2))/Sqrt[2]))))/T24)/(2*MH^2 - S34 - T - U) + 
+    (4*(2 + Eps^(-1) + DiscB[U, Sqrt[MT^2], Sqrt[MT^2]] + Log[Mu^2/MT^2])*
+       (((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+         (2*Sqrt[2]) + 
+        (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] - 
+        (Sech[\[Eta]4]*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                  Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                 kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                  Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]) - 
+      2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+         (2*(MH^2 - U)) - Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/
+            (2*MT^2)]^2/(2*(MH^2 - U)))*
+       (((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+          ((kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/2 + 
+           ((-MH^2 + U)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2))/Sqrt[2] + 
+        Sech[\[Eta]4]*(((-MH^2 + U)*((-I)*Conjugate[
+               (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                 (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]))/Sqrt[2] + 
+          (kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                  Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                 kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                  Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+            (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2])*
+         (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]) + 
+        ((MH^2 - U)*Sech[\[Eta]4]*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]) - 
+      (-4*Sqrt[2]*kT3*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - U)) + 
+          DiscB[U, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - U)))*
+         (Cos[\[Phi]3] - I*Sin[\[Phi]3])*(kT4*(-MH^2 + 2*T + U)*Sech[\[Eta]4]*
+           (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+           (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          (Sech[\[Eta]4]*((kT3*(MH^2 - 2*S34 - 2*T14 + 2*T24 + U)*(
+                Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2] + Sqrt[2]*kT4*
+              (-MH^2 + 2*T + U)*(Cos[\[Phi]4] + I*Sin[\[Phi]4]))*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] + 4*Sqrt[2]*kT3*(Cos[\[Phi]3] + 
+            I*Sin[\[Phi]3])*((kT4*Sqrt[S]*Sech[\[Eta]4]*
+              (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]4] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]))/
+             (2*Sqrt[2]) + (kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]]*Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[
+                \[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/(2*Sqrt[2])) + 
+          kT3*(MH^2 - 2*T - U)*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+            Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4])) - 
+        4*Sqrt[2]*kT3*(-1/(2*(MH^2 - U)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+             Sqrt[MT^2]])/(2*(MH^2 - U)^2) + 
+          (MH^2*DiscB[U, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - U)^2) - 
+          (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*
+                MT^2)]^2)/(2*(MH^2 - U)^2) + 
+          (MT^2*Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/(2*MT^2)]^2)/
+           (2*(MH^2 - U)^2))*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+         (kT4*(MH^2 - 2*S - U)*Sech[\[Eta]4]*
+           (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+           (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          (Sech[\[Eta]4]*((kT3*(-MH^2 + 4*T24 + U)*(Cos[\[Phi]3] + 
+                I*Sin[\[Phi]3]))/Sqrt[2] + Sqrt[2]*kT4*(MH^2 - 2*S - U)*
+              (Cos[\[Phi]4] + I*Sin[\[Phi]4]))*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] + 4*Sqrt[2]*kT3*(Cos[\[Phi]3] + 
+            I*Sin[\[Phi]3])*((kT4*Sqrt[S]*Sech[\[Eta]4]*
+              (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]4] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]))/
+             (2*Sqrt[2]) + (kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]]*Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[
+                \[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/(2*Sqrt[2])) + 
+          kT3*(-MH^2 + 2*S + U)*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+            Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4])) + 
+        4*(2 + Eps^(-1) + DiscB[U, Sqrt[MT^2], Sqrt[MT^2]] + Log[Mu^2/MT^2])*
+         (Sqrt[2]*kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+           (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+            (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+           Sqrt[2] - ((-MH^2 + S + T + 2*T14)*Sech[\[Eta]4]*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] + (Sech[\[Eta]4]*
+            ((kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*((kT3*(Cos[\[Phi]3] - 
+                   I*Sin[\[Phi]3]))/Sqrt[2] + 2*Sqrt[2]*
+                 (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))))/Sqrt[2] - 
+             ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4]))*((3*kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/
+                 Sqrt[2] + 2*Sqrt[2]*(-(kT3*Cos[\[Phi]3]) - 
+                  kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                      \[Phi]4]))))/Sqrt[2])*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] - 
+          4*((kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]4] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]4]))/(2*Sqrt[2]) + (kT3*Sqrt[S]*Conjugate[1/
+                Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+               Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/(2*Sqrt[2])) - 
+          (kT3^2*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+             I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*
+                \[Phi]4]))/Sqrt[2] + Sqrt[2]*kT3^2*
+           ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] + 
+            I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+              I*\[Phi]4])) - 16*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+             Sqrt[MT^2]])/(4*(MH^2 - U)) - 
+          (U*DiscB[U, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - U)) + 
+          (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*
+                MT^2)]^2)/(4*(MH^2 - U)) + (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+          (MT^2*Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/(2*MT^2)]^2)/
+           (4*(MH^2 - U)))*(Sqrt[2]*kT3*kT4*Sech[\[Eta]4]*
+           (Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+           (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+            (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+           Sqrt[2] - ((-MH^2 + S + T + 2*T14)*Sech[\[Eta]4]*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] + (Sech[\[Eta]4]*
+            ((kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*((kT3*(Cos[\[Phi]3] - 
+                   I*Sin[\[Phi]3]))/Sqrt[2] + 2*Sqrt[2]*
+                 (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))))/Sqrt[2] - 
+             ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4]))*((3*kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/
+                 Sqrt[2] + 2*Sqrt[2]*(-(kT3*Cos[\[Phi]3]) - 
+                  kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                      \[Phi]4]))))/Sqrt[2])*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] - 
+          4*((kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]4] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]4]))/(2*Sqrt[2]) + (kT3*Sqrt[S]*Conjugate[1/
+                Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+               Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/(2*Sqrt[2])) - 
+          (kT3^2*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+             I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*
+                \[Phi]4]))/Sqrt[2] + Sqrt[2]*kT3^2*
+           ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] + 
+            I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+              I*\[Phi]4])) - 
+        2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+           (2*(MH^2 - U)) - Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/
+              (2*MT^2)]^2/(2*(MH^2 - U)))*
+         (-(Sqrt[2]*kT3*kT4*(MH^2 - U)*Sech[\[Eta]4]*(Cos[\[Phi]3] + 
+             I*Sin[\[Phi]3])*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+            (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4])) - 
+          Sqrt[2]*kT3*kT4*S*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+           (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+           (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          ((MH^2 - S - T - 2*T14)*(MH^2 - U)*Sech[\[Eta]4]*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] - Sqrt[2]*Sech[\[Eta]4]*
+           (Sqrt[2]*kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+             ((kT3*T24*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + 
+              (kT4*(MH^2 - U)*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/Sqrt[2]) - 
+            kT3*kT4*S*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*(Cos[\[Phi]4] + 
+              I*Sin[\[Phi]4]))*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+             Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          4*(MH^2 - U)*(-(kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                  (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+                Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]))/
+             (2*Sqrt[2]) - (kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]]*Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[
+                \[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/(2*Sqrt[2])) + 
+          4*kT3^2*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*(Cos[\[Phi]3] + 
+            I*Sin[\[Phi]3])*((kT4*Sqrt[S]*Sech[\[Eta]4]*
+              (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]4] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]))/
+             (2*Sqrt[2]) + (kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]]*Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[
+                \[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/(2*Sqrt[2])) + 
+          Sqrt[2]*kT3^2*S*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+            I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+              I*\[Phi]4]) - Sqrt[2]*kT3^2*(MH^2 - U)*
+           ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] + 
+            I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+              I*\[Phi]4])) - 4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+           (MH^2 - U) - DiscB[U, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - U))*
+         (-(Sqrt[2]*kT3*kT4*(MH^2 - U)*Sech[\[Eta]4]*(Cos[\[Phi]3] + 
+             I*Sin[\[Phi]3])*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+            (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4])) - 
+          (kT3*kT4*(MH^2 + 2*S - 2*T - U)*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+             I*Sin[\[Phi]3])*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+           Sqrt[2] - ((MH^2 - S - T - 2*T14)*(MH^2 - U)*Sech[\[Eta]4]*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] - (Sech[\[Eta]4]*
+            ((kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*((kT3*(MH^2 - 2*S34 - 
+                   2*T14 + 6*T24 + U)*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/
+                 Sqrt[2] + 2*Sqrt[2]*kT4*(MH^2 - U)*(Cos[\[Phi]4] - 
+                  I*Sin[\[Phi]4])))/Sqrt[2] + kT3*kT4*(-MH^2 - 2*S + 2*T + U)*
+              (Cos[\[Phi]3] - I*Sin[\[Phi]3])*(Cos[\[Phi]4] + I*
+                Sin[\[Phi]4]))*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                 (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] - 4*(MH^2 - U)*
+           (-(kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+                Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]))/
+             (2*Sqrt[2]) - (kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]]*Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[
+                \[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/(2*Sqrt[2])) + 
+          8*kT3^2*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*(Cos[\[Phi]3] + 
+            I*Sin[\[Phi]3])*((kT4*Sqrt[S]*Sech[\[Eta]4]*
+              (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]4] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]))/
+             (2*Sqrt[2]) + (kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]]*Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[
+                \[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/(2*Sqrt[2])) + 
+          (kT3^2*(MH^2 + 2*S - 2*T - U)*
+            (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+             I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*
+                \[Phi]4]))/Sqrt[2] - Sqrt[2]*kT3^2*(MH^2 - U)*
+           ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] + 
+            I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+              I*\[Phi]4])))/(MH^2 - S34 - T14 - T24) - 
+      16*((kT3*(-1/(2*(MH^2 - U)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+              Sqrt[MT^2]])/(2*(MH^2 - U)^2) + 
+           (MH^2*DiscB[U, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - U)^2) - 
+           (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                (2*MT^2)]^2)/(2*(MH^2 - U)^2) + 
+           (MT^2*Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/(2*MT^2)]^2)/
+            (2*(MH^2 - U)^2))*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+          ((Sqrt[S]*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4])/4 + 
+           (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+             (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2))/
+         Sqrt[2] + (3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+           (4*(MH^2 - U)) - (U*DiscB[U, Sqrt[MT^2], Sqrt[MT^2]])/
+           (4*(MH^2 - U)) + (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[
+                 -(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/(4*(MH^2 - U)) + 
+          (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+          (MT^2*Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/(2*MT^2)]^2)/
+           (4*(MH^2 - U)))*
+         (((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+            (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+           (2*Sqrt[2]) + (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                 (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+           Sqrt[2] - (Sech[\[Eta]4]*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                 (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2]) + 
+        (kT3*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - U)) + 
+           DiscB[U, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - U)))*
+          (Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+          (-(kT3*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+             (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4])) + 
+           (kT3*Sech[\[Eta]4]*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+             (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                 I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                 I*\[Phi]4]))/2 + 
+           (kT3*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+             (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2))/
+         Sqrt[2]) - 4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - U) - 
+        DiscB[U, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - U))*
+       (Sech[\[Eta]4]*(((-MH^2 + U)*((-I)*Conjugate[
+               (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                 (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]))/Sqrt[2] + Sqrt[2]*kT3*
+           (Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+           ((Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 - 
+            kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                     Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])))*
+         (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]) + 
+        (Sech[\[Eta]4]*(MH^2 - U + kT3^2*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+            (Cos[\[Phi]3] + I*Sin[\[Phi]3]))*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] + 
+        ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+          (((-MH^2 + U)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2 + Sqrt[2]*kT3*(Cos[\[Phi]3] - 
+             I*Sin[\[Phi]3])*((Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+             (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                  I*\[Phi]4]))/Sqrt[2])))/Sqrt[2]) - 
+      (4*(2 + Eps^(-1) + DiscB[U, Sqrt[MT^2], Sqrt[MT^2]] + Log[Mu^2/MT^2])*
+         (2*Sech[\[Eta]4]*(-(kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])]]*(Cos[\[Phi]4] + I*Sin[\[Phi]4]))/
+             (2*Sqrt[2]) + (kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*
+                (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]4] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]))/
+             Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+            Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+            ((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + 
+             Sqrt[2]*kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+          Sech[\[Eta]4]*((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + 
+            Sqrt[2]*kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))*(kT3*Cos[\[Phi]3] + 
+            kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(Sqrt[S]*Sech[\[Eta]4]*
+              (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])) + ((-MH^2 + S34 + 2*T14 + T24)*Sech[
+                \[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + 
+                  I*\[Phi]4]))/2 - (kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*(
+                -(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) + (kT3*Sech[\[Eta]4]*
+                  (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                 Sqrt[2]))/Sqrt[2]))/Sqrt[2] + 2*Sqrt[S]*
+           Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+           (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+            (kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/Sqrt[2]) - 
+          2*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+            I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+            (kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/Sqrt[2])) - 
+        16*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - U)) - 
+          (U*DiscB[U, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - U)) + 
+          (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*
+                MT^2)]^2)/(4*(MH^2 - U)) + (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+          (MT^2*Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/(2*MT^2)]^2)/
+           (4*(MH^2 - U)))*(2*Sech[\[Eta]4]*
+           (-(kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(
+                Cos[\[Phi]4] + I*Sin[\[Phi]4]))/(2*Sqrt[2]) + 
+            (kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]4] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]4]))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+            Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+            ((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + 
+             Sqrt[2]*kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+          Sech[\[Eta]4]*((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + 
+            Sqrt[2]*kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))*(kT3*Cos[\[Phi]3] + 
+            kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(Sqrt[S]*Sech[\[Eta]4]*
+              (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])) + ((-MH^2 + S34 + 2*T14 + T24)*Sech[
+                \[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + 
+                  I*\[Phi]4]))/2 - (kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*(
+                -(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) + (kT3*Sech[\[Eta]4]*
+                  (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                 Sqrt[2]))/Sqrt[2]))/Sqrt[2] + 2*Sqrt[S]*
+           Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+           (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+            (kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/Sqrt[2]) - 
+          2*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+            I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+            (kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/Sqrt[2])) - 4*Sqrt[2]*kT3*(-1/(2*(MH^2 - U)) - 
+          (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - U)^2) + 
+          (MH^2*DiscB[U, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - U)^2) - 
+          (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*
+                MT^2)]^2)/(2*(MH^2 - U)^2) + 
+          (MT^2*Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/(2*MT^2)]^2)/
+           (2*(MH^2 - U)^2))*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+         ((Sqrt[S]*(-MH^2 + 2*T24 + U)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                    \[Phi]4])]]*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 - (-MH^2 + 2*T24 + U)*
+           Sech[\[Eta]4]*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+            I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*((Sqrt[S]*(-MH^2 - 2*S + 2*T - 2*T14 + 
+                U)*Sech[\[Eta]4])/(2*Sqrt[2]) - (Sqrt[S]*(-2*MH^2 + 4*T24 + 
+                2*U)*Sech[\[Eta]4])/(2*Sqrt[2]) + (kT3*(-MH^2 + 4*S + U)*Sech[
+                \[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                  I*\[Phi]4]))/Sqrt[2]))/Sqrt[2] + 
+          8*(-(kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(
+                Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(Sqrt[S]*Sech[\[Eta]4])/
+                 (2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+                   Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/
+             (2*Sqrt[2]) - (kT3*kT4*Sqrt[S]*Conjugate[1/Sqrt[
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*(Cos[\[Phi]4] + I*
+                Sin[\[Phi]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/4 - ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*
+                (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*((kT3*Sqrt[S]*
+                 Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                       (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                      (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                       (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+                  Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3]))/(2*Sqrt[2]) + (kT3^2*Sech[\[Eta]4]*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                    I*\[Phi]4]))/Sqrt[2] - (kT3*kT4*Sech[\[Eta]4]*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                    I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2])) - 
+        4*Sqrt[2]*kT3*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - U)) + 
+          DiscB[U, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - U)))*
+         (Cos[\[Phi]3] - I*Sin[\[Phi]3])*((Sqrt[S]*(MH^2 - 2*S34 - U)*
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+          (MH^2 - 2*S34 - U)*Sech[\[Eta]4]*(kT3*Cos[\[Phi]3] + 
+            kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*((Sqrt[S]*(3*MH^2 - 4*T - U)*Sech[
+                \[Eta]4])/(2*Sqrt[2]) - (Sqrt[S]*(-2*MH^2 + 4*S34 + 2*U)*Sech[
+                \[Eta]4])/(2*Sqrt[2]) - (kT3*(MH^2 + 2*S - 2*T - 2*T14 + 
+                U)*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                  I*\[Phi]4]))/Sqrt[2]))/Sqrt[2] + 
+          8*(-(kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(
+                Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(Sqrt[S]*Sech[\[Eta]4])/
+                 (2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+                   Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/
+             (2*Sqrt[2]) - (kT3*kT4*Sqrt[S]*Conjugate[1/Sqrt[
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*(Cos[\[Phi]4] + I*
+                Sin[\[Phi]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/4 - ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*
+                (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*((kT3*Sqrt[S]*
+                 Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                       (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                      (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                       (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+                  Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3]))/(2*Sqrt[2]) + (kT3^2*Sech[\[Eta]4]*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                    I*\[Phi]4]))/Sqrt[2] - (kT3*kT4*Sech[\[Eta]4]*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                    I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2])) - 
+        4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - U) - 
+          DiscB[U, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - U))*
+         (((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(kT4*Sqrt[S]*(MH^2 - U)*Sech[\[Eta]4]*
+              (Cos[\[Phi]4] - I*Sin[\[Phi]4]) + ((MH^2 - S34 - 2*T14 - T24)*(
+                MH^2 - U)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                Sinh[\[Eta]4 + I*\[Phi]4]))/2 - (kT3*(Cos[\[Phi]3] - 
+                I*Sin[\[Phi]3])*(-((Sqrt[S]*(MH^2 - 2*S34 + 2*T24 - U)*
+                   Sech[\[Eta]4])/Sqrt[2]) + (Sqrt[S]*(-5*MH^2 - 2*S + 6*T - 
+                   2*T14 + 3*U)*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+                (kT3*(MH^2 + 6*S - 2*T - 2*T14 + U)*Sech[\[Eta]4]*
+                  (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                 Sqrt[2]))/Sqrt[2]))/Sqrt[2] - 
+          2*((MH^2 - U)*Sech[\[Eta]4]*(-(kT4*Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]4] + 
+                  I*Sin[\[Phi]4]))/(2*Sqrt[2]) + (kT4*(kT3*Cos[\[Phi]3] + 
+                 kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4]))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+              Sinh[\[Eta]4 + I*\[Phi]4]) + (Sqrt[S]*Conjugate[1/
+                Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+              ((kT3*(-MH^2 + 2*S34 - 2*T24 + U)*(Cos[\[Phi]3] - 
+                  I*Sin[\[Phi]3]))/Sqrt[2] + Sqrt[2]*kT4*(-MH^2 + U)*
+                (Cos[\[Phi]4] - I*Sin[\[Phi]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+               Sinh[\[Eta]4 + I*\[Phi]4]))/4 - 
+            ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))*((Sech[\[Eta]4]*((kT3*(-MH^2 + 2*S34 - 
+                     2*T24 + U)*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + 
+                  Sqrt[2]*kT4*(-MH^2 + U)*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))*
+                 (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                  I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                  Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] + 
+               Sqrt[2]*(MH^2 - U)*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                     (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                  (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+                (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*
+                   (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                  Sqrt[2])))/Sqrt[2] + Sqrt[S]*(MH^2 - U)*
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+             (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*
+                (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[
+                2]) - 4*Sqrt[2]*kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+             (-(kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 (Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(Sqrt[S]*Sech[\[Eta]4])/
+                   (2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+                     Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/(2*
+                Sqrt[2]) - (kT3*kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                     4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                       2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                      Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                      Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                        \[Phi]4])]]*Sech[\[Eta]4]*(Cos[\[Phi]4] + 
+                 I*Sin[\[Phi]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                   I*\[Phi]4]))/4 - ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                ((kT3*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                      (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]3]))/(2*Sqrt[2]) + (kT3^2*Sech[\[Eta]4]*
+                   (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - 
+                      I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2] - (kT3*kT4*
+                   Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                         (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                         Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                      I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2]))) - 
+        2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+           (2*(MH^2 - U)) - Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/
+              (2*MT^2)]^2/(2*(MH^2 - U)))*
+         (((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(((MH^2 - S34 - 2*T14 - T24)*(MH^2 - 
+                U)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 2*((kT4*Sqrt[S]*(MH^2 - U)*
+                 Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/2 + 
+               (kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*((Sqrt[S]*T24*
+                    Sech[\[Eta]4])/Sqrt[2] + (Sqrt[S]*(MH^2 + S - T + T14 - 
+                     U)*Sech[\[Eta]4])/(2*Sqrt[2]) - Sqrt[2]*kT3*S*
+                   Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                      I*\[Phi]4])))/Sqrt[2])))/Sqrt[2] - 
+          4*(((MH^2 - U)*Sech[\[Eta]4]*(-(kT4*Sqrt[S]*Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  (Cos[\[Phi]4] + I*Sin[\[Phi]4]))/(2*Sqrt[2]) + 
+               (kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4]))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[
+                \[Eta]4 + I*\[Phi]4]))/2 - (Sqrt[S]*Conjugate[1/
+                Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+              ((kT3*T24*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + 
+               (kT4*(MH^2 - U)*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/Sqrt[2])*
+              (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/4 - 
+            ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))*(-((Sech[\[Eta]4]*((kT3*T24*
+                     (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + 
+                   (kT4*(MH^2 - U)*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/Sqrt[2])*
+                  (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                       kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                        Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                   Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/
+                 Sqrt[2]) + ((MH^2 - U)*((-I)*Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+                 (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*
+                    (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                   Sqrt[2]))/Sqrt[2]))/Sqrt[2] + (Sqrt[S]*(MH^2 - U)*
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+              (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*
+                 (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                Sqrt[2]))/2 - Sqrt[2]*kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+             (-(kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 (Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(Sqrt[S]*Sech[\[Eta]4])/
+                   (2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+                     Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/(2*
+                Sqrt[2]) - (kT3*kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                     4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                       2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                      Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                      Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                        \[Phi]4])]]*Sech[\[Eta]4]*(Cos[\[Phi]4] + 
+                 I*Sin[\[Phi]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                   I*\[Phi]4]))/4 - ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                ((kT3*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                      (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]3]))/(2*Sqrt[2]) + (kT3^2*Sech[\[Eta]4]*
+                   (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - 
+                      I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2] - (kT3*kT4*
+                   Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                         (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                         Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                      I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2]))))/
+       (MH^2 - S - T - T14))/U + 
+    ((2*((2 + Eps^(-1) + DiscB[MH^2 - S34 - T14 - T24, Sqrt[MT^2], 
+             Sqrt[MT^2]] + Log[Mu^2/MT^2])*
+           (-(((-T - 2*T14 + 2*T24 + U)*Sech[\[Eta]4]*(-Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                       Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]) + 
+            4*((kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                   (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4]))/Sqrt[2] + (kT3*Sqrt[S]*Conjugate[
+                 1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                       \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                       2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+                (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[
+                2])) + ScalarC0[MH^2, S, MH^2 - S34 - T14 - T24, Sqrt[MT^2], 
+            Sqrt[MT^2], Sqrt[MT^2]]*(-(((-2*MH^2*T14 + 2*MH^2*T24 - 2*T*T24 + 
+                2*T14*U + S*(-T + U))*Sech[\[Eta]4]*(-Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                       Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]) - 
+            4*(-(kT4*((Sqrt[S]*(MH^2 - T)*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+                 (Sqrt[S]*(-MH^2 + U)*Sech[\[Eta]4])/(2*Sqrt[2]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4])) + (kT3*((Sqrt[S]*(-MH^2 + T)*Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                  2 - (Sqrt[S]*(MH^2 - U)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                        4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                         Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                         Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])]])/2)*Sech[\[Eta]4]*
+                (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[
+                2]))) + 4*S*((-2*MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+           Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - T24] + 
+          ((S + S34 + T14 + T24)*DiscB[S, Sqrt[MT^2], Sqrt[MT^2]])/
+           Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - T24] + 
+          ((2*MH^2 - S - S34 - T14 - T24)*DiscB[MH^2 - S34 - T14 - T24, 
+             Sqrt[MT^2], Sqrt[MT^2]])/Kallen\[Lambda][MH^2, S, 
+            MH^2 - S34 - T14 - T24] + (MH^2*(S - S34 - T14 - T24)*
+            ScalarC0[MH^2, S, MH^2 - S34 - T14 - T24, Sqrt[MT^2], Sqrt[MT^2], 
+             Sqrt[MT^2]])/Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - T24])*
+         (-(((-T - 2*T14 + 2*T24 + U)*Sech[\[Eta]4]*
+             (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                 I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                 I*\[Phi]4]))/Sqrt[2]) + 
+          4*((kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]4] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]4]))/Sqrt[2] + (kT3*Sqrt[S]*Conjugate[1/
+                Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+               Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2])) - 
+        8*(3/4 - (MH^2*(S - S34 - T14 - T24)*DiscB[MH^2, Sqrt[MT^2], 
+             Sqrt[MT^2]])/(4*Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - 
+              T24]) - (S*(2*MH^2 - S - S34 - T14 - T24)*DiscB[S, Sqrt[MT^2], 
+             Sqrt[MT^2]])/(4*Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - 
+              T24]) - ((MH^2 - S34 - T14 - T24)*(S + S34 + T14 + T24)*
+            DiscB[MH^2 - S34 - T14 - T24, Sqrt[MT^2], Sqrt[MT^2]])/
+           (4*Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - T24]) + 
+          (Eps^(-1) + Log[Mu^2/MT^2])/4 + ((MH^4*S - 4*MH^2*MT^2*S + 
+             MT^2*S^2 - MH^2*S*S34 + 2*MT^2*S*S34 + MT^2*S34^2 - MH^2*S*T14 + 
+             2*MT^2*S*T14 + 2*MT^2*S34*T14 + MT^2*T14^2 - MH^2*S*T24 + 
+             2*MT^2*S*T24 + 2*MT^2*S34*T24 + 2*MT^2*T14*T24 + MT^2*T24^2)*
+            ScalarC0[MH^2, S, MH^2 - S34 - T14 - T24, Sqrt[MT^2], Sqrt[MT^2], 
+             Sqrt[MT^2]])/(2*Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - 
+              T24]))*(-(((-T - 2*T14 + 2*T24 + U)*Sech[\[Eta]4]*
+             (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                 I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                 I*\[Phi]4]))/Sqrt[2]) + 
+          4*((kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]4] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]4]))/Sqrt[2] + (kT3*Sqrt[S]*Conjugate[1/
+                Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+               Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2])) - 
+        2*(((S + S34 + T14 + T24)*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+           Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - T24] - 
+          (2*S*DiscB[S, Sqrt[MT^2], Sqrt[MT^2]])/Kallen\[Lambda][MH^2, S, 
+            MH^2 - S34 - T14 - T24] + ((S - S34 - T14 - T24)*
+            DiscB[MH^2 - S34 - T14 - T24, Sqrt[MT^2], Sqrt[MT^2]])/
+           Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - T24] + 
+          (S*(2*MH^2 - S - S34 - T14 - T24)*ScalarC0[MH^2, S, 
+             MH^2 - S34 - T14 - T24, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]])/
+           Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - T24])*
+         (-(((-2*S34*T - T^2 + 4*T*T24 + 2*S*(T - U) + 2*MH^2*(T + 2*T14 - 
+                2*T24 - U) + 2*S34*U - 4*T14*U + U^2)*Sech[\[Eta]4]*
+             (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                 I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                 I*\[Phi]4]))/Sqrt[2]) + 
+          4*((kT3*Sech[\[Eta]4]*(-(Sqrt[S]*(MH^2 - T)*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]) - Sqrt[S]*
+                (MH^2 - U)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+               kT3*(T - U)*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+                 Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/Sqrt[2] - 
+            kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                     Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+             ((Sqrt[S]*(MH^2 - T)*Sech[\[Eta]4])/Sqrt[2] + 
+              (Sqrt[S]*(MH^2 - U)*Sech[\[Eta]4])/Sqrt[2] + (kT3*(-T + U)*
+                Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                   I*\[Phi]4]))/Sqrt[2]))) - 
+        4*((((6*MH^2*S^2 - 3*S^3 + 10*MH^2*S*S34 - 7*S^2*S34 - 5*S*S34^2 - 
+               S34^3 + 10*MH^2*S*T14 - 7*S^2*T14 - 10*S*S34*T14 - 3*S34^2*
+                T14 - 5*S*T14^2 - 3*S34*T14^2 - T14^3 + 10*MH^2*S*T24 - 7*S^2*
+                T24 - 10*S*S34*T24 - 3*S34^2*T24 - 10*S*T14*T24 - 6*S34*T14*
+                T24 - 3*T14^2*T24 - 5*S*T24^2 - 3*S34*T24^2 - 3*T14*T24^2 - 
+               T24^3)*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+             (2*Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - T24]^2) - 
+            (3*S^2*(2*MH^2 - S - S34 - T14 - T24)*DiscB[S, Sqrt[MT^2], Sqrt[
+                MT^2]])/Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - T24]^2 + 
+            ((6*MH^2*S^2 - 3*S^3 - 10*MH^2*S*S34 + S^2*S34 + 5*S*S34^2 + S34^
+                3 - 10*MH^2*S*T14 + S^2*T14 + 10*S*S34*T14 + 3*S34^2*T14 + 5*
+                S*T14^2 + 3*S34*T14^2 + T14^3 - 10*MH^2*S*T24 + S^2*T24 + 10*
+                S*S34*T24 + 3*S34^2*T24 + 10*S*T14*T24 + 6*S34*T14*T24 + 3*
+                T14^2*T24 + 5*S*T24^2 + 3*S34*T24^2 + 3*T14*T24^2 + T24^3)*
+              DiscB[MH^2 - S34 - T14 - T24, Sqrt[MT^2], Sqrt[MT^2]])/
+             (2*Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - T24]^2) + 
+            S/Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - T24] + 
+            (S*(6*MH^4*S - 8*MH^2*MT^2*S - 4*MH^2*S^2 + 2*MT^2*S^2 + S^3 - 6*
+                MH^2*S*S34 + 4*MT^2*S*S34 + 2*S^2*S34 + 2*MT^2*S34^2 + S*
+                S34^2 - 6*MH^2*S*T14 + 4*MT^2*S*T14 + 2*S^2*T14 + 4*MT^2*S34*
+                T14 + 2*S*S34*T14 + 2*MT^2*T14^2 + S*T14^2 - 6*MH^2*S*T24 + 4*
+                MT^2*S*T24 + 2*S^2*T24 + 4*MT^2*S34*T24 + 2*S*S34*T24 + 4*
+                MT^2*T14*T24 + 2*S*T14*T24 + 2*MT^2*T24^2 + S*T24^2)*
+              ScalarC0[MH^2, S, MH^2 - S34 - T14 - T24, Sqrt[MT^2], Sqrt[
+                MT^2], Sqrt[MT^2]])/Kallen\[Lambda][MH^2, S, MH^2 - S34 - 
+                T14 - T24]^2)*(-(((2*MH^2 - 2*S34 - T - U)*(T - U)*Sech[
+                \[Eta]4]*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                       Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]) + 
+            4*(T - U)*(-((kT3^2*Sech[\[Eta]4]*(Conjugate[
+                    (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                    I*\[Phi]4]))/Sqrt[2]) + (kT3*kT4*Sech[\[Eta]4]*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                   I*\[Phi]4]))/Sqrt[2])) + 
+          (-(MH^2*(8*MH^2*S - 5*S^2 - 4*S*S34 + S34^2 - 4*S*T14 + 2*S34*T14 + 
+                T14^2 - 4*S*T24 + 2*S34*T24 + 2*T14*T24 + T24^2)*DiscB[MH^2, 
+                Sqrt[MT^2], Sqrt[MT^2]])/(2*Kallen\[Lambda][MH^2, S, 
+                MH^2 - S34 - T14 - T24]^2) - (S*(2*MH^2*S + S^2 - 6*MH^2*
+                S34 + 2*S*S34 + S34^2 - 6*MH^2*T14 + 2*S*T14 + 2*S34*T14 + 
+               T14^2 - 6*MH^2*T24 + 2*S*T24 + 2*S34*T24 + 2*T14*T24 + T24^2)*
+              DiscB[S, Sqrt[MT^2], Sqrt[MT^2]])/(2*Kallen\[Lambda][MH^2, S, 
+                MH^2 - S34 - T14 - T24]^2) + ((8*MH^4*S - 3*MH^2*S^2 + S^3 - 
+               10*MH^2*S*S34 + 2*S^2*S34 + MH^2*S34^2 + S*S34^2 - 10*MH^2*S*
+                T14 + 2*S^2*T14 + 2*MH^2*S34*T14 + 2*S*S34*T14 + MH^2*T14^2 + 
+               S*T14^2 - 10*MH^2*S*T24 + 2*S^2*T24 + 2*MH^2*S34*T24 + 2*S*S34*
+                T24 + 2*MH^2*T14*T24 + 2*S*T14*T24 + MH^2*T24^2 + S*T24^2)*
+              DiscB[MH^2 - S34 - T14 - T24, Sqrt[MT^2], Sqrt[MT^2]])/
+             (2*Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - T24]^2) - 
+            (S + S34 + T14 + T24)/(2*Kallen\[Lambda][MH^2, S, MH^2 - S34 - 
+                T14 - T24]) + ((MH^4*S^2 + 4*MH^2*MT^2*S^2 - MH^2*S^3 - MT^2*
+                S^3 - 3*MH^4*S*S34 + 4*MH^2*MT^2*S*S34 + MH^2*S^2*S34 - 3*
+                MT^2*S^2*S34 + 2*MH^2*S*S34^2 - 3*MT^2*S*S34^2 - MT^2*S34^3 - 
+               3*MH^4*S*T14 + 4*MH^2*MT^2*S*T14 + MH^2*S^2*T14 - 3*MT^2*S^2*
+                T14 + 4*MH^2*S*S34*T14 - 6*MT^2*S*S34*T14 - 3*MT^2*S34^2*
+                T14 + 2*MH^2*S*T14^2 - 3*MT^2*S*T14^2 - 3*MT^2*S34*T14^2 - 
+               MT^2*T14^3 - 3*MH^4*S*T24 + 4*MH^2*MT^2*S*T24 + MH^2*S^2*T24 - 
+               3*MT^2*S^2*T24 + 4*MH^2*S*S34*T24 - 6*MT^2*S*S34*T24 - 3*MT^2*
+                S34^2*T24 + 4*MH^2*S*T14*T24 - 6*MT^2*S*T14*T24 - 6*MT^2*S34*
+                T14*T24 - 3*MT^2*T14^2*T24 + 2*MH^2*S*T24^2 - 3*MT^2*S*
+                T24^2 - 3*MT^2*S34*T24^2 - 3*MT^2*T14*T24^2 - MT^2*T24^3)*
+              ScalarC0[MH^2, S, MH^2 - S34 - T14 - T24, Sqrt[MT^2], Sqrt[
+                MT^2], Sqrt[MT^2]])/Kallen\[Lambda][MH^2, S, MH^2 - S34 - 
+                T14 - T24]^2)*(-(((2*MH^2 - 2*S34 - T - U)*(T - U)*Sech[
+                \[Eta]4]*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                       Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]) + 
+            4*(T - U)*(-((kT3^2*Sech[\[Eta]4]*(Conjugate[
+                    (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                    I*\[Phi]4]))/Sqrt[2]) + (kT3*kT4*Sech[\[Eta]4]*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                   I*\[Phi]4]))/Sqrt[2]))))/S + 
+      ((4*(2 + Eps^(-1) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]] + 
+            Log[Mu^2/MT^2]) - 16*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[
+                MT^2]])/(4*(MH^2 - T)) - (T*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/
+             (4*(MH^2 - T)) + (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[
+                   -(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/(4*(MH^2 - T)) + 
+            (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+            (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+             (4*(MH^2 - T))))*(-((kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]3] + 
+              I*Sin[\[Phi]3])*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+             (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+            Sqrt[2]) - Sqrt[2]*kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+            I*Sin[\[Phi]3])*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                  kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+           (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          ((-MH^2 + S + 2*T24 + U)*Sech[\[Eta]4]*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] + (Sech[\[Eta]4]*
+            (-2*kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*(-(kT3*Cos[\[Phi]3]) - 
+               kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])) - 
+             2*kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*(kT3*Cos[\[Phi]3] + kT4*
+                Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])) + 
+             (kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*((kT4*(Cos[\[Phi]4] - 
+                   I*Sin[\[Phi]4]))/Sqrt[2] - (-(kT3*Cos[\[Phi]3]) - 
+                  kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))/
+                 Sqrt[2]))/Sqrt[2])*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                 (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] - 
+          4*(-(kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                  (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+                Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]))/
+             (2*Sqrt[2]) - (kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]]*Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[
+                \[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/(2*Sqrt[2])) + 
+          Sqrt[2]*kT3^2*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+            I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+              I*\[Phi]4]) - (kT3^2*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                 (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] + 
+             I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*
+                \[Phi]4]))/Sqrt[2]) - 
+        2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+           (2*(MH^2 - T)) - Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/
+              (2*MT^2)]^2/(2*(MH^2 - T)))*(Sqrt[2]*kT3*kT4*S*Sech[\[Eta]4]*
+           (Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+           (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          Sqrt[2]*kT3*kT4*(MH^2 - T)*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+            I*Sin[\[Phi]3])*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                  kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+           (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          ((MH^2 - T)*(MH^2 - S - 2*T24 - U)*Sech[\[Eta]4]*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] + Sqrt[2]*Sech[\[Eta]4]*
+           ((kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(Sqrt[2]*kT3*T14*
+                 (Cos[\[Phi]3] - I*Sin[\[Phi]3])) + Sqrt[2]*kT4*S*
+                (Cos[\[Phi]4] - I*Sin[\[Phi]4])))/Sqrt[2] - 
+            kT3*kT4*(MH^2 - T)*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+             (Cos[\[Phi]4] + I*Sin[\[Phi]4]))*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          4*Sqrt[2]*kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+           ((kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*((kT4*Sqrt[S]*Sech[\[Eta]4]*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4]))/(2*Sqrt[2]) + (kT3*Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+                 (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                (2*Sqrt[2])))/Sqrt[2] + ((-(kT3*Cos[\[Phi]3]) - kT4*
+                Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              ((kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                    (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4]))/(2*Sqrt[2]) + (kT3*Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+                 (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                (2*Sqrt[2])))/Sqrt[2]) - 4*(MH^2 - T)*
+           ((kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]4] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]4]))/(2*Sqrt[2]) + (kT3*Sqrt[S]*Conjugate[1/
+                Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+               Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/(2*Sqrt[2])) - 
+          Sqrt[2]*kT3^2*(MH^2 - T)*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+            I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+              I*\[Phi]4]) + Sqrt[2]*kT3^2*S*
+           ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] + 
+            I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+              I*\[Phi]4])) - 4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+           (MH^2 - T) - DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T))*
+         ((kT3*kT4*(MH^2 + 2*S - T - 2*U)*Sech[\[Eta]4]*(Cos[\[Phi]3] + 
+             I*Sin[\[Phi]3])*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+            (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+           Sqrt[2] + Sqrt[2]*kT3*kT4*(MH^2 - T)*Sech[\[Eta]4]*
+           (Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+           (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+           (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          ((MH^2 - T)*(MH^2 - S - 2*T24 - U)*Sech[\[Eta]4]*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] + (Sech[\[Eta]4]*
+            (-((kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*(2*Sqrt[2]*kT3*
+                  (MH^2 - S - 2*T24 - U)*(Cos[\[Phi]3] - I*Sin[\[Phi]3]) + 
+                 (kT4*(-7*MH^2 - 2*S + 8*S34 + 3*T + 6*U)*(Cos[\[Phi]4] - 
+                    I*Sin[\[Phi]4]))/Sqrt[2] + ((-9*MH^2 + 2*S + 8*S34 + 
+                    5*T + 2*U)*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                    I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/Sqrt[2]))/Sqrt[
+                2]) - 4*(MH^2 - T)*(-(kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+                  (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                   I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/2 - 
+               (kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*(kT3*Cos[\[Phi]3] + 
+                  kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                      \[Phi]4])))/2))*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                 (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] - 4*(MH^2 - T)*
+           ((kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]4] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]4]))/(2*Sqrt[2]) + (kT3*Sqrt[S]*Conjugate[1/
+                Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+               Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/(2*Sqrt[2])) - 
+          Sqrt[2]*kT3^2*(MH^2 - T)*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+            I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+              I*\[Phi]4]) + (kT3^2*(MH^2 + 2*S - T - 2*U)*
+            ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] + 
+             I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*
+                \[Phi]4]))/Sqrt[2] + 8*Sqrt[2]*kT3*(Cos[\[Phi]3] + 
+            I*Sin[\[Phi]3])*((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+              (-(kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                     (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]4]))/(2*Sqrt[2]) - (kT3*Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+                 (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                (2*Sqrt[2])))/Sqrt[2] - ((kT4*(Cos[\[Phi]4] - 
+                 I*Sin[\[Phi]4]))/Sqrt[2] + (-(kT3*Cos[\[Phi]3]) - 
+                kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))/
+               Sqrt[2])*(-((kT3^2*Sech[\[Eta]4]*(Conjugate[
+                    (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                    I*\[Phi]4]))/Sqrt[2]) + (kT3*kT4*Sech[\[Eta]4]*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                   I*\[Phi]4]))/Sqrt[2]))) - 
+        8*((kT3*(-1/(2*(MH^2 - T)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+                Sqrt[MT^2]])/(2*(MH^2 - T)^2) + (MH^2*DiscB[T, Sqrt[MT^2], 
+                Sqrt[MT^2]])/(2*(MH^2 - T)^2) - 
+             (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                  (2*MT^2)]^2)/(2*(MH^2 - T)^2) + 
+             (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+              (2*(MH^2 - T)^2))*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+            (-(kT4*(MH^2 - 2*S - T)*Sech[\[Eta]4]*(Conjugate[
+                  (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+                Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4])) + 
+             (Sech[\[Eta]4]*(Sqrt[2]*kT3*(-MH^2 + S + 2*T24 + U)*
+                 (Cos[\[Phi]3] - I*Sin[\[Phi]3]) + (kT4*(3*MH^2 + 2*S - 
+                   4*S34 - T - 2*U)*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/
+                 Sqrt[2] + ((5*MH^2 - 2*S - 4*S34 - 3*T - 2*U)*
+                  (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                   I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/Sqrt[2])*(
+                -Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                       Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                       Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                        \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                       Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] + 
+             kT3*(-MH^2 + 2*S + T)*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]) + 
+             8*((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                 (-(kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                        (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                        (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[1/Sqrt[
+                          (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                          kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                       Sinh[\[Eta]4]))/(2*Sqrt[2]) - (kT3*Sqrt[S]*Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                       I*\[Phi]4]))/(2*Sqrt[2])))/Sqrt[2] - 
+               ((kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/Sqrt[2] + 
+                 (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                   I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))/Sqrt[2])*
+                (-((kT3^2*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                          (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                          Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]3])*(Sinh[\[Eta]3] - 
+                     Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]) + 
+                 (kT3*kT4*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                         (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                         Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                      I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))))/Sqrt[2] + 
+          (kT3*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - T)) + 
+             DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - T)))*
+            (Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(kT4*(-MH^2 + T + 2*U)*Sech[
+                \[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+                Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4])) + 
+             (Sech[\[Eta]4]*(Sqrt[2]*kT3*(-MH^2 + S + 2*T24 + U)*
+                 (Cos[\[Phi]3] - I*Sin[\[Phi]3]) + (kT4*(5*MH^2 - 4*S34 - 
+                   3*T - 4*U)*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/Sqrt[2] + 
+                ((3*MH^2 - 4*S34 - T)*(-(kT3*Cos[\[Phi]3]) - 
+                   kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                       \[Phi]4])))/Sqrt[2])*(-Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                       Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] + 
+             kT3*(MH^2 - T - 2*U)*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]) + 
+             8*((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                 (-(kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                        (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                        (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[1/Sqrt[
+                          (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                          kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                       Sinh[\[Eta]4]))/(2*Sqrt[2]) - (kT3*Sqrt[S]*Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                       I*\[Phi]4]))/(2*Sqrt[2])))/Sqrt[2] - 
+               ((kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/Sqrt[2] + 
+                 (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                   I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))/Sqrt[2])*
+                (-((kT3^2*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                          (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                          Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]3])*(Sinh[\[Eta]3] - 
+                     Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]) + 
+                 (kT3*kT4*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                         (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                         Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                      I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))))/Sqrt[2]))/T)/
+     (MH^2 - S34 - T14 - T24) + 
+    (((2*(2 + Eps^(-1) + DiscB[T24, Sqrt[MT^2], Sqrt[MT^2]] + 
+            Log[Mu^2/MT^2]) - 8*(3/4 + (MH^2*(S + T + T14 - T24)*
+              DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(4*Kallen\[Lambda][MH^
+                2, MH^2 - S - T - T14, T24]) - ((MH^2 - S - T - T14)*
+              (S + T + T14 + T24)*DiscB[MH^2 - S - T - T14, Sqrt[MT^2], Sqrt[
+                MT^2]])/(4*Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24]) - 
+            ((2*MH^2 - S - T - T14 - T24)*T24*DiscB[T24, Sqrt[MT^2], Sqrt[
+                MT^2]])/(4*Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24]) + 
+            (Eps^(-1) + Log[Mu^2/MT^2])/4 + ((MT^2*S^2 + 2*MT^2*S*T + MT^2*
+                T^2 + 2*MT^2*S*T14 + 2*MT^2*T*T14 + MT^2*T14^2 + MH^4*T24 - 4*
+                MH^2*MT^2*T24 - MH^2*S*T24 + 2*MT^2*S*T24 - MH^2*T*T24 + 2*
+                MT^2*T*T24 - MH^2*T14*T24 + 2*MT^2*T14*T24 + MT^2*T24^2)*
+              ScalarC0[MH^2, MH^2 - S - T - T14, T24, Sqrt[MT^2], Sqrt[MT^2], 
+               Sqrt[MT^2]])/(2*Kallen\[Lambda][MH^2, MH^2 - S - T - T14, 
+               T24])))*(-2*Sech[\[Eta]4]*
+           (-(kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(
+                Cos[\[Phi]4] + I*Sin[\[Phi]4]))/(2*Sqrt[2]) - 
+            ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))*((Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 - kT4*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+            Sinh[\[Eta]4 + I*\[Phi]4]) - 4*Sqrt[S]*Conjugate[
+            1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                 Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                 Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                   \[Phi]4])]]*(-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+            (kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+              (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (2*Sqrt[2])) - 4*Sqrt[2]*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+            I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           ((Sqrt[S]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                       \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4])/4 + 
+            (kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+              (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]))/2) + 
+          ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(((2*S - S34 - 2*T14 + U)*Sech[\[Eta]4]*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+             4*((Sqrt[S]*Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - 
+                  kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                      \[Phi]4])))/4 + (kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                 (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) + (kT3*Sech[\[Eta]4]*
+                    (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                   Sqrt[2]))/Sqrt[2])))/Sqrt[2]) - 
+        4*((((6*MH^4*S - 10*MH^2*S^2 + 3*S^3 + 6*MH^4*T - 20*MH^2*S*T + 9*S^2*
+                T - 10*MH^2*T^2 + 9*S*T^2 + 3*T^3 + 6*MH^4*T14 - 20*MH^2*S*
+                T14 + 9*S^2*T14 - 20*MH^2*T*T14 + 18*S*T*T14 + 9*T^2*T14 - 10*
+                MH^2*T14^2 + 9*S*T14^2 + 9*T*T14^2 + 3*T14^3 + 10*MH^4*T24 - 
+               14*MH^2*S*T24 + 7*S^2*T24 - 14*MH^2*T*T24 + 14*S*T*T24 + 7*T^2*
+                T24 - 14*MH^2*T14*T24 + 14*S*T14*T24 + 14*T*T14*T24 + 7*T14^2*
+                T24 - 8*MH^2*T24^2 + 5*S*T24^2 + 5*T*T24^2 + 5*T14*T24^2 + 
+               T24^3)*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+             (2*Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24]^2) - 
+            (3*(MH^2 - S - T - T14)^2*(S + T + T14 + T24)*DiscB[MH^2 - S - 
+                T - T14, Sqrt[MT^2], Sqrt[MT^2]])/Kallen\[Lambda][MH^2, 
+               MH^2 - S - T - T14, T24]^2 - ((2*MH^2*S^2 - 3*S^3 + 4*MH^2*S*
+                T - 9*S^2*T + 2*MH^2*T^2 - 9*S*T^2 - 3*T^3 + 4*MH^2*S*T14 - 9*
+                S^2*T14 + 4*MH^2*T*T14 - 18*S*T*T14 - 9*T^2*T14 + 2*MH^2*
+                T14^2 - 9*S*T14^2 - 9*T*T14^2 - 3*T14^3 + 4*MH^4*T24 - 2*MH^2*
+                S*T24 + S^2*T24 - 2*MH^2*T*T24 + 2*S*T*T24 + T^2*T24 - 2*MH^2*
+                T14*T24 + 2*S*T14*T24 + 2*T*T14*T24 + T14^2*T24 - 8*MH^2*
+                T24^2 + 5*S*T24^2 + 5*T*T24^2 + 5*T14*T24^2 + T24^3)*
+              DiscB[T24, Sqrt[MT^2], Sqrt[MT^2]])/(2*Kallen\[Lambda][MH^2, 
+                MH^2 - S - T - T14, T24]^2) + (MH^2 - S - T - T14)/
+             Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24] + 
+            ((MH^2 - S - T - T14)*(MH^2*S^2 + 2*MT^2*S^2 - S^3 + 2*MH^2*S*
+                T + 4*MT^2*S*T - 3*S^2*T + MH^2*T^2 + 2*MT^2*T^2 - 3*S*T^2 - 
+               T^3 + 2*MH^2*S*T14 + 4*MT^2*S*T14 - 3*S^2*T14 + 2*MH^2*T*T14 + 
+               4*MT^2*T*T14 - 6*S*T*T14 - 3*T^2*T14 + MH^2*T14^2 + 2*MT^2*
+                T14^2 - 3*S*T14^2 - 3*T*T14^2 - T14^3 + 2*MH^4*T24 - 8*MH^2*
+                MT^2*T24 + 4*MT^2*S*T24 - 2*S^2*T24 + 4*MT^2*T*T24 - 4*S*T*
+                T24 - 2*T^2*T24 + 4*MT^2*T14*T24 - 4*S*T14*T24 - 4*T*T14*
+                T24 - 2*T14^2*T24 + MH^2*T24^2 + 2*MT^2*T24^2 - S*T24^2 - T*
+                T24^2 - T14*T24^2)*ScalarC0[MH^2, MH^2 - S - T - T14, T24, 
+               Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]])/Kallen\[Lambda][MH^2, 
+               MH^2 - S - T - T14, T24]^2)*
+           (-((S34 - U)*(-2*MH^2 + S34 + 2*T + U)*(I*Conjugate[
+                  (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (2*Sqrt[2]) - 2*(S34 - U)*Sech[\[Eta]4]*
+             (-(kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 (Cos[\[Phi]3] + I*Sin[\[Phi]3]))/(2*Sqrt[2]) + 
+              (kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+              Sinh[\[Eta]4 + I*\[Phi]4]) - 2*Sqrt[2]*(2*MH^2 - S34 - 2*T - U)*
+             (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+             ((kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/4 + 
+              (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+               2) + 16*(-(kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                      4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                        2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                       Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                       Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                        \[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]3] + 
+                  I*Sin[\[Phi]3]))/(2*Sqrt[2]) + (kT3*(kT3*Cos[\[Phi]3] + 
+                 kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2])*((kT3*Sqrt[S]*Sech[\[Eta]4]*
+                (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/4 + (kT3*kT4*Sech[\[Eta]4]*
+                (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-Sinh[\[Eta]3] + 
+                 Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2)) + 
+          (-(MH^2*(6*MH^2*S - 5*S^2 + 6*MH^2*T - 10*S*T - 5*T^2 + 
+                6*MH^2*T14 - 10*S*T14 - 10*T*T14 - 5*T14^2 + 2*MH^2*T24 - 
+                4*S*T24 - 4*T*T24 - 4*T14*T24 + T24^2)*DiscB[MH^2, 
+                Sqrt[MT^2], Sqrt[MT^2]])/(2*Kallen\[Lambda][MH^2, 
+                MH^2 - S - T - T14, T24]^2) + ((6*MH^4*S - 7*MH^2*S^2 + S^
+                3 + 6*MH^4*T - 14*MH^2*S*T + 3*S^2*T - 7*MH^2*T^2 + 3*S*T^2 + 
+               T^3 + 6*MH^4*T14 - 14*MH^2*S*T14 + 3*S^2*T14 - 14*MH^2*T*T14 + 
+               6*S*T*T14 + 3*T^2*T14 - 7*MH^2*T14^2 + 3*S*T14^2 + 3*T*T14^2 + 
+               T14^3 - 2*MH^4*T24 + 2*S^2*T24 + 4*S*T*T24 + 2*T^2*T24 + 4*S*
+                T14*T24 + 4*T*T14*T24 + 2*T14^2*T24 - MH^2*T24^2 + S*T24^2 + 
+               T*T24^2 + T14*T24^2)*DiscB[MH^2 - S - T - T14, Sqrt[MT^2], 
+               Sqrt[MT^2]])/(2*Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24]^
+               2) + ((2*MH^2*S^2 - S^3 + 4*MH^2*S*T - 3*S^2*T + 2*MH^2*T^2 - 
+               3*S*T^2 - T^3 + 4*MH^2*S*T14 - 3*S^2*T14 + 4*MH^2*T*T14 - 6*S*
+                T*T14 - 3*T^2*T14 + 2*MH^2*T14^2 - 3*S*T14^2 - 3*T*T14^2 - 
+               T14^3 + 4*MH^4*T24 - 4*MH^2*S*T24 - 2*S^2*T24 - 4*MH^2*T*T24 - 
+               4*S*T*T24 - 2*T^2*T24 - 4*MH^2*T14*T24 - 4*S*T14*T24 - 4*T*T14*
+                T24 - 2*T14^2*T24 + 2*MH^2*T24^2 - S*T24^2 - T*T24^2 - T14*
+                T24^2)*DiscB[T24, Sqrt[MT^2], Sqrt[MT^2]])/
+             (2*Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24]^2) - 
+            (2*MH^2 - S - T - T14 - T24)/(2*Kallen\[Lambda][MH^2, MH^2 - S - 
+                T - T14, T24]) - ((MH^4*S^2 + 2*MH^2*MT^2*S^2 - MH^2*S^3 - 
+               MT^2*S^3 + 2*MH^4*S*T + 4*MH^2*MT^2*S*T - 3*MH^2*S^2*T - 3*
+                MT^2*S^2*T + MH^4*T^2 + 2*MH^2*MT^2*T^2 - 3*MH^2*S*T^2 - 3*
+                MT^2*S*T^2 - MH^2*T^3 - MT^2*T^3 + 2*MH^4*S*T14 + 4*MH^2*MT^2*
+                S*T14 - 3*MH^2*S^2*T14 - 3*MT^2*S^2*T14 + 2*MH^4*T*T14 + 4*
+                MH^2*MT^2*T*T14 - 6*MH^2*S*T*T14 - 6*MT^2*S*T*T14 - 3*MH^2*
+                T^2*T14 - 3*MT^2*T^2*T14 + MH^4*T14^2 + 2*MH^2*MT^2*T14^2 - 3*
+                MH^2*S*T14^2 - 3*MT^2*S*T14^2 - 3*MH^2*T*T14^2 - 3*MT^2*T*
+                T14^2 - MH^2*T14^3 - MT^2*T14^3 + 2*MH^6*T24 - 8*MH^4*MT^2*
+                T24 - 3*MH^4*S*T24 + 8*MH^2*MT^2*S*T24 + MH^2*S^2*T24 - 3*
+                MT^2*S^2*T24 - 3*MH^4*T*T24 + 8*MH^2*MT^2*T*T24 + 2*MH^2*S*T*
+                T24 - 6*MT^2*S*T*T24 + MH^2*T^2*T24 - 3*MT^2*T^2*T24 - 3*MH^4*
+                T14*T24 + 8*MH^2*MT^2*T14*T24 + 2*MH^2*S*T14*T24 - 6*MT^2*S*
+                T14*T24 + 2*MH^2*T*T14*T24 - 6*MT^2*T*T14*T24 + MH^2*T14^2*
+                T24 - 3*MT^2*T14^2*T24 - 2*MH^4*T24^2 + 6*MH^2*MT^2*T24^2 + 2*
+                MH^2*S*T24^2 - 3*MT^2*S*T24^2 + 2*MH^2*T*T24^2 - 3*MT^2*T*
+                T24^2 + 2*MH^2*T14*T24^2 - 3*MT^2*T14*T24^2 - MT^2*T24^3)*
+              ScalarC0[MH^2, MH^2 - S - T - T14, T24, Sqrt[MT^2], Sqrt[MT^2], 
+               Sqrt[MT^2]])/Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24]^2)*
+           (-((S34 - U)*(-2*MH^2 + S34 + 2*T + U)*(I*Conjugate[
+                  (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (2*Sqrt[2]) - 2*(S34 - U)*Sech[\[Eta]4]*
+             (-(kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 (Cos[\[Phi]3] + I*Sin[\[Phi]3]))/(2*Sqrt[2]) + 
+              (kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+              Sinh[\[Eta]4 + I*\[Phi]4]) - 2*Sqrt[2]*(2*MH^2 - S34 - 2*T - U)*
+             (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+             ((kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/4 + 
+              (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+               2) + 16*((kT3*kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2] + (kT3*(Cos[\[Phi]3] + 
+                 I*Sin[\[Phi]3])*(-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+                 kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]3])))/Sqrt[2])*((kT3*Sqrt[S]*Sech[\[Eta]4]*
+                (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/4 + (kT3*kT4*Sech[\[Eta]4]*
+                (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-Sinh[\[Eta]3] + 
+                 Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2)) + 
+          ((-2*MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/Kallen\[Lambda][
+              MH^2, MH^2 - S - T - T14, T24] + ((2*MH^2 - S - T - T14 - T24)*
+              DiscB[MH^2 - S - T - T14, Sqrt[MT^2], Sqrt[MT^2]])/
+             Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24] + 
+            ((S + T + T14 + T24)*DiscB[T24, Sqrt[MT^2], Sqrt[MT^2]])/
+             Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24] - 
+            (MH^2*(S + T + T14 - T24)*ScalarC0[MH^2, MH^2 - S - T - T14, T24, 
+               Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]])/Kallen\[Lambda][MH^2, 
+              MH^2 - S - T - T14, T24])*(-(Sqrt[2]*S*(-MH^2 + S34 + T24 + U)*
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]) + 
+            Sqrt[2]*Sqrt[S]*(-MH^2 + S34 + T24 + U)*
+             ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+             (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                kT4*Sin[\[Phi]4])) + ((-S34^2 - 2*S34*T - S34*T24 + 2*T14*
+                T24 - 2*S*(2*S34 + T24) + MH^2*(2*S + 3*S34 - 2*T14 - 3*U) + 
+               2*T*U + 4*T14*U + T24*U + U^2)*(I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (2*Sqrt[2]) + 2*Sech[\[Eta]4]*(-(kT3*Sqrt[S]*(-S34 + U)*
+                 Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                       Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                       Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                        \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 (Cos[\[Phi]3] + I*Sin[\[Phi]3]))/(2*Sqrt[2]) + 
+              (kT4*MH^2*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                (Cos[\[Phi]4] + I*Sin[\[Phi]4]))/(2*Sqrt[2]) - 
+              (kT4*Sqrt[S]*T24*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                (Cos[\[Phi]4] + I*Sin[\[Phi]4]))/(2*Sqrt[2]) - 
+              (kT4*Sqrt[S]*U*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                (Cos[\[Phi]4] + I*Sin[\[Phi]4]))/Sqrt[2] + (MH^2*Sqrt[S]*
+                Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(kT3*Cos[\[Phi]3] + 
+                 kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/
+               (2*Sqrt[2]) - (Sqrt[S]*S34*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                     4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                       2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                      Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                      Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                        \[Phi]4])]]*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/Sqrt[2] - 
+              (Sqrt[S]*T24*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])))/(2*Sqrt[2]) - (kT3*S34*
+                (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4]))*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+                 Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2] + (kT3*U*(kT3*Cos[\[Phi]3] + 
+                 kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2] - (kT4*MH^2*(kT3*Cos[\[Phi]3] + 
+                 kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4]))/Sqrt[2] + (kT4*T24*(kT3*Cos[\[Phi]3] + 
+                 kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4]))/Sqrt[2] + Sqrt[2]*kT4*U*(kT3*Cos[\[Phi]3] + 
+                kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*(
+                Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                       Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                  (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+                Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                       Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                       Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                        \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 Sinh[\[Eta]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+              Sinh[\[Eta]4 + I*\[Phi]4]) - Sqrt[2]*kT4*Sqrt[S]*
+             (-MH^2 + S34 + T24 + U)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])]]*Sech[\[Eta]4]*(Cos[\[Phi]4] - 
+              I*Sin[\[Phi]4])*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + 
+                I*\[Phi]4]) + 2*Sqrt[2]*kT4*(-MH^2 + S34 + T24 + U)*
+             Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+             (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                kT4*Sin[\[Phi]4]))*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                 I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                 I*\[Phi]4]) - 2*Sqrt[2]*(MH^2 - S34 - T24 - U)*
+             (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+             (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/
+               4 + (kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                (-((Sqrt[S]*Sech[\[Eta]4])/Sqrt[2]) - (kT3*Sech[\[Eta]4]*
+                   (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                  Sqrt[2]))/Sqrt[2]))) - 
+        2*(ScalarC0[MH^2, MH^2 - S - T - T14, T24, Sqrt[MT^2], Sqrt[MT^2], 
+            Sqrt[MT^2]]*(-((S*(S34 + U)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])]]*Sech[\[Eta]4])/Sqrt[2]) + 
+            (Sqrt[S]*(S34 + U)*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])))/Sqrt[2] + ((-(S34*T) + S34*T14 + MH^2*
+                (S34 - U) + T*U + T14*U - S*(S34 + U))*
+              (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                       \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (2*Sqrt[2]) + 2*Sech[\[Eta]4]*(-(kT4*Sqrt[S]*S34*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]4] + 
+                  I*Sin[\[Phi]4]))/(2*Sqrt[2]) - ((kT3*Cos[\[Phi]3] + 
+                 kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                ((Sqrt[S]*U*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]])/2 - kT4*S34*(Conjugate[
+                     (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]4])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+              Sinh[\[Eta]4 + I*\[Phi]4]) - (kT4*Sqrt[S]*(S34 + U)*
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+              (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+               Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] + Sqrt[2]*kT4*(S34 + U)*
+             Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+             (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                kT4*Sin[\[Phi]4]))*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                 I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                 I*\[Phi]4]) + 8*((kT3*kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2] + (kT3*(Cos[\[Phi]3] + 
+                 I*Sin[\[Phi]3])*(-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+                 kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]3])))/Sqrt[2])*((kT3*Sqrt[S]*Sech[\[Eta]4]*
+                (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/4 + (kT3*kT4*Sech[\[Eta]4]*
+                (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-Sinh[\[Eta]3] + 
+                 Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2) + 
+            2*Sqrt[2]*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*((kT3*Sqrt[S]*(-MH^2 + T)*
+                Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/4 + 
+              (kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-(Sqrt[S]*(S34 + U)*
+                    Sech[\[Eta]4])/(2*Sqrt[2]) + (kT3*(-MH^2 + T)*
+                   Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                      I*\[Phi]4]))/Sqrt[2]))/Sqrt[2])) + 
+          (((2*MH^2 - S - T - T14 - T24)*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+             Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24] - 
+            (2*(MH^2 - S - T - T14)*DiscB[MH^2 - S - T - T14, Sqrt[MT^2], 
+               Sqrt[MT^2]])/Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24] - 
+            ((S + T + T14 - T24)*DiscB[T24, Sqrt[MT^2], Sqrt[MT^2]])/
+             Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24] + 
+            ((MH^2 - S - T - T14)*(S + T + T14 + T24)*ScalarC0[MH^2, MH^2 - 
+                S - T - T14, T24, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]])/
+             Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24])*
+           (-(Sqrt[2]*S*(S34 + U)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]]*Sech[\[Eta]4]) + Sqrt[2]*Sqrt[S]*(S34 + U)*
+             ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+             (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                kT4*Sin[\[Phi]4])) + ((-S34^2 - 4*S34*T + 2*S34*T14 + 4*MH^2*
+                (S34 - U) + 4*T*U + 2*T14*U + U^2 - 2*S*(S34 + U))*
+              (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                       \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (2*Sqrt[2]) + 2*Sech[\[Eta]4]*(-(kT3*Sqrt[S]*(-3*S34 + U)*
+                 Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                       Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                       Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                        \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 (Cos[\[Phi]3] + I*Sin[\[Phi]3]))/(2*Sqrt[2]) - 
+              ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4]))*(Sqrt[S]*(S34 + U)*Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                 kT3*(-3*S34 + U)*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                        (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                       (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                        (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                         4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                    Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                        (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                       (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                        (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                         4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                    Sin[\[Phi]3] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])))/Sqrt[2])*
+             (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]) - 
+            Sqrt[2]*kT4*Sqrt[S]*(S34 + U)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])]]*Sech[\[Eta]4]*(Cos[\[Phi]4] - 
+              I*Sin[\[Phi]4])*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + 
+                I*\[Phi]4]) + 2*Sqrt[2]*kT4*(S34 + U)*Sech[\[Eta]4]*
+             (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(kT3*Cos[\[Phi]3] + 
+              kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+             (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                 I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                 I*\[Phi]4]) + 32*((kT3*kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2] + (kT3*(Cos[\[Phi]3] + 
+                 I*Sin[\[Phi]3])*(-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+                 kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]3])))/Sqrt[2])*((kT3*Sqrt[S]*Sech[\[Eta]4]*
+                (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/4 + (kT3*kT4*Sech[\[Eta]4]*
+                (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-Sinh[\[Eta]3] + 
+                 Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2) + 
+            2*Sqrt[2]*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+             ((kT3*Sqrt[S]*(-4*MH^2 + S34 + 4*T + U)*Sech[\[Eta]4]*
+                (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/4 + (kT4*(Cos[\[Phi]4] - 
+                 I*Sin[\[Phi]4])*(-((Sqrt[S]*(S34 + U)*Sech[\[Eta]4])/
+                   Sqrt[2]) + (kT3*(-4*MH^2 + S34 + 4*T + U)*Sech[\[Eta]4]*
+                   (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                  Sqrt[2]))/Sqrt[2]))))/(MH^2 - S - T - T14) + 
+      ((4*(2 + Eps^(-1) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]] + 
+            Log[Mu^2/MT^2]) - 16*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[
+                MT^2]])/(4*(MH^2 - T)) - (T*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/
+             (4*(MH^2 - T)) + (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[
+                   -(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/(4*(MH^2 - T)) + 
+            (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+            (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+             (4*(MH^2 - T))))*
+         ((Sqrt[S]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                  Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+             Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+            ((kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2] - 
+             Sqrt[2]*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*
+                (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))))/2 - 
+          Sqrt[2]*Sqrt[S]*Sech[\[Eta]4]*
+           (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+            kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                     Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])) - 
+          (Sech[\[Eta]4]*(-(Sqrt[2]*kT4*Sqrt[S]*Conjugate[
+                1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                     Cos[\[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]4] + 
+                I*Sin[\[Phi]4])) - (kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*(
+                (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                 2 - kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                      (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                       (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+                  Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 - Sqrt[2]*kT4*Sech[\[Eta]4]*
+           (Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+           (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+            kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                     Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))*
+           (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+           ((kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2] - 
+            Sqrt[2]*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+              I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(((S - S34 - T14 + U)*Sech[\[Eta]4]*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+             4*((Sqrt[S]*Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - 
+                  kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                      \[Phi]4])))/4 + (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - 
+                  I*Sin[\[Phi]4])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                    I*\[Phi]4]))/2)))/Sqrt[2]) - 
+        2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+           (2*(MH^2 - T)) - Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/
+              (2*MT^2)]^2/(2*(MH^2 - T)))*
+         (-2*(-(Sqrt[S]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                    (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(
+                (kT3*(S + T14)*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2] + 
+                (kT4*(MH^2 - T)*(Cos[\[Phi]4] + I*Sin[\[Phi]4]))/Sqrt[2]))/
+             2 - (Sqrt[S]*(MH^2 - T)*Sech[\[Eta]4]*
+              (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                2 + kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+                 Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3])))/Sqrt[2] + (Sech[\[Eta]4]*
+              ((kT4*Sqrt[S]*(MH^2 - T)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                      4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                        2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                       Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                       Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                        \[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]4] + 
+                  I*Sin[\[Phi]4]))/Sqrt[2] + (kT3*(Cos[\[Phi]3] + 
+                  I*Sin[\[Phi]3])*(Sqrt[S]*(S + T14)*Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                  (Sqrt[S]*(S + S34 + T14 - U)*Conjugate[1/Sqrt[(kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+                  2*kT3*S*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                        (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                         (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                     Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                         (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                         Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]3])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+               Sinh[\[Eta]4 + I*\[Phi]4]))/2 - (kT4*(MH^2 - T)*Sech[\[Eta]4]*
+              (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-(Sqrt[S]*Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + kT3*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[
+                \[Eta]4 + I*\[Phi]4]))/Sqrt[2] - kT4*Sech[\[Eta]4]*
+             ((kT3*(S + T14)*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2] + 
+              (kT4*(MH^2 - T)*(Cos[\[Phi]4] + I*Sin[\[Phi]4]))/Sqrt[2])*
+             (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-Conjugate[
+                1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                     Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                 I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                 I*\[Phi]4]) + 2*Sqrt[2]*kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+             (-(S*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                       Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                       Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                        \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/8 + 
+              (kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-(Sqrt[S]*Sech[\[Eta]4]*
+                    ((Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]])/2 + kT4*(Conjugate[
+                         (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                         (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[1/Sqrt[
+                          (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                          kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                        Sinh[\[Eta]4])))/(2*Sqrt[2]) - (kT3*Sqrt[S]*
+                   Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                      I*\[Phi]4]))/(2*Sqrt[2])))/Sqrt[2])) + 
+          ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(-((MH^2 - T)*(S - S34 - T14 + U)*
+                Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + 
+                   I*\[Phi]4]))/2 + 4*(MH^2 - T)*((Sqrt[S]*Sech[\[Eta]4]*
+                 (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/4 + (kT3*kT4*
+                 Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                 (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                2)))/Sqrt[2]) - 4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+           (MH^2 - T) - DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T))*
+         (-(Sqrt[S]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+             ((kT3*(-5*MH^2 + 4*S34 + T + 2*T24 + 4*U)*(Cos[\[Phi]3] + 
+                 I*Sin[\[Phi]3]))/Sqrt[2] - Sqrt[2]*(MH^2 - T)*(
+                kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4]))))/2 + Sqrt[2]*Sqrt[S]*(MH^2 - T)*
+           Sech[\[Eta]4]*(-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])]])/2 + 
+            kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                     Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])) - 
+          (Sech[\[Eta]4]*(Sqrt[2]*kT4*Sqrt[S]*(MH^2 - T)*Conjugate[1/
+                Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]4] + I*
+                Sin[\[Phi]4]) + (kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*(
+                (Sqrt[S]*(7*MH^2 - 8*S34 - 3*T - 2*T24)*Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 - 
+                4*kT3*(-2*MH^2 + 2*S34 + T + 2*T14 + T24)*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3]) - kT4*(7*MH^2 - 3*T - 2*T24 - 8*U)*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 + Sqrt[2]*kT4*(MH^2 - T)*
+           Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+           (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+            kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                     Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))*
+           (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+           ((kT3*(-5*MH^2 + 4*S34 + T + 2*T24 + 4*U)*(Cos[\[Phi]3] + I*
+                Sin[\[Phi]3]))/Sqrt[2] - Sqrt[2]*(MH^2 - T)*
+             (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                kT4*Sin[\[Phi]4])))*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+             Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(-((MH^2 - T)*(S - S34 - T14 + U)*
+                Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + 
+                   I*\[Phi]4]))/2 + 4*(MH^2 - T)*((Sqrt[S]*Sech[\[Eta]4]*
+                 (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/4 + (kT3*kT4*
+                 Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                 (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                2)))/Sqrt[2] - 8*Sqrt[2]*kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+           (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - 
+                kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*(
+                Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                       Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                  (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+                Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                       Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                       Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                        \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 Sinh[\[Eta]3]))/4 + (kT3*Sqrt[S]*Sech[\[Eta]4]*
+              (Cos[\[Phi]3] - I*Sin[\[Phi]3])*((Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + kT4*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4])))/4 + (kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+              (-((kT3^2*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                        (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                       (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                        (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                         4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                    Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                        (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                       (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                        (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                         4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                    Sin[\[Phi]3] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+                  (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                 Sqrt[2]) + (kT3*Sech[\[Eta]4]*((Sqrt[S]*Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                   2 + kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[
+                          \[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                        (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                         (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                     Cos[\[Phi]4] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                         (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                         Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4]))*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                    I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2])) + 
+        8*((kT3*(-1/(2*(MH^2 - T)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+                Sqrt[MT^2]])/(2*(MH^2 - T)^2) + (MH^2*DiscB[T, Sqrt[MT^2], 
+                Sqrt[MT^2]])/(2*(MH^2 - T)^2) - 
+             (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                  (2*MT^2)]^2)/(2*(MH^2 - T)^2) + 
+             (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+              (2*(MH^2 - T)^2))*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+            (-(Sqrt[S]*(-MH^2 + 2*S + T + 2*T14)*((-I)*Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4])/2 - 
+             (Sech[\[Eta]4]*((Sqrt[S]*(-3*MH^2 + 4*S34 + T + 2*T24)*
+                  Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                        Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                        Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                         \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                 2 - 2*kT3*(S - S34 - T14 + U)*(Conjugate[
+                    (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3]) - kT4*(-3*MH^2 + T + 2*T24 + 4*U)*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                Sinh[\[Eta]4 + I*\[Phi]4]))/2 - kT4*(-MH^2 + 2*S + T + 2*T14)*
+              Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+              (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]) + 8*((kT3*S*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                      4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                        2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                       Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                       Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                        \[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+                  I*Sin[\[Phi]3]))/8 + (kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                 ((kT3*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                       (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]3]))/(2*Sqrt[2]) + 
+                  (kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + 
+                     Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/(2*Sqrt[2])))/
+                Sqrt[2])))/Sqrt[2] + 
+          (kT3*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - T)) + 
+             DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - T)))*
+            (Cos[\[Phi]3] + I*Sin[\[Phi]3])*((Sqrt[S]*(-3*MH^2 + 2*S34 + T + 
+                2*U)*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                    (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4])/2 - 
+             (Sech[\[Eta]4]*((Sqrt[S]*(-3*MH^2 + 4*S34 + T)*Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 - 
+                2*kT3*(S - S34 - T14 + U)*(Conjugate[
+                    (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3]) - kT4*(-3*MH^2 + T + 4*U)*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                Sinh[\[Eta]4 + I*\[Phi]4]))/2 + kT4*(-3*MH^2 + 2*S34 + T + 2*
+                U)*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+              (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]) + 8*(-(kT3*Sqrt[S]*Sech[\[Eta]4]*
+                  (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                   I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                  (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]3]))/4 + (kT3*Sqrt[S]*Sech[\[Eta]4]*
+                 (Cos[\[Phi]3] - I*Sin[\[Phi]3])*((Sqrt[S]*Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                   2 + kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[
+                          \[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                        (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                         (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                     Cos[\[Phi]4] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                         (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                         Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4])))/4 + (kT4*(Cos[\[Phi]4] - 
+                  I*Sin[\[Phi]4])*(-((kT3^2*Sech[\[Eta]4]*(Conjugate[
+                        (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                        (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[1/Sqrt[
+                          (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                          kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                       Sinh[\[Eta]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - 
+                        I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]) + 
+                  (kT3*Sech[\[Eta]4]*((Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+                     kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                         (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[1/Sqrt[
+                          (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                          kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                        Sinh[\[Eta]4]))*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                       I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2])))/
+           Sqrt[2]))/T)/T24))/(MW*SW) + 
+ (2*Alfas^2*c3*EL*MT^2*
+   (((4*(2 + Eps^(-1) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]] + Log[Mu^2/MT^2]) - 
+        16*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - T)) - 
+          (T*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - T)) + 
+          (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*
+                MT^2)]^2)/(4*(MH^2 - T)) + (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+          (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+           (4*(MH^2 - T))))*
+       (-((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+         (2*Sqrt[2]) + 
+        (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+         (2*Sqrt[2]) - Sqrt[2]*Sech[\[Eta]4]*
+         (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+          I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Cosh[\[Eta]4 + I*\[Phi]4] + 
+          Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Sinh[\[Eta]4 + I*\[Phi]4])) - 
+      2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+         (2*(MH^2 - T)) - Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/
+            (2*MT^2)]^2/(2*(MH^2 - T)))*
+       (-(Sech[\[Eta]4]*(((-MH^2 + T)*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] - 
+            (kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                    Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                   kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                    Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                  (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+              (Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2])*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+        Sqrt[2]*(MH^2 - T)*Sech[\[Eta]4]*
+         (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+          I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Cosh[\[Eta]4 + I*\[Phi]4] + 
+          Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Sinh[\[Eta]4 + I*\[Phi]4]) - 
+        (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+          (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/2 - 
+           ((-MH^2 + T)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2))/Sqrt[2]) - 
+      8*Sqrt[2]*kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+       ((-1/(2*(MH^2 - T)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+           (2*(MH^2 - T)^2) + (MH^2*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/
+           (2*(MH^2 - T)^2) - (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[
+                 -(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/(2*(MH^2 - T)^2) + 
+          (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+           (2*(MH^2 - T)^2))*
+         ((Sqrt[S]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                  Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+             Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4])/4 + 
+          (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+            (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/4) + 
+        (-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - T)) + 
+          DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - T)))*
+         ((kT3*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+            (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+          kT3*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          (kT3*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + 
+             Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2)) - 
+      4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T) - 
+        DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T))*
+       (-(Sech[\[Eta]4]*(((-MH^2 + T)*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+            Sqrt[2]*kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+             (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+               2 - kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                         \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+                Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])))*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+        Sqrt[2]*Sech[\[Eta]4]*(MH^2 - T + kT3^2*(Cos[\[Phi]3] - 
+            I*Sin[\[Phi]3])*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))*
+         (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+          I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Cosh[\[Eta]4 + I*\[Phi]4] + 
+          Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Sinh[\[Eta]4 + I*\[Phi]4]) - 
+        (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+          (-((-MH^2 + T)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[
+                \[Eta]4 + I*\[Phi]4]))/2 + Sqrt[2]*kT3*(Cos[\[Phi]3] + 
+             I*Sin[\[Phi]3])*(-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+             (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                  I*\[Phi]4]))/Sqrt[2])))/Sqrt[2]))/T + 
+    ((4*(2 + Eps^(-1) + DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]] + 
+          Log[Mu^2/MT^2]) - 16*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+             Sqrt[MT^2]])/(4*(MH^2 - S34)) - 
+          (S34*DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - S34)) + 
+          (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*
+                MT^2)]^2)/(4*(MH^2 - S34)) + (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+          (MT^2*Log[(2*MT^2 - S34 + Sqrt[-((4*MT^2 - S34)*S34)])/(2*MT^2)]^2)/
+           (4*(MH^2 - S34))))*
+       (-((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+         (2*Sqrt[2]) + 
+        (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+         (2*Sqrt[2]) - Sqrt[2]*Sech[\[Eta]4]*
+         (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+          I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Cosh[\[Eta]4 + I*\[Phi]4] + 
+          Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Sinh[\[Eta]4 + I*\[Phi]4])) + 8*Sqrt[2]*kT3*Sech[\[Eta]4]*
+       ((-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - S34)) + 
+          DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - S34)))*
+         ((kT3*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/2 + 
+          (kT3*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/2 - 
+          2*kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])) + 
+        (-1/(2*(MH^2 - S34)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+           (2*(MH^2 - S34)^2) + (MH^2*DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]])/
+           (2*(MH^2 - S34)^2) - (MT^2*Log[(-MH^2 + 2*MT^2 + 
+                Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/
+           (2*(MH^2 - S34)^2) + 
+          (MT^2*Log[(2*MT^2 - S34 + Sqrt[-((4*MT^2 - S34)*S34)])/(2*MT^2)]^2)/
+           (2*(MH^2 - S34)^2))*
+         (-(kT4*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(Cos[\[Phi]4] - 
+              I*Sin[\[Phi]4]))/2 - 
+          (kT4*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(Cos[\[Phi]4] + I*Sin[\[Phi]4]))/2 + 
+          2*kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])))*
+       (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]) - 
+      2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+         (2*(MH^2 - S34)) - Log[(2*MT^2 - S34 + Sqrt[-((4*MT^2 - S34)*S34)])/
+            (2*MT^2)]^2/(2*(MH^2 - S34)))*
+       (((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+          (((MH^2 - S34)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2 + kT3*kT4*Sech[\[Eta]4]*
+            (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-Sinh[\[Eta]3] + 
+             Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4])))/Sqrt[2] + 
+        (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+          (-((MH^2 - S34)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[
+                \[Eta]4 + I*\[Phi]4]))/2 + kT3*kT4*Sech[\[Eta]4]*
+            (Cos[\[Phi]4] + I*Sin[\[Phi]4])*(-Sinh[\[Eta]3] + 
+             Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4])))/Sqrt[2] + 
+        2*(((MH^2 - S34)*Sech[\[Eta]4]*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                 (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] - Sqrt[2]*kT3*kT4*Sech[\[Eta]4]*
+           (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+           (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))) + 
+      4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - S34) - 
+        DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - S34))*
+       (((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+          (((-MH^2 + S34)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2 + Sqrt[2]*kT3*Sech[\[Eta]4]*
+            ((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] - 
+             (kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/Sqrt[2])*
+            (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4])))/
+         Sqrt[2] + (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                  kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                    Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                   kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                    Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                    \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+          (-((-MH^2 + S34)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[
+                \[Eta]4 + I*\[Phi]4]))/2 + Sqrt[2]*kT3*Sech[\[Eta]4]*
+            ((kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2] - 
+             (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4]))/Sqrt[2])*
+            (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4])))/
+         Sqrt[2] + 2*(((-MH^2 + S34)*Sech[\[Eta]4]*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] + Sqrt[2]*kT3*Sech[\[Eta]4]*
+           (-(kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])) + 
+            kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                     Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]))*
+           (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))) + 
+      (-8*((kT3*(-1/(2*(MH^2 - S34)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+                Sqrt[MT^2]])/(2*(MH^2 - S34)^2) + (MH^2*DiscB[S34, 
+                Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - S34)^2) - 
+             (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                  (2*MT^2)]^2)/(2*(MH^2 - S34)^2) + 
+             (MT^2*Log[(2*MT^2 - S34 + Sqrt[-((4*MT^2 - S34)*S34)])/(2*MT^2)]^
+                2)/(2*(MH^2 - S34)^2))*Sech[\[Eta]4]*
+            (Sqrt[S]*(-MH^2 + S34 + 2*T24)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]] - ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                    (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*((kT3*(-MH^2 + S34 + 
+                   4*T14)*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + 
+                (kT4*(MH^2 + 2*S - S34 - 2*T + 2*T14)*(Cos[\[Phi]4] - 
+                   I*Sin[\[Phi]4]))/Sqrt[2]))/Sqrt[2] - (-MH^2 + S34 + 2*T24)*
+              ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                       \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(kT3*Cos[\[Phi]3] + kT4*
+                Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])) + 
+             8*(-(kT3*kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  (Cos[\[Phi]3] + I*Sin[\[Phi]3])*(Cos[\[Phi]4] - 
+                   I*Sin[\[Phi]4]))/4 + (kT3*kT4*Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]3] - 
+                  I*Sin[\[Phi]3])*(Cos[\[Phi]4] + I*Sin[\[Phi]4]))/4 - 
+               ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4]))*(-((kT3*kT4*(Cos[\[Phi]4] - 
+                      I*Sin[\[Phi]4])*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                          (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                         Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                       Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                          (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                         Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                       Sin[\[Phi]3] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))/Sqrt[2]) + 
+                  (kT3*kT4*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                    (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]4]))/Sqrt[2]))/Sqrt[2]))*
+            (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+           Sqrt[2] + (kT3*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+              (2*(MH^2 - S34)) + DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]]/
+              (2*(MH^2 - S34)))*Sech[\[Eta]4]*(Sqrt[S]*(MH^2 - S34 - 2*U)*
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] + 
+             ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(
+                -((kT3*(MH^2 - 2*S + S34 - 2*T + 2*T14)*(Cos[\[Phi]3] - 
+                    I*Sin[\[Phi]3]))/Sqrt[2]) + (kT4*(-3*MH^2 + S34 + 4*T)*
+                  (Cos[\[Phi]4] - I*Sin[\[Phi]4]))/Sqrt[2]))/Sqrt[2] - 
+             (MH^2 - S34 - 2*U)*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(kT3*Cos[\[Phi]3] + kT4*
+                Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])) + 
+             8*(-(kT3*kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  (Cos[\[Phi]3] + I*Sin[\[Phi]3])*(Cos[\[Phi]4] - 
+                   I*Sin[\[Phi]4]))/4 + (kT3*kT4*Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]3] - 
+                  I*Sin[\[Phi]3])*(Cos[\[Phi]4] + I*Sin[\[Phi]4]))/4 - 
+               ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4]))*(-((kT3*kT4*(Cos[\[Phi]4] - 
+                      I*Sin[\[Phi]4])*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                          (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                         Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                       Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                          (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                         Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                       Sin[\[Phi]3] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))/Sqrt[2]) + 
+                  (kT3*kT4*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                    (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]4]))/Sqrt[2]))/Sqrt[2]))*
+            (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+           Sqrt[2]) + (4*(2 + Eps^(-1) + DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]] + 
+            Log[Mu^2/MT^2]) - 16*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[
+                MT^2]])/(4*(MH^2 - S34)) - (S34*DiscB[S34, Sqrt[MT^2], Sqrt[
+                MT^2]])/(4*(MH^2 - S34)) + 
+            (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                 (2*MT^2)]^2)/(4*(MH^2 - S34)) + (Eps^(-1) + Log[Mu^2/MT^2])/
+             4 - (MT^2*Log[(2*MT^2 - S34 + Sqrt[-((4*MT^2 - S34)*S34)])/
+                 (2*MT^2)]^2)/(4*(MH^2 - S34))))*
+         ((Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+            (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*
+                Sin[\[Phi]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] - 
+          (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+            (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+             I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+           Sqrt[2] + Sqrt[2]*Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - 
+            kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+              kT4*Sin[\[Phi]4]))*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+             Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+           ((Sqrt[S]*Sech[\[Eta]4])/Sqrt[2] - (kT3*Sech[\[Eta]4]*
+              (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+             Sqrt[2]) - ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+            I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           ((Sqrt[S]*Sech[\[Eta]4])/Sqrt[2] - (kT3*Sech[\[Eta]4]*
+              (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+             Sqrt[2]) + ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                 (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(((-MH^2 + 2*S + T24 + U)*Sech[\[Eta]4]*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+             ((-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4]))*(Sqrt[2]*Sqrt[S]*Sech[\[Eta]4] + 
+                (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                     I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2]))/Sqrt[2]) - 
+        2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+           (2*(MH^2 - S34)) - Log[(2*MT^2 - S34 + Sqrt[-((4*MT^2 - S34)*
+                  S34)])/(2*MT^2)]^2/(2*(MH^2 - S34)))*
+         (((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(((MH^2 - S34)*(MH^2 - 2*S - T24 - U)*
+               Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + 
+                  I*\[Phi]4]))/2 - 2*((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                 ((Sqrt[S]*(MH^2 - S34)*Sech[\[Eta]4])/Sqrt[2] + Sqrt[2]*kT3*
+                   T14*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                      I*\[Phi]3 + I*\[Phi]4])))/Sqrt[2] + (kT4*
+                 (Cos[\[Phi]4] - I*Sin[\[Phi]4])*((Sqrt[S]*(MH^2 - S34)*
+                    Sech[\[Eta]4])/Sqrt[2] + (kT3*(MH^2 + S - S34 - T + T14)*
+                    Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                       I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2])))/
+           Sqrt[2] + 4*(-(Sqrt[S]*(MH^2 - S34)*Conjugate[
+                1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                     Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*(
+                kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                Sinh[\[Eta]4 + I*\[Phi]4]))/(4*Sqrt[2]) + 
+            (Sqrt[S]*(MH^2 - S34)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]]*Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - kT4*
+                Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (4*Sqrt[2]) + Sqrt[2]*kT3*Sech[\[Eta]4]*
+             (-(kT3*kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 (Cos[\[Phi]3] + I*Sin[\[Phi]3])*(Cos[\[Phi]4] - 
+                  I*Sin[\[Phi]4]))/4 + (kT3*kT4*Sqrt[S]*Conjugate[
+                 1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                       \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                       2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]3] - 
+                 I*Sin[\[Phi]3])*(Cos[\[Phi]4] + I*Sin[\[Phi]4]))/4 - 
+              ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4]))*(-((kT3*kT4*(Cos[\[Phi]4] - 
+                     I*Sin[\[Phi]4])*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                          (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                          Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]3]))/Sqrt[2]) + 
+                 (kT3*kT4*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                   (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4]))/Sqrt[2]))/Sqrt[2])*(-Sinh[\[Eta]3] + 
+              Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]) + 
+            (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+              ((Sqrt[S]*(-MH^2 + S34)*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+               (kT3*T24*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                    I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/2 - 
+            ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))*(((MH^2 - S34)*Sech[\[Eta]4]*
+                 (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                 (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                  I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                  Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+               (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+                 ((Sqrt[S]*(-MH^2 + S34)*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+                  (kT3*T24*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                       I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2]))/
+             Sqrt[2])) - 4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+           (MH^2 - S34) - DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - S34))*
+         (-(((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+             (-((MH^2 - S34)*(MH^2 - 2*S - T24 - U)*Sech[\[Eta]4]*
+                 (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+              (kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*(Sqrt[2]*Sqrt[S]*
+                  (MH^2 - S34)*Sech[\[Eta]4] + (kT3*(5*MH^2 + 2*S - 3*S34 - 
+                    6*T + 2*T14)*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + 
+                    Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[
+                2] + (kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*(Sqrt[2]*Sqrt[S]*
+                  (MH^2 - S34)*Sech[\[Eta]4] + (kT3*(MH^2 - 2*S + S34 - 2*T + 
+                    6*T14)*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                      I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2]))/Sqrt[2]) + 
+          2*(-(Sqrt[S]*(MH^2 - S34)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])]]*Sech[\[Eta]4]*(kT3*Cos[\[Phi]3] + 
+                kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (2*Sqrt[2]) + (Sqrt[S]*(MH^2 - S34)*Conjugate[1/
+                Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+              (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[
+                \[Eta]4 + I*\[Phi]4]))/(2*Sqrt[2]) + 4*Sqrt[2]*kT3*
+             Sech[\[Eta]4]*(-(kT3*kT4*Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]3] + 
+                  I*Sin[\[Phi]3])*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/4 + 
+              (kT3*kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                (Cos[\[Phi]3] - I*Sin[\[Phi]3])*(Cos[\[Phi]4] + 
+                 I*Sin[\[Phi]4]))/4 - ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (-((kT3*kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                    (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]3]))/Sqrt[2]) + 
+                 (kT3*kT4*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                   (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4]))/Sqrt[2]))/Sqrt[2])*(-Sinh[\[Eta]3] + 
+              Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]) + 
+            (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+              (-((Sqrt[S]*(MH^2 - S34)*Sech[\[Eta]4])/Sqrt[2]) + 
+               (kT3*(MH^2 - S34 + 2*T24 - 2*U)*Sech[\[Eta]4]*
+                 (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                Sqrt[2]))/2 - ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*
+                (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*((MH^2 - S34)*
+                Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                        Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                        Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                         \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                 I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                 Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) + 
+               (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+                 (-((Sqrt[S]*(MH^2 - S34)*Sech[\[Eta]4])/Sqrt[2]) + 
+                  (kT3*(MH^2 - S34 + 2*T24 - 2*U)*Sech[\[Eta]4]*
+                    (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                   Sqrt[2]))/Sqrt[2]))/Sqrt[2])))/(MH^2 - S - T - T14))/S34 + 
+    ((4*(2 + Eps^(-1) + DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]] + 
+          Log[Mu^2/MT^2]) - 16*(3/4 - (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+             Sqrt[MT^2]])/(4*(MH^2 - S34 - T - U)) + 
+          ((2*MH^2 - S34 - T - U)*DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], 
+             Sqrt[MT^2]])/(4*(MH^2 - S34 - T - U)) - 
+          (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*
+                MT^2)]^2)/(4*(MH^2 - S34 - T - U)) + 
+          (Eps^(-1) + Log[Mu^2/MT^2])/4 + 
+          (MT^2*Log[(-2*MH^2 + 2*MT^2 + S34 + T + U + Sqrt[
+                 -((2*MH^2 - S34 - T - U)*(-2*MH^2 + 4*MT^2 + S34 + T + U))])/
+               (2*MT^2)]^2)/(4*(MH^2 - S34 - T - U))))*
+       (-((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+         (2*Sqrt[2]) + 
+        (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+         (2*Sqrt[2]) - Sqrt[2]*Sech[\[Eta]4]*
+         (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+          I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Cosh[\[Eta]4 + I*\[Phi]4] + 
+          Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Sinh[\[Eta]4 + I*\[Phi]4])) - 
+      2*(-Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+         (2*(MH^2 - S34 - T - U)) + 
+        Log[(-2*MH^2 + 2*MT^2 + S34 + T + U + Sqrt[-((2*MH^2 - S34 - T - U)*
+                (-2*MH^2 + 4*MT^2 + S34 + T + U))])/(2*MT^2)]^2/
+         (2*(MH^2 - S34 - T - U)))*
+       ((Sech[\[Eta]4]*(((-MH^2 + S34 + T + U)*(I*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+           Sqrt[2]*kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+             I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+            (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))*
+          (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+        (Sech[\[Eta]4]*(((-MH^2 + S34 + T + U)*((-I)*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] - 
+           Sqrt[2]*kT3*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+             I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+            (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))*
+          (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+        2*(((-MH^2 + S34 + T + U)*Sech[\[Eta]4]*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] - Sqrt[2]*kT3^2*Sech[\[Eta]4]*
+           (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+           (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))) - 
+      kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+              Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+             Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+              Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                 Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                 Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+              2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+              4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+              kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+              4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+        Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+              Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+             Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+              Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                 Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                 Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+              2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+              4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+              kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+              4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+        Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+              4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+               Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                 \[Phi]4])]]*Sinh[\[Eta]3])*
+       (16*(1/(2*(MH^2 - S34 - T - U)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+             Sqrt[MT^2]])/(2*(MH^2 - S34 - T - U)^2) + 
+          (MH^2*DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]])/
+           (2*(MH^2 - S34 - T - U)^2) - 
+          (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*
+                MT^2)]^2)/(2*(MH^2 - S34 - T - U)^2) + 
+          (MT^2*Log[(-2*MH^2 + 2*MT^2 + S34 + T + U + Sqrt[
+                 -((2*MH^2 - S34 - T - U)*(-2*MH^2 + 4*MT^2 + S34 + T + U))])/
+               (2*MT^2)]^2)/(2*(MH^2 - S34 - T - U)^2))*
+         ((Sech[\[Eta]4]*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+             I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+            (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+           (2*Sqrt[2]) + (Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - 
+             kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+           (2*Sqrt[2]) - Sqrt[2]*kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+            Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4])) - 
+        16*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - S34 - T - U)) - 
+          DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]]/
+           (2*(MH^2 - S34 - T - U)))*
+         (-(kT3*Sech[\[Eta]4]*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+             (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+           (2*Sqrt[2]) + (kT3*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+           (2*Sqrt[2]) - Sqrt[2]*kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + 
+            Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))) - 
+      4*(-(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - S34 - T - U)) + 
+        DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]]/
+         (MH^2 - S34 - T - U))*
+       ((Sech[\[Eta]4]*(((-MH^2 + S34 + T + U)*(I*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+           2*kT3*((kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2] + 
+             (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))/Sqrt[2])*
+            (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))*
+          (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+        (Sech[\[Eta]4]*(((-MH^2 + S34 + T + U)*((-I)*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+           2*kT3*((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] - 
+             (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))/Sqrt[2])*
+            (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))*
+          (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+        2*(((-MH^2 + S34 + T + U)*Sech[\[Eta]4]*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] + 2*kT3*
+           (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+           (-((kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                  I*\[Phi]4]))/Sqrt[2]) + (kT3*Sech[\[Eta]4]*
+              (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+             Sqrt[2]))) - (4*(2 + Eps^(-1) + DiscB[2*MH^2 - S34 - T - U, 
+           Sqrt[MT^2], Sqrt[MT^2]] + Log[Mu^2/MT^2])*
+         (((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(-(kT4*Sqrt[S]*Sech[\[Eta]4]*(
+                Cos[\[Phi]4] - I*Sin[\[Phi]4])) + ((-S + T14)*Sech[\[Eta]4]*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2))/
+           Sqrt[2] + (kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+            (-2*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                    Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                   kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                    Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                  (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))*
+            (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+           (2*Sqrt[2]) - 2*((Sqrt[S]*Sech[\[Eta]4]*(Sqrt[S]*Conjugate[
+                 1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                       \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                       2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - kT4*
+                ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(Cos[\[Phi]4] + 
+                 I*Sin[\[Phi]4]) - kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+                 Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3])))/(2*Sqrt[2]) - (kT4*Sech[\[Eta]4]*
+              (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-(Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]) + kT3*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[
+                \[Eta]4 + I*\[Phi]4]))/(2*Sqrt[2]) - 
+            (kT4^2*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+              (Cos[\[Phi]4] + I*Sin[\[Phi]4])*(-Conjugate[
+                 1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                       \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                       2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]))/Sqrt[2])) - 
+        16*(3/4 - (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+           (4*(MH^2 - S34 - T - U)) + ((2*MH^2 - S34 - T - U)*
+            DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]])/
+           (4*(MH^2 - S34 - T - U)) - 
+          (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*
+                MT^2)]^2)/(4*(MH^2 - S34 - T - U)) + 
+          (Eps^(-1) + Log[Mu^2/MT^2])/4 + 
+          (MT^2*Log[(-2*MH^2 + 2*MT^2 + S34 + T + U + Sqrt[
+                 -((2*MH^2 - S34 - T - U)*(-2*MH^2 + 4*MT^2 + S34 + T + U))])/
+               (2*MT^2)]^2)/(4*(MH^2 - S34 - T - U)))*
+         (((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(-(kT4*Sqrt[S]*Sech[\[Eta]4]*(
+                Cos[\[Phi]4] - I*Sin[\[Phi]4])) + ((-S + T14)*Sech[\[Eta]4]*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2))/
+           Sqrt[2] + (kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+            (-2*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                    Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                   kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                    Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                  (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))*
+            (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+           (2*Sqrt[2]) - 2*((Sqrt[S]*Sech[\[Eta]4]*(Sqrt[S]*Conjugate[
+                 1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                       \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                       2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - kT4*
+                ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(Cos[\[Phi]4] + 
+                 I*Sin[\[Phi]4]) - kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+                 Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3])))/(2*Sqrt[2]) - (kT4*Sech[\[Eta]4]*
+              (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-(Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]) + kT3*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[
+                \[Eta]4 + I*\[Phi]4]))/(2*Sqrt[2]) - 
+            (kT4^2*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+              (Cos[\[Phi]4] + I*Sin[\[Phi]4])*(-Conjugate[
+                 1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                       \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                       2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]))/Sqrt[2])) - 
+        2*(-Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+           (2*(MH^2 - S34 - T - U)) + 
+          Log[(-2*MH^2 + 2*MT^2 + S34 + T + U + Sqrt[-((2*MH^2 - S34 - T - U)*
+                  (-2*MH^2 + 4*MT^2 + S34 + T + U))])/(2*MT^2)]^2/
+           (2*(MH^2 - S34 - T - U)))*((kT4*Sqrt[S]*(MH^2 - S34 - T - U)*
+            ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]4] + 
+             I*Sin[\[Phi]4]))/Sqrt[2] - Sqrt[2]*Sqrt[S]*Sech[\[Eta]4]*
+           (-(Sqrt[S]*(-MH^2 + S34 + T + U)*Conjugate[
+                1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                     Cos[\[Phi]3 - \[Phi]4])]])/2 - 
+            kT3*(MH^2 - S34 - T24 - U)*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])) + 
+          ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(-(kT4*Sqrt[S]*(MH^2 - S34 - T - U)*Sech[
+                \[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])) - 
+             ((S - T14)*(-MH^2 + S + T14 + T24)*Sech[\[Eta]4]*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2))/
+           Sqrt[2] - Sech[\[Eta]4]*(-((kT3^2*(S - T14)*(Cos[\[Phi]3] + 
+                I*Sin[\[Phi]3])*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+                Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))/
+              Sqrt[2]) + (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+              (Sqrt[S]*(MH^2 - S34 - T - U)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                     4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                       2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                      Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                      Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                        \[Phi]4])]] - kT3*(S34 + T - T24 - U)*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+            Sinh[\[Eta]4 + I*\[Phi]4]) - Sqrt[2]*kT4*Sech[\[Eta]4]*
+           (Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+           (-(Sqrt[S]*(-MH^2 + S34 + T + U)*Conjugate[
+                1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                     Cos[\[Phi]3 - \[Phi]4])]])/2 - 
+            kT3*(MH^2 - S34 - T24 - U)*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))*
+           (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          Sqrt[2]*kT4^2*(MH^2 - S34 - T - U)*Sech[\[Eta]4]*
+           (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          8*kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+           ((kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*((Sqrt[S]*Sech[\[Eta]4]*
+                 (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/4 + (kT3*kT4*
+                 Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                 (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2))/
+             Sqrt[2] + ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*
+                (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*((kT3*Sqrt[S]*
+                 Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/4 + 
+               (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                 (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                2))/Sqrt[2])) - 
+        8*(-(kT3*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - S34 - T - 
+                U)) - DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]]/
+              (2*(MH^2 - S34 - T - U)))*
+            (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+            (-((Sqrt[S]*(MH^2 - S34 + T - U)*Sech[\[Eta]4])/Sqrt[2]) - 
+             (Sech[\[Eta]4]*(Sqrt[2]*kT3*(S - T14)*(Cos[\[Phi]3] + 
+                  I*Sin[\[Phi]3]) + (kT4*(MH^2 + S34 + T - 3*U)*
+                  (Cos[\[Phi]4] + I*Sin[\[Phi]4]))/Sqrt[2])*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+             (kT4*(MH^2 - S34 + T - U)*Sech[\[Eta]4]*(Cos[\[Phi]4] - 
+                I*Sin[\[Phi]4])*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+                Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] + 
+             8*((kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*((Sqrt[S]*Sech[\[Eta]4]*
+                    (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                     I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/4 + 
+                  (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                    (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                   2))/Sqrt[2] + ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                 ((kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/
+                   4 + (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                    (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                   2))/Sqrt[2]))) - kT3*(1/(2*(MH^2 - S34 - T - U)) - 
+            (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+             (2*(MH^2 - S34 - T - U)^2) + (MH^2*DiscB[2*MH^2 - S34 - T - 
+                U, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - S34 - T - U)^2) - 
+            (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                 (2*MT^2)]^2)/(2*(MH^2 - S34 - T - U)^2) + 
+            (MT^2*Log[(-2*MH^2 + 2*MT^2 + S34 + T + U + Sqrt[
+                   -((2*MH^2 - S34 - T - U)*(-2*MH^2 + 4*MT^2 + S34 + T + 
+                      U))])/(2*MT^2)]^2)/(2*(MH^2 - S34 - T - U)^2))*
+           (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+           (-((Sqrt[S]*(MH^2 - S34 + T - 2*T24 - U)*Sech[\[Eta]4])/Sqrt[2]) - 
+            (Sech[\[Eta]4]*(Sqrt[2]*kT3*(S - T14)*(Cos[\[Phi]3] + 
+                 I*Sin[\[Phi]3]) + (kT4*(MH^2 + S34 + T - 2*T24 - 3*U)*
+                 (Cos[\[Phi]4] + I*Sin[\[Phi]4]))/Sqrt[2])*
+              (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+            (kT4*(MH^2 - S34 + T - 2*T24 - U)*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*
+                Sin[\[Phi]4])*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + 
+                 I*\[Phi]4]))/Sqrt[2] + 8*((kT3*(Cos[\[Phi]3] + 
+                 I*Sin[\[Phi]3])*((Sqrt[S]*Sech[\[Eta]4]*
+                   (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                    I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/4 + 
+                 (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                   (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                  2))/Sqrt[2] + ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                ((kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/
+                  4 + (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                   (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                  2))/Sqrt[2]))) - 4*(-(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+            (MH^2 - S34 - T - U)) + DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], 
+            Sqrt[MT^2]]/(MH^2 - S34 - T - U))*
+         (((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(-(kT4*Sqrt[S]*(MH^2 - S34 - T - U)*Sech[
+                \[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])) - 
+             ((S - T14)*(-MH^2 + S + T14 + T24)*Sech[\[Eta]4]*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2))/
+           Sqrt[2] - (Sech[\[Eta]4]*(-2*Sqrt[2]*kT3^2*(S - T14)*
+              (Cos[\[Phi]3] + I*Sin[\[Phi]3])*(Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]3] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]3]) + (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*(
+                2*Sqrt[S]*(MH^2 - S34 - T - U)*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                kT3*(MH^2 + 3*S34 + 3*T - 2*T24 - 5*U)*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+          2*((kT4*Sqrt[S]*(MH^2 - S34 - T - U)*((-I)*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (Cos[\[Phi]4] + I*Sin[\[Phi]4]))/(2*Sqrt[2]) - 
+            (Sqrt[S]*Sech[\[Eta]4]*(-(Sqrt[S]*(-MH^2 + S34 + T + U)*
+                 Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                       Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                       Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                        \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]) - 
+               kT3*(3*MH^2 - 3*S34 + T - 2*T24 - 3*U)*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3])))/(2*Sqrt[2]) - (kT4*Sech[\[Eta]4]*
+              (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-(Sqrt[S]*(-MH^2 + S34 + T + 
+                  U)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                       Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                       Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                        \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]) - 
+               kT3*(3*MH^2 - 3*S34 + T - 2*T24 - 3*U)*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[
+                \[Eta]4 + I*\[Phi]4]))/(2*Sqrt[2]) + 
+            (kT4^2*(MH^2 - S34 - T - U)*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*
+                Sin[\[Phi]4])*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+              (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]))/Sqrt[2] - 8*kT3*
+             (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                     Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+             ((kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*((Sqrt[S]*Sech[\[Eta]4]*
+                   (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                    I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/4 + 
+                 (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                   (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                  2))/Sqrt[2] + ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                ((kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/
+                  4 + (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                   (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                  2))/Sqrt[2]))))/T24 - 
+      (4*(2 + Eps^(-1) + DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], 
+           Sqrt[MT^2]] + Log[Mu^2/MT^2])*
+         (-(Sech[\[Eta]4]*(((-S + T24)*((-I)*Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+              (kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*(2*Sqrt[S]*Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                 kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]3])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+          2*(-(kT4*Sqrt[S]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                    (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(
+                Cos[\[Phi]4] + I*Sin[\[Phi]4]))/(2*Sqrt[2]) - 
+            (Sqrt[S]*Sech[\[Eta]4]*(-(Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]) - kT4*
+                (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(Cos[\[Phi]4] - 
+                 I*Sin[\[Phi]4]) - kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+                 Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3])))/(2*Sqrt[2]) + 
+            (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*((Sech[\[Eta]4]*
+                 (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]] + kT3*(Conjugate[
+                      (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]3]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                  Sinh[\[Eta]4 + I*\[Phi]4]))/2 - kT4*Sech[\[Eta]4]*
+                (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                 I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                 Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4])))/Sqrt[2])) - 
+        16*(3/4 - (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+           (4*(MH^2 - S34 - T - U)) + ((2*MH^2 - S34 - T - U)*
+            DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]])/
+           (4*(MH^2 - S34 - T - U)) - 
+          (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*
+                MT^2)]^2)/(4*(MH^2 - S34 - T - U)) + 
+          (Eps^(-1) + Log[Mu^2/MT^2])/4 + 
+          (MT^2*Log[(-2*MH^2 + 2*MT^2 + S34 + T + U + Sqrt[
+                 -((2*MH^2 - S34 - T - U)*(-2*MH^2 + 4*MT^2 + S34 + T + U))])/
+               (2*MT^2)]^2)/(4*(MH^2 - S34 - T - U)))*
+         (-(Sech[\[Eta]4]*(((-S + T24)*((-I)*Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+              (kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*(2*Sqrt[S]*Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                 kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]3])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+          2*(-(kT4*Sqrt[S]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                    (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(
+                Cos[\[Phi]4] + I*Sin[\[Phi]4]))/(2*Sqrt[2]) - 
+            (Sqrt[S]*Sech[\[Eta]4]*(-(Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]) - kT4*
+                (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(Cos[\[Phi]4] - 
+                 I*Sin[\[Phi]4]) - kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+                 Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3])))/(2*Sqrt[2]) + 
+            (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*((Sech[\[Eta]4]*
+                 (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]] + kT3*(Conjugate[
+                      (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]3]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                  Sinh[\[Eta]4 + I*\[Phi]4]))/2 - kT4*Sech[\[Eta]4]*
+                (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                 I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                 Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4])))/Sqrt[2])) + 
+        8*(-(kT3*(1/(2*(MH^2 - S34 - T - U)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+                Sqrt[MT^2]])/(2*(MH^2 - S34 - T - U)^2) + 
+             (MH^2*DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]])/
+              (2*(MH^2 - S34 - T - U)^2) - (MT^2*Log[(-MH^2 + 2*MT^2 + 
+                   Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/
+              (2*(MH^2 - S34 - T - U)^2) + (MT^2*Log[(-2*MH^2 + 2*MT^2 + 
+                   S34 + T + U + Sqrt[-((2*MH^2 - S34 - T - U)*(-2*MH^2 + 
+                       4*MT^2 + S34 + T + U))])/(2*MT^2)]^2)/
+              (2*(MH^2 - S34 - T - U)^2))*
+            (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+            (-((Sqrt[S]*(MH^2 - S34 - T - 2*T14 + U)*Sech[\[Eta]4])/Sqrt[
+                2]) - (kT4*(MH^2 - S34 - T - 2*T14 + U)*Sech[\[Eta]4]*(
+                Cos[\[Phi]4] + I*Sin[\[Phi]4])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] + 
+             (Sech[\[Eta]4]*(-(Sqrt[2]*kT3*(S - T24)*(Cos[\[Phi]3] - 
+                   I*Sin[\[Phi]3])) + (kT4*(-3*MH^2 + S + 4*T + 3*T14 + T24)*
+                  (Cos[\[Phi]4] - I*Sin[\[Phi]4]))/Sqrt[2])*(
+                Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+             8*(-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+                  (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                   I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/(4*Sqrt[2]) - 
+               (kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                 (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])))/(4*Sqrt[2]) + (kT4*(Cos[\[Phi]4] + 
+                  I*Sin[\[Phi]4])*(-(kT3^2*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+                      I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - 
+                        I*\[Phi]3 + I*\[Phi]4]))/2 + (kT3*Sech[\[Eta]4]*
+                    (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                     I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                    (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                   2))/Sqrt[2]))) - kT3*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+             (2*(MH^2 - S34 - T - U)) - DiscB[2*MH^2 - S34 - T - U, 
+              Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - S34 - T - U)))*
+           (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+           (-((Sqrt[S]*(MH^2 - S34 - T + U)*Sech[\[Eta]4])/Sqrt[2]) - 
+            (kT4*(MH^2 - S34 - T + U)*Sech[\[Eta]4]*(Cos[\[Phi]4] + I*
+                Sin[\[Phi]4])*(Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + 
+                 I*\[Phi]4]))/Sqrt[2] - (Sech[\[Eta]4]*(Sqrt[2]*kT3*(S - T24)*
+                (Cos[\[Phi]3] - I*Sin[\[Phi]3]) + (kT4*(MH^2 + S34 - 3*T + U)*
+                 (Cos[\[Phi]4] - I*Sin[\[Phi]4]))/Sqrt[2])*
+              (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+            8*(-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+                 (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/(4*Sqrt[2]) - 
+              (kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])))/(4*Sqrt[2]) + (kT4*(Cos[\[Phi]4] + 
+                 I*Sin[\[Phi]4])*(-(kT3^2*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+                     I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - 
+                       I*\[Phi]3 + I*\[Phi]4]))/2 + (kT3*Sech[\[Eta]4]*
+                   (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                    I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                   (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                  2))/Sqrt[2]))) - 
+        2*(-Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+           (2*(MH^2 - S34 - T - U)) + 
+          Log[(-2*MH^2 + 2*MT^2 + S34 + T + U + Sqrt[-((2*MH^2 - S34 - T - U)*
+                  (-2*MH^2 + 4*MT^2 + S34 + T + U))])/(2*MT^2)]^2/
+           (2*(MH^2 - S34 - T - U)))*
+         (-(Sech[\[Eta]4]*(-(((S - T24)*(-MH^2 + S + T14 + T24)*
+                 ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2]) - 
+              2*(-((kT3^2*(S - T24)*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                   (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]3]))/Sqrt[2]) + (kT4*(Cos[\[Phi]4] - 
+                   I*Sin[\[Phi]4])*(-(Sqrt[S]*(MH^2 - S34 - T - U)*Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]) - kT3*(-2*MH^2 + S + 2*S34 + T24 + 
+                     2*U)*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                         (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[
+                          kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                        Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                      Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                          (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                          Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]3])))/Sqrt[2]))*
+             (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+          4*(-(kT4*Sqrt[S]*(MH^2 - S34 - T - U)*(I*Conjugate[
+                  (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(
+                Cos[\[Phi]4] - I*Sin[\[Phi]4]))/(4*Sqrt[2]) + 
+            (kT4*Sqrt[S]*(MH^2 - S34 - T - U)*((-I)*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (Cos[\[Phi]4] + I*Sin[\[Phi]4]))/(4*Sqrt[2]) + 
+            (Sqrt[S]*Sech[\[Eta]4]*((Sqrt[S]*(-MH^2 + S34 + T + U)*
+                 Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                       Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                       Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                        \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                2 - kT3*(-MH^2 + S + T24 + U)*(Conjugate[
+                   (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3])))/(2*Sqrt[2]) + 
+            (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*((Sech[\[Eta]4]*
+                 ((Sqrt[S]*(-MH^2 + S34 + T + U)*Conjugate[1/Sqrt[
+                       (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 - 
+                  kT3*(-MH^2 + S + T24 + U)*(Conjugate[
+                      (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]3]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                  Sinh[\[Eta]4 + I*\[Phi]4]))/2 + (kT4*(MH^2 - S34 - T - U)*
+                 Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                 (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                  I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                  Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/2))/
+             Sqrt[2] + 2*kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+             (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+                 (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/(4*Sqrt[2]) - 
+              (kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])))/(4*Sqrt[2]) + (kT4*(Cos[\[Phi]4] + 
+                 I*Sin[\[Phi]4])*(-(kT3^2*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+                     I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - 
+                       I*\[Phi]3 + I*\[Phi]4]))/2 + (kT3*Sech[\[Eta]4]*
+                   (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                    I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                   (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                  2))/Sqrt[2]))) - 4*(-(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+            (MH^2 - S34 - T - U)) + DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], 
+            Sqrt[MT^2]]/(MH^2 - S34 - T - U))*
+         (-(Sech[\[Eta]4]*(-(((S - T24)*(-MH^2 + S + T14 + T24)*
+                 ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2]) - 
+              2*Sqrt[2]*kT3^2*(-S + T24)*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*(
+                Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                       Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                  (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+                Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                       Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                       Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                        \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 Sinh[\[Eta]3]) + (kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                (-2*Sqrt[S]*(MH^2 - S - T14 - T24)*Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                 kT3*(-7*MH^2 + 3*S + 8*T + 5*T14 + 3*T24)*
+                  (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]3])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+          2*(-(kT4*Sqrt[S]*(MH^2 - S34 - T - U)*(I*Conjugate[
+                  (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(
+                Cos[\[Phi]4] - I*Sin[\[Phi]4]))/(2*Sqrt[2]) + 
+            (kT4*Sqrt[S]*(MH^2 - S34 - T - U)*((-I)*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (Cos[\[Phi]4] + I*Sin[\[Phi]4]))/(2*Sqrt[2]) + 
+            (Sqrt[S]*Sech[\[Eta]4]*(Sqrt[S]*(-MH^2 + S34 + T + U)*
+                Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - kT3*(3*MH^2 - 
+                 3*S34 - 3*T - 2*T14 + U)*(Conjugate[
+                   (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3])))/(2*Sqrt[2]) + 
+            (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*((Sech[\[Eta]4]*
+                 (Sqrt[S]*(-MH^2 + S34 + T + U)*Conjugate[1/Sqrt[
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                        2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                  kT3*(3*MH^2 - 3*S34 - 3*T - 2*T14 + U)*(Conjugate[
+                      (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]3]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                  Sinh[\[Eta]4 + I*\[Phi]4]))/2 + kT4*(MH^2 - S34 - T - U)*
+                Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                        Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                        Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                         \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                 I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                 Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4])))/Sqrt[2] + 
+            8*kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                     Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+             (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+                 (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/(4*Sqrt[2]) - 
+              (kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])))/(4*Sqrt[2]) + (kT4*(Cos[\[Phi]4] + 
+                 I*Sin[\[Phi]4])*(-(kT3^2*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+                     I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - 
+                       I*\[Phi]3 + I*\[Phi]4]))/2 + (kT3*Sech[\[Eta]4]*
+                   (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                    I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                   (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                  2))/Sqrt[2]))))/T14)/(2*MH^2 - S34 - T - U) + 
+    ((4*T14*((-2*MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+           Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U] + 
+          ((S + T14 + T24 + U)*DiscB[T14, Sqrt[MT^2], Sqrt[MT^2]])/
+           Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U] + 
+          ((2*MH^2 - S - T14 - T24 - U)*DiscB[MH^2 - S - T24 - U, Sqrt[MT^2], 
+             Sqrt[MT^2]])/Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U] - 
+          (MH^2*(S - T14 + T24 + U)*ScalarC0[MH^2, T14, MH^2 - S - T24 - U, 
+             Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]])/Kallen\[Lambda][MH^2, T14, 
+            MH^2 - S - T24 - U])*(-2*Sqrt[2]*Sqrt[S]*Sech[\[Eta]4]*
+           (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+            ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                       \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(-(kT3*Cos[\[Phi]3]) - 
+               kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/
+             2) - (Sech[\[Eta]4]*(((2*S - S34 + T - 2*T24)*(
+                (-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] - 
+             4*((kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 (Cos[\[Phi]4] - I*Sin[\[Phi]4]))/(2*Sqrt[2]) + 
+               ((-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                 (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]])/2 - kT4*(Conjugate[
+                      (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4])))/Sqrt[2]))*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 4*Sqrt[2]*kT4*
+           (Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+           ((Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+              (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/4 + 
+            (Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*
+                (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]))/2) - 2*Sqrt[2]*
+           ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*((Sqrt[S]*Sech[\[Eta]4]*
+              (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])))/4 + (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+              ((Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) + (kT3*Sech[\[Eta]4]*
+                 (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                Sqrt[2]))/Sqrt[2])) - 
+        8*(3/4 + (MH^2*(S - T14 + T24 + U)*DiscB[MH^2, Sqrt[MT^2], 
+             Sqrt[MT^2]])/(4*Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - 
+              U]) - (T14*(2*MH^2 - S - T14 - T24 - U)*DiscB[T14, Sqrt[MT^2], 
+             Sqrt[MT^2]])/(4*Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - 
+              U]) - ((MH^2 - S - T24 - U)*(S + T14 + T24 + U)*
+            DiscB[MH^2 - S - T24 - U, Sqrt[MT^2], Sqrt[MT^2]])/
+           (4*Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U]) + 
+          (Eps^(-1) + Log[Mu^2/MT^2])/4 + 
+          ((MT^2*S^2 + MH^4*T14 - 4*MH^2*MT^2*T14 - MH^2*S*T14 + 
+             2*MT^2*S*T14 + MT^2*T14^2 + 2*MT^2*S*T24 - MH^2*T14*T24 + 
+             2*MT^2*T14*T24 + MT^2*T24^2 + 2*MT^2*S*U - MH^2*T14*U + 
+             2*MT^2*T14*U + 2*MT^2*T24*U + MT^2*U^2)*ScalarC0[MH^2, T14, 
+             MH^2 - S - T24 - U, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]])/
+           (2*Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U]))*
+         (-2*Sqrt[2]*Sqrt[S]*Sech[\[Eta]4]*
+           (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+            ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                       \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(-(kT3*Cos[\[Phi]3]) - 
+               kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/
+             2) - (Sech[\[Eta]4]*(((2*S - S34 + T - 2*T24)*(
+                (-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] - 
+             4*((kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 (Cos[\[Phi]4] - I*Sin[\[Phi]4]))/(2*Sqrt[2]) + 
+               ((-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                 (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]])/2 - kT4*(Conjugate[
+                      (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4])))/Sqrt[2]))*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 4*Sqrt[2]*kT4*
+           (Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+           ((Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+              (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/4 + 
+            (Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*
+                (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]))/2) - 2*Sqrt[2]*
+           ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*((Sqrt[S]*Sech[\[Eta]4]*
+              (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])))/4 + (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+              ((Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) + (kT3*Sech[\[Eta]4]*
+                 (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                Sqrt[2]))/Sqrt[2])) - 
+        2*(((S + T14 + T24 + U)*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+           Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U] - 
+          (2*T14*DiscB[T14, Sqrt[MT^2], Sqrt[MT^2]])/Kallen\[Lambda][MH^2, 
+            T14, MH^2 - S - T24 - U] - ((S - T14 + T24 + U)*
+            DiscB[MH^2 - S - T24 - U, Sqrt[MT^2], Sqrt[MT^2]])/
+           Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U] + 
+          (T14*(2*MH^2 - S - T14 - T24 - U)*ScalarC0[MH^2, T14, 
+             MH^2 - S - T24 - U, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]])/
+           Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U])*
+         (Sqrt[2]*S*(-2*MH^2 + S34 + T)*Conjugate[
+            1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                 Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                 Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                   \[Phi]4])]]*Sech[\[Eta]4] - Sqrt[2]*Sqrt[S]*
+           (-2*MH^2 + S34 + T)*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - 
+            kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])) + 
+          Sqrt[2]*kT4*Sqrt[S]*(-2*MH^2 + S34 + T)*Conjugate[
+            1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                 Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                 Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                   \[Phi]4])]]*Sech[\[Eta]4]*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          ((4*S*S34 - S34^2 + T^2 + 2*S34*T14 - 2*T*T14 - 
+             2*MH^2*(2*S - S34 + T - 2*T24) - 4*T*T24 - 2*S34*U + 2*T*U)*
+            ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+           (2*Sqrt[2]) + 2*Sech[\[Eta]4]*
+           ((Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*((kT3*(S34 - T)*
+                 (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + Sqrt[2]*kT4*
+                (-MH^2 + T)*(Cos[\[Phi]4] - I*Sin[\[Phi]4])))/2 + 
+            ((-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))*(Sqrt[S]*(MH^2 - S34)*Conjugate[
+                 1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                       \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                       2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - kT3*(S34 - T)*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]) - 2*kT4*(-MH^2 + T)*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Sinh[\[Eta]4 + I*\[Phi]4]) + 2*Sqrt[2]*kT4*(-2*MH^2 + S34 + T)*
+           Sech[\[Eta]4]*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+           (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+            I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          32*((kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                    Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                   kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                    Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                  (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+              (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/(2*Sqrt[2]) - 
+            (kT3*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*
+                (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))/
+             Sqrt[2])*((kT3*Sech[\[Eta]4]*(kT3*Cos[\[Phi]3] + kT4*
+                Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2 + 
+            (kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(Sqrt[S]*Sech[\[Eta]4])/
+                (2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + 
+                  Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/
+             Sqrt[2]) - 2*Sqrt[2]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*(-(kT3*Sqrt[S]*(6*MH^2 - 3*S34 - 3*T - 
+                4*U)*Sech[\[Eta]4]*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/4 + 
+            (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*((Sqrt[S]*(-2*MH^2 + S34 + 
+                  T)*Sech[\[Eta]4])/Sqrt[2] + (kT3*(6*MH^2 - 3*S34 - 3*T - 
+                  4*U)*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                    I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2])) - 
+        4*((-((S^3 - 10*MH^2*S*T14 + 5*S^2*T14 - 6*MH^2*T14^2 + 7*S*T14^2 + 
+                3*T14^3 + 3*S^2*T24 - 10*MH^2*T14*T24 + 10*S*T14*T24 + 
+                7*T14^2*T24 + 3*S*T24^2 + 5*T14*T24^2 + T24^3 + 3*S^2*U - 
+                10*MH^2*T14*U + 10*S*T14*U + 7*T14^2*U + 6*S*T24*U + 
+                10*T14*T24*U + 3*T24^2*U + 3*S*U^2 + 5*T14*U^2 + 3*T24*U^2 + 
+                U^3)*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+             (2*Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U]^2) - 
+            (3*T14^2*(2*MH^2 - S - T14 - T24 - U)*DiscB[T14, Sqrt[MT^2], Sqrt[
+                MT^2]])/Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U]^2 + 
+            ((S^3 - 10*MH^2*S*T14 + 5*S^2*T14 + 6*MH^2*T14^2 + S*T14^2 - 3*
+                T14^3 + 3*S^2*T24 - 10*MH^2*T14*T24 + 10*S*T14*T24 + T14^2*
+                T24 + 3*S*T24^2 + 5*T14*T24^2 + T24^3 + 3*S^2*U - 10*MH^2*T14*
+                U + 10*S*T14*U + T14^2*U + 6*S*T24*U + 10*T14*T24*U + 3*T24^2*
+                U + 3*S*U^2 + 5*T14*U^2 + 3*T24*U^2 + U^3)*DiscB[MH^2 - S - 
+                T24 - U, Sqrt[MT^2], Sqrt[MT^2]])/(2*Kallen\[Lambda][MH^2, 
+                T14, MH^2 - S - T24 - U]^2) + T14/Kallen\[Lambda][MH^2, T14, 
+              MH^2 - S - T24 - U] + (T14*(2*MT^2*S^2 + 6*MH^4*T14 - 8*MH^2*
+                MT^2*T14 - 6*MH^2*S*T14 + 4*MT^2*S*T14 + S^2*T14 - 4*MH^2*
+                T14^2 + 2*MT^2*T14^2 + 2*S*T14^2 + T14^3 + 4*MT^2*S*T24 - 6*
+                MH^2*T14*T24 + 4*MT^2*T14*T24 + 2*S*T14*T24 + 2*T14^2*T24 + 2*
+                MT^2*T24^2 + T14*T24^2 + 4*MT^2*S*U - 6*MH^2*T14*U + 4*MT^2*
+                T14*U + 2*S*T14*U + 2*T14^2*U + 4*MT^2*T24*U + 2*T14*T24*U + 
+               2*MT^2*U^2 + T14*U^2)*ScalarC0[MH^2, T14, MH^2 - S - T24 - 
+                U, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]])/
+             Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U]^2)*
+           (((S34 - T)*(-2*MH^2 + S34 + T + 2*U)*((-I)*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (2*Sqrt[2]) + 2*(S34 - T)*Sech[\[Eta]4]*
+             ((kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/(2*Sqrt[2]) - 
+              (kT3*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+              Sinh[\[Eta]4 + I*\[Phi]4]) - 2*Sqrt[2]*(2*MH^2 - S34 - T - 2*U)*
+             ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+             (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/
+               4 + (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+                (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+               2) + 16*((kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                     4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                       2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                      Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                      Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                        \[Phi]4])]]*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/(2*
+                Sqrt[2]) - (kT3*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2])*(-(kT3*Sqrt[S]*Sech[\[Eta]4]*
+                 (Cos[\[Phi]3] + I*Sin[\[Phi]3]))/4 + (kT3*kT4*Sech[\[Eta]4]*
+                (Cos[\[Phi]4] + I*Sin[\[Phi]4])*(-Sinh[\[Eta]3] + 
+                 Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2)) + 
+          (-(MH^2*(S^2 + 8*MH^2*T14 - 4*S*T14 - 5*T14^2 + 2*S*T24 - 
+                4*T14*T24 + T24^2 + 2*S*U - 4*T14*U + 2*T24*U + U^2)*DiscB[
+                MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(2*Kallen\[Lambda][MH^2, T14, 
+                MH^2 - S - T24 - U]^2) + (T14*(6*MH^2*S - S^2 - 2*MH^2*T14 - 
+               2*S*T14 - T14^2 + 6*MH^2*T24 - 2*S*T24 - 2*T14*T24 - T24^2 + 6*
+                MH^2*U - 2*S*U - 2*T14*U - 2*T24*U - U^2)*DiscB[T14, Sqrt[
+                MT^2], Sqrt[MT^2]])/(2*Kallen\[Lambda][MH^2, T14, 
+                MH^2 - S - T24 - U]^2) + ((MH^2*S^2 + 8*MH^4*T14 - 10*MH^2*S*
+                T14 + S^2*T14 - 3*MH^2*T14^2 + 2*S*T14^2 + T14^3 + 2*MH^2*S*
+                T24 - 10*MH^2*T14*T24 + 2*S*T14*T24 + 2*T14^2*T24 + MH^2*
+                T24^2 + T14*T24^2 + 2*MH^2*S*U - 10*MH^2*T14*U + 2*S*T14*U + 
+               2*T14^2*U + 2*MH^2*T24*U + 2*T14*T24*U + MH^2*U^2 + T14*U^2)*
+              DiscB[MH^2 - S - T24 - U, Sqrt[MT^2], Sqrt[MT^2]])/
+             (2*Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U]^2) - 
+            (S + T14 + T24 + U)/(2*Kallen\[Lambda][MH^2, T14, MH^2 - S - 
+                T24 - U]) - ((MT^2*S^3 + 3*MH^4*S*T14 - 4*MH^2*MT^2*S*T14 - 2*
+                MH^2*S^2*T14 + 3*MT^2*S^2*T14 - MH^4*T14^2 - 4*MH^2*MT^2*
+                T14^2 - MH^2*S*T14^2 + 3*MT^2*S*T14^2 + MH^2*T14^3 + MT^2*
+                T14^3 + 3*MT^2*S^2*T24 + 3*MH^4*T14*T24 - 4*MH^2*MT^2*T14*
+                T24 - 4*MH^2*S*T14*T24 + 6*MT^2*S*T14*T24 - MH^2*T14^2*T24 + 
+               3*MT^2*T14^2*T24 + 3*MT^2*S*T24^2 - 2*MH^2*T14*T24^2 + 3*MT^2*
+                T14*T24^2 + MT^2*T24^3 + 3*MT^2*S^2*U + 3*MH^4*T14*U - 4*MH^2*
+                MT^2*T14*U - 4*MH^2*S*T14*U + 6*MT^2*S*T14*U - MH^2*T14^2*
+                U + 3*MT^2*T14^2*U + 6*MT^2*S*T24*U - 4*MH^2*T14*T24*U + 6*
+                MT^2*T14*T24*U + 3*MT^2*T24^2*U + 3*MT^2*S*U^2 - 2*MH^2*T14*
+                U^2 + 3*MT^2*T14*U^2 + 3*MT^2*T24*U^2 + MT^2*U^3)*
+              ScalarC0[MH^2, T14, MH^2 - S - T24 - U, Sqrt[MT^2], Sqrt[MT^2], 
+               Sqrt[MT^2]])/Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U]^2)*
+           (((S34 - T)*(-2*MH^2 + S34 + T + 2*U)*((-I)*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (2*Sqrt[2]) + 2*(S34 - T)*Sech[\[Eta]4]*
+             ((kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/(2*Sqrt[2]) - 
+              (kT3*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+              Sinh[\[Eta]4 + I*\[Phi]4]) - 2*Sqrt[2]*(2*MH^2 - S34 - T - 2*U)*
+             ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+             (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/
+               4 + (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+                (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+               2) + 16*((kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                     4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                       2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                      Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                      Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                        \[Phi]4])]]*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/(2*
+                Sqrt[2]) - (kT3*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2])*((kT3*Sech[\[Eta]4]*
+                (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4]))*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                   I*\[Phi]3 + I*\[Phi]4]))/2 + (kT3*(Cos[\[Phi]3] + 
+                 I*Sin[\[Phi]3])*(-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+                 (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                      I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2]))) + 
+        2*((2 + Eps^(-1) + DiscB[MH^2 - S - T24 - U, Sqrt[MT^2], 
+             Sqrt[MT^2]] + Log[Mu^2/MT^2])*(-2*Sqrt[2]*Sqrt[S]*Sech[\[Eta]4]*
+             (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+               2 + ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(-(kT3*Cos[\[Phi]3]) - 
+                 kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/
+               2) - (Sech[\[Eta]4]*(((2*S - S34 + T - 2*T24)*
+                 ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] - 4*
+                ((kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/
+                  (2*Sqrt[2]) + ((-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                    I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                   (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]])/2 - kT4*(Conjugate[
+                        (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                        (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[1/Sqrt[
+                          (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                          kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                       Sinh[\[Eta]4])))/Sqrt[2]))*(Cosh[\[Eta]4 + 
+                 I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+            4*Sqrt[2]*kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+             ((Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + 
+                   I*\[Phi]4]))/4 + (Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - 
+                 kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                        Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                        Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                         \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                 I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                 Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/2) - 
+            2*Sqrt[2]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*((Sqrt[S]*Sech[\[Eta]4]*
+                (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])))/4 + (kT4*(Cos[\[Phi]4] + 
+                 I*Sin[\[Phi]4])*((Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+                 (kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - 
+                      I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2])) + 
+          ScalarC0[MH^2, T14, MH^2 - S - T24 - U, Sqrt[MT^2], Sqrt[MT^2], 
+            Sqrt[MT^2]]*(-((S*(-2*MH^2 + S34 + T)*Conjugate[
+                1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                     Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4])/Sqrt[2]) + 
+            (Sqrt[S]*(-2*MH^2 + S34 + T)*(I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])))/Sqrt[2] - 
+            (kT4*Sqrt[S]*(-2*MH^2 + S34 + T)*Conjugate[1/Sqrt[
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*(Cos[\[Phi]4] + I*
+                Sin[\[Phi]4])*(Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + 
+                 I*\[Phi]4]))/Sqrt[2] - ((-2*S*S34 - S34*T14 + T*T14 + 2*MH^2*
+                (S - T24) + 2*T*T24)*((-I)*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (2*Sqrt[2]) - 2*Sech[\[Eta]4]*((kT4*Sqrt[S]*(-MH^2 + T)*
+                Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]4] - 
+                 I*Sin[\[Phi]4]))/(2*Sqrt[2]) + ((-(kT3*Cos[\[Phi]3]) - 
+                 kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (-(Sqrt[S]*(-MH^2 + S34)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])]])/2 - kT4*(-MH^2 + T)*
+                  (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]4])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+              Sinh[\[Eta]4 + I*\[Phi]4]) - Sqrt[2]*kT4*(-2*MH^2 + S34 + T)*
+             Sech[\[Eta]4]*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+             (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                kT4*Sin[\[Phi]4]))*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                 I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                 I*\[Phi]4]) - 8*((kT3*Sqrt[S]*Conjugate[
+                 1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                       \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                       2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]3] - 
+                 I*Sin[\[Phi]3]))/(2*Sqrt[2]) - (kT3*(-(kT3*Cos[\[Phi]3]) - 
+                 kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2])*((kT3*Sech[\[Eta]4]*
+                (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4]))*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                   I*\[Phi]3 + I*\[Phi]4]))/2 + (kT3*(Cos[\[Phi]3] + 
+                 I*Sin[\[Phi]3])*(-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+                 (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                      I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2]) + 
+            2*Sqrt[2]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+             (-(kT3*Sqrt[S]*(S + T14 + T24)*Sech[\[Eta]4]*(Cos[\[Phi]3] + 
+                  I*Sin[\[Phi]3]))/4 + (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+                ((Sqrt[S]*(-2*MH^2 + S34 + T)*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+                 (kT3*(S + T14 + T24)*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + 
+                    Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[
+                2]))))/T14 + 
+      (8*((kT3*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - S34)) + 
+             DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - S34)))*
+            Sech[\[Eta]4]*(-(Sqrt[S]*(-MH^2 + S34 + 2*T)*Conjugate[
+                1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                     Cos[\[Phi]3 - \[Phi]4])]]) - 
+             (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(
+                -((kT3*(MH^2 - 2*S + S34 + 2*T24 - 2*U)*(Cos[\[Phi]3] + 
+                    I*Sin[\[Phi]3]))/Sqrt[2]) + (kT4*(-3*MH^2 + S34 + 4*U)*
+                  (Cos[\[Phi]4] + I*Sin[\[Phi]4]))/Sqrt[2]))/Sqrt[2] + 
+             (-MH^2 + S34 + 2*T)*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(-(kT3*Cos[\[Phi]3]) - 
+               kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])) + 
+             8*(-((kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*((kT3*Sqrt[S]*
+                     Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/(2*Sqrt[2]) - 
+                   (kT3*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                      I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                     (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                        (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[1/Sqrt[
+                          (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                          kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                       Sinh[\[Eta]3]))/Sqrt[2]))/Sqrt[2]) + (kT3*
+                 (Cos[\[Phi]3] + I*Sin[\[Phi]3])*((kT4*Sqrt[S]*Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    (Cos[\[Phi]4] - I*Sin[\[Phi]4]))/(2*Sqrt[2]) - 
+                  (kT4*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                     I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                    (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]4]))/Sqrt[2]))/Sqrt[2]))*
+            (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+           Sqrt[2] + (kT3*(-1/(2*(MH^2 - S34)) - (MH^2*DiscB[MH^2, 
+                Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - S34)^2) + 
+             (MH^2*DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - S34)^2) - 
+             (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                  (2*MT^2)]^2)/(2*(MH^2 - S34)^2) + 
+             (MT^2*Log[(2*MT^2 - S34 + Sqrt[-((4*MT^2 - S34)*S34)])/(2*MT^2)]^
+                2)/(2*(MH^2 - S34)^2))*Sech[\[Eta]4]*
+            (-(Sqrt[S]*(MH^2 - S34 - 2*T14)*Conjugate[
+                1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                     Cos[\[Phi]3 - \[Phi]4])]]) + 
+             (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*((kT3*(-MH^2 + S34 + 
+                   4*T24)*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2] + 
+                (kT4*(MH^2 + 2*S - S34 + 2*T24 - 2*U)*(Cos[\[Phi]4] + 
+                   I*Sin[\[Phi]4]))/Sqrt[2]))/Sqrt[2] + (MH^2 - S34 - 2*T14)*
+              (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                       \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(-(kT3*Cos[\[Phi]3]) - 
+               kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])) + 
+             8*(-((kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*((kT3*Sqrt[S]*
+                     Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/(2*Sqrt[2]) - 
+                   (kT3*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                      I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                     (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                        (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[1/Sqrt[
+                          (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                          kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                       Sinh[\[Eta]3]))/Sqrt[2]))/Sqrt[2]) + (kT3*
+                 (Cos[\[Phi]3] + I*Sin[\[Phi]3])*((kT4*Sqrt[S]*Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    (Cos[\[Phi]4] - I*Sin[\[Phi]4]))/(2*Sqrt[2]) - 
+                  (kT4*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                     I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                    (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]4]))/Sqrt[2]))/Sqrt[2]))*
+            (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+           Sqrt[2]) + (4*(2 + Eps^(-1) + DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]] + 
+            Log[Mu^2/MT^2]) - 16*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[
+                MT^2]])/(4*(MH^2 - S34)) - (S34*DiscB[S34, Sqrt[MT^2], Sqrt[
+                MT^2]])/(4*(MH^2 - S34)) + 
+            (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                 (2*MT^2)]^2)/(4*(MH^2 - S34)) + (Eps^(-1) + Log[Mu^2/MT^2])/
+             4 - (MT^2*Log[(2*MT^2 - S34 + Sqrt[-((4*MT^2 - S34)*S34)])/
+                 (2*MT^2)]^2)/(4*(MH^2 - S34))))*
+         ((Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+            (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*
+                Sin[\[Phi]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] - 
+          (Sech[\[Eta]4]*(((-MH^2 + 2*S + T + T14)*((-I)*Conjugate[
+                  (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+             Sqrt[2]*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                    Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                   kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                    Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                  (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+              (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])))*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 + Sqrt[2]*Sech[\[Eta]4]*
+           (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+            I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*(kT3*Cos[\[Phi]3] + 
+            kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+           (-((Sqrt[S]*Sech[\[Eta]4])/Sqrt[2]) - (kT3*Sech[\[Eta]4]*
+              (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+             Sqrt[2]) + (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+            I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-((Sqrt[S]*Sech[\[Eta]4])/Sqrt[2]) - (kT3*Sech[\[Eta]4]*
+              (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+             Sqrt[2]) + (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                 (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+             I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+            (-(Sqrt[2]*Sqrt[S]*Sech[\[Eta]4]) + (kT3*Sech[\[Eta]4]*(
+                -Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+              Sqrt[2]))/2) - 4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+           (MH^2 - S34) - DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - S34))*
+         (-(Sech[\[Eta]4]*(((MH^2 - S34)*(MH^2 - 2*S - T - T14)*
+                ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] - 
+              Sqrt[2]*Sqrt[S]*(MH^2 - S34)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])]]*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))*
+             (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+          2*(-(Sqrt[S]*(MH^2 - S34)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])]]*Sech[\[Eta]4]*(kT3*Cos[\[Phi]3] + 
+                kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (2*Sqrt[2]) - ((MH^2 - S34)*Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - 
+               kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                     4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                       2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                      Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                      Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                        \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]))/Sqrt[2] - 4*Sqrt[2]*kT3*Sech[\[Eta]4]*
+             (-((kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*((kT3*Sqrt[S]*Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/(2*Sqrt[2]) - 
+                  (kT3*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                     I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                    (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]3]))/Sqrt[2]))/Sqrt[2]) + 
+              (kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*((kT4*Sqrt[S]*Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   (Cos[\[Phi]4] - I*Sin[\[Phi]4]))/(2*Sqrt[2]) - 
+                 (kT4*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                    I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                   (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4]))/Sqrt[2]))/Sqrt[2])*(-Sinh[\[Eta]3] + 
+              Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]) - 
+            (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*((Sqrt[S]*(MH^2 - S34)*
+                 Sech[\[Eta]4])/Sqrt[2] + (kT3*(MH^2 - S34 - 2*T + 2*T14)*
+                 Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                    I*\[Phi]4]))/Sqrt[2]))/2 + 
+            ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                       \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(-(kT3*Cos[\[Phi]3]) - 
+               kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              ((Sqrt[S]*(MH^2 - S34)*Sech[\[Eta]4])/Sqrt[2] + 
+               (kT3*(MH^2 - S34 - 2*T + 2*T14)*Sech[\[Eta]4]*
+                 (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                Sqrt[2]))/2) - 
+          (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*((kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*(
+                -(Sqrt[2]*Sqrt[S]*(MH^2 - S34)*Sech[\[Eta]4]) + 
+                (kT3*(5*MH^2 + 2*S - 3*S34 + 2*T24 - 6*U)*Sech[\[Eta]4]*
+                  (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                 Sqrt[2]))/Sqrt[2] + (kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*(
+                -(Sqrt[2]*Sqrt[S]*(MH^2 - S34)*Sech[\[Eta]4]) + 
+                (kT3*(MH^2 - 2*S + S34 + 6*T24 - 2*U)*Sech[\[Eta]4]*
+                  (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                 Sqrt[2]))/Sqrt[2]))/Sqrt[2]) - 
+        2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+           (2*(MH^2 - S34)) - Log[(2*MT^2 - S34 + Sqrt[-((4*MT^2 - S34)*
+                  S34)])/(2*MT^2)]^2/(2*(MH^2 - S34)))*
+         (-(Sech[\[Eta]4]*(((MH^2 - S34)*(MH^2 - 2*S - T - T14)*
+                ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] - 
+              Sqrt[2]*Sqrt[S]*(MH^2 - S34)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])]]*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))*
+             (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+          2*((Sqrt[S]*(MH^2 - S34)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]]*Sech[\[Eta]4]*(kT3*Cos[\[Phi]3] + kT4*
+                Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (2*Sqrt[2]) + ((MH^2 - S34)*Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - 
+               kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                     4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                       2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                      Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                      Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                        \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]))/Sqrt[2] + 2*Sqrt[2]*kT3*Sech[\[Eta]4]*
+             (-((kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*((kT3*Sqrt[S]*Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/(2*Sqrt[2]) - 
+                  (kT3*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                     I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                    (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]3]))/Sqrt[2]))/Sqrt[2]) + 
+              (kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*((kT4*Sqrt[S]*Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   (Cos[\[Phi]4] - I*Sin[\[Phi]4]))/(2*Sqrt[2]) - 
+                 (kT4*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                    I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                   (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4]))/Sqrt[2]))/Sqrt[2])*(-Sinh[\[Eta]3] + 
+              Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]) + 
+            Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+             (-(Sqrt[S]*(-MH^2 + S34)*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+              (kT3*T14*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                   I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]) - 
+            (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(-(kT3*Cos[\[Phi]3]) - 
+              kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+             (-(Sqrt[S]*(-MH^2 + S34)*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+              (kT3*T14*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                   I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]) + 
+            (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                       \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*((kT3*(Cos[\[Phi]3] + 
+                  I*Sin[\[Phi]3])*(-((Sqrt[S]*(MH^2 - S34)*Sech[\[Eta]4])/
+                    Sqrt[2]) + Sqrt[2]*kT3*T24*Sech[\[Eta]4]*
+                   (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4])))/
+                Sqrt[2] + (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+                 (-((Sqrt[S]*(MH^2 - S34)*Sech[\[Eta]4])/Sqrt[2]) + 
+                  (kT3*(MH^2 + S - S34 + T24 - U)*Sech[\[Eta]4]*
+                    (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                   Sqrt[2]))/Sqrt[2]))/Sqrt[2])))/S34 - 
+      (-4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T) - 
+          DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T))*
+         ((Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+            ((kT3*(MH^2 - 2*S34 - T + 2*T14)*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/
+              Sqrt[2] + Sqrt[2]*kT4*(MH^2 - T)*(Cos[\[Phi]4] + I*
+                Sin[\[Phi]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+          (Sech[\[Eta]4]*(((MH^2 - T)*(MH^2 - S34 - T14 - 2*T24)*(
+                (-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] - 
+             4*(MH^2 - T)*((kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                      4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                        2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                       Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                       Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                        \[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]4] - 
+                  I*Sin[\[Phi]4]))/(2*Sqrt[2]) - (kT4*(-(kT3*Cos[\[Phi]3]) - 
+                  kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4]))/Sqrt[2]))*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 + Sech[\[Eta]4]*
+           ((kT3*(MH^2 - 2*S34 - T + 2*T14)*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/
+             Sqrt[2] + Sqrt[2]*kT4*(MH^2 - T)*(Cos[\[Phi]4] + 
+              I*Sin[\[Phi]4]))*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+            I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          2*Sqrt[S]*(MH^2 - T)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+           (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+            (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/Sqrt[2]) + 2*(MH^2 - T)*
+           (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+            I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+            (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/Sqrt[2]) + 
+          (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(kT4*Sqrt[S]*(-MH^2 + T)*Sech[\[Eta]4]*
+              (Cos[\[Phi]4] + I*Sin[\[Phi]4]) + (kT3*(Cos[\[Phi]3] + 
+                I*Sin[\[Phi]3])*(-((Sqrt[S]*(MH^2 - 2*S34 - T + 2*T14)*
+                   Sech[\[Eta]4])/Sqrt[2]) - (Sqrt[S]*(9*MH^2 - 2*S34 - 5*T - 
+                   2*T14 - 8*U)*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+                (kT3*(3*MH^2 - 8*S - 2*S34 - 3*T - 2*T14)*Sech[\[Eta]4]*
+                  (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                 Sqrt[2]))/Sqrt[2]))/Sqrt[2] + 8*Sqrt[2]*kT3*
+           (Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+           ((kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                    Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                   kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                    Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                  (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+              (Cos[\[Phi]3] - I*Sin[\[Phi]3])*((Sqrt[S]*Sech[\[Eta]4])/
+                (2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+                  Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/
+             (2*Sqrt[2]) + (kT3*kT4*Sqrt[S]*Conjugate[1/Sqrt[
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*
+                Sin[\[Phi]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/4 + ((-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+               I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                     (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]3]))/(2*Sqrt[2]) + (kT3^2*Sech[\[Eta]4]*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                    I*\[Phi]4]))/Sqrt[2] - (kT3*kT4*Sech[\[Eta]4]*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                    I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2])) + 
+        (4*(2 + Eps^(-1) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]] + 
+            Log[Mu^2/MT^2]) - 16*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[
+                MT^2]])/(4*(MH^2 - T)) - (T*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/
+             (4*(MH^2 - T)) + (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[
+                   -(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/(4*(MH^2 - T)) + 
+            (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+            (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+             (4*(MH^2 - T))))*(-(Sech[\[Eta]4]*(((-MH^2 + S34 + T14 + 2*T24)*
+                ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+              4*((kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  (Cos[\[Phi]4] - I*Sin[\[Phi]4]))/(2*Sqrt[2]) - 
+                (kT4*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                   I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                  (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]4]))/Sqrt[2]))*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+          (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(Sqrt[S]*Sech[\[Eta]4]*
+              (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])) - (kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*(
+                (Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) + (kT3*Sech[\[Eta]4]*
+                  (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                 Sqrt[2]))/Sqrt[2]))/Sqrt[2] - 
+          2*((Sech[\[Eta]4]*((kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2] + 
+               Sqrt[2]*kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4]))*
+              (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                     4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                       2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                      Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                      Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                        \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]))/2 + (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(-(kT3*Cos[\[Phi]3]) - 
+              kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+             (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*
+                (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+               Sqrt[2]) + (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]]*((Sech[\[Eta]4]*((kT3*(Cos[\[Phi]3] + 
+                     I*Sin[\[Phi]3]))/Sqrt[2] + Sqrt[2]*kT4*(Cos[\[Phi]4] + 
+                    I*Sin[\[Phi]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                  Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 2*(-(Sqrt[S]*Sech[\[Eta]4])/
+                  (2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + 
+                    Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2])))/2)) - 
+        2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+           (2*(MH^2 - T)) - Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/
+              (2*MT^2)]^2/(2*(MH^2 - T)))*
+         (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+           ((kT3*T14*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2] + 
+            (kT4*(MH^2 - T)*(Cos[\[Phi]4] + I*Sin[\[Phi]4]))/Sqrt[2])*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          (Sech[\[Eta]4]*(((MH^2 - T)*(MH^2 - S34 - T14 - 2*T24)*(
+                (-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] - 
+             4*(MH^2 - T)*((kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                      4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                        2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                       Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                       Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                        \[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]4] - 
+                  I*Sin[\[Phi]4]))/(2*Sqrt[2]) - (kT4*(-(kT3*Cos[\[Phi]3]) - 
+                  kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4]))/Sqrt[2]))*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 2*Sech[\[Eta]4]*
+           ((kT3*T14*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2] + 
+            (kT4*(MH^2 - T)*(Cos[\[Phi]4] + I*Sin[\[Phi]4]))/Sqrt[2])*
+           (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+            I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          4*Sqrt[2]*kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+           (-(kT4*S*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*(
+                Cos[\[Phi]4] - I*Sin[\[Phi]4]))/8 + 
+            ((-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))*(-(S*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                       4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                         2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                        Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                        Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                         \[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4])/(4*Sqrt[2]) + 
+               (kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                    (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4]))/(2*Sqrt[2]) + (kT3*Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+                 (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                (2*Sqrt[2])))/Sqrt[2]) - 2*Sqrt[S]*(MH^2 - T)*
+           Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+           (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+            (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/Sqrt[2]) + 2*(MH^2 - T)*
+           (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+            I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+            (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/Sqrt[2]) + Sqrt[2]*
+           ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*((kT4*Sqrt[S]*(-MH^2 + T)*Sech[\[Eta]4]*
+              (Cos[\[Phi]4] + I*Sin[\[Phi]4]))/2 + 
+            (kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(Sqrt[S]*(-MH^2 + 2*S + 
+                   S34 + T14 + 2*T24)*Sech[\[Eta]4])/(2*Sqrt[2]) - 2*
+                ((Sqrt[S]*T14*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+                 (kT3*S*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                      I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2])))/Sqrt[2])) - 
+        8*((kT3*(-1/(2*(MH^2 - T)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+                Sqrt[MT^2]])/(2*(MH^2 - T)^2) + (MH^2*DiscB[T, Sqrt[MT^2], 
+                Sqrt[MT^2]])/(2*(MH^2 - T)^2) - 
+             (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                  (2*MT^2)]^2)/(2*(MH^2 - T)^2) + 
+             (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+              (2*(MH^2 - T)^2))*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+            ((Sqrt[S]*(-MH^2 + T + 2*T14)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])]]*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                Sinh[\[Eta]4 + I*\[Phi]4]))/2 + (-MH^2 + T + 2*T14)*
+              Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*
+                (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]) + (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                    (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*((Sqrt[S]*(-3*MH^2 + 
+                   2*S34 + T - 2*T14 + 4*U)*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+                (kT3*(5*MH^2 - 2*S34 - 3*T - 2*T14 - 4*U)*Sech[\[Eta]4]*
+                  (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                 Sqrt[2] + Sqrt[2]*kT3*(-MH^2 + S34 + T14 + 2*T24)*
+                 Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                    I*\[Phi]4])))/Sqrt[2] + 8*((kT3*S*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+                 (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/8 + ((-(kT3*Cos[\[Phi]3]) - 
+                  kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                 (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                        (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                        (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[1/Sqrt[
+                          (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                          kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                       Sinh[\[Eta]3]))/(2*Sqrt[2]) - (kT3*Sqrt[S]*Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                       I*\[Phi]3 + I*\[Phi]4]))/(2*Sqrt[2])))/Sqrt[2])))/
+           Sqrt[2] + (kT3*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+              (2*(MH^2 - T)) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/
+              (2*(MH^2 - T)))*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+            ((Sqrt[S]*(MH^2 - 2*S34 - T)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])]]*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                Sinh[\[Eta]4 + I*\[Phi]4]))/2 + (MH^2 - 2*S34 - T)*
+              Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*
+                (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]) + (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                    (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*((Sqrt[S]*(-5*MH^2 + 
+                   4*S34 + 3*T + 4*U)*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+                (kT3*(3*MH^2 - T - 4*U)*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+                   Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2] + 
+                Sqrt[2]*kT3*(-MH^2 + S34 + T14 + 2*T24)*Sech[\[Eta]4]*
+                 (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4])))/
+              Sqrt[2] + 8*((kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                      4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                        2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                       Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                       Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                        \[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                 ((Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*
+                    (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                   Sqrt[2]))/(2*Sqrt[2]) + (kT3*kT4*Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+                 (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-Sinh[\[Eta]3] + 
+                  Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/4 + 
+               ((-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                 (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                        (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                        (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[1/Sqrt[
+                          (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                          kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                       Sinh[\[Eta]3]))/(2*Sqrt[2]) + (kT3^2*Sech[\[Eta]4]*
+                    (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]3])*(Sinh[\[Eta]3] - 
+                     Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2] - 
+                  (kT3*kT4*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[
+                          \[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                         kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                          Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]4])*(-Sinh[\[Eta]3] + 
+                     Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/
+                Sqrt[2])))/Sqrt[2]))/T)/(MH^2 - S - T24 - U) + 
+    (4*(2 + Eps^(-1) + DiscB[U, Sqrt[MT^2], Sqrt[MT^2]] + Log[Mu^2/MT^2])*
+       (-((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+         (2*Sqrt[2]) + 
+        (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+         (2*Sqrt[2]) - Sqrt[2]*Sech[\[Eta]4]*
+         (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+          I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Cosh[\[Eta]4 + I*\[Phi]4] + 
+          Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Sinh[\[Eta]4 + I*\[Phi]4])) + 
+      2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+         (2*(MH^2 - U)) - Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/
+            (2*MT^2)]^2/(2*(MH^2 - U)))*
+       (((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+          ((kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/2 + 
+           ((-MH^2 + U)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2))/Sqrt[2] - 
+        (Sech[\[Eta]4]*(((-MH^2 + U)*((-I)*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+           (kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                   Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                  kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                   Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                 (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+             (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2])*
+          (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+        Sqrt[2]*(MH^2 - U)*Sech[\[Eta]4]*
+         (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+          I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Cosh[\[Eta]4 + I*\[Phi]4] + 
+          Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Sinh[\[Eta]4 + I*\[Phi]4])) - 
+      16*((kT3*(-1/(2*(MH^2 - U)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+              Sqrt[MT^2]])/(2*(MH^2 - U)^2) + 
+           (MH^2*DiscB[U, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - U)^2) - 
+           (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                (2*MT^2)]^2)/(2*(MH^2 - U)^2) + 
+           (MT^2*Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/(2*MT^2)]^2)/
+            (2*(MH^2 - U)^2))*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+          (-(Sqrt[S]*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                        \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                       \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4])/4 + 
+           (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+             (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/4))/
+         Sqrt[2] + (3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+           (4*(MH^2 - U)) - (U*DiscB[U, Sqrt[MT^2], Sqrt[MT^2]])/
+           (4*(MH^2 - U)) + (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[
+                 -(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/(4*(MH^2 - U)) + 
+          (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+          (MT^2*Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/(2*MT^2)]^2)/
+           (4*(MH^2 - U)))*
+         (-((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+             (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+           (2*Sqrt[2]) + (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                 (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+           (2*Sqrt[2]) - Sqrt[2]*Sech[\[Eta]4]*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4])) + 
+        (kT3*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - U)) + 
+           DiscB[U, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - U)))*
+          (Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+          (-(kT3*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]3] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]3])*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[
+                \[Eta]4 + I*\[Phi]4]))/2 + kT3*Sech[\[Eta]4]*
+            (Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]) - (kT3*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+             (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2))/
+         Sqrt[2]) - 4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - U) - 
+        DiscB[U, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - U))*
+       ((Sech[\[Eta]4]*(((-MH^2 + U)*((-I)*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+           Sqrt[2]*kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+            ((Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 - 
+             kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])))*
+          (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+        Sqrt[2]*Sech[\[Eta]4]*(MH^2 - U + kT3^2*(Cos[\[Phi]3] - 
+            I*Sin[\[Phi]3])*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))*
+         (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+          I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Cosh[\[Eta]4 + I*\[Phi]4] + 
+          Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Sinh[\[Eta]4 + I*\[Phi]4]) - 
+        ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+          (((-MH^2 + U)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2 + Sqrt[2]*kT3*(Cos[\[Phi]3] - 
+             I*Sin[\[Phi]3])*((Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+             (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                  I*\[Phi]4]))/Sqrt[2])))/Sqrt[2]) - 
+      (4*(2 + Eps^(-1) + DiscB[U, Sqrt[MT^2], Sqrt[MT^2]] + Log[Mu^2/MT^2])*
+         (2*Sech[\[Eta]4]*(-(kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])]]*(Cos[\[Phi]4] + I*Sin[\[Phi]4]))/
+             (2*Sqrt[2]) + (kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*
+                (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]4] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]))/
+             Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+            Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+            ((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + 
+             Sqrt[2]*kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+          Sech[\[Eta]4]*((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + 
+            Sqrt[2]*kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))*(kT3*Cos[\[Phi]3] + 
+            kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(Sqrt[S]*Sech[\[Eta]4]*
+              (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])) + ((-MH^2 + S34 + 2*T14 + T24)*Sech[
+                \[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + 
+                  I*\[Phi]4]))/2 - (kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*(
+                -(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) + (kT3*Sech[\[Eta]4]*
+                  (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                 Sqrt[2]))/Sqrt[2]))/Sqrt[2] + 2*Sqrt[S]*
+           Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+           (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+            (kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/Sqrt[2]) - 
+          2*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+            I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+            (kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/Sqrt[2])) - 
+        16*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - U)) - 
+          (U*DiscB[U, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - U)) + 
+          (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*
+                MT^2)]^2)/(4*(MH^2 - U)) + (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+          (MT^2*Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/(2*MT^2)]^2)/
+           (4*(MH^2 - U)))*(2*Sech[\[Eta]4]*
+           (-(kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(
+                Cos[\[Phi]4] + I*Sin[\[Phi]4]))/(2*Sqrt[2]) + 
+            (kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]4] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]4]))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+            Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+            ((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + 
+             Sqrt[2]*kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+          Sech[\[Eta]4]*((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + 
+            Sqrt[2]*kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))*(kT3*Cos[\[Phi]3] + 
+            kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(Sqrt[S]*Sech[\[Eta]4]*
+              (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])) + ((-MH^2 + S34 + 2*T14 + T24)*Sech[
+                \[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + 
+                  I*\[Phi]4]))/2 - (kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*(
+                -(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) + (kT3*Sech[\[Eta]4]*
+                  (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                 Sqrt[2]))/Sqrt[2]))/Sqrt[2] + 2*Sqrt[S]*
+           Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+           (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+            (kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/Sqrt[2]) - 
+          2*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+            I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+            (kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/Sqrt[2])) - 4*Sqrt[2]*kT3*(-1/(2*(MH^2 - U)) - 
+          (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - U)^2) + 
+          (MH^2*DiscB[U, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - U)^2) - 
+          (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*
+                MT^2)]^2)/(2*(MH^2 - U)^2) + 
+          (MT^2*Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/(2*MT^2)]^2)/
+           (2*(MH^2 - U)^2))*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+         ((Sqrt[S]*(-MH^2 + 2*T24 + U)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                    \[Phi]4])]]*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 - (-MH^2 + 2*T24 + U)*
+           Sech[\[Eta]4]*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+            I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*((Sqrt[S]*(-MH^2 - 2*S + 2*T - 2*T14 + 
+                U)*Sech[\[Eta]4])/(2*Sqrt[2]) - (Sqrt[S]*(-2*MH^2 + 4*T24 + 
+                2*U)*Sech[\[Eta]4])/(2*Sqrt[2]) + (kT3*(-MH^2 + 4*S + U)*Sech[
+                \[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                  I*\[Phi]4]))/Sqrt[2]))/Sqrt[2] + 
+          8*(-(kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(
+                Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(Sqrt[S]*Sech[\[Eta]4])/
+                 (2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+                   Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/
+             (2*Sqrt[2]) - (kT3*kT4*Sqrt[S]*Conjugate[1/Sqrt[
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*(Cos[\[Phi]4] + I*
+                Sin[\[Phi]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/4 - ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*
+                (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*((kT3*Sqrt[S]*
+                 Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                       (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                      (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                       (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+                  Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3]))/(2*Sqrt[2]) + (kT3^2*Sech[\[Eta]4]*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                    I*\[Phi]4]))/Sqrt[2] - (kT3*kT4*Sech[\[Eta]4]*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                    I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2])) - 
+        4*Sqrt[2]*kT3*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - U)) + 
+          DiscB[U, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - U)))*
+         (Cos[\[Phi]3] - I*Sin[\[Phi]3])*((Sqrt[S]*(MH^2 - 2*S34 - U)*
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+          (MH^2 - 2*S34 - U)*Sech[\[Eta]4]*(kT3*Cos[\[Phi]3] + 
+            kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*((Sqrt[S]*(3*MH^2 - 4*T - U)*Sech[
+                \[Eta]4])/(2*Sqrt[2]) - (Sqrt[S]*(-2*MH^2 + 4*S34 + 2*U)*Sech[
+                \[Eta]4])/(2*Sqrt[2]) - (kT3*(MH^2 + 2*S - 2*T - 2*T14 + 
+                U)*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                  I*\[Phi]4]))/Sqrt[2]))/Sqrt[2] + 
+          8*(-(kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(
+                Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(Sqrt[S]*Sech[\[Eta]4])/
+                 (2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+                   Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/
+             (2*Sqrt[2]) - (kT3*kT4*Sqrt[S]*Conjugate[1/Sqrt[
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*(Cos[\[Phi]4] + I*
+                Sin[\[Phi]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/4 - ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*
+                (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*((kT3*Sqrt[S]*
+                 Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                       (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                      (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                       (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+                  Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3]))/(2*Sqrt[2]) + (kT3^2*Sech[\[Eta]4]*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                    I*\[Phi]4]))/Sqrt[2] - (kT3*kT4*Sech[\[Eta]4]*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                    I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2])) - 
+        4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - U) - 
+          DiscB[U, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - U))*
+         (((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(kT4*Sqrt[S]*(MH^2 - U)*Sech[\[Eta]4]*
+              (Cos[\[Phi]4] - I*Sin[\[Phi]4]) + ((MH^2 - S34 - 2*T14 - T24)*(
+                MH^2 - U)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                Sinh[\[Eta]4 + I*\[Phi]4]))/2 - (kT3*(Cos[\[Phi]3] - 
+                I*Sin[\[Phi]3])*(-((Sqrt[S]*(MH^2 - 2*S34 + 2*T24 - U)*
+                   Sech[\[Eta]4])/Sqrt[2]) + (Sqrt[S]*(-5*MH^2 - 2*S + 6*T - 
+                   2*T14 + 3*U)*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+                (kT3*(MH^2 + 6*S - 2*T - 2*T14 + U)*Sech[\[Eta]4]*
+                  (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                 Sqrt[2]))/Sqrt[2]))/Sqrt[2] - 
+          2*((MH^2 - U)*Sech[\[Eta]4]*(-(kT4*Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]4] + 
+                  I*Sin[\[Phi]4]))/(2*Sqrt[2]) + (kT4*(kT3*Cos[\[Phi]3] + 
+                 kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4]))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+              Sinh[\[Eta]4 + I*\[Phi]4]) + (Sqrt[S]*Conjugate[1/
+                Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+              ((kT3*(-MH^2 + 2*S34 - 2*T24 + U)*(Cos[\[Phi]3] - 
+                  I*Sin[\[Phi]3]))/Sqrt[2] + Sqrt[2]*kT4*(-MH^2 + U)*
+                (Cos[\[Phi]4] - I*Sin[\[Phi]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+               Sinh[\[Eta]4 + I*\[Phi]4]))/4 - 
+            ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))*((Sech[\[Eta]4]*((kT3*(-MH^2 + 2*S34 - 
+                     2*T24 + U)*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + 
+                  Sqrt[2]*kT4*(-MH^2 + U)*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))*
+                 (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                  I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                  Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] + 
+               Sqrt[2]*(MH^2 - U)*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                     (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                  (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+                (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*
+                   (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                  Sqrt[2])))/Sqrt[2] + Sqrt[S]*(MH^2 - U)*
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+             (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*
+                (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[
+                2]) - 4*Sqrt[2]*kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+             (-(kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 (Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(Sqrt[S]*Sech[\[Eta]4])/
+                   (2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+                     Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/(2*
+                Sqrt[2]) - (kT3*kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                     4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                       2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                      Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                      Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                        \[Phi]4])]]*Sech[\[Eta]4]*(Cos[\[Phi]4] + 
+                 I*Sin[\[Phi]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                   I*\[Phi]4]))/4 - ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                ((kT3*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                      (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]3]))/(2*Sqrt[2]) + (kT3^2*Sech[\[Eta]4]*
+                   (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - 
+                      I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2] - (kT3*kT4*
+                   Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                         (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                         Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                      I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2]))) - 
+        2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+           (2*(MH^2 - U)) - Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/
+              (2*MT^2)]^2/(2*(MH^2 - U)))*
+         (((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(((MH^2 - S34 - 2*T14 - T24)*(MH^2 - 
+                U)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 2*((kT4*Sqrt[S]*(MH^2 - U)*
+                 Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/2 + 
+               (kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*((Sqrt[S]*T24*
+                    Sech[\[Eta]4])/Sqrt[2] + (Sqrt[S]*(MH^2 + S - T + T14 - 
+                     U)*Sech[\[Eta]4])/(2*Sqrt[2]) - Sqrt[2]*kT3*S*
+                   Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                      I*\[Phi]4])))/Sqrt[2])))/Sqrt[2] - 
+          4*(((MH^2 - U)*Sech[\[Eta]4]*(-(kT4*Sqrt[S]*Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  (Cos[\[Phi]4] + I*Sin[\[Phi]4]))/(2*Sqrt[2]) + 
+               (kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4]))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[
+                \[Eta]4 + I*\[Phi]4]))/2 - (Sqrt[S]*Conjugate[1/
+                Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+              ((kT3*T24*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + 
+               (kT4*(MH^2 - U)*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/Sqrt[2])*
+              (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/4 - 
+            ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))*(-((Sech[\[Eta]4]*((kT3*T24*
+                     (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + 
+                   (kT4*(MH^2 - U)*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/Sqrt[2])*
+                  (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                       kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                        Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                   Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/
+                 Sqrt[2]) + ((MH^2 - U)*((-I)*Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+                 (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*
+                    (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                   Sqrt[2]))/Sqrt[2]))/Sqrt[2] + (Sqrt[S]*(MH^2 - U)*
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+              (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*
+                 (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                Sqrt[2]))/2 - Sqrt[2]*kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+             (-(kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 (Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(Sqrt[S]*Sech[\[Eta]4])/
+                   (2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+                     Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/(2*
+                Sqrt[2]) - (kT3*kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                     4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                       2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                      Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                      Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                        \[Phi]4])]]*Sech[\[Eta]4]*(Cos[\[Phi]4] + 
+                 I*Sin[\[Phi]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                   I*\[Phi]4]))/4 - ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                ((kT3*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                      (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]3]))/(2*Sqrt[2]) + (kT3^2*Sech[\[Eta]4]*
+                   (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - 
+                      I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2] - (kT3*kT4*
+                   Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                         (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                         Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                      I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2]))))/
+       (MH^2 - S - T - T14) - 
+      (4*(2 + Eps^(-1) + DiscB[U, Sqrt[MT^2], Sqrt[MT^2]] + Log[Mu^2/MT^2])*
+         ((Sqrt[S]*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+            ((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + 
+             Sqrt[2]*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*
+                (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))))/2 + 
+          Sqrt[2]*Sqrt[S]*Sech[\[Eta]4]*
+           (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+            kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                     Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])) - 
+          (Sech[\[Eta]4]*(((-S + S34 - T + T24)*((-I)*Conjugate[
+                  (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+             Sqrt[2]*kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]]*(Cos[\[Phi]4] - I*Sin[\[Phi]4]) - 
+             (kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*(-(Sqrt[S]*Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                 2 - kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                      (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                       (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+                  Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+          (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*(2*Sech[\[Eta]4]*
+              (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                2 + kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+                 Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[
+                \[Eta]4 + I*\[Phi]4]) - Sqrt[2]*Sech[\[Eta]4]*
+              ((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + Sqrt[2]*
+                (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))*
+              (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4])))/Sqrt[2] + 2*Sqrt[2]*
+           ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*((Sqrt[S]*Sech[\[Eta]4]*
+              (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])))/4 + (kT3*kT4*Sech[\[Eta]4]*
+              (Cos[\[Phi]4] + I*Sin[\[Phi]4])*(Sinh[\[Eta]3] - Sinh[
+                \[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2)) - 
+        16*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - U)) - 
+          (U*DiscB[U, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - U)) + 
+          (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*
+                MT^2)]^2)/(4*(MH^2 - U)) + (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+          (MT^2*Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/(2*MT^2)]^2)/
+           (4*(MH^2 - U)))*
+         ((Sqrt[S]*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+            ((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + 
+             Sqrt[2]*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*
+                (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))))/2 + 
+          Sqrt[2]*Sqrt[S]*Sech[\[Eta]4]*
+           (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+            kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                     Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])) - 
+          (Sech[\[Eta]4]*(((-S + S34 - T + T24)*((-I)*Conjugate[
+                  (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+             Sqrt[2]*kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]]*(Cos[\[Phi]4] - I*Sin[\[Phi]4]) - 
+             (kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*(-(Sqrt[S]*Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                 2 - kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                      (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                       (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+                  Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+          (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*(2*Sech[\[Eta]4]*
+              (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                2 + kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+                 Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[
+                \[Eta]4 + I*\[Phi]4]) - Sqrt[2]*Sech[\[Eta]4]*
+              ((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + Sqrt[2]*
+                (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))*
+              (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4])))/Sqrt[2] + 2*Sqrt[2]*
+           ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*((Sqrt[S]*Sech[\[Eta]4]*
+              (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])))/4 + (kT3*kT4*Sech[\[Eta]4]*
+              (Cos[\[Phi]4] + I*Sin[\[Phi]4])*(Sinh[\[Eta]3] - Sinh[
+                \[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2)) - 
+        4*Sqrt[2]*kT3*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - U)) + 
+          DiscB[U, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - U)))*
+         (Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+         (-(Sqrt[S]*(-3*MH^2 + 2*S34 + 2*T + U)*(I*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4])/2 + 
+          (Sech[\[Eta]4]*(-(Sqrt[S]*(-3*MH^2 + 4*S34 + U)*Conjugate[
+                 1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                       \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                       2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 - 
+             2*kT3*(S - S34 + T - T24)*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]3] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]3]) - kT4*(-3*MH^2 + 4*T + U)*
+              (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]4] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]))*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+          kT4*(-3*MH^2 + 2*S34 + 2*T + U)*Sech[\[Eta]4]*(Cos[\[Phi]4] + 
+            I*Sin[\[Phi]4])*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                   Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                  kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                   Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                 (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          8*(-(kT3*Sqrt[S]*Sech[\[Eta]4]*(kT3*Cos[\[Phi]3] + 
+                kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*(
+                Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                       Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                  (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+                Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                       Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                       Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                        \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 Sinh[\[Eta]3]))/4 - (kT3*Sqrt[S]*Sech[\[Eta]4]*
+              (Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(Sqrt[S]*Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + kT4*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4])))/4 + (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+              (-((kT3^2*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                        (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                       (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                        (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                         4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                    Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                        (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                       (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                        (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                         4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                    Sin[\[Phi]3] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+                  (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                 Sqrt[2]) + (kT3*Sech[\[Eta]4]*(-(Sqrt[S]*Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]])/2 + kT4*(Conjugate[
+                      (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4]))*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                    I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2])) - 
+        4*Sqrt[2]*kT3*(-1/(2*(MH^2 - U)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+             Sqrt[MT^2]])/(2*(MH^2 - U)^2) + 
+          (MH^2*DiscB[U, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - U)^2) - 
+          (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*
+                MT^2)]^2)/(2*(MH^2 - U)^2) + 
+          (MT^2*Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/(2*MT^2)]^2)/
+           (2*(MH^2 - U)^2))*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+         ((Sqrt[S]*(-MH^2 + 2*S + 2*T24 + U)*
+            (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4])/2 - 
+          (Sech[\[Eta]4]*(Sqrt[S]*(S34 - T)*Conjugate[1/Sqrt[
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]] - (Sqrt[S]*(-MH^2 + 2*S + 
+                2*T24 + U)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+             2*kT3*S*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]) - 
+             2*kT3*T24*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                        \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]) + 
+             kT4*MH^2*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]4] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]) - 
+             2*kT4*S*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]4] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]) - 
+             2*kT4*T24*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                        \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]4] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]) - 
+             kT4*U*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]4] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]))*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+          kT4*(-MH^2 + 2*S + 2*T24 + U)*Sech[\[Eta]4]*(Cos[\[Phi]4] + 
+            I*Sin[\[Phi]4])*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                   Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                  kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                   Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                 (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          8*(-(kT3*Sqrt[S]*Sech[\[Eta]4]*(kT3*Cos[\[Phi]3] + 
+                kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*(
+                Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                       Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                  (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+                Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                       Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                       Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                        \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 Sinh[\[Eta]3]))/4 - (kT3*Sqrt[S]*Sech[\[Eta]4]*
+              (Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(Sqrt[S]*Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + kT4*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4])))/4 + (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+              (-((kT3^2*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                        (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                       (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                        (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                         4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                    Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                        (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                       (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                        (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                         4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                    Sin[\[Phi]3] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+                  (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                 Sqrt[2]) + (kT3*Sech[\[Eta]4]*(-(Sqrt[S]*Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]])/2 + kT4*(Conjugate[
+                      (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4]))*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                    I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2])) - 
+        2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+           (2*(MH^2 - U)) - Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/
+              (2*MT^2)]^2/(2*(MH^2 - U)))*
+         (-(Sech[\[Eta]4]*(((S - S34 + T - T24)*(MH^2 - U)*
+                ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+              2*(-((kT4*Sqrt[S]*(MH^2 - U)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                        4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                         Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                         Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]4] - 
+                    I*Sin[\[Phi]4]))/Sqrt[2]) + (kT3*(Cos[\[Phi]3] - 
+                   I*Sin[\[Phi]3])*(-(Sqrt[S]*(S + T24)*Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]) + (Sqrt[S]*(S + S34 - T + T24)*
+                     Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]])/2 + 2*kT3*S*(Conjugate[
+                       (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]3])))/Sqrt[2]))*
+             (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+          4*(-(Sqrt[S]*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                    (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(
+                (kT3*(S + T24)*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + 
+                (kT4*(MH^2 - U)*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/Sqrt[2]))/
+             4 + (Sqrt[S]*(MH^2 - U)*Sech[\[Eta]4]*
+              (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                2 + kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+                 Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4])))/(2*Sqrt[2]) + 
+            (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*(((MH^2 - U)*Sech[\[Eta]4]*
+                 (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]])/2 + kT4*(Conjugate[
+                      (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                  Sinh[\[Eta]4 + I*\[Phi]4]))/2 + (Sech[\[Eta]4]*
+                 ((kT3*(S + T24)*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + 
+                  (kT4*(MH^2 - U)*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/Sqrt[2])*
+                 (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                  I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                  Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]))/
+             Sqrt[2] + ((MH^2 - U)*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*((Sqrt[S]*Sech[\[Eta]4]*
+                 (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])))/4 + (kT3*kT4*Sech[\[Eta]4]*
+                 (Cos[\[Phi]4] + I*Sin[\[Phi]4])*(Sinh[\[Eta]3] - 
+                  Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2))/Sqrt[2] - 
+            Sqrt[2]*kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+             (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(kT3*Cos[\[Phi]3] + 
+                  kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3]))/4 - (kT3*Sqrt[S]*Sech[\[Eta]4]*
+                (Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(Sqrt[S]*Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                  2 + kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                       (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                        (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                         4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                    Cos[\[Phi]4] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                        (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                       (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                        (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                         4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                    Sin[\[Phi]4] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])))/4 + 
+              (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*(-((kT3^2*Sech[\[Eta]4]*
+                    (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]3])*(Sinh[\[Eta]3] - 
+                     Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]) + 
+                 (kT3*Sech[\[Eta]4]*(-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+                    kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                          (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[
+                          kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                         Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                       Cos[\[Phi]4] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                          (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                         Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                       Sin[\[Phi]4] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]))*
+                   (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                  Sqrt[2]))/Sqrt[2]))) - 
+        4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - U) - 
+          DiscB[U, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - U))*
+         (-(Sech[\[Eta]4]*(((S - S34 + T - T24)*(MH^2 - U)*
+                ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] - 
+              Sqrt[2]*kT4*Sqrt[S]*(MH^2 - U)*Conjugate[
+                1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                     Cos[\[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]4] - 
+                I*Sin[\[Phi]4]) + (kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                (-(Sqrt[S]*(7*MH^2 - 8*S34 - 2*T14 - 3*U)*Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                  2 - 4*kT3*(-2*MH^2 + 2*S34 + T14 + 2*T24 + U)*
+                  (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]3]) - kT4*(7*MH^2 - 8*T - 2*T14 - 3*U)*
+                  (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]4])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+          2*(-(Sqrt[S]*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                    (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(
+                (kT3*(-5*MH^2 + 4*S34 + 4*T + 2*T14 + U)*(Cos[\[Phi]3] - 
+                   I*Sin[\[Phi]3]))/Sqrt[2] + Sqrt[2]*(MH^2 - U)*
+                 (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))))/4 - 
+            (Sqrt[S]*(MH^2 - U)*Sech[\[Eta]4]*(-(Sqrt[S]*Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + kT4*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4])))/Sqrt[2] + (kT4*(Cos[\[Phi]4] + I*
+                Sin[\[Phi]4])*(-((MH^2 - U)*Sech[\[Eta]4]*
+                 (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]])/2 + kT4*(Conjugate[
+                      (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                  Sinh[\[Eta]4 + I*\[Phi]4])) + (Sech[\[Eta]4]*
+                 ((kT3*(-5*MH^2 + 4*S34 + 4*T + 2*T14 + U)*(Cos[\[Phi]3] - 
+                     I*Sin[\[Phi]3]))/Sqrt[2] + Sqrt[2]*(MH^2 - U)*
+                   (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                    I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))*
+                 (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                  I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                  Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]))/
+             Sqrt[2] - Sqrt[2]*(MH^2 - U)*((-I)*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*((Sqrt[S]*Sech[\[Eta]4]*
+                (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])))/4 + (kT3*kT4*Sech[\[Eta]4]*
+                (Cos[\[Phi]4] + I*Sin[\[Phi]4])*(Sinh[\[Eta]3] - 
+                 Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2) + 
+            4*Sqrt[2]*kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+             (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(kT3*Cos[\[Phi]3] + 
+                  kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3]))/4 - (kT3*Sqrt[S]*Sech[\[Eta]4]*
+                (Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(Sqrt[S]*Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                  2 + kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                       (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                        (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                         4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                    Cos[\[Phi]4] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                        (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                       (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                        (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                         4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                    Sin[\[Phi]4] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])))/4 + 
+              (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*(-((kT3^2*Sech[\[Eta]4]*
+                    (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]3])*(Sinh[\[Eta]3] - 
+                     Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]) + 
+                 (kT3*Sech[\[Eta]4]*(-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+                    kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                          (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[
+                          kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                         Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                       Cos[\[Phi]4] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                          (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                         Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                       Sin[\[Phi]4] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]))*
+                   (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                  Sqrt[2]))/Sqrt[2]))))/T14)/U + 
+    (((2*(2 + Eps^(-1) + DiscB[T24, Sqrt[MT^2], Sqrt[MT^2]] + 
+            Log[Mu^2/MT^2]) - 8*(3/4 + (MH^2*(S + T + T14 - T24)*
+              DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(4*Kallen\[Lambda][MH^
+                2, MH^2 - S - T - T14, T24]) - ((MH^2 - S - T - T14)*
+              (S + T + T14 + T24)*DiscB[MH^2 - S - T - T14, Sqrt[MT^2], Sqrt[
+                MT^2]])/(4*Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24]) - 
+            ((2*MH^2 - S - T - T14 - T24)*T24*DiscB[T24, Sqrt[MT^2], Sqrt[
+                MT^2]])/(4*Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24]) + 
+            (Eps^(-1) + Log[Mu^2/MT^2])/4 + ((MT^2*S^2 + 2*MT^2*S*T + MT^2*
+                T^2 + 2*MT^2*S*T14 + 2*MT^2*T*T14 + MT^2*T14^2 + MH^4*T24 - 4*
+                MH^2*MT^2*T24 - MH^2*S*T24 + 2*MT^2*S*T24 - MH^2*T*T24 + 2*
+                MT^2*T*T24 - MH^2*T14*T24 + 2*MT^2*T14*T24 + MT^2*T24^2)*
+              ScalarC0[MH^2, MH^2 - S - T - T14, T24, Sqrt[MT^2], Sqrt[MT^2], 
+               Sqrt[MT^2]])/(2*Kallen\[Lambda][MH^2, MH^2 - S - T - T14, 
+               T24])))*(-2*Sech[\[Eta]4]*
+           (-(kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(
+                Cos[\[Phi]4] + I*Sin[\[Phi]4]))/(2*Sqrt[2]) - 
+            ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))*((Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 - kT4*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+            Sinh[\[Eta]4 + I*\[Phi]4]) - 4*Sqrt[S]*Conjugate[
+            1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                 Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                 Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                   \[Phi]4])]]*(-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+            (kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+              (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (2*Sqrt[2])) - 4*Sqrt[2]*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+            I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           ((Sqrt[S]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                       \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4])/4 + 
+            (kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+              (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]))/2) + 
+          ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(((2*S - S34 - 2*T14 + U)*Sech[\[Eta]4]*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+             4*((Sqrt[S]*Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - 
+                  kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                      \[Phi]4])))/4 + (kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                 (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) + (kT3*Sech[\[Eta]4]*
+                    (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                   Sqrt[2]))/Sqrt[2])))/Sqrt[2]) - 
+        4*((((6*MH^4*S - 10*MH^2*S^2 + 3*S^3 + 6*MH^4*T - 20*MH^2*S*T + 9*S^2*
+                T - 10*MH^2*T^2 + 9*S*T^2 + 3*T^3 + 6*MH^4*T14 - 20*MH^2*S*
+                T14 + 9*S^2*T14 - 20*MH^2*T*T14 + 18*S*T*T14 + 9*T^2*T14 - 10*
+                MH^2*T14^2 + 9*S*T14^2 + 9*T*T14^2 + 3*T14^3 + 10*MH^4*T24 - 
+               14*MH^2*S*T24 + 7*S^2*T24 - 14*MH^2*T*T24 + 14*S*T*T24 + 7*T^2*
+                T24 - 14*MH^2*T14*T24 + 14*S*T14*T24 + 14*T*T14*T24 + 7*T14^2*
+                T24 - 8*MH^2*T24^2 + 5*S*T24^2 + 5*T*T24^2 + 5*T14*T24^2 + 
+               T24^3)*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+             (2*Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24]^2) - 
+            (3*(MH^2 - S - T - T14)^2*(S + T + T14 + T24)*DiscB[MH^2 - S - 
+                T - T14, Sqrt[MT^2], Sqrt[MT^2]])/Kallen\[Lambda][MH^2, 
+               MH^2 - S - T - T14, T24]^2 - ((2*MH^2*S^2 - 3*S^3 + 4*MH^2*S*
+                T - 9*S^2*T + 2*MH^2*T^2 - 9*S*T^2 - 3*T^3 + 4*MH^2*S*T14 - 9*
+                S^2*T14 + 4*MH^2*T*T14 - 18*S*T*T14 - 9*T^2*T14 + 2*MH^2*
+                T14^2 - 9*S*T14^2 - 9*T*T14^2 - 3*T14^3 + 4*MH^4*T24 - 2*MH^2*
+                S*T24 + S^2*T24 - 2*MH^2*T*T24 + 2*S*T*T24 + T^2*T24 - 2*MH^2*
+                T14*T24 + 2*S*T14*T24 + 2*T*T14*T24 + T14^2*T24 - 8*MH^2*
+                T24^2 + 5*S*T24^2 + 5*T*T24^2 + 5*T14*T24^2 + T24^3)*
+              DiscB[T24, Sqrt[MT^2], Sqrt[MT^2]])/(2*Kallen\[Lambda][MH^2, 
+                MH^2 - S - T - T14, T24]^2) + (MH^2 - S - T - T14)/
+             Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24] + 
+            ((MH^2 - S - T - T14)*(MH^2*S^2 + 2*MT^2*S^2 - S^3 + 2*MH^2*S*
+                T + 4*MT^2*S*T - 3*S^2*T + MH^2*T^2 + 2*MT^2*T^2 - 3*S*T^2 - 
+               T^3 + 2*MH^2*S*T14 + 4*MT^2*S*T14 - 3*S^2*T14 + 2*MH^2*T*T14 + 
+               4*MT^2*T*T14 - 6*S*T*T14 - 3*T^2*T14 + MH^2*T14^2 + 2*MT^2*
+                T14^2 - 3*S*T14^2 - 3*T*T14^2 - T14^3 + 2*MH^4*T24 - 8*MH^2*
+                MT^2*T24 + 4*MT^2*S*T24 - 2*S^2*T24 + 4*MT^2*T*T24 - 4*S*T*
+                T24 - 2*T^2*T24 + 4*MT^2*T14*T24 - 4*S*T14*T24 - 4*T*T14*
+                T24 - 2*T14^2*T24 + MH^2*T24^2 + 2*MT^2*T24^2 - S*T24^2 - T*
+                T24^2 - T14*T24^2)*ScalarC0[MH^2, MH^2 - S - T - T14, T24, 
+               Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]])/Kallen\[Lambda][MH^2, 
+               MH^2 - S - T - T14, T24]^2)*
+           (-((S34 - U)*(-2*MH^2 + S34 + 2*T + U)*(I*Conjugate[
+                  (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (2*Sqrt[2]) - 2*(S34 - U)*Sech[\[Eta]4]*
+             (-(kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 (Cos[\[Phi]3] + I*Sin[\[Phi]3]))/(2*Sqrt[2]) + 
+              (kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+              Sinh[\[Eta]4 + I*\[Phi]4]) - 2*Sqrt[2]*(2*MH^2 - S34 - 2*T - U)*
+             (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+             ((kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/4 + 
+              (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+               2) + 16*(-(kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                      4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                        2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                       Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                       Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                        \[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]3] + 
+                  I*Sin[\[Phi]3]))/(2*Sqrt[2]) + (kT3*(kT3*Cos[\[Phi]3] + 
+                 kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2])*((kT3*Sqrt[S]*Sech[\[Eta]4]*
+                (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/4 + (kT3*kT4*Sech[\[Eta]4]*
+                (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-Sinh[\[Eta]3] + 
+                 Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2)) + 
+          (-(MH^2*(6*MH^2*S - 5*S^2 + 6*MH^2*T - 10*S*T - 5*T^2 + 
+                6*MH^2*T14 - 10*S*T14 - 10*T*T14 - 5*T14^2 + 2*MH^2*T24 - 
+                4*S*T24 - 4*T*T24 - 4*T14*T24 + T24^2)*DiscB[MH^2, 
+                Sqrt[MT^2], Sqrt[MT^2]])/(2*Kallen\[Lambda][MH^2, 
+                MH^2 - S - T - T14, T24]^2) + ((6*MH^4*S - 7*MH^2*S^2 + S^
+                3 + 6*MH^4*T - 14*MH^2*S*T + 3*S^2*T - 7*MH^2*T^2 + 3*S*T^2 + 
+               T^3 + 6*MH^4*T14 - 14*MH^2*S*T14 + 3*S^2*T14 - 14*MH^2*T*T14 + 
+               6*S*T*T14 + 3*T^2*T14 - 7*MH^2*T14^2 + 3*S*T14^2 + 3*T*T14^2 + 
+               T14^3 - 2*MH^4*T24 + 2*S^2*T24 + 4*S*T*T24 + 2*T^2*T24 + 4*S*
+                T14*T24 + 4*T*T14*T24 + 2*T14^2*T24 - MH^2*T24^2 + S*T24^2 + 
+               T*T24^2 + T14*T24^2)*DiscB[MH^2 - S - T - T14, Sqrt[MT^2], 
+               Sqrt[MT^2]])/(2*Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24]^
+               2) + ((2*MH^2*S^2 - S^3 + 4*MH^2*S*T - 3*S^2*T + 2*MH^2*T^2 - 
+               3*S*T^2 - T^3 + 4*MH^2*S*T14 - 3*S^2*T14 + 4*MH^2*T*T14 - 6*S*
+                T*T14 - 3*T^2*T14 + 2*MH^2*T14^2 - 3*S*T14^2 - 3*T*T14^2 - 
+               T14^3 + 4*MH^4*T24 - 4*MH^2*S*T24 - 2*S^2*T24 - 4*MH^2*T*T24 - 
+               4*S*T*T24 - 2*T^2*T24 - 4*MH^2*T14*T24 - 4*S*T14*T24 - 4*T*T14*
+                T24 - 2*T14^2*T24 + 2*MH^2*T24^2 - S*T24^2 - T*T24^2 - T14*
+                T24^2)*DiscB[T24, Sqrt[MT^2], Sqrt[MT^2]])/
+             (2*Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24]^2) - 
+            (2*MH^2 - S - T - T14 - T24)/(2*Kallen\[Lambda][MH^2, MH^2 - S - 
+                T - T14, T24]) - ((MH^4*S^2 + 2*MH^2*MT^2*S^2 - MH^2*S^3 - 
+               MT^2*S^3 + 2*MH^4*S*T + 4*MH^2*MT^2*S*T - 3*MH^2*S^2*T - 3*
+                MT^2*S^2*T + MH^4*T^2 + 2*MH^2*MT^2*T^2 - 3*MH^2*S*T^2 - 3*
+                MT^2*S*T^2 - MH^2*T^3 - MT^2*T^3 + 2*MH^4*S*T14 + 4*MH^2*MT^2*
+                S*T14 - 3*MH^2*S^2*T14 - 3*MT^2*S^2*T14 + 2*MH^4*T*T14 + 4*
+                MH^2*MT^2*T*T14 - 6*MH^2*S*T*T14 - 6*MT^2*S*T*T14 - 3*MH^2*
+                T^2*T14 - 3*MT^2*T^2*T14 + MH^4*T14^2 + 2*MH^2*MT^2*T14^2 - 3*
+                MH^2*S*T14^2 - 3*MT^2*S*T14^2 - 3*MH^2*T*T14^2 - 3*MT^2*T*
+                T14^2 - MH^2*T14^3 - MT^2*T14^3 + 2*MH^6*T24 - 8*MH^4*MT^2*
+                T24 - 3*MH^4*S*T24 + 8*MH^2*MT^2*S*T24 + MH^2*S^2*T24 - 3*
+                MT^2*S^2*T24 - 3*MH^4*T*T24 + 8*MH^2*MT^2*T*T24 + 2*MH^2*S*T*
+                T24 - 6*MT^2*S*T*T24 + MH^2*T^2*T24 - 3*MT^2*T^2*T24 - 3*MH^4*
+                T14*T24 + 8*MH^2*MT^2*T14*T24 + 2*MH^2*S*T14*T24 - 6*MT^2*S*
+                T14*T24 + 2*MH^2*T*T14*T24 - 6*MT^2*T*T14*T24 + MH^2*T14^2*
+                T24 - 3*MT^2*T14^2*T24 - 2*MH^4*T24^2 + 6*MH^2*MT^2*T24^2 + 2*
+                MH^2*S*T24^2 - 3*MT^2*S*T24^2 + 2*MH^2*T*T24^2 - 3*MT^2*T*
+                T24^2 + 2*MH^2*T14*T24^2 - 3*MT^2*T14*T24^2 - MT^2*T24^3)*
+              ScalarC0[MH^2, MH^2 - S - T - T14, T24, Sqrt[MT^2], Sqrt[MT^2], 
+               Sqrt[MT^2]])/Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24]^2)*
+           (-((S34 - U)*(-2*MH^2 + S34 + 2*T + U)*(I*Conjugate[
+                  (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (2*Sqrt[2]) - 2*(S34 - U)*Sech[\[Eta]4]*
+             (-(kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 (Cos[\[Phi]3] + I*Sin[\[Phi]3]))/(2*Sqrt[2]) + 
+              (kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+              Sinh[\[Eta]4 + I*\[Phi]4]) - 2*Sqrt[2]*(2*MH^2 - S34 - 2*T - U)*
+             (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+             ((kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/4 + 
+              (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+               2) + 16*((kT3*kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2] + (kT3*(Cos[\[Phi]3] + 
+                 I*Sin[\[Phi]3])*(-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+                 kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]3])))/Sqrt[2])*((kT3*Sqrt[S]*Sech[\[Eta]4]*
+                (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/4 + (kT3*kT4*Sech[\[Eta]4]*
+                (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-Sinh[\[Eta]3] + 
+                 Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2)) + 
+          ((-2*MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/Kallen\[Lambda][
+              MH^2, MH^2 - S - T - T14, T24] + ((2*MH^2 - S - T - T14 - T24)*
+              DiscB[MH^2 - S - T - T14, Sqrt[MT^2], Sqrt[MT^2]])/
+             Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24] + 
+            ((S + T + T14 + T24)*DiscB[T24, Sqrt[MT^2], Sqrt[MT^2]])/
+             Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24] - 
+            (MH^2*(S + T + T14 - T24)*ScalarC0[MH^2, MH^2 - S - T - T14, T24, 
+               Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]])/Kallen\[Lambda][MH^2, 
+              MH^2 - S - T - T14, T24])*(-(Sqrt[2]*S*(-MH^2 + S34 + T24 + U)*
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]) + 
+            Sqrt[2]*Sqrt[S]*(-MH^2 + S34 + T24 + U)*
+             ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+             (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                kT4*Sin[\[Phi]4])) + ((-S34^2 - 2*S34*T - S34*T24 + 2*T14*
+                T24 - 2*S*(2*S34 + T24) + MH^2*(2*S + 3*S34 - 2*T14 - 3*U) + 
+               2*T*U + 4*T14*U + T24*U + U^2)*(I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (2*Sqrt[2]) + 2*Sech[\[Eta]4]*(-(kT3*Sqrt[S]*(-S34 + U)*
+                 Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                       Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                       Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                        \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 (Cos[\[Phi]3] + I*Sin[\[Phi]3]))/(2*Sqrt[2]) + 
+              (kT4*MH^2*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                (Cos[\[Phi]4] + I*Sin[\[Phi]4]))/(2*Sqrt[2]) - 
+              (kT4*Sqrt[S]*T24*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                (Cos[\[Phi]4] + I*Sin[\[Phi]4]))/(2*Sqrt[2]) - 
+              (kT4*Sqrt[S]*U*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                (Cos[\[Phi]4] + I*Sin[\[Phi]4]))/Sqrt[2] + (MH^2*Sqrt[S]*
+                Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(kT3*Cos[\[Phi]3] + 
+                 kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/
+               (2*Sqrt[2]) - (Sqrt[S]*S34*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                     4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                       2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                      Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                      Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                        \[Phi]4])]]*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/Sqrt[2] - 
+              (Sqrt[S]*T24*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])))/(2*Sqrt[2]) - (kT3*S34*
+                (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4]))*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+                 Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2] + (kT3*U*(kT3*Cos[\[Phi]3] + 
+                 kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2] - (kT4*MH^2*(kT3*Cos[\[Phi]3] + 
+                 kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4]))/Sqrt[2] + (kT4*T24*(kT3*Cos[\[Phi]3] + 
+                 kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4]))/Sqrt[2] + Sqrt[2]*kT4*U*(kT3*Cos[\[Phi]3] + 
+                kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*(
+                Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                       Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                  (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+                Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                       Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                       Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                        \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 Sinh[\[Eta]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+              Sinh[\[Eta]4 + I*\[Phi]4]) - Sqrt[2]*kT4*Sqrt[S]*
+             (-MH^2 + S34 + T24 + U)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])]]*Sech[\[Eta]4]*(Cos[\[Phi]4] - 
+              I*Sin[\[Phi]4])*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + 
+                I*\[Phi]4]) + 2*Sqrt[2]*kT4*(-MH^2 + S34 + T24 + U)*
+             Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+             (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                kT4*Sin[\[Phi]4]))*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                 I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                 I*\[Phi]4]) - 2*Sqrt[2]*(MH^2 - S34 - T24 - U)*
+             (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+             (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/
+               4 + (kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                (-((Sqrt[S]*Sech[\[Eta]4])/Sqrt[2]) - (kT3*Sech[\[Eta]4]*
+                   (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                  Sqrt[2]))/Sqrt[2]))) - 
+        2*(ScalarC0[MH^2, MH^2 - S - T - T14, T24, Sqrt[MT^2], Sqrt[MT^2], 
+            Sqrt[MT^2]]*(-((S*(S34 + U)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])]]*Sech[\[Eta]4])/Sqrt[2]) + 
+            (Sqrt[S]*(S34 + U)*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])))/Sqrt[2] + ((-(S34*T) + S34*T14 + MH^2*
+                (S34 - U) + T*U + T14*U - S*(S34 + U))*
+              (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                       \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (2*Sqrt[2]) + 2*Sech[\[Eta]4]*(-(kT4*Sqrt[S]*S34*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]4] + 
+                  I*Sin[\[Phi]4]))/(2*Sqrt[2]) - ((kT3*Cos[\[Phi]3] + 
+                 kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                ((Sqrt[S]*U*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]])/2 - kT4*S34*(Conjugate[
+                     (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]4])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+              Sinh[\[Eta]4 + I*\[Phi]4]) - (kT4*Sqrt[S]*(S34 + U)*
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+              (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+               Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] + Sqrt[2]*kT4*(S34 + U)*
+             Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+             (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                kT4*Sin[\[Phi]4]))*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                 I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                 I*\[Phi]4]) + 8*((kT3*kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2] + (kT3*(Cos[\[Phi]3] + 
+                 I*Sin[\[Phi]3])*(-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+                 kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]3])))/Sqrt[2])*((kT3*Sqrt[S]*Sech[\[Eta]4]*
+                (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/4 + (kT3*kT4*Sech[\[Eta]4]*
+                (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-Sinh[\[Eta]3] + 
+                 Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2) + 
+            2*Sqrt[2]*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*((kT3*Sqrt[S]*(-MH^2 + T)*
+                Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/4 + 
+              (kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-(Sqrt[S]*(S34 + U)*
+                    Sech[\[Eta]4])/(2*Sqrt[2]) + (kT3*(-MH^2 + T)*
+                   Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                      I*\[Phi]4]))/Sqrt[2]))/Sqrt[2])) + 
+          (((2*MH^2 - S - T - T14 - T24)*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+             Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24] - 
+            (2*(MH^2 - S - T - T14)*DiscB[MH^2 - S - T - T14, Sqrt[MT^2], 
+               Sqrt[MT^2]])/Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24] - 
+            ((S + T + T14 - T24)*DiscB[T24, Sqrt[MT^2], Sqrt[MT^2]])/
+             Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24] + 
+            ((MH^2 - S - T - T14)*(S + T + T14 + T24)*ScalarC0[MH^2, MH^2 - 
+                S - T - T14, T24, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]])/
+             Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24])*
+           (-(Sqrt[2]*S*(S34 + U)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]]*Sech[\[Eta]4]) + Sqrt[2]*Sqrt[S]*(S34 + U)*
+             ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+             (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                kT4*Sin[\[Phi]4])) + ((-S34^2 - 4*S34*T + 2*S34*T14 + 4*MH^2*
+                (S34 - U) + 4*T*U + 2*T14*U + U^2 - 2*S*(S34 + U))*
+              (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                       \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (2*Sqrt[2]) + 2*Sech[\[Eta]4]*(-(kT3*Sqrt[S]*(-3*S34 + U)*
+                 Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                       Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                       Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                        \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 (Cos[\[Phi]3] + I*Sin[\[Phi]3]))/(2*Sqrt[2]) - 
+              ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4]))*(Sqrt[S]*(S34 + U)*Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                 kT3*(-3*S34 + U)*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                        (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                       (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                        (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                         4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                    Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                        (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                       (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                        (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                         4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                    Sin[\[Phi]3] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])))/Sqrt[2])*
+             (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]) - 
+            Sqrt[2]*kT4*Sqrt[S]*(S34 + U)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])]]*Sech[\[Eta]4]*(Cos[\[Phi]4] - 
+              I*Sin[\[Phi]4])*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + 
+                I*\[Phi]4]) + 2*Sqrt[2]*kT4*(S34 + U)*Sech[\[Eta]4]*
+             (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(kT3*Cos[\[Phi]3] + 
+              kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+             (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                 I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                 I*\[Phi]4]) + 32*((kT3*kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2] + (kT3*(Cos[\[Phi]3] + 
+                 I*Sin[\[Phi]3])*(-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+                 kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]3])))/Sqrt[2])*((kT3*Sqrt[S]*Sech[\[Eta]4]*
+                (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/4 + (kT3*kT4*Sech[\[Eta]4]*
+                (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-Sinh[\[Eta]3] + 
+                 Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2) + 
+            2*Sqrt[2]*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+             ((kT3*Sqrt[S]*(-4*MH^2 + S34 + 4*T + U)*Sech[\[Eta]4]*
+                (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/4 + (kT4*(Cos[\[Phi]4] - 
+                 I*Sin[\[Phi]4])*(-((Sqrt[S]*(S34 + U)*Sech[\[Eta]4])/
+                   Sqrt[2]) + (kT3*(-4*MH^2 + S34 + 4*T + U)*Sech[\[Eta]4]*
+                   (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                  Sqrt[2]))/Sqrt[2]))))/(MH^2 - S - T - T14) + 
+      ((4*(2 + Eps^(-1) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]] + 
+            Log[Mu^2/MT^2]) - 16*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[
+                MT^2]])/(4*(MH^2 - T)) - (T*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/
+             (4*(MH^2 - T)) + (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[
+                   -(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/(4*(MH^2 - T)) + 
+            (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+            (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+             (4*(MH^2 - T))))*
+         ((Sqrt[S]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                  Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+             Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+            ((kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2] - 
+             Sqrt[2]*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*
+                (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))))/2 - 
+          Sqrt[2]*Sqrt[S]*Sech[\[Eta]4]*
+           (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+            kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                     Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])) - 
+          (Sech[\[Eta]4]*(-(Sqrt[2]*kT4*Sqrt[S]*Conjugate[
+                1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                     Cos[\[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]4] + 
+                I*Sin[\[Phi]4])) - (kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*(
+                (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                 2 - kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                      (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                       (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+                  Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 - Sqrt[2]*kT4*Sech[\[Eta]4]*
+           (Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+           (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+            kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                     Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))*
+           (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+           ((kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2] - 
+            Sqrt[2]*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+              I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(((S - S34 - T14 + U)*Sech[\[Eta]4]*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+             4*((Sqrt[S]*Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - 
+                  kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                      \[Phi]4])))/4 + (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - 
+                  I*Sin[\[Phi]4])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                    I*\[Phi]4]))/2)))/Sqrt[2]) - 
+        2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+           (2*(MH^2 - T)) - Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/
+              (2*MT^2)]^2/(2*(MH^2 - T)))*
+         (-2*(-(Sqrt[S]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                    (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(
+                (kT3*(S + T14)*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2] + 
+                (kT4*(MH^2 - T)*(Cos[\[Phi]4] + I*Sin[\[Phi]4]))/Sqrt[2]))/
+             2 - (Sqrt[S]*(MH^2 - T)*Sech[\[Eta]4]*
+              (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                2 + kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+                 Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3])))/Sqrt[2] + (Sech[\[Eta]4]*
+              ((kT4*Sqrt[S]*(MH^2 - T)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                      4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                        2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                       Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                       Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                        \[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]4] + 
+                  I*Sin[\[Phi]4]))/Sqrt[2] + (kT3*(Cos[\[Phi]3] + 
+                  I*Sin[\[Phi]3])*(Sqrt[S]*(S + T14)*Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                  (Sqrt[S]*(S + S34 + T14 - U)*Conjugate[1/Sqrt[(kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+                  2*kT3*S*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                        (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                         (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                     Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                         (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                         Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]3])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+               Sinh[\[Eta]4 + I*\[Phi]4]))/2 - (kT4*(MH^2 - T)*Sech[\[Eta]4]*
+              (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-(Sqrt[S]*Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + kT3*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[
+                \[Eta]4 + I*\[Phi]4]))/Sqrt[2] - kT4*Sech[\[Eta]4]*
+             ((kT3*(S + T14)*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2] + 
+              (kT4*(MH^2 - T)*(Cos[\[Phi]4] + I*Sin[\[Phi]4]))/Sqrt[2])*
+             (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-Conjugate[
+                1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                     Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                 I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                 I*\[Phi]4]) + 2*Sqrt[2]*kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+             (-(S*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                       Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                       Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                        \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/8 + 
+              (kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-(Sqrt[S]*Sech[\[Eta]4]*
+                    ((Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]])/2 + kT4*(Conjugate[
+                         (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                         (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[1/Sqrt[
+                          (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                          kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                        Sinh[\[Eta]4])))/(2*Sqrt[2]) - (kT3*Sqrt[S]*
+                   Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                      I*\[Phi]4]))/(2*Sqrt[2])))/Sqrt[2])) + 
+          ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(-((MH^2 - T)*(S - S34 - T14 + U)*
+                Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + 
+                   I*\[Phi]4]))/2 + 4*(MH^2 - T)*((Sqrt[S]*Sech[\[Eta]4]*
+                 (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/4 + (kT3*kT4*
+                 Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                 (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                2)))/Sqrt[2]) - 4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+           (MH^2 - T) - DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T))*
+         (-(Sqrt[S]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+             ((kT3*(-5*MH^2 + 4*S34 + T + 2*T24 + 4*U)*(Cos[\[Phi]3] + 
+                 I*Sin[\[Phi]3]))/Sqrt[2] - Sqrt[2]*(MH^2 - T)*(
+                kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4]))))/2 + Sqrt[2]*Sqrt[S]*(MH^2 - T)*
+           Sech[\[Eta]4]*(-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])]])/2 + 
+            kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                     Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])) - 
+          (Sech[\[Eta]4]*(Sqrt[2]*kT4*Sqrt[S]*(MH^2 - T)*Conjugate[1/
+                Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]4] + I*
+                Sin[\[Phi]4]) + (kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*(
+                (Sqrt[S]*(7*MH^2 - 8*S34 - 3*T - 2*T24)*Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 - 
+                4*kT3*(-2*MH^2 + 2*S34 + T + 2*T14 + T24)*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3]) - kT4*(7*MH^2 - 3*T - 2*T24 - 8*U)*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 + Sqrt[2]*kT4*(MH^2 - T)*
+           Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+           (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+            kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                     Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))*
+           (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+           ((kT3*(-5*MH^2 + 4*S34 + T + 2*T24 + 4*U)*(Cos[\[Phi]3] + I*
+                Sin[\[Phi]3]))/Sqrt[2] - Sqrt[2]*(MH^2 - T)*
+             (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                kT4*Sin[\[Phi]4])))*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+             Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(-((MH^2 - T)*(S - S34 - T14 + U)*
+                Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + 
+                   I*\[Phi]4]))/2 + 4*(MH^2 - T)*((Sqrt[S]*Sech[\[Eta]4]*
+                 (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/4 + (kT3*kT4*
+                 Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                 (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                2)))/Sqrt[2] - 8*Sqrt[2]*kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+           (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - 
+                kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*(
+                Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                       Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                  (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+                Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                       Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                       Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                        \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 Sinh[\[Eta]3]))/4 + (kT3*Sqrt[S]*Sech[\[Eta]4]*
+              (Cos[\[Phi]3] - I*Sin[\[Phi]3])*((Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + kT4*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4])))/4 + (kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+              (-((kT3^2*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                        (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                       (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                        (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                         4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                    Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                        (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                       (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                        (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                         4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                    Sin[\[Phi]3] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+                  (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                 Sqrt[2]) + (kT3*Sech[\[Eta]4]*((Sqrt[S]*Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                   2 + kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[
+                          \[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                        (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                         (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                     Cos[\[Phi]4] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                         (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                         Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4]))*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                    I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2])) + 
+        8*((kT3*(-1/(2*(MH^2 - T)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+                Sqrt[MT^2]])/(2*(MH^2 - T)^2) + (MH^2*DiscB[T, Sqrt[MT^2], 
+                Sqrt[MT^2]])/(2*(MH^2 - T)^2) - 
+             (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                  (2*MT^2)]^2)/(2*(MH^2 - T)^2) + 
+             (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+              (2*(MH^2 - T)^2))*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+            (-(Sqrt[S]*(-MH^2 + 2*S + T + 2*T14)*((-I)*Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4])/2 - 
+             (Sech[\[Eta]4]*((Sqrt[S]*(-3*MH^2 + 4*S34 + T + 2*T24)*
+                  Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                        Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                        Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                         \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                 2 - 2*kT3*(S - S34 - T14 + U)*(Conjugate[
+                    (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3]) - kT4*(-3*MH^2 + T + 2*T24 + 4*U)*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                Sinh[\[Eta]4 + I*\[Phi]4]))/2 - kT4*(-MH^2 + 2*S + T + 2*T14)*
+              Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+              (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]) + 8*((kT3*S*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                      4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                        2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                       Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                       Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                        \[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+                  I*Sin[\[Phi]3]))/8 + (kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                 ((kT3*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                       (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]3]))/(2*Sqrt[2]) + 
+                  (kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + 
+                     Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/(2*Sqrt[2])))/
+                Sqrt[2])))/Sqrt[2] + 
+          (kT3*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - T)) + 
+             DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - T)))*
+            (Cos[\[Phi]3] + I*Sin[\[Phi]3])*((Sqrt[S]*(-3*MH^2 + 2*S34 + T + 
+                2*U)*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                    (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4])/2 - 
+             (Sech[\[Eta]4]*((Sqrt[S]*(-3*MH^2 + 4*S34 + T)*Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 - 
+                2*kT3*(S - S34 - T14 + U)*(Conjugate[
+                    (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3]) - kT4*(-3*MH^2 + T + 4*U)*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                Sinh[\[Eta]4 + I*\[Phi]4]))/2 + kT4*(-3*MH^2 + 2*S34 + T + 2*
+                U)*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+              (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]) + 8*(-(kT3*Sqrt[S]*Sech[\[Eta]4]*
+                  (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                   I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                  (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]3]))/4 + (kT3*Sqrt[S]*Sech[\[Eta]4]*
+                 (Cos[\[Phi]3] - I*Sin[\[Phi]3])*((Sqrt[S]*Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                   2 + kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[
+                          \[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                        (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                         (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                     Cos[\[Phi]4] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                         (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                         Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4])))/4 + (kT4*(Cos[\[Phi]4] - 
+                  I*Sin[\[Phi]4])*(-((kT3^2*Sech[\[Eta]4]*(Conjugate[
+                        (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                        (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[1/Sqrt[
+                          (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                          kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                       Sinh[\[Eta]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - 
+                        I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]) + 
+                  (kT3*Sech[\[Eta]4]*((Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+                     kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                         (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[1/Sqrt[
+                          (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                          kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                        Sinh[\[Eta]4]))*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                       I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2])))/
+           Sqrt[2]))/T)/T24))/(MW*SW)
diff --git a/tests/triangle_2diags++++.m b/tests/triangle_2diags++++.m
new file mode 100644
index 0000000000000000000000000000000000000000..25e361a9c76d880fcb5cbaa30dfca307aa09ce9e
--- /dev/null
+++ b/tests/triangle_2diags++++.m
@@ -0,0 +1,1517 @@
+(* Created with the Wolfram Language for Students - Personal Use Only : www.wolfram.com *)
+Amp[{{V[5, {Glu1}], k[1], 0, {Sqrt[3]*ColorCharge}}, 
+    {V[5, {Glu2}], k[2], 0, {Sqrt[3]*ColorCharge}}} -> 
+   {{S[1], k[3], MH, {}}, {V[5, {Glu4}], k[4], 0, {Sqrt[3]*ColorCharge}}, 
+    {V[5, {Glu5}], k[5], 0, {Sqrt[3]*ColorCharge}}}][
+ (2*c3*((8*Sqrt[2]*Alfas^2*EL*kT3*MT^2*(-1/(2*(MH^2 - T)) - 
+        (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - T)^2) + 
+        (MH^2*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - T)^2) - 
+        (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^
+           2)/(2*(MH^2 - T)^2) + 
+        (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+         (2*(MH^2 - T)^2))*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+       (-(Sqrt[S]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4])/4 - 
+        (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*
+                kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/4))/
+      (MW*SW) - (4*Alfas^2*EL*MT^2*(2 + Eps^(-1) + DiscB[T, Sqrt[MT^2], 
+         Sqrt[MT^2]] + Log[Mu^2/MT^2])*
+       (((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+         (2*Sqrt[2]) - 
+        (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+         (2*Sqrt[2]) + Sqrt[2]*Sech[\[Eta]4]*
+         (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+          I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Cosh[\[Eta]4 + I*\[Phi]4] + 
+          Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Sinh[\[Eta]4 + I*\[Phi]4])))/(MW*SW) + 
+     (16*Alfas^2*EL*MT^2*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+         (4*(MH^2 - T)) - (T*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/
+         (4*(MH^2 - T)) + 
+        (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^
+           2)/(4*(MH^2 - T)) + (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+        (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+         (4*(MH^2 - T)))*
+       (((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+         (2*Sqrt[2]) - 
+        (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+         (2*Sqrt[2]) + Sqrt[2]*Sech[\[Eta]4]*
+         (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+          I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Cosh[\[Eta]4 + I*\[Phi]4] + 
+          Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Sinh[\[Eta]4 + I*\[Phi]4])))/(MW*SW) - 
+     (2*Alfas^2*EL*MT^2*
+       (Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+         (2*(MH^2 - T)) - Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/
+            (2*MT^2)]^2/(2*(MH^2 - T)))*
+       (-(Sech[\[Eta]4]*(((-MH^2 + T)*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] - 
+            (kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                    Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                   kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                    Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                  (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+              (Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2])*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+        Sqrt[2]*(MH^2 - T)*Sech[\[Eta]4]*
+         (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+          I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Cosh[\[Eta]4 + I*\[Phi]4] + 
+          Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Sinh[\[Eta]4 + I*\[Phi]4]) - 
+        (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+          (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/2 - 
+           ((-MH^2 + T)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2))/Sqrt[2]))/(MW*SW) - 
+     (8*Sqrt[2]*Alfas^2*EL*kT3*MT^2*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+         (2*(MH^2 - T)) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - T)))*
+       (Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+       ((kT3*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                  kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                 kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                    Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                   kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                    Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                    \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+           Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+           Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+          (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+        kT3*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+         (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+          I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Cosh[\[Eta]4 + I*\[Phi]4] + 
+          Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Sinh[\[Eta]4 + I*\[Phi]4]) - 
+        (kT3*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2))/
+      (MW*SW) - (4*Alfas^2*EL*MT^2*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+         (MH^2 - T) - DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T))*
+       (-(Sech[\[Eta]4]*(((-MH^2 + T)*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+            Sqrt[2]*kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+             (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+               2 - kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                         \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+                Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])))*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+        Sqrt[2]*Sech[\[Eta]4]*(MH^2 - T + kT3^2*(Cos[\[Phi]3] - 
+            I*Sin[\[Phi]3])*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))*
+         (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+          I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Cosh[\[Eta]4 + I*\[Phi]4] + 
+          Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Sinh[\[Eta]4 + I*\[Phi]4]) - 
+        (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+          (-((-MH^2 + T)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[
+                \[Eta]4 + I*\[Phi]4]))/2 + Sqrt[2]*kT3*(Cos[\[Phi]3] + 
+             I*Sin[\[Phi]3])*(-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+             (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                  I*\[Phi]4]))/Sqrt[2])))/Sqrt[2]))/(MW*SW)))/T + 
+  (2*c2*((-8*Sqrt[2]*Alfas^2*EL*kT3*MT^2*(-1/(2*(MH^2 - T)) - 
+        (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - T)^2) + 
+        (MH^2*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - T)^2) - 
+        (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^
+           2)/(2*(MH^2 - T)^2) + 
+        (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+         (2*(MH^2 - T)^2))*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+       ((Sqrt[S]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4])/4 - 
+        (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*
+                kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2))/
+      (MW*SW) - (4*Alfas^2*EL*MT^2*(2 + Eps^(-1) + DiscB[T, Sqrt[MT^2], 
+         Sqrt[MT^2]] + Log[Mu^2/MT^2])*
+       (-(((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+          Sqrt[2]) - (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                  kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                    Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                   kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                    Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                    \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+         (2*Sqrt[2]) - (Sech[\[Eta]4]*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]))/
+      (MW*SW) + (16*Alfas^2*EL*MT^2*
+       (3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - T)) - 
+        (T*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - T)) + 
+        (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^
+           2)/(4*(MH^2 - T)) + (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+        (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+         (4*(MH^2 - T)))*
+       (-(((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+          Sqrt[2]) - (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                  kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                    Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                   kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                    Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                    \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+         (2*Sqrt[2]) - (Sech[\[Eta]4]*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]))/
+      (MW*SW) + (2*Alfas^2*EL*MT^2*
+       (Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+         (2*(MH^2 - T)) - Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/
+            (2*MT^2)]^2/(2*(MH^2 - T)))*
+       (-(Sech[\[Eta]4]*(((-MH^2 + T)*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] - 
+           (kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                   Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                  kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                   Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                 (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+             (Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2])*
+          (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4])) + 
+        ((MH^2 - T)*Sech[\[Eta]4]*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] + 
+        (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+          (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/2 - 
+           ((-MH^2 + T)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2))/Sqrt[2]))/(MW*SW) + 
+     (8*Sqrt[2]*Alfas^2*EL*kT3*MT^2*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+         (2*(MH^2 - T)) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - T)))*
+       (Cos[\[Phi]3] + I*Sin[\[Phi]3])*(kT3*Sech[\[Eta]4]*
+         (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+          Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+          Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+         (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]) + 
+        (kT3*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+        (kT3*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2))/
+      (MW*SW) + (4*Alfas^2*EL*MT^2*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+         (MH^2 - T) - DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T))*
+       (-(Sech[\[Eta]4]*(((-MH^2 + T)*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+           Sqrt[2]*kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+            (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 - 
+             kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])))*
+          (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4])) + 
+        (Sech[\[Eta]4]*(MH^2 - T + kT3^2*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+            (Cos[\[Phi]3] + I*Sin[\[Phi]3]))*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] + 
+        (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+          (-((-MH^2 + T)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[
+                \[Eta]4 + I*\[Phi]4]))/2 + Sqrt[2]*kT3*(Cos[\[Phi]3] + 
+             I*Sin[\[Phi]3])*(-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+             (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                  I*\[Phi]4]))/Sqrt[2])))/Sqrt[2]))/(MW*SW)))/T + 
+  (2*c1*((8*Sqrt[2]*Alfas^2*EL*kT3*MT^2*(-1/(2*(MH^2 - T)) - 
+        (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - T)^2) + 
+        (MH^2*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - T)^2) - 
+        (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^
+           2)/(2*(MH^2 - T)^2) + 
+        (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+         (2*(MH^2 - T)^2))*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+       ((Sqrt[S]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4])/2 - 
+        (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*
+                kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/4))/
+      (MW*SW) + (4*Alfas^2*EL*MT^2*(2 + Eps^(-1) + DiscB[T, Sqrt[MT^2], 
+         Sqrt[MT^2]] + Log[Mu^2/MT^2])*
+       (-((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+         (2*Sqrt[2]) - 
+        (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] + 
+        (Sech[\[Eta]4]*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                  Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                 kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                  Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]))/
+      (MW*SW) - (16*Alfas^2*EL*MT^2*
+       (3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - T)) - 
+        (T*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - T)) + 
+        (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^
+           2)/(4*(MH^2 - T)) + (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+        (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+         (4*(MH^2 - T)))*
+       (-((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+         (2*Sqrt[2]) - 
+        (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] + 
+        (Sech[\[Eta]4]*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                  Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                 kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                  Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]))/
+      (MW*SW) + (2*Alfas^2*EL*MT^2*
+       (Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+         (2*(MH^2 - T)) - Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/
+            (2*MT^2)]^2/(2*(MH^2 - T)))*
+       ((Sech[\[Eta]4]*(((-MH^2 + T)*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] - 
+           (kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                   Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                  kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                   Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                 (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+             (Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2])*
+          (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+        ((MH^2 - T)*Sech[\[Eta]4]*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] - 
+        Sqrt[2]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+          Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+              Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[
+                kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*
+                kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+         (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/2 - 
+          ((-MH^2 + T)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2)))/(MW*SW) + 
+     (8*Sqrt[2]*Alfas^2*EL*kT3*MT^2*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+         (2*(MH^2 - T)) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - T)))*
+       (Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+       (-(kT3*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                  kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+        (kT3*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+        kT3*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+          Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+              Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[
+                kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*
+                kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+         (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4])))/(MW*SW) + 
+     (4*Alfas^2*EL*MT^2*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T) - 
+        DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T))*
+       ((Sech[\[Eta]4]*(((-MH^2 + T)*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+           Sqrt[2]*kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+            (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 - 
+             kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])))*
+          (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+        (Sech[\[Eta]4]*(MH^2 - T + kT3^2*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+            (Cos[\[Phi]3] + I*Sin[\[Phi]3]))*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] - 
+        Sqrt[2]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+          Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+              Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[
+                kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*
+                kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+         (-((-MH^2 + T)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2 + Sqrt[2]*kT3*
+           (Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(Sqrt[S]*Sech[\[Eta]4])/
+             (2*Sqrt[2]) + (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[
+                \[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))))/(MW*SW)))/T]